trying to add movie support
[picodrive.git] / Pico / Memory.c
index d3b6bee..d3b931c 100644 (file)
@@ -181,49 +181,49 @@ u32 UnusualRead16(u32 a, int realsize)
   // some dumb detection is used, but that should be enough to make things work\r
   if ((a>>22) == 1 && Pico.romsize >= 512*1024) {\r
     if      (*(int *)(Pico.rom+0x123e4) == 0x00550c39 && *(int *)(Pico.rom+0x123e8) == 0x00000040) { // Super Bubble Bobble (Unl) [!]\r
-         if      (a == 0x400000) { d=0x55<<8; goto end; }\r
-         else if (a == 0x400002) { d=0x0f<<8; goto end; }\r
-       }\r
-       else if (*(int *)(Pico.rom+0x008c4) == 0x66240055 && *(int *)(Pico.rom+0x008c8) == 0x00404df9) { // Smart Mouse (Unl)\r
-         if      (a == 0x400000) { d=0x55<<8; goto end; }\r
-         else if (a == 0x400002) { d=0x0f<<8; goto end; }\r
-         else if (a == 0x400004) { d=0xaa<<8; goto end; }\r
-         else if (a == 0x400006) { d=0xf0<<8; goto end; }\r
-       }\r
-       else if (*(int *)(Pico.rom+0x00404) == 0x00a90600 && *(int *)(Pico.rom+0x00408) == 0x6708b013) { // King of Fighters '98, The (Unl) [!]\r
-         if      (a == 0x480000 || a == 0x4800e0 || a == 0x4824a0 || a == 0x488880) { d=0xaa<<8; goto end; }\r
-         else if (a == 0x4a8820) { d=0x0a<<8; goto end; }\r
-         // there is also a read @ 0x4F8820 which needs 0, but that is returned in default case\r
-       }\r
-       else if (*(int *)(Pico.rom+0x01b24) == 0x004013f9 && *(int *)(Pico.rom+0x01b28) == 0x00ff0000) { // Mahjong Lover (Unl) [!]\r
-         if      (a == 0x400000) { d=0x90<<8; goto end; }\r
-         else if (a == 0x401000) { d=0xd3<<8; goto end; } // this one doesn't seem to be needed, the code does 2 comparisons and only then\r
-                                                          // checks the result, which is of the above one. Left it just in case.\r
-       }\r
-       else if (*(int *)(Pico.rom+0x05254) == 0x0c3962d0 && *(int *)(Pico.rom+0x05258) == 0x00400055) { // Elf Wor (Unl)\r
-         if      (a == 0x400000) { d=0x55<<8; goto end; }\r
-         else if (a == 0x400004) { d=0xc9<<8; goto end; } // this check is done if the above one fails\r
-         else if (a == 0x400002) { d=0x0f<<8; goto end; }\r
-         else if (a == 0x400006) { d=0x18<<8; goto end; } // similar to above\r
-       }\r
+      if      (a == 0x400000) { d=0x55<<8; goto end; }\r
+      else if (a == 0x400002) { d=0x0f<<8; goto end; }\r
+    }\r
+    else if (*(int *)(Pico.rom+0x008c4) == 0x66240055 && *(int *)(Pico.rom+0x008c8) == 0x00404df9) { // Smart Mouse (Unl)\r
+      if      (a == 0x400000) { d=0x55<<8; goto end; }\r
+      else if (a == 0x400002) { d=0x0f<<8; goto end; }\r
+      else if (a == 0x400004) { d=0xaa<<8; goto end; }\r
+      else if (a == 0x400006) { d=0xf0<<8; goto end; }\r
+    }\r
+    else if (*(int *)(Pico.rom+0x00404) == 0x00a90600 && *(int *)(Pico.rom+0x00408) == 0x6708b013) { // King of Fighters '98, The (Unl) [!]\r
+      if      (a == 0x480000 || a == 0x4800e0 || a == 0x4824a0 || a == 0x488880) { d=0xaa<<8; goto end; }\r
+      else if (a == 0x4a8820) { d=0x0a<<8; goto end; }\r
+      // there is also a read @ 0x4F8820 which needs 0, but that is returned in default case\r
+    }\r
+    else if (*(int *)(Pico.rom+0x01b24) == 0x004013f9 && *(int *)(Pico.rom+0x01b28) == 0x00ff0000) { // Mahjong Lover (Unl) [!]\r
+      if      (a == 0x400000) { d=0x90<<8; goto end; }\r
+      else if (a == 0x401000) { d=0xd3<<8; goto end; } // this one doesn't seem to be needed, the code does 2 comparisons and only then\r
+                                                       // checks the result, which is of the above one. Left it just in case.\r
+    }\r
+    else if (*(int *)(Pico.rom+0x05254) == 0x0c3962d0 && *(int *)(Pico.rom+0x05258) == 0x00400055) { // Elf Wor (Unl)\r
+      if      (a == 0x400000) { d=0x55<<8; goto end; }\r
+      else if (a == 0x400004) { d=0xc9<<8; goto end; } // this check is done if the above one fails\r
+      else if (a == 0x400002) { d=0x0f<<8; goto end; }\r
+      else if (a == 0x400006) { d=0x18<<8; goto end; } // similar to above\r
+    }\r
     // our default behaviour is to return whatever was last written a 0x400000-0x7fffff range (used by Squirrel King (R) [!])\r
