gen/cd frame loops merged
[picodrive.git] / Pico / Pico.c
index dcd7dd6..decd634 100644 (file)
@@ -19,7 +19,7 @@ int PicoAutoRgnOrder = 0;
 int emustatus = 0;\r
 void (*PicoWriteSound)(int len) = 0; // called once per frame at the best time to send sound buffer (PsndOut) to hardware\r
 \r
-struct PicoSRAM SRam;\r
+struct PicoSRAM SRam = {0,};\r
 int z80startCycle, z80stopCycle; // in 68k cycles\r
 //int z80ExtraCycles = 0;\r
 int PicoPad[2];  // Joypads, format is SACB RLDU\r
@@ -39,7 +39,6 @@ int PicoInit(void)
   PicoInitMCD();\r
 \r
   SRam.data=0;\r
-  SRam.resize=1;\r
 \r
   return 0;\r
 }\r
@@ -59,13 +58,10 @@ int PicoReset(int hard)
   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
-  // setup correct memory map\r
-  if (PicoMCD & 1)\r
-       PicoMemSetupCD();\r
-  else PicoMemSetup();\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
@@ -149,56 +145,17 @@ int PicoReset(int hard)
     return 0;\r
   }\r
 \r
-  if(SRam.resize) {\r
-    int sram_size = 0;\r
-    if(SRam.data) free(SRam.data); SRam.data=0;\r
-    Pico.m.sram_reg = 0;\r
-\r
-    if(*(Pico.rom+0x1B1) == 'R' && *(Pico.rom+0x1B0) == 'A') {\r
-      if(*(Pico.rom+0x1B2) & 0x40) {\r
-        // EEPROM\r
-        // what kind of EEPROMs are actually used? X24C02? X24C04? (X24C01 has only 128), but we will support up to 8K\r
-        SRam.start = PicoRead32(0x1B4) & ~1; // zero address is used for clock by some games\r
-        SRam.end   = PicoRead32(0x1B8);\r
-        sram_size  = 0x2000;\r
-        Pico.m.sram_reg = 4;\r
-      } else {\r
-        // normal SRAM\r
-        SRam.start = PicoRead32(0x1B4) & 0xFFFF00;\r
-        SRam.end   = PicoRead32(0x1B8) | 1;\r
-        sram_size  = SRam.end - SRam.start + 1;\r
-      }\r
-      Pico.m.sram_reg |= 0x10; // SRAM was detected\r
-    }\r
-    if(sram_size <= 0) {\r
-      // some games may have bad headers, like S&K and Sonic3\r
-      SRam.start = 0x200000;\r
-      SRam.end   = 0x203FFF;\r
-      sram_size  = 0x004000;\r
-    }\r
-\r
-    // enable sram access by default if it doesn't overlap with ROM\r
-    if(Pico.romsize <= SRam.start) Pico.m.sram_reg |= 1;\r
-    SRam.reg_back = Pico.m.sram_reg;\r
-\r
-    if(sram_size) {\r
-      SRam.data = (unsigned char *) calloc(sram_size, 1);\r
-      if(!SRam.data) return 1;\r
-    }\r
-    SRam.resize=0;\r
-    // Dino Dini's Soccer malfunctions if SRAM is not filled with 0xff\r
-    if (strncmp((char *)Pico.rom+0x150, "IDOND NI'I", 10) == 0)\r
-      memset(SRam.data, 0xff, sram_size);\r
-    elprintf(EL_STATUS, "sram: det: %i; eeprom: %i; start: %06x; end: %06x",\r
-      (Pico.m.sram_reg>>4)&1, (Pico.m.sram_reg>>2)&1, SRam.start, SRam.end);\r
-  }\r
+  // reset sram state; enable sram access by default if it doesn't overlap with ROM\r
+  Pico.m.sram_reg=sram_reg&0x14;\r
+  if (!(Pico.m.sram_reg&4) && Pico.romsize <= SRam.start) Pico.m.sram_reg |= 1;\r
 \r
