minor adjustments
[picodrive.git] / Pico / Pico.c
index 2ebe9c9..2a18818 100644 (file)
 \r
 int PicoVer=0x0133;\r
 struct Pico Pico;\r
-int PicoOpt=0; // disable everything by default\r
-int PicoSkipFrame=0; // skip rendering frame?\r
+int PicoOpt = 0;\r
+int PicoSkipFrame = 0; // skip rendering frame?\r
+int emustatus = 0;     // rapid_ym2612, multi_ym_updates\r
+int PicoPad[2];        // Joypads, format is SACB RLDU\r
+int PicoAHW = 0;       // active addon hardware: scd_active, 32x_active, svp_active, pico_active\r
 int PicoRegionOverride = 0; // override the region detection 0: Auto, 1: Japan NTSC, 2: Japan PAL, 4: US, 8: Europe\r
 int PicoAutoRgnOrder = 0;\r
-int emustatus = 0; // rapid_ym2612, multi_ym_updates\r
+int z80startCycle, z80stopCycle; // in 68k cycles\r
+struct PicoSRAM SRam = {0,};\r
+\r
 void (*PicoWriteSound)(int len) = NULL; // called at the best time to send sound buffer (PsndOut) to hardware\r
 void (*PicoResetHook)(void) = NULL;\r
 void (*PicoLineHook)(int count) = NULL;\r
 \r
