reset behavior changed, Puggsy detection added
[picodrive.git] / Pico / Pico.c
index 71add13..7978fed 100644 (file)
@@ -38,6 +38,7 @@ int PicoInit(void)
   z80_init(); // init even if we aren't going to use it\r
 \r
   PicoInitMCD();\r
+  PicoSVPInit();\r
 \r
   SRam.data=0;\r
 \r
@@ -51,10 +52,32 @@ void PicoExit(void)
     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
+  // clear all memory of the emulated machine\r
+  memset(&Pico.ram,0,(unsigned int)&Pico.rom-(unsigned int)&Pico.ram);\r
+\r
+  memset(&Pico.video,0,sizeof(Pico.video));\r
+  memset(&Pico.m,0,sizeof(Pico.m));\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
+\r
+  if (PicoMCD & 1)\r
+    PicoPowerMCD();\r
+\r
+  PicoReset();\r
+}\r
+\r
+int PicoReset(void)\r
 {\r
   unsigned int region=0;\r
   int support=0,hw=0,i=0;\r
@@ -63,30 +86,20 @@ int PicoReset(int hard)
 \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(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.m,0,sizeof(Pico.m));\r
-  Pico.video.pending_ints=0;\r
+  if (PicoMCD & 1)\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
-  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
-\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
@@ -137,14 +150,16 @@ 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
+  Pico.video.status = 0x3408 | pal; // 'always set' bits | vblank | pal\r
 \r
   PsndReset(); // pal must be known here\r
 \r
-  if (PicoResetHook) PicoResetHook();\r
+  // create an empty "dma" to cause 68k exec start at random frame location\r
+  if (Pico.m.dma_xfers == 0 && !(PicoOpt&0x10000))\r
+    Pico.m.dma_xfers = rand() & 0x1fff;\r
 \r
   if (PicoMCD & 1) {\r
-    PicoResetMCD(hard);\r
+    PicoResetMCD();\r
     return 0;\r
   }\r
 \r
@@ -161,15 +176,16 @@ int PicoReset(int hard)
 \r
 // dma2vram settings are just hacks to unglitch Legend of Galahad (needs <= 104 to work)\r
 // same for Outrunners (92-121, when active is set to 24)\r
+// 96 is VR hack\r
 static const int dma_timings[] = {\r
-83,  167, 166,  83, // vblank: 32cell: dma2vram dma2[vs|c]ram vram_fill vram_copy\r
+96,  167, 166,  83, // vblank: 32cell: dma2vram dma2[vs|c]ram vram_fill vram_copy\r
 102, 205, 204, 102, // vblank: 40cell:\r
 16,   16,  15,   8, // active: 32cell:\r
 24,   18,  17,   9  // ...\r
 };\r
 \r
 static const int dma_bsycles[] = {\r
-(488<<8)/82,  (488<<8)/167, (488<<8)/166, (488<<8)/83,\r
+(488<<8)/96,  (488<<8)/167, (488<<8)/166, (488<<8)/83,\r
 (488<<8)/102, (488<<8)/205, (488<<8)/204, (488<<8)/102,\r
 (488<<8)/16,  (488<<8)/16,  (488<<8)/15,  (488<<8)/8,\r
 (488<<8)/24,  (488<<8)/18,  (488<<8)/17,  (488<<8)/9\r
@@ -241,12 +257,12 @@ static __inline void SekStep(void)
 \r
 static int CheckIdle(void)\r
 {\r
-  int i, state[0x22];\r
+  int i, state[0x24];\r
 \r
   // See if the state is the same after 2 steps:\r
-  SekState(state); SekStep(); SekStep(); SekState(state+0x11);\r
-  for (i = 0x10; i >= 0; i--)\r
-    if (state[i] != state[i+0x11]) return 0;\r
+  SekState(state); SekStep(); SekStep(); SekState(state+0x12);\r
+  for (i = 0x11; i >= 0; i--)\r
+    if (state[i] != state[i+0x12]) return 0;\r
 \r
   return 1;\r
 }\r
@@ -256,6 +272,7 @@ static int CheckIdle(void)
 static __inline void getSamples(int y)\r
 {\r
 #if SIMPLE_WRITE_SOUND\r
+  if (y != 224) return;\r
   PsndRender(0, PsndLen);\r
   if (PicoWriteSound) PicoWriteSound(PsndLen);\r
   PsndClear();\r
@@ -340,6 +357,10 @@ static int PicoFrameSimple(void)
     lines_step = 14;\r
   }\r
 \r
+  // a hack for VR, to get it running in fast mode\r
+  if (PicoRead16Hook == PicoSVPRead16)\r
+    Pico.ram[0xd864^1] = 0x1a;\r
+\r
   // we don't emulate DMA timing in this mode\r
   if (Pico.m.dma_xfers) {\r
     Pico.m.dma_xfers=0;\r
@@ -387,10 +408,19 @@ static int PicoFrameSimple(void)
     if (PicoLineHook) PicoLineHook(sects*lines_step);\r
   }\r
 \r
+  // another hack for VR (it needs hints to work)\r
+  if (PicoRead16Hook == PicoSVPRead16) {\r
+    Pico.ram[0xd864^1] = 1;\r
+    pv->pending_ints|=0x10;\r
+    if (pv->reg[0]&0x10) SekInterrupt(4);\r
+    SekRunM68k(160);\r
+  }\r
+\r
   // render screen\r
   if (!PicoSkipFrame)\r
   {\r
     if (!(PicoOpt&0x10))\r
+    {\r
       // Draw the screen\r
 #if CAN_HANDLE_240_LINES\r
       if (pv->reg[1]&8) {\r
@@ -401,6 +431,7 @@ static int PicoFrameSimple(void)
 #else\r
       for (y=0;y<224;y++) PicoLine(y);\r
 #endif\r
+    }\r
     else PicoFrameFull();\r
 #ifdef DRAW_FINISH_FUNC\r
     DRAW_FINISH_FUNC();\r
@@ -501,6 +532,17 @@ void PicoFrameDrawOnly(void)
   for (y=0;y<224;y++) PicoLine(y);\r
 }\r
 \r
+int PicoGetStat(pstat_t which)\r
+{\r
+  switch (which)\r
+  {\r
+    case PS_PAL:       return Pico.m.pal;\r
+    case PS_40_CELL:   return Pico.video.reg[12]&1;\r
+    case PS_240_LINES: return Pico.m.pal && (Pico.video.reg[1]&8);\r
+  }\r
+  return 0;\r
+}\r
+\r
 // callback to output message from emu\r
 void (*PicoMessage)(const char *msg)=NULL;\r
 \r