-  Pico.m.sram_reg = SRam.reg_back; // restore sram_reg\r
-  SRam.changed = 0;\r
+  elprintf(EL_STATUS, "sram: det: %i; eeprom: %i; start: %06x; end: %06x",\r
+    (Pico.m.sram_reg>>4)&1, (Pico.m.sram_reg>>2)&1, SRam.start, SRam.end);\r
 \r
   return 0;\r
 }\r
 \r
+\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
 static const int dma_timings[] = {\r
@@ -242,7 +199,7 @@ PICO_INTERNAL int CheckDMA(void)
   return burn;\r
 }\r
 \r
-static __inline void SekRun(int cyc)\r
+static __inline void SekRunM68k(int cyc)\r
 {\r
   int cyc_do;\r
   SekCycleAim+=cyc;\r
@@ -495,21 +452,21 @@ static int PicoFrameSimple(void)
   int y=0,line=0,lines=0,lines_step=0,sects;\r
   int cycles_68k_vblock,cycles_68k_block;\r
 \r
-  if (Pico.m.pal) {\r
-    // M68k cycles/frame: 152009.78\r
+  // split to 16 run calls for active scan, for vblank split to 2 (ntsc), 3 (pal 240), 4 (pal 224)\r
+  if (Pico.m.pal && (pv->reg[1]&8)) { // 240 lines\r
     if(pv->reg[1]&8) { // 240 lines\r
-      cycles_68k_block  = (int) ((double) OSC_PAL  /  7 / 50 / 312 * 15 + 0.4); // 16 sects, 16*15=240, 7308\r
-      cycles_68k_vblock = (int) ((double) OSC_PAL  /  7 / 50 / 312 * 24 + 0.4); // 3 sects, 3*24=72, 35163?\r
+      cycles_68k_block  = 7329;  // (488*240+148)/16.0, -4\r
+      cycles_68k_vblock = 11640; // (72*488-148-68)/3.0, 0\r
       lines_step = 15;\r
     } else {\r
-      cycles_68k_block  = (int) ((double) OSC_PAL  /  7 / 50 / 312 * 14 + 0.4); // 16*14=224\r
-      cycles_68k_vblock = (int) ((double) OSC_PAL  /  7 / 50 / 312 * 22 + 0.4); // 4 sects, 4*22=88\r
+      cycles_68k_block  = 6841;  // (488*224+148)/16.0, -4\r
+      cycles_68k_vblock = 10682; // (88*488-148-68)/4.0, 0\r
       lines_step = 14;\r
     }\r
   } else {\r
     // M68k cycles/frame: 127840.71\r
-    cycles_68k_block  = (int) ((double) OSC_NTSC /  7 / 60 / 262 * 14 + 0.4); // 16*14=224, 6831\r
-    cycles_68k_vblock = (int) ((double) OSC_NTSC /  7 / 60 / 262 * 19 + 0.4); // 2 sects, 2*19=38, 18544\r
+    cycles_68k_block  = 6841; // (488*224+148)/16.0, -4\r
+    cycles_68k_vblock = 9164; // (38*488-148-68)/2.0, 0\r
     lines_step = 14;\r
   }\r
 \r
@@ -539,7 +496,7 @@ static int PicoFrameSimple(void)
     if (CheckIdle()) break;\r
 \r
     lines += lines_step;\r
-    SekRun(cycles_68k_block);\r
+    SekRunM68k(cycles_68k_block);\r
 \r
     PicoRunZ80Simple(line, lines);\r
     line=lines;\r
@@ -557,19 +514,20 @@ static int PicoFrameSimple(void)
   }\r
 \r
   // here we render sound if ym2612 is disabled\r
-  if(!(PicoOpt&1) && PsndOut) {\r
+  if (!(PicoOpt&1) && PsndOut) {\r
     int len = sound_render(0, PsndLen);\r
-    if(PicoWriteSound) PicoWriteSound(len);\r
+    if (PicoWriteSound) PicoWriteSound(len);\r
     // clear sound buffer\r
     sound_clear();\r
   }\r
 \r
   // render screen\r
-  if(!PicoSkipFrame) {\r
-    if(!(PicoOpt&0x10))\r
+  if (!PicoSkipFrame)\r
+  {\r
+    if (!(PicoOpt&0x10))\r
       // Draw the screen\r
 #if CAN_HANDLE_240_LINES\r
-      if(pv->reg[1]&8) {\r
+      if (pv->reg[1]&8) {\r
         for (y=0;y<240;y++) PicoLine(y);\r
       } else {\r
         for (y=0;y<224;y++) PicoLine(y);\r
@@ -580,6 +538,11 @@ static int PicoFrameSimple(void)
     else PicoFrameFull();\r
   }\r
 \r
+  // a gap between flags set and vint\r
+  pv->pending_ints|=0x20;\r
+  pv->status|=8; // go into vblank\r
+  SekRunM68k(68+4);\r
+\r
   // ---- V-Blanking period ----\r
   // fix line counts\r
   if(Pico.m.pal) {\r
@@ -598,27 +561,24 @@ static int PicoFrameSimple(void)
     lines_step = 19;\r
   }\r
 \r
-  //dprintf("vint: @ %06x [%i]", SekPc, SekCycleCnt);\r
-  pv->pending_ints|=0x20;\r
   if (pv->reg[1]&0x20) SekInterrupt(6); // Set IRQ\r
-  pv->status|=8; // go into vblank\r
-  if(Pico.m.z80Run && (PicoOpt&4)) // ?\r
+  if (Pico.m.z80Run && (PicoOpt&4))\r
     z80_int();\r
 \r
-  while(sects) {\r
+  while (sects) {\r
     lines += lines_step;\r
 \r
-    SekRun(cycles_68k_vblock);\r
+    SekRunM68k(cycles_68k_vblock);\r
 \r
     PicoRunZ80Simple(line, lines);\r
     line=lines;\r
 \r
     sects--;\r
-    if(sects && CheckIdle()) break;\r
+    if (sects && CheckIdle()) break;\r
   }\r
 \r
   // run Z80 for remaining sections\r
-  if(sects) {\r
+  if (sects) {\r
     lines += sects*lines_step;\r
     PicoRunZ80Simple(line, lines);\r
   }\r
@@ -689,8 +649,8 @@ char *debugString(void)
   sprintf(dstrp, "mode set 4: %02x\n", (r=reg[0xC])); dstrp+=strlen(dstrp);\r
   sprintf(dstrp, "interlace: %i%i, cells: %i, shadow: %i\n", bit(r,2), bit(r,1), (r&0x80) ? 40 : 32,  bit(r,3));\r
   dstrp+=strlen(dstrp);\r
-  sprintf(dstrp, "scroll size: w: %i, h: %i  SRAM: %i; eeprom: %i\n", reg[0x10]&3, (reg[0x10]&0x30)>>4,\r
-       bit(Pico.m.sram_reg, 4), bit(Pico.m.sram_reg, 2)); dstrp+=strlen(dstrp);\r
+  sprintf(dstrp, "scroll size: w: %i, h: %i  SRAM: %i; eeprom: %i (%i)\n", reg[0x10]&3, (reg[0x10]&0x30)>>4,\r
+       bit(Pico.m.sram_reg, 4), bit(Pico.m.sram_reg, 2), SRam.eeprom_type); dstrp+=strlen(dstrp);\r
   sprintf(dstrp, "sram range: %06x-%06x, reg: %02x\n", SRam.start, SRam.end, Pico.m.sram_reg); dstrp+=strlen(dstrp);\r
   sprintf(dstrp, "pend int: v:%i, h:%i, vdp status: %04x\n", bit(pv->pending_ints,5), bit(pv->pending_ints,4), pv->status);\r
   dstrp+=strlen(dstrp);\r