extern const unsigned short vcounts[];\r
extern int rendstatus;\r
\r
+typedef unsigned char u8;\r
typedef unsigned short u16;\r
\r
\r
case 8: d=Pico.cram [a&0x003f]; break;\r
case 4: d=Pico.vsram[a&0x003f]; break;\r
}\r
- \r
+\r
AutoIncrement();\r
return d;\r
}\r
\r
-// calculate the number of cycles 68k->VDP dma operation would take\r
-static int DmaSlowBurn(int len)\r
-{\r
- // test: Legend of Galahad, Time Killers\r
- int burn,maxlen,line=Pico.m.scanline;\r
-\r
- if(line == -1) line=vcounts[SekCyclesDone()>>8];\r
- maxlen=(224-line)*18;\r
- if(len <= maxlen)\r
- burn = len*(((488<<8)/18))>>8;\r
- else {\r
- burn = maxlen*(((488<<8)/18))>>8;\r
- burn += (len-maxlen)*(((488<<8)/180))>>8;\r
- }\r
-\r
- return burn;\r
-}\r
-\r
static int GetDmaLength()\r
{\r
struct PicoVideo *pvid=&Pico.video;\r
u16 *pd=0, *pdend, *r;\r
unsigned int a=Pico.video.addr, a2, d;\r
unsigned char inc=Pico.video.reg[0xf];\r
- unsigned int source, burn;\r
+ unsigned int source;\r
\r
source =Pico.video.reg[0x15]<<1;\r
source|=Pico.video.reg[0x16]<<9;\r
source|=Pico.video.reg[0x17]<<17;\r
\r
- //dprintf("DmaSlow[%i] %06x->%04x len %i inc=%i blank %i [%i|%i]", Pico.video.type, source, a, len, inc,\r
- // (Pico.video.status&8)||!(Pico.video.reg[1]&0x40), Pico.m.scanline, SekCyclesDone());\r
+ dprintf("DmaSlow[%i] %06x->%04x len %i inc=%i blank %i [%i|%i] @ %x",\r
+ Pico.video.type, source, a, len, inc, (Pico.video.status&8)||!(Pico.video.reg[1]&0x40),\r
+ Pico.m.scanline, SekCyclesDone(), SekPc);\r
\r
- if ((source&0xe00000)==0xe00000) { pd=(u16 *)(Pico.ram+(source&0xfffe)); pdend=(u16 *)(Pico.ram+0x10000); } // Ram\r
- else if(source<Pico.romsize) { pd=(u16 *)(Pico.rom+(source&~1)); pdend=(u16 *)(Pico.rom+Pico.romsize); } // Rom\r
- else return; // Invalid source address\r
+ if(Pico.m.scanline != -1) {\r
+ Pico.m.dma_bytes += len;\r
+ SekSetCyclesLeft(SekCyclesLeft - CheckDMA());\r
+ } else {\r
+ // be approximate in non-accurate mode\r
+ SekSetCyclesLeft(SekCyclesLeft - (len*(((488<<8)/167))>>8));\r
+ }\r
\r
- // CPU is stopped during DMA, so we burn some cycles to compensate that\r
- if((Pico.video.status&8)||!(Pico.video.reg[1]&0x40)) { // vblank?\r
- burn = (len*(((488<<8)/167))>>8); // very approximate\r
- if(!(Pico.video.status&8)) burn+=burn>>1; // a hack for Legend of Galahad\r
- } else burn = DmaSlowBurn(len);\r
- SekCyclesBurn(burn);\r
- if(!(Pico.video.status&8))\r
- SekEndRun(0);\r
- //dprintf("DmaSlow burn: %i @ %06x", burn, SekPc);\r
+ if ((source&0xe00000)==0xe00000) { // Ram\r
+ pd=(u16 *)(Pico.ram+(source&0xfffe));\r
+ pdend=(u16 *)(Pico.ram+0x10000);\r
+ } else if(PicoMCD & 1) {\r
+ dprintf("DmaSlow CD");\r
+ if(source<0x20000) { // Bios area\r
+ pd=(u16 *)(Pico_mcd->bios+(source&~1));\r
+ pdend=(u16 *)(Pico_mcd->bios+0x20000);\r
+ } else if ((source&0xfc0000)==0x200000 && (!(Pico_mcd->s68k_regs[3]&4))) { // Word Ram\r
+ if (!(Pico_mcd->s68k_regs[3]&4)) { // 2M mode\r
+ source -= 2;\r
+ pd=(u16 *)(Pico_mcd->word_ram+(source&0x3fffe));\r
+ pdend=(u16 *)(Pico_mcd->word_ram+0x40000);\r
+ } else {\r
+ dprintf("DmaSlow: unsupported src");\r
+ return;\r
+ }\r
+ } else if ((source&0xfe0000)==0x020000) { // Prg Ram\r
+ u8 *prg_ram = Pico_mcd->prg_ram_b[Pico_mcd->s68k_regs[3]>>6];\r
+ pd=(u16 *)(prg_ram+(source&0x1fffe));\r
+ pdend=(u16 *)(prg_ram+0x20000);\r
+ } else {\r
+ dprintf("DmaSlow: unsupported src");\r
+ return;\r
+ }\r
+ } else {\r
+ if(source<Pico.romsize) { // Rom\r
+ pd=(u16 *)(Pico.rom+(source&~1));\r
+ pdend=(u16 *)(Pico.rom+Pico.romsize);\r
+ } else {\r
+ dprintf("DmaSlow: invalid dma src");\r
+ return;\r
+ }\r
+ }\r
+\r
+ // overflow protection, might break something..\r
+ if (len > pdend - pd) {\r
+ len = pdend - pd;\r
+ dprintf("DmaSlow overflow");\r
+ }\r
\r
switch (Pico.video.type)\r
{\r
// AutoIncrement\r
a=(u16)(a+inc);\r
// didn't src overlap?\r
- if(pd >= pdend) pd-=0x8000; // should be good for RAM, bad for ROM\r
+ //if(pd >= pdend) pd-=0x8000; // should be good for RAM, bad for ROM\r
}\r
rendstatus|=0x10;\r
break;\r
- \r
+\r
case 3: // cram\r
- //dprintf("DmaSlow[%i] %06x->%04x len %i inc=%i blank %i [%i|%i]", Pico.video.type, source, a, len, inc,\r
- // (Pico.video.status&8)||!(Pico.video.reg[1]&0x40), Pico.m.scanline, SekCyclesDone());\r
Pico.m.dirtyPal = 1;\r
r = Pico.cram;\r
for(a2=a&0x7f; len; len--)\r
// AutoIncrement\r
a2+=inc;\r
// didn't src overlap?\r
- if(pd >= pdend) pd-=0x8000;\r
+ //if(pd >= pdend) pd-=0x8000;\r
// good dest?\r
if(a2 >= 0x80) break; // Todds Adventures in Slime World / Andre Agassi tennis\r
}\r
// AutoIncrement\r
a2+=inc;\r
// didn't src overlap?\r
- if(pd >= pdend) pd-=0x8000;\r
+ //if(pd >= pdend) pd-=0x8000;\r
// good dest?\r
if(a2 >= 0x80) break;\r
}\r
unsigned char *vrs;\r
unsigned char inc=Pico.video.reg[0xf];\r
int source;\r
- //dprintf("DmaCopy len %i [%i|%i]", len, Pico.m.scanline, SekCyclesDone());\r
+ dprintf("DmaCopy len %i [%i|%i]", len, Pico.m.scanline, SekCyclesDone());\r
+\r
+ Pico.m.dma_bytes += len;\r
+ if(Pico.m.scanline != -1)\r
+ Pico.video.status|=2; // dma busy\r
\r
source =Pico.video.reg[0x15];\r
source|=Pico.video.reg[0x16]<<8;\r
unsigned char *vr=(unsigned char *) Pico.vram;\r
unsigned char high = (unsigned char) (data >> 8);\r
unsigned char inc=Pico.video.reg[0xf];\r
- \r
+\r
len=GetDmaLength();\r
- //dprintf("DmaFill len %i inc %i [%i|%i]", len, inc, Pico.m.scanline, SekCyclesDone());\r
+ dprintf("DmaFill len %i inc %i [%i|%i]", len, inc, Pico.m.scanline, SekCyclesDone());\r
+\r
+ Pico.m.dma_bytes += len;\r
+ if(Pico.m.scanline != -1)\r
+ Pico.video.status|=2; // dma busy (in accurate mode)\r
\r
// from Charles MacDonald's genvdp.txt:\r
// Write lower byte to address specified\r
a&=0x1c;\r
\r
if (a==0x00) // Data port 0 or 2\r
- { \r
+ {\r
if (pvid->pending) CommandChange();\r
pvid->pending=0;\r
\r
{\r
// Register write:\r
int num=(d>>8)&0x1f;\r
- //if(num==00) dprintf("hint_onoff: %i->%i [%i|%i] pend=%i @ %06x", (pvid->reg[0]&0x10)>>4, (d&0x10)>>4, Pico.m.scanline, SekCyclesDone(), (pvid->pending_ints&0x10)>>4, SekPc);\r
- //if(num==01) dprintf("vint_onoff: %i->%i [%i|%i] pend=%i @ %06x", (pvid->reg[1]&0x20)>>5, (d&0x20)>>5, Pico.m.scanline, SekCyclesDone(), (pvid->pending_ints&0x20)>>5, SekPc);\r
+ if(num==00) dprintf("hint_onoff: %i->%i [%i|%i] pend=%i @ %06x", (pvid->reg[0]&0x10)>>4, (d&0x10)>>4, Pico.m.scanline, SekCyclesDone(), (pvid->pending_ints&0x10)>>4, SekPc);\r
+ if(num==01) dprintf("vint_onoff: %i->%i [%i|%i] pend=%i @ %06x", (pvid->reg[1]&0x20)>>5, (d&0x20)>>5, Pico.m.scanline, SekCyclesDone(), (pvid->pending_ints&0x20)>>5, SekPc);\r
//if(num==01) dprintf("set_blank: %i @ %06x [%i|%i]", !((d&0x40)>>6), SekPc, Pico.m.scanline, SekCyclesDone());\r
//if(num==05) dprintf("spr_set: %i @ %06x [%i|%i]", (unsigned char)d, SekPc, Pico.m.scanline, SekCyclesDone());\r
//if(num==10) dprintf("hint_set: %i @ %06x [%i|%i]", (unsigned char)d, SekPc, Pico.m.scanline, SekCyclesDone());\r
unsigned int PicoVideoRead(unsigned int a)\r
{\r
unsigned int d=0;\r
- \r
+\r
a&=0x1c;\r
\r
if (a==0x00) // data port\r
\r
if (a==0x04) // control port\r
{\r
- //dprintf("sr_read @ %06x [%i|%i]", SekPc, Pico.m.scanline, SekCyclesDone());\r
d=Pico.video.status;\r
if(PicoOpt&0x10) d|=0x0020; // sprite collision (Shadow of the Beast)\r
if(Pico.m.rotate++&8) d|=0x0100; else d|=0x0200; // Toggle fifo full empty (who uses that stuff?)\r
if(!(Pico.video.reg[1]&0x40)) d|=0x0008; // set V-Blank if display is disabled\r
if(SekCyclesLeft < 84+4) d|=0x0004; // H-Blank (Sonic3 vs)\r
+ // dprintf("sr_read %04x @ %06x [%i|%i]", d, SekPc, Pico.m.scanline, SekCyclesDone());\r
\r
Pico.video.pending=0; // ctrl port reads clear write-pending flag (Charles MacDonald)\r
\r
// |---------------------|--------------------------|\r
// E4 (hc[0x43]==0) 07 B1 // 40\r
// E8 (hc[0x45]==0) 05 91 // 32\r
- \r
+\r
// check: Sonic 3D Blast bonus, Cannon Fodder, Chase HQ II, 3 Ninjas kick back, Road Rash 3, Skitchin', Wheel of Fortune\r
if ((a&0x1c)==0x08)\r
{\r
hc=hcounts_40[lineCycles];\r
else hc=hcounts_32[lineCycles];\r
\r
- if(lineCycles > 488-12) d++; // Wheel of Fortune\r
+ //if(lineCycles > 488-12) d++; // Wheel of Fortune\r
} else {\r
// get approximate V-Counter\r
d=vcounts[SekCyclesDone()>>8];\r
if (d&0xf00) d|= 1;\r
}\r
\r
- //dprintf("hv: %02x %02x (%i) @ %06x", hc, d, SekCyclesDone(), SekPc);\r
+ dprintf("hv: %02x %02x (%i) @ %06x", hc, d, SekCyclesDone(), SekPc);\r
d&=0xff; d<<=8;\r
d|=hc;\r
goto end;\r