-struct PicoSRAM SRam = {0,};\r
-int z80startCycle, z80stopCycle; // in 68k cycles\r
-int PicoPad[2];  // Joypads, format is SACB RLDU\r
-int PicoMCD = 0; // mega CD status: scd_started\r
-\r
 // to be called once on emu init\r
 int PicoInit(void)\r
 {\r
@@ -48,59 +48,51 @@ int PicoInit(void)
 // to be called once on emu exit\r
 void PicoExit(void)\r
 {\r
-  if (PicoMCD&1)\r
+  if (PicoAHW & PAHW_MCD)\r
     PicoExitMCD();\r
   z80_exit();\r
 \r
-  if(SRam.data) free(SRam.data); SRam.data=0;\r
+  if (SRam.data) free(SRam.data); SRam.data=0;\r
 }\r
 \r
-int PicoReset(int hard)\r
+void PicoPower(void)\r
 {\r
-  unsigned int region=0;\r
-  int support=0,hw=0,i=0;\r
-  unsigned char pal=0;\r
   unsigned char sram_reg=Pico.m.sram_reg; // must be preserved\r
 \r
-  if (Pico.romsize<=0) return 1;\r
-\r
-  /* must call now, so that banking is reset, and correct vectors get fetched */\r
-  if (PicoResetHook) PicoResetHook();\r
+  // clear all memory of the emulated machine\r
+  memset(&Pico.ram,0,(unsigned int)&Pico.rom-(unsigned int)&Pico.ram);\r
 \r
-  PicoMemReset();\r
-  SekReset();\r
-  // s68k doesn't have the TAS quirk, so we just globally set normal TAS handler in MCD mode (used by Batman games).\r
-  SekSetRealTAS(PicoMCD & 1);\r
-  SekCycleCntT=0;\r
-  z80_reset();\r
-\r
-  // reset VDP state, VRAM and PicoMisc\r
-  //memset(&Pico.video,0,sizeof(Pico.video));\r
-  //memset(&Pico.vram,0,sizeof(Pico.vram));\r
-  memset(Pico.ioports,0,sizeof(Pico.ioports)); // needed for MCD to reset properly\r
+  memset(&Pico.video,0,sizeof(Pico.video));\r
   memset(&Pico.m,0,sizeof(Pico.m));\r
-  Pico.video.pending_ints=0;\r
-  emustatus = 0;\r
 \r
-  if (hard) {\r
-    // clear all memory of the emulated machine\r
-    memset(&Pico.ram,0,(unsigned int)&Pico.rom-(unsigned int)&Pico.ram);\r
-  }\r
+  Pico.video.pending_ints=0;\r
+  z80_reset();\r
 \r
   // default VDP register values (based on Fusion)\r
   Pico.video.reg[0] = Pico.video.reg[1] = 0x04;\r
   Pico.video.reg[0xc] = 0x81;\r
   Pico.video.reg[0xf] = 0x02;\r
-  Pico.m.dirtyPal = 1;\r
 \r
-  if(PicoRegionOverride)\r
+  if (PicoAHW & PAHW_MCD)\r
+    PicoPowerMCD();\r
+\r
+  Pico.m.sram_reg=sram_reg;\r
+  PicoReset();\r
+}\r
+\r
+PICO_INTERNAL void PicoDetectRegion(void)\r
+{\r
+  int support=0, hw=0, i;\r
+  unsigned char pal=0;\r
+\r
+  if (PicoRegionOverride)\r
   {\r
     support = PicoRegionOverride;\r
   }\r
   else\r
   {\r
     // Read cartridge region data:\r
-    region=PicoRead32(0x1f0);\r
+    int region=PicoRead32(0x1f0);\r
 \r
     for (i=0;i<4;i++)\r
     {\r
@@ -141,12 +133,41 @@ int PicoReset(int hard)
 \r
   Pico.m.hardware=(unsigned char)(hw|0x20); // No disk attached\r
   Pico.m.pal=pal;\r
-  Pico.video.status = 0x3408 | pal; // always set bits | vblank | pal\r
+}\r
+\r
+int PicoReset(void)\r
+{\r
+  unsigned char sram_reg=Pico.m.sram_reg; // must be preserved\r
+\r
+  if (Pico.romsize<=0) return 1;\r
+\r
+  /* must call now, so that banking is reset, and correct vectors get fetched */\r
+  if (PicoResetHook) PicoResetHook();\r
+\r
+  PicoMemReset();\r
+  SekReset();\r
+  // s68k doesn't have the TAS quirk, so we just globally set normal TAS handler in MCD mode (used by Batman games).\r
+  SekSetRealTAS(PicoAHW & PAHW_MCD);\r
+  SekCycleCntT=0;\r
+\r
+  if (PicoAHW & PAHW_MCD)\r
+    // needed for MCD to reset properly, probably some bug hides behind this..\r
+    memset(Pico.ioports,0,sizeof(Pico.ioports));\r
+  emustatus = 0;\r
+\r
+  Pico.m.dirtyPal = 1;\r
+\r
+  PicoDetectRegion();\r
+  Pico.video.status = 0x3408 | Pico.m.pal; // 'always set' bits | vblank | pal\r
 \r
   PsndReset(); // pal must be known here\r
 \r
-  if (PicoMCD & 1) {\r
-    PicoResetMCD(hard);\r
+  // create an empty "dma" to cause 68k exec start at random frame location\r
+  if (Pico.m.dma_xfers == 0 && !(PicoOpt&POPT_DIS_VDP_FIFO))\r
+    Pico.m.dma_xfers = rand() & 0x1fff;\r
+\r
+  if (PicoAHW & PAHW_MCD) {\r
+    PicoResetMCD();\r
     return 0;\r
   }\r
 \r
@@ -293,7 +314,7 @@ static void PicoRunZ80Simple(int line_from, int line_to)
   int line_from_r=line_from, line_to_r=line_to, line=0;\r
   int line_sample = Pico.m.pal ? 68 : 93;\r
 \r
-  if (!(PicoOpt&4) || Pico.m.z80Run == 0) line_to_r = 0;\r
+  if (!(PicoOpt&POPT_EN_Z80) || Pico.m.z80Run == 0) line_to_r = 0;\r
   else {\r
     extern const unsigned short vcounts[];\r
     if (z80startCycle) {\r
@@ -304,7 +325,7 @@ static void PicoRunZ80Simple(int line_from, int line_to)
     z80startCycle = SekCyclesDone();\r
   }\r
 \r
-  if (PicoOpt&1) {\r
+  if (PicoOpt&POPT_EN_FM) {\r
     // we have ym2612 enabled, so we have to run Z80 in lines, so we could update DAC and timers\r
     for (line = line_from; line < line_to; line++) {\r
       Psnd_timers_and_dac(line);\r
@@ -345,7 +366,7 @@ static int PicoFrameSimple(void)
   }\r
 \r
   // a hack for VR, to get it running in fast mode\r
-  if (PicoRead16Hook == PicoSVPRead16)\r
+  if (PicoAHW & PAHW_SVP)\r
     Pico.ram[0xd864^1] = 0x1a;\r
 \r
   // we don't emulate DMA timing in this mode\r
@@ -396,7 +417,7 @@ static int PicoFrameSimple(void)
   }\r
 \r
   // another hack for VR (it needs hints to work)\r
-  if (PicoRead16Hook == PicoSVPRead16) {\r
+  if (PicoAHW & PAHW_SVP) {\r
     Pico.ram[0xd864^1] = 1;\r
     pv->pending_ints|=0x10;\r
     if (pv->reg[0]&0x10) SekInterrupt(4);\r
@@ -406,7 +427,7 @@ static int PicoFrameSimple(void)
   // render screen\r
   if (!PicoSkipFrame)\r
   {\r
-    if (!(PicoOpt&0x10))\r
+    if (!(PicoOpt&POPT_ALT_RENDERER))\r
     {\r
       // Draw the screen\r
 #if CAN_HANDLE_240_LINES\r
@@ -426,7 +447,7 @@ static int PicoFrameSimple(void)
   }\r
 \r
   // here we render sound if ym2612 is disabled\r
-  if (!(PicoOpt&1) && PsndOut) {\r
+  if (!(PicoOpt&POPT_EN_FM) && PsndOut) {\r
     int len = PsndRender(0, PsndLen);\r
     if (PicoWriteSound) PicoWriteSound(len);\r
     // clear sound buffer\r
@@ -457,10 +478,11 @@ static int PicoFrameSimple(void)
   }\r
 \r
   if (pv->reg[1]&0x20) SekInterrupt(6); // Set IRQ\r
-  if (Pico.m.z80Run && (PicoOpt&4))\r
+  if (Pico.m.z80Run && (PicoOpt&POPT_EN_Z80))\r
     z80_int();\r
 \r
-  while (sects) {\r
+  while (sects)\r
+  {\r
     lines += lines_step;\r
 \r
     SekRunM68k(cycles_68k_vblock);\r
@@ -489,23 +511,23 @@ int PicoFrame(void)
 \r
   Pico.m.frame_count++;\r
 \r
-  if (PicoMCD & 1) {\r
+  if (PicoAHW & PAHW_MCD) {\r
     PicoFrameMCD();\r
     return 0;\r
   }\r
 \r
   // be accurate if we are asked for this\r
-  if(PicoOpt&0x40) acc=1;\r
+  if (PicoOpt&POPT_ACC_TIMING) acc=1;\r
   // don't be accurate in alternative render mode, as hint effects will not be rendered anyway\r
-  else if(PicoOpt&0x10) acc = 0;\r
+  else if (PicoOpt&POPT_ALT_RENDERER) acc = 0;\r
   else acc=Pico.video.reg[0]&0x10; // be accurate if hints are used\r
 \r
   //if(Pico.video.reg[12]&0x2) Pico.video.status ^= 0x10; // change odd bit in interlace mode\r
 \r
-  if(!(PicoOpt&0x10))\r
+  if (!(PicoOpt&POPT_ALT_RENDERER))\r
     PicoFrameStart();\r
 \r
-  if(acc)\r
+  if (acc)\r
        PicoFrameHints();\r
   else PicoFrameSimple();\r
 \r