-       // Lion King II, The (Unl) [!]  writes @ 400000 and wants to get that val @ 400002 and wites another val\r
-       // @ 400004 which is expected @ 400006, so we really remember 2 values here\r
+    // Lion King II, The (Unl) [!]  writes @ 400000 and wants to get that val @ 400002 and wites another val\r
+    // @ 400004 which is expected @ 400006, so we really remember 2 values here\r
     d = Pico.m.prot_bytes[(a>>2)&1]<<8;\r
   }\r
   else if (a == 0xa13000 && Pico.romsize >= 1024*1024) {\r
     if      (*(int *)(Pico.rom+0xc8af0) == 0x30133013 && *(int *)(Pico.rom+0xc8af4) == 0x000f0240) { // Rockman X3 (Unl) [!]\r
-         d=0x0c; goto end;\r
-       }\r
+      d=0x0c; goto end;\r
+    }\r
     else if (*(int *)(Pico.rom+0x28888) == 0x07fc0000 && *(int *)(Pico.rom+0x2888c) == 0x4eb94e75) { // Bug's Life, A (Unl) [!]\r
-         d=0x28; goto end; // does the check from RAM\r
-       }\r
+      d=0x28; goto end; // does the check from RAM\r
+    }\r
     else if (*(int *)(Pico.rom+0xc8778) == 0x30133013 && *(int *)(Pico.rom+0xc877c) == 0x000f0240) { // Super Mario Bros. (Unl) [!]\r
-         d=0x0c; goto end; // seems to be the same code as in Rockman X3 (Unl) [!]\r
-       }\r
+      d=0x0c; goto end; // seems to be the same code as in Rockman X3 (Unl) [!]\r
+    }\r
     else if (*(int *)(Pico.rom+0xf20ec) == 0x30143013 && *(int *)(Pico.rom+0xf20f0) == 0x000f0200) { // Super Mario 2 1998 (Unl) [!]\r
-         d=0x0a; goto end;\r
-       }\r
+      d=0x0a; goto end;\r
+    }\r
   }\r
   else if (a == 0xa13002) { // Pocket Monsters (Unl)\r
     d=0x01; goto end;\r
@@ -233,7 +233,7 @@ u32 UnusualRead16(u32 a, int realsize)
   }\r
   else if (a == 0x30fe02) {\r
     // Virtua Racing - just for fun\r
-       // this seems to be some flag that SVP is ready or something similar\r
+    // this seems to be some flag that SVP is ready or something similar\r
     d=1; goto end;\r
   }\r
 \r
@@ -251,8 +251,8 @@ u32 OtherRead16(u32 a, int realsize)
 \r
   if ((a&0xff0000)==0xa00000) {\r
     if ((a&0x4000)==0x0000) { d=z80Read8(a); d|=d<<8; goto end; } // Z80 ram (not byteswaped)\r
-    if ((a&0x6000)==0x4000) { if(PicoOpt&1) d=YM2612Read(); else d=Pico.m.rotate++&3; goto end; } // 0x4000-0x5fff, Fudge if disabled\r
-       d=0xffff; goto end;\r
+    if ((a&0x6000)==0x4000) { if(PicoOpt&1) d=YM2612Read(); else d=Pico.m.rotate++&3; dprintf("read ym2612: %04x", d); goto end; } // 0x4000-0x5fff, Fudge if disabled\r
+    d=0xffff; goto end;\r
   }\r
   if ((a&0xffffe0)==0xa10000) { // I/O ports\r
     a=(a>>1)&0xf;\r
@@ -266,7 +266,17 @@ u32 OtherRead16(u32 a, int realsize)
     goto end;\r
   }\r
   // |=0x80 for Shadow of the Beast & Super Offroad; rotate fakes next fetched instruction for Time Killers\r
