bugfixes, new scaling, double ym upd at 940

[picodrive.git] / platform / win32 / GenaDrive / Emu.cpp

\r
#include "app.h"\r
\r
extern "C" {\r
struct Pico\r
{\r
  unsigned char ram[0x10000];  // 0x00000 scratch ram\r
  unsigned short vram[0x8000]; // 0x10000\r
  unsigned char zram[0x2000];  // 0x20000 Z80 ram\r
  unsigned char ioports[0x10];\r
  unsigned int pad[0x3c];      // unused\r
  unsigned short cram[0x40];   // 0x22100\r
  unsigned short vsram[0x40];  // 0x22180\r
\r
  unsigned char *rom;          // 0x22200\r
  unsigned int romsize;        // 0x22204\r
\r
//  struct PicoMisc m;\r
//  struct PicoVideo video;\r
};\r
  extern struct Pico Pico;\r
}\r
\r
unsigned short *EmuScreen=NULL;\r
extern "C" unsigned short *framebuff=NULL;\r
int EmuWidth=0,EmuHeight=0;\r
static int frame=0;\r
static int EmuScan(unsigned int num, void *sdata);\r
\r
int EmuInit()\r
{\r
  int len=0;\r
\r
//  PicoOpt=-1;\r
//  PsndRate=44100; PsndLen=DSoundSeg;\r
\r
  PicoInit();\r
\r
  // Allocate screen:\r
  EmuWidth=320; EmuHeight=224;\r
  len=EmuWidth*EmuHeight; len<<=1;\r
  EmuScreen=(unsigned short *)malloc(len); if (EmuScreen==NULL) return 1;\r
  framebuff=(unsigned short *)malloc((8+320)*(8+224+8)*2);\r
  memset(EmuScreen,0,len);\r
\r
  PicoScan=EmuScan;\r
\r
  return 0;\r
}\r
\r
void EmuExit()\r
{\r
  //RomFree();\r
  free(EmuScreen); EmuScreen=NULL; // Deallocate screen\r
  free(framebuff);\r
  EmuWidth=EmuHeight=0;\r
\r
  PicoExit();\r
}\r
\r
// Megadrive scanline callback:\r
static int EmuScan(unsigned int num, void *sdata)\r
{\r
  unsigned short *pd=NULL,*end=NULL;\r
  unsigned short *ps=NULL;\r
\r
  if (num>=(unsigned int)EmuHeight) return 0;\r
\r
  // Copy scanline to screen buffer:\r
  pd=EmuScreen+(num<<8)+(num<<6); end=pd+320;\r
  ps=(unsigned short *)sdata;\r
\r
  do { *pd++=(unsigned short)PicoCram(*ps++); } while (pd<end);\r
  \r
  return 0;\r
}\r
\r
int EmuFrame()\r
{\r
  char map[12]={0,1,2,3,8,9,10,4,11,12,13,14};  // Joypads, format is UDLR BCAS ZYXM\r
  int a=0,input=0;\r
 \r
  // Set Megadrive buttons:\r
  for (a=0;a<12;a++)\r
  {\r
    int m=map[a];\r
    if (m>=0) if (Inp.button[m]>30) input|=1<<a;\r
  }\r
\r
  PicoPad[0]=input;\r
\r
  frame++;\r
  PsndOut=(short *)DSoundNext; PicoFrame(); PsndOut=NULL;\r
\r
  // rendermode2\r
  if(PicoOpt&0x10) {\r
	unsigned short *pd=EmuScreen;\r
	unsigned char  *ps=(unsigned char*)framebuff+328*8;\r
\r
	unsigned short palHigh[0x40];\r
	for(int i = 0; i < 0x40; i++)\r
	  palHigh[i]=(unsigned short)PicoCram(Pico.cram[i]);\r
\r
    for(int y=0; y < 224; y++) {\r
	  ps+=8;\r
	  for(int x=0; x < 320; x++)\r
		*pd++=palHigh[*ps++];\r
	}\r
  }\r
\r
  return 0;\r
}\r