-  if (a==0xa11100) { d=((Pico.m.z80Run&1)<<8)|0x8000|Pico.m.rotate++; goto end; }\r
+  if (a==0xa11100) {\r
+    extern int z80stopCycle; // TODO: tidy\r
+    d=Pico.m.z80Run&1;\r
+    if (!d) {\r
+      int stop_before = SekCyclesDone() - z80stopCycle;\r
+      if (stop_before > 0 && stop_before <= 16*2) // Gens uses 16 here\r
+        d = 1; // bus not yet available\r
+    }\r
+    d=(d<<8)|0x8000|Pico.m.rotate++;\r
+    dprintf("get_zrun: %04x [%i|%i] @%06x", d, Pico.m.scanline, SekCyclesDone(), SekPc);\r
+    goto end; }\r
 \r
 #ifndef _ASM_MEMORY_C\r
   if ((a&0xe700e0)==0xc00000) { d=PicoVideoRead(a); goto end; }\r
@@ -302,23 +312,23 @@ static void OtherWrite8(u32 a,u32 d,int realsize)
     return;\r
   }\r
   if (a==0xa11100) {\r
-       extern int z80startCycle, z80stopCycle;\r
+    extern int z80startCycle, z80stopCycle;\r
     //int lineCycles=(488-SekCyclesLeft)&0x1ff;\r
     d&=1; d^=1;\r
-       if(!d) {\r
-         // hack: detect a nasty situation where Z80 was enabled and disabled in the same 68k timeslice (Golden Axe III)\r
-      if((PicoOpt&4) && Pico.m.z80Run==1) z80_run(20);\r
-         z80stopCycle = SekCyclesDone();\r
-         //z80ExtraCycles += (lineCycles>>1)-(lineCycles>>5); // only meaningful in PicoFrameHints()\r
-       } else {\r
-         z80startCycle = SekCyclesDone();\r
-         //if(Pico.m.scanline != -1)\r
-         //z80ExtraCycles -= (lineCycles>>1)-(lineCycles>>5)+16;\r
-       }\r
-    //dprintf("set_zrun: %i [%i|%i] zPC=%04x @%06x", d, Pico.m.scanline, SekCyclesDone(), mz80GetRegisterValue(NULL, 0), SekPc);\r
-       Pico.m.z80Run=(u8)d; return;\r
-  }\r
-  if (a==0xa11200) { if(!(d&1)) z80_reset(); return; }\r
+    if(!d) {\r
+       // hack: detect a nasty situation where Z80 was enabled and disabled in the same 68k timeslice (Golden Axe III)\r
+      // if((PicoOpt&4) && Pico.m.z80Run==1) z80_run(20); // FIXME: movies\r
+      z80stopCycle = SekCyclesDone();\r
+      //z80ExtraCycles += (lineCycles>>1)-(lineCycles>>5); // only meaningful in PicoFrameHints()\r
+    } else {\r
+      z80startCycle = SekCyclesDone();\r
+      //if(Pico.m.scanline != -1)\r
+      //z80ExtraCycles -= (lineCycles>>1)-(lineCycles>>5)+16;\r
+    }\r
+    dprintf("set_zrun: %02x [%i|%i] @%06x", d, Pico.m.scanline, SekCyclesDone(), /*mz80GetRegisterValue(NULL, 0),*/ SekPc);\r
+    Pico.m.z80Run=(u8)d; return;\r
+  }\r
+  if (a==0xa11200) { dprintf("write z80Reset: %02x", d); if(!(d&1)) z80_reset(); return; }\r
 \r
   if ((a&0xff7f00)==0xa06000) // Z80 BANK register\r
   {\r
@@ -336,29 +346,29 @@ static void OtherWrite8(u32 a,u32 d,int realsize)
   if(a >= SRam.start && a <= SRam.end) {\r
     unsigned int sreg = Pico.m.sram_reg;\r
     if(!(sreg & 0x10)) {\r
-         // not detected SRAM\r
-         if((a&~1)==0x200000) {\r
+      // not detected SRAM\r
+      if((a&~1)==0x200000) {\r
         Pico.m.sram_reg|=4; // this should be a game with EEPROM (like NBA Jam)\r
         SRam.start=0x200000; SRam.end=SRam.start+1;\r
       }\r
-         Pico.m.sram_reg|=0x10;\r
-       }\r
+      Pico.m.sram_reg|=0x10;\r
+    }\r
     if(sreg & 4) { // EEPROM write\r
-         if(SekCyclesDoneT()-lastSSRamWrite < 46) {\r
-           // just update pending state\r
-               SRAMUpdPending(a, d);\r
-         } else {\r
-           SRAMWriteEEPROM(sreg>>6); // execute pending\r
-               SRAMUpdPending(a, d);\r
+      if(SekCyclesDoneT()-lastSSRamWrite < 46) {\r
+        // just update pending state\r
+        SRAMUpdPending(a, d);\r
+      } else {\r
+        SRAMWriteEEPROM(sreg>>6); // execute pending\r
+        SRAMUpdPending(a, d);\r
         lastSSRamWrite = SekCyclesDoneT();\r
-         }\r
+      }\r
     } else if(!(sreg & 2)) {\r
       u8 *pm=(u8 *)(SRam.data-SRam.start+a);\r
       if(*pm != (u8)d) {\r
         SRam.changed = 1;\r
         *pm=(u8)d;\r
       }\r
-       }\r
+    }\r
     return;\r
   }\r
 \r
@@ -379,12 +389,12 @@ static void OtherWrite8(u32 a,u32 d,int realsize)
 \r
   if(a >= 0xA13004 && a < 0xA13040) {\r
     // dumb 12-in-1 or 4-in-1 banking support\r
-       int len;\r
-       a &= 0x3f; a <<= 16;\r
-       len = Pico.romsize - a;\r
-       if (len <= 0) return; // invalid/missing bank\r
-       if (len > 0x200000) len = 0x200000; // 2 megs\r
-       memcpy(Pico.rom, Pico.rom+a, len); // code which does this is in RAM so this is safe.\r
+    int len;\r
+    a &= 0x3f; a <<= 16;\r
+    len = Pico.romsize - a;\r
+    if (len <= 0) return; // invalid/missing bank\r
+    if (len > 0x200000) len = 0x200000; // 2 megs\r
+    memcpy(Pico.rom, Pico.rom+a, len); // code which does this is in RAM so this is safe.\r
     return;\r
   }\r
 \r
@@ -415,7 +425,7 @@ static void OtherWrite16(u32 a,u32 d)
     return;\r
   }\r
   if (a==0xa11100) { OtherWrite8(a, d>>8, 16); return; }\r
-  if (a==0xa11200) { if(!(d&0x100)) z80_reset(); return; }\r
+  if (a==0xa11200) { dprintf("write z80reset: %04x", d); if(!(d&0x100)) z80_reset(); return; }\r
 \r
   OtherWrite8(a,  d>>8, 16);\r
   OtherWrite8(a+1,d&0xff, 16);\r
@@ -438,8 +448,8 @@ u8 CPU_CALL PicoRead8(u32 a)
   if(a >= SRam.start && a <= SRam.end) {\r
     unsigned int sreg = Pico.m.sram_reg;\r
     if(!(sreg & 0x10) && (sreg & 1) && a > 0x200001) { // not yet detected SRAM\r
-         Pico.m.sram_reg|=0x10; // should be normal SRAM\r
-       }\r
+      Pico.m.sram_reg|=0x10; // should be normal SRAM\r
+    }\r
     if(sreg & 4) { // EEPROM read\r
       d = SRAMReadEEPROM();\r
       goto end;\r
@@ -711,32 +721,32 @@ void PicoWriteCD32w(unsigned int a, unsigned int d);
 \r
 unsigned int  m68k_read_memory_8(unsigned int address)\r
 {\r
-       return (PicoMCD&1) ? PicoReadCD8w(address)  : PicoRead8(address);\r
+    return (PicoMCD&1) ? PicoReadCD8w(address)  : PicoRead8(address);\r
 }\r
 \r
 unsigned int  m68k_read_memory_16(unsigned int address)\r
 {\r
-       return (PicoMCD&1) ? PicoReadCD16w(address) : PicoRead16(address);\r
+    return (PicoMCD&1) ? PicoReadCD16w(address) : PicoRead16(address);\r
 }\r
 \r
 unsigned int  m68k_read_memory_32(unsigned int address)\r
 {\r
-       return (PicoMCD&1) ? PicoReadCD32w(address) : PicoRead32(address);\r
+    return (PicoMCD&1) ? PicoReadCD32w(address) : PicoRead32(address);\r
 }\r
 \r
 void m68k_write_memory_8(unsigned int address, unsigned int value)\r
 {\r
-       if (PicoMCD&1) PicoWriteCD8w(address, (u8)value); else PicoWrite8(address, (u8)value);\r
+    if (PicoMCD&1) PicoWriteCD8w(address, (u8)value); else PicoWrite8(address, (u8)value);\r
 }\r
 \r
 void m68k_write_memory_16(unsigned int address, unsigned int value)\r
 {\r
-       if (PicoMCD&1) PicoWriteCD16w(address,(u16)value); else PicoWrite16(address,(u16)value);\r
+    if (PicoMCD&1) PicoWriteCD16w(address,(u16)value); else PicoWrite16(address,(u16)value);\r
 }\r
 \r
 void m68k_write_memory_32(unsigned int address, unsigned int value)\r
 {\r
-       if (PicoMCD&1) PicoWriteCD32w(address, value); else PicoWrite32(address, value);\r
+    if (PicoMCD&1) PicoWriteCD32w(address, value); else PicoWrite32(address, value);\r
 }\r
 #endif\r
 #endif // EMU_M68K\r