]> Shamusworld >> Repos - virtualjaguar/blobdiff - src/jaguar.cpp
Virtual Jaguar 2.0.0 release.
[virtualjaguar] / src / jaguar.cpp
index 3ae824cbd7ad331fb61e83138e8acd51c78cf472..268befde8a1066121820e6219c06a47cbf6bbde1 100644 (file)
@@ -59,14 +59,15 @@ extern int effect_start;
 extern int effect_start2, effect_start3, effect_start4, effect_start5, effect_start6;
 #endif
 
-uint32 jaguar_active_memory_dumps = 0;
+// Really, need to include memory.h for this, but it might interfere with some stuff...
+extern uint8 jagMemSpace[];
 
-uint32 jaguarMainROMCRC32, jaguarROMSize, jaguarRunAddress;
+// Internal variables
 
-bool BIOSLoaded = false;
-bool CDBIOSLoaded = false;
+uint32 jaguar_active_memory_dumps = 0;
 
-uint32 * backbuffer;
+uint32 jaguarMainROMCRC32, jaguarROMSize, jaguarRunAddress;
+bool jaguarCartInserted = false;
 
 #ifdef CPU_DEBUG_MEMORY
 uint8 writeMemMax[0x400000], writeMemMin[0x400000];
@@ -109,12 +110,21 @@ void M68KInstructionHook(void)
                WriteLog("M68K: Top of stack: %08X. Stack trace:\n", JaguarReadLong(topOfStack));
                for(int i=0; i<10; i++)
                        WriteLog("%06X: %08X\n", topOfStack - (i * 4), JaguarReadLong(topOfStack - (i * 4)));
-               WriteLog("Jaguar: VBL interrupt is %s\n", ((TOMIRQEnabled(IRQ_VBLANK)) && (JaguarInterruptHandlerIsValid(64))) ? "enabled" : "disabled");
+               WriteLog("Jaguar: VBL interrupt is %s\n", ((TOMIRQEnabled(IRQ_VIDEO)) && (JaguarInterruptHandlerIsValid(64))) ? "enabled" : "disabled");
                M68K_show_context();
                LogDone();
                exit(0);
        }
 
+       // Disassemble everything
+/*     {
+               static char buffer[2048];
+               m68k_disassemble(buffer, m68kPC, M68K_CPU_TYPE_68000);
+               WriteLog("%08X: %s", m68kPC, buffer);
+               WriteLog("\t\tA0=%08X, A1=%08X, D0=%08X, D1=%08X\n",
+                       m68k_get_reg(NULL, M68K_REG_A0), m68k_get_reg(NULL, M68K_REG_A1),
+                       m68k_get_reg(NULL, M68K_REG_D0), m68k_get_reg(NULL, M68K_REG_D1));
+       }//*/
 /*     if (m68kPC >= 0x807EC4 && m68kPC <= 0x807EDB)
        {
                static char buffer[2048];
@@ -336,7 +346,7 @@ CD_switch:: -> $306C
                WriteLog("M68K: Top of stack: %08X. Stack trace:\n", JaguarReadLong(topOfStack));
                for(int i=0; i<10; i++)
                        WriteLog("%06X: %08X\n", topOfStack - (i * 4), JaguarReadLong(topOfStack - (i * 4)));
-               WriteLog("Jaguar: VBL interrupt is %s\n", ((TOMIRQEnabled(IRQ_VBLANK)) && (JaguarInterruptHandlerIsValid(64))) ? "enabled" : "disabled");
+               WriteLog("Jaguar: VBL interrupt is %s\n", ((TOMIRQEnabled(IRQ_VIDEO)) && (JaguarInterruptHandlerIsValid(64))) ? "enabled" : "disabled");
                M68K_show_context();
 
 //temp
@@ -780,19 +790,84 @@ uint32 ReadDWord(uint32 adddress)
 // Musashi 68000 read/write/IRQ functions
 //
 
+#if 0
+IRQs:
+=-=-=
+
+      IPL         Name           Vector            Control
+   ---------+---------------+---------------+---------------
+       2      VBLANK IRQ         $100         INT1 bit #0 
+       2      GPU IRQ            $100         INT1 bit #1
+       2      HBLANK IRQ         $100         INT1 bit #2
+       2      Timer IRQ          $100         INT1 bit #3
+
+   Note: Both timer interrupts (JPIT && PIT) are on the same INT1 bit.
+         and are therefore indistinguishable.
+
+   A typical way to install a LEVEL2 handler for the 68000 would be 
+   something like this, you gotta supply "last_line" and "handler".
+   Note that the interrupt is auto vectored thru $100 (not $68)
+
+
+   V_AUTO   = $100
+   VI       = $F004E
+   INT1     = $F00E0
+   INT2     = $F00E2
+   
+   IRQS_HANDLED=$909                ;; VBLANK and TIMER
+
+         move.w   #$2700,sr         ;; no IRQs please
+         move.l   #handler,V_AUTO   ;; install our routine
+
+         move.w   #last_line,VI     ;; scanline where IRQ should occur
+                                    ;; should be 'odd' BTW
+         move.w   #IRQS_HANDLE&$FF,INT1  ;; enable VBLANK + TIMER
+         move.w   #$2100,sr         ;; enable IRQs on the 68K
+         ...
+
+handler:
+         move.w   d0,-(a7)
+         move.w   INT1,d0
+         btst.b   #0,d0
+         bne.b    .no_blank
+
+         ...
+
+.no_blank:
+         btst.b   #3,d0
+         beq.b    .no_timer
+      
+         ...
+
+.no_timer:
+         move.w   #IRQS_HANDLED,INT1      ; clear latch, keep IRQ alive
+         move.w   #0,INT2                 ; let GPU run again
+         move.w   (a7)+,d0
+         rte
+
+   As you can see, if you have multiple INT1 interrupts coming in,
+   you need to check the lower byte of INT1, to see which interrupt
+   happened.
+#endif
 int irq_ack_handler(int level)
 {
-       int vector = M68K_INT_ACK_AUTOVECTOR;
+       // Tracing the IPL lines on the Jaguar schematic yields the following:
+       // IPL1 is connected to INTL on TOM (OUT to 68K)
+       // IPL0-2 are also tied to Vcc via 4.7K resistors!
+       // (DINT on TOM goes into DINT on JERRY (IN from Jerry))
+       // There doesn't seem to be any other path to IPL0 or 2 on the schematic, which means
+       // that *all* IRQs to the 68K are routed thru TOM at level 2. Which means they're all maskable.
 
        // The GPU/DSP/etc are probably *not* issuing an NMI, but it seems to work OK...
+       // They aren't, and this causes problems with a, err, specific ROM. :-D
 
-       if (level == 7)
+       if (level == 2)
        {
-               m68k_set_irq(0);                                                // Clear the IRQ...
-               vector = 64;                                                    // Set user interrupt #0
+               m68k_set_irq(0);                                                // Clear the IRQ (NOTE: Without this, the BIOS fails)...
+               return 64;                                                              // Set user interrupt #0
        }
 
-       return vector;
+       return M68K_INT_ACK_AUTOVECTOR;
 }
 
 //#define USE_NEW_MMU
@@ -820,7 +895,9 @@ unsigned int m68k_read_memory_8(unsigned int address)
        else if ((address >= 0x800000) && (address <= 0xDFFEFF))
                retVal = jaguarMainROM[address - 0x800000];
        else if ((address >= 0xE00000) && (address <= 0xE3FFFF))
-               retVal = jaguarBootROM[address - 0xE00000];
+//             retVal = jaguarBootROM[address - 0xE00000];
+//             retVal = jaguarDevBootROM1[address - 0xE00000];
+               retVal = jagMemSpace[address];
        else if ((address >= 0xDFFF00) && (address <= 0xDFFFFF))
                retVal = CDROMReadByte(address);
        else if ((address >= 0xF00000) && (address <= 0xF0FFFF))
@@ -915,7 +992,9 @@ unsigned int m68k_read_memory_16(unsigned int address)
        else if ((address >= 0x800000) && (address <= 0xDFFEFE))
                retVal = (jaguarMainROM[address - 0x800000] << 8) | jaguarMainROM[address - 0x800000 + 1];
        else if ((address >= 0xE00000) && (address <= 0xE3FFFE))
-               retVal = (jaguarBootROM[address - 0xE00000] << 8) | jaguarBootROM[address - 0xE00000 + 1];
+//             retVal = (jaguarBootROM[address - 0xE00000] << 8) | jaguarBootROM[address - 0xE00000 + 1];
+//             retVal = (jaguarDevBootROM1[address - 0xE00000] << 8) | jaguarDevBootROM1[address - 0xE00000 + 1];
+               retVal = (jagMemSpace[address] << 8) | jagMemSpace[address + 1];
        else if ((address >= 0xDFFF00) && (address <= 0xDFFFFE))
                retVal = CDROMReadWord(address, M68K);
        else if ((address >= 0xF00000) && (address <= 0xF0FFFE))
@@ -967,6 +1046,8 @@ void m68k_write_memory_8(unsigned int address, unsigned int value)
                }
        }
 #endif
+/*if (address == 0x4E00)
+       WriteLog("M68K: Writing %02X at %08X, PC=%08X\n", value, address, m68k_get_reg(NULL, M68K_REG_PC));//*/
 //if ((address >= 0x1FF020 && address <= 0x1FF03F) || (address >= 0x1FF820 && address <= 0x1FF83F))
 //     WriteLog("M68K: Writing %02X at %08X\n", value, address);
 //WriteLog("[WM8  PC=%08X] Addr: %08X, val: %02X\n", m68k_get_reg(NULL, M68K_REG_PC), address, value);
@@ -1011,6 +1092,8 @@ void m68k_write_memory_16(unsigned int address, unsigned int value)
                }
        }
 #endif
+/*if (address == 0x4E00)
+       WriteLog("M68K: Writing %02X at %08X, PC=%08X\n", value, address, m68k_get_reg(NULL, M68K_REG_PC));//*/
 //if ((address >= 0x1FF020 && address <= 0x1FF03F) || (address >= 0x1FF820 && address <= 0x1FF83F))
 //     WriteLog("M68K: Writing %04X at %08X\n", value, address);
 //WriteLog("[WM16 PC=%08X] Addr: %08X, val: %04X\n", m68k_get_reg(NULL, M68K_REG_PC), address, value);
@@ -1064,6 +1147,8 @@ if (address == 0xF02110)
 
 void m68k_write_memory_32(unsigned int address, unsigned int value)
 {
+/*if (address == 0x4E00)
+       WriteLog("M68K: Writing %02X at %08X, PC=%08X\n", value, address, m68k_get_reg(NULL, M68K_REG_PC));//*/
 //WriteLog("--> [WM32]\n");
 /*if (address == 0x0100)//64*4)
        WriteLog("M68K: Wrote dword to VI vector value %08X...\n", value);//*/
@@ -1116,18 +1201,26 @@ void M68K_show_context(void)
 
        WriteLog("..................\n");
 
-       if (TOMIRQEnabled(IRQ_VBLANK))
+       if (TOMIRQEnabled(IRQ_VIDEO))
        {
-               WriteLog("vblank int: enabled\n");
+               WriteLog("video int: enabled\n");
                JaguarDasm(JaguarGetHandler(64), 0x200);
        }
        else
-               WriteLog("vblank int: disabled\n");
+               WriteLog("video int: disabled\n");
 
        WriteLog("..................\n");
 
        for(int i=0; i<256; i++)
-               WriteLog("handler %03i at $%08X\n", i, (unsigned int)JaguarGetHandler(i));
+       {
+               WriteLog("handler %03i at ", i);//$%08X\n", i, (unsigned int)JaguarGetHandler(i));
+               uint32 address = (uint32)JaguarGetHandler(i);
+
+               if (address == 0)
+                       WriteLog(".........\n");
+               else
+                       WriteLog("$%08X\n", address);
+       }
 }
 
 //
@@ -1260,7 +1353,9 @@ uint8 JaguarReadByte(uint32 offset, uint32 who/*=UNKNOWN*/)
        else if ((offset >= 0xDFFF00) && (offset <= 0xDFFFFF))
                data = CDROMReadByte(offset, who);
        else if ((offset >= 0xE00000) && (offset < 0xE40000))
-               data = jaguarBootROM[offset & 0x3FFFF];
+//             data = jaguarBootROM[offset & 0x3FFFF];
+//             data = jaguarDevBootROM1[offset & 0x3FFFF];
+               data = jagMemSpace[offset];
        else if ((offset >= 0xF00000) && (offset < 0xF10000))
                data = TOMReadByte(offset, who);
        else if ((offset >= 0xF10000) && (offset < 0xF20000))
@@ -1287,7 +1382,9 @@ uint16 JaguarReadWord(uint32 offset, uint32 who/*=UNKNOWN*/)
        else if ((offset >= 0xDFFF00) && (offset <= 0xDFFFFE))
                return CDROMReadWord(offset, who);
        else if ((offset >= 0xE00000) && (offset <= 0xE3FFFE))
-               return (jaguarBootROM[(offset+0) & 0x3FFFF] << 8) | jaguarBootROM[(offset+1) & 0x3FFFF];
+//             return (jaguarBootROM[(offset+0) & 0x3FFFF] << 8) | jaguarBootROM[(offset+1) & 0x3FFFF];
+//             return (jaguarDevBootROM1[(offset+0) & 0x3FFFF] << 8) | jaguarDevBootROM1[(offset+1) & 0x3FFFF];
+               return (jagMemSpace[offset + 0] << 8) | jagMemSpace[offset + 1];
        else if ((offset >= 0xF00000) && (offset <= 0xF0FFFE))
                return TOMReadWord(offset, who);
        else if ((offset >= 0xF10000) && (offset <= 0xF1FFFE))
@@ -1298,6 +1395,8 @@ uint16 JaguarReadWord(uint32 offset, uint32 who/*=UNKNOWN*/)
 
 void JaguarWriteByte(uint32 offset, uint8 data, uint32 who/*=UNKNOWN*/)
 {
+/*     if (offset >= 0x4E00 && offset < 0x4E04)
+               WriteLog("JWB: Byte %02X written at %08X by %s\n", data, offset, whoName[who]);//*/
 //Need to check for writes in the range of $18FA70 + 8000...
 /*if (effect_start)
        if (offset >= 0x18FA70 && offset < (0x18FA70 + 8000))
@@ -1331,6 +1430,8 @@ void JaguarWriteByte(uint32 offset, uint8 data, uint32 who/*=UNKNOWN*/)
 uint32 starCount;
 void JaguarWriteWord(uint32 offset, uint16 data, uint32 who/*=UNKNOWN*/)
 {
+/*     if (offset >= 0x4E00 && offset < 0x4E04)
+               WriteLog("JWW: Word %04X written at %08X by %s\n", data, offset, whoName[who]);//*/
 /*if (offset == 0x0100)//64*4)
        WriteLog("M68K: %s wrote word to VI vector value %04X...\n", whoName[who], data);
 if (offset == 0x0102)//64*4)
@@ -1482,6 +1583,18 @@ void JaguarWriteLong(uint32 offset, uint32 data, uint32 who/*=UNKNOWN*/)
        JaguarWriteWord(offset+2, data & 0xFFFF, who);
 }
 
+void JaguarSetScreenBuffer(uint32 * buffer)
+{
+       // This is in TOM, but we set it here...
+       screenBuffer = buffer;
+}
+
+void JaguarSetScreenPitch(uint32 pitch)
+{
+       // This is in TOM, but we set it here...
+       screenPitch = pitch;
+}
+
 //
 // Jaguar console initialization
 //
@@ -1512,12 +1625,15 @@ void JaguarInit(void)
 //New timer based code stuffola...
 void ScanlineCallback(void);
 void RenderCallback(void);
-//extern uint32 * backbuffer;
 void JaguarReset(void)
 {
-       // Only use the system BIOS if it's available...!
-       if (vjs.useJaguarBIOS && (biosAvailable & (BIOS_NORMAL | BIOS_STUB1 | BIOS_STUB2)))
-               memcpy(jaguarMainRAM, jaguarBootROM, 8);
+//Need to change this so it uses the single RAM space and load the BIOS
+//into it somewhere...
+//Also, have to change this here and in JaguarReadXX() currently
+       // Only use the system BIOS if it's available...! (it's always available now!)
+       // AND only if a jaguar cartridge has been inserted.
+       if (vjs.useJaguarBIOS && jaguarCartInserted && !vjs.hardwareTypeAlpine)
+               memcpy(jaguarMainRAM, jagMemSpace + 0xE00000, 8);
        else
                SET32(jaguarMainRAM, 4, jaguarRunAddress);
 
@@ -1532,7 +1648,6 @@ void JaguarReset(void)
 
        // New timer base code stuffola...
        InitializeEventList();
-       TOMResetBackbuffer(backbuffer);
 //     SetCallbackTime(ScanlineCallback, 63.5555);
        SetCallbackTime(ScanlineCallback, 31.77775);
 //     SetCallbackTime(RenderCallback, 33303.082);     // # Scanlines * scanline time
@@ -1613,16 +1728,58 @@ void JaguarDone(void)
        WriteLog("\n");//*/
 
 //     WriteLog("Jaguar: CD BIOS version %04X\n", JaguarReadWord(0x3004));
-       WriteLog("Jaguar: Interrupt enable = %02X\n", TOMReadByte(0xF000E1) & 0x1F);
-       WriteLog("Jaguar: VBL interrupt is %s\n", ((TOMIRQEnabled(IRQ_VBLANK)) && (JaguarInterruptHandlerIsValid(64))) ? "enabled" : "disabled");
+       WriteLog("Jaguar: Interrupt enable = $%02X\n", TOMReadByte(0xF000E1, JAGUAR) & 0x1F);
+       WriteLog("Jaguar: Video interrupt is %s (line=%u)\n", ((TOMIRQEnabled(IRQ_VIDEO))
+               && (JaguarInterruptHandlerIsValid(64))) ? "enabled" : "disabled", TOMReadWord(0xF0004E, JAGUAR));
        M68K_show_context();
 //#endif
 
+#if 0  // This is drawn already...
+       WriteLog("Jaguar: 68K AutoVector table:\n", JaguarReadWord(0x3004));
+       for(uint32 i=0x64; i<=0x7C; i+=4)
+               WriteLog("  #%u: %08X\n", (i-0x64)/4, JaguarReadLong(i));
+#endif
+
        CDROMDone();
        GPUDone();
        DSPDone();
        TOMDone();
        JERRYDone();
+
+       // temp, until debugger is in place
+//00802016: jsr     $836F1A.l
+//0080201C: jsr     $836B30.l
+//00802022: jsr     $836B18.l
+//00802028: jsr     $8135F0.l
+//00813C1E: jsr     $813F76.l
+//00802038: jsr     $836D00.l
+//00802098: jsr     $8373A4.l
+//008020A2: jsr     $83E24A.l
+//008020BA: jsr     $83E156.l
+//008020C6: jsr     $83E19C.l
+//008020E6: jsr     $8445E8.l
+//008020EC: jsr     $838C20.l
+//0080211A: jsr     $838ED6.l
+//00802124: jsr     $89CA56.l
+//0080212A: jsr     $802B48.l
+#if 0
+       WriteLog("-------------------------------------------\n");
+       JaguarDasm(0x8445E8, 0x200);
+       WriteLog("-------------------------------------------\n");
+       JaguarDasm(0x838C20, 0x200);
+       WriteLog("-------------------------------------------\n");
+       JaguarDasm(0x838ED6, 0x200);
+       WriteLog("-------------------------------------------\n");
+       JaguarDasm(0x89CA56, 0x200);
+       WriteLog("-------------------------------------------\n");
+       JaguarDasm(0x802B48, 0x200);
+       WriteLog("\n\nM68000 disassembly at $802000...\n");
+       JaguarDasm(0x802000, 6000);
+       WriteLog("\n");//*/
+#endif
+/*     WriteLog("\n\nM68000 disassembly at $080000...\n");
+       JaguarDasm(0x080000, 10000);
+       WriteLog("\n");//*/
 }
 
 //
@@ -1630,18 +1787,18 @@ void JaguarDone(void)
 //
 void JaguarExecute(uint32 * backbuffer, bool render)
 {
-       uint16 vp = TOMReadWord(0xF0003E) + 1;
-       uint16 vi = TOMReadWord(0xF0004E);
+       uint16 vp = TOMReadWord(0xF0003E, JAGUAR) + 1;
+       uint16 vi = TOMReadWord(0xF0004E, JAGUAR);
 //Using WO registers is OK, since we're the ones controlling access--there's nothing wrong here! ;-)
 //Though we shouldn't be able to do it using TOMReadWord... !!! FIX !!!
 
-//     uint16 vdb = TOMReadWord(0xF00046);
+//     uint16 vdb = TOMReadWord(0xF00046, JAGUAR);
 //Note: This is the *definite* end of the display, though VDE *might* be less than this...
-//     uint16 vbb = TOMReadWord(0xF00040);
+//     uint16 vbb = TOMReadWord(0xF00040, JAGUAR);
 //It seems that they mean it when they say that VDE is the end of object processing.
 //However, we need to be able to tell the OP (or TOM) that we've reached the end of the
 //buffer and not to write any more pixels... !!! FIX !!!
-//     uint16 vde = TOMReadWord(0xF00048);
+//     uint16 vde = TOMReadWord(0xF00048, JAGUAR);
 
        uint16 refreshRate = (vjs.hardwareTypeNTSC ? 60 : 50);
        uint32 m68kClockRate = (vjs.hardwareTypeNTSC ? M68K_CLOCK_RATE_NTSC : M68K_CLOCK_RATE_PAL);
@@ -1652,7 +1809,6 @@ void JaguarExecute(uint32 * backbuffer, bool render)
        uint32 M68KCyclesPerScanline = m68kClockRate / (vp * refreshRate);
        uint32 RISCCyclesPerScanline = m68kClockRate / (vp * refreshRate);
 
-       TOMResetBackbuffer(backbuffer);
 /*extern int effect_start;
 if (effect_start)
        WriteLog("JagExe: VP=%u, VI=%u, CPU CPS=%u, GPU CPS=%u\n", vp, vi, M68KCyclesPerScanline, RISCCyclesPerScanline);//*/
@@ -1661,20 +1817,18 @@ if (effect_start)
        for(uint16 i=0; i<vp; i++)
        {
                // Increment the horizontal count (why? RNG? Besides which, this is *NOT* cycle accurate!)
-               TOMWriteWord(0xF00004, (TOMReadWord(0xF00004) + 1) & 0x7FF);
-
-               TOMWriteWord(0xF00006, i);                                      // Write the VC
+               TOMWriteWord(0xF00004, (TOMReadWord(0xF00004, JAGUAR) + 1) & 0x7FF, JAGUAR);
+               TOMWriteWord(0xF00006, i, JAGUAR);                      // Write the VC
 
-//             if (i == vi)                                                            // Time for Vertical Interrupt?
 //Not sure if this is correct...
 //Seems to be, kinda. According to the JTRM, this should only fire on odd lines in non-interlace mode...
 //Which means that it normally wouldn't go when it's zero.
-               if (i == vi && i > 0 && TOMIRQEnabled(IRQ_VBLANK))      // Time for Vertical Interrupt?
+               if (i == vi && i > 0 && TOMIRQEnabled(IRQ_VIDEO))       // Time for Vertical Interrupt?
                {
                        // We don't have to worry about autovectors & whatnot because the Jaguar
                        // tells you through its HW registers who sent the interrupt...
                        TOMSetPendingVideoInt();
-                       m68k_set_irq(7);
+                       m68k_set_irq(2);
                }
 
 //if (start_logging)
@@ -1692,7 +1846,8 @@ if (effect_start)
                BUTCHExec(RISCCyclesPerScanline);
 //if (start_logging)
 //     WriteLog("About to execute GPU (%u)...\n", i);
-               GPUExec(RISCCyclesPerScanline);
+               if (vjs.GPUEnabled)
+                       GPUExec(RISCCyclesPerScanline);
 
                if (vjs.DSPEnabled)
                {
@@ -1729,112 +1884,11 @@ uint8 * GetRamPtr(void)
 
 //
 // New Jaguar execution stack
+// This executes 1 frame's worth of code.
 //
-
-#if 0
-
-void JaguarExecuteNew(void)
-{
-       extern bool finished, showGUI;
-       extern bool debounceRunKey;
-       // Pass a message to the "joystick" code to debounce the ESC key...
-       debounceRunKey = true;
-       finished = false;
-/*     InitializeEventList();
-       TOMResetBackbuffer(backbuffer);
-//     SetCallbackTime(ScanlineCallback, 63.5555);
-       SetCallbackTime(ScanlineCallback, 31.77775);
-//     SetCallbackTime(RenderCallback, 33303.082);     // # Scanlines * scanline time
-//     SetCallbackTime(RenderCallback, 16651.541);     // # Scanlines * scanline time//*/
-//     uint8 * keystate = SDL_GetKeyState(NULL);
-
-       do
-       {
-               double timeToNextEvent = GetTimeToNextEvent();
-//WriteLog("JEN: Time to next event (%u) is %f usec (%u RISC cycles)...\n", nextEvent, timeToNextEvent, USEC_TO_RISC_CYCLES(timeToNextEvent));
-
-               m68k_execute(USEC_TO_M68K_CYCLES(timeToNextEvent));
-               gpu_exec(USEC_TO_RISC_CYCLES(timeToNextEvent));
-
-               if (vjs.DSPEnabled)
-               {
-                       if (vjs.usePipelinedDSP)
-                               DSPExecP2(USEC_TO_RISC_CYCLES(timeToNextEvent));        // Pipelined DSP execution (3 stage)...
-                       else
-                               DSPExec(USEC_TO_RISC_CYCLES(timeToNextEvent));          // Ordinary non-pipelined DSP
-               }
-
-               HandleNextEvent();
-
-//             if (keystate[SDLK_ESCAPE])
-//                     break;
-
-//         SDL_PumpEvents();   // Needed to keep the keystate current...
-       }
-       while (!finished);
-}
-
-void ScanlineCallback(void)
-{
-       uint16 vc = TOMReadWord(0xF00006);
-       uint16 vp = TOMReadWord(0xF0003E) + 1;
-       uint16 vi = TOMReadWord(0xF0004E);
-//     uint16 vbb = TOMReadWord(0xF00040);
-       vc++;
-
-       if (vc >= vp)
-               vc = 0;
-
-//WriteLog("SLC: Currently on line %u (VP=%u)...\n", vc, vp);
-       TOMWriteWord(0xF00006, vc);
-
-//This is a crappy kludge, but maybe it'll work for now...
-//Maybe it's not so bad, since the IRQ happens on a scanline boundary...
-       if (vc == vi && vc > 0 && tom_irq_enabled(IRQ_VBLANK))  // Time for Vertical Interrupt?
-       {
-               // We don't have to worry about autovectors & whatnot because the Jaguar
-               // tells you through its HW registers who sent the interrupt...
-               tom_set_pending_video_int();
-               m68k_set_irq(7);
-       }
-
-       TOMExecScanline(vc, true);
-
-//Change this to VBB???
-//Doesn't seem to matter (at least for Flip Out & I-War)
-       if (vc == 0)
-//     if (vc == vbb)
-       {
-joystick_exec();
-
-               RenderBackbuffer();
-               TOMResetBackbuffer(backbuffer);
-       }//*/
-
-//     if (vc == 0)
-//             TOMResetBackbuffer(backbuffer);
-
-//     SetCallbackTime(ScanlineCallback, 63.5555);
-       SetCallbackTime(ScanlineCallback, 31.77775);
-}
-
-#else
-
 bool frameDone;
 void JaguarExecuteNew(void)
 {
-//     extern bool finished, showGUI;
-//     extern bool debounceRunKey;
-       // Pass a message to the "joystick" code to debounce the ESC key...
-//     debounceRunKey = true;
-//     finished = false;
-/*     InitializeEventList();
-       TOMResetBackbuffer(backbuffer);
-//     SetCallbackTime(ScanlineCallback, 63.5555);
-       SetCallbackTime(ScanlineCallback, 31.77775);
-//     SetCallbackTime(RenderCallback, 33303.082);     // # Scanlines * scanline time
-//     SetCallbackTime(RenderCallback, 16651.541);     // # Scanlines * scanline time//*/
-//     uint8 * keystate = SDL_GetKeyState(NULL);
        frameDone = false;
 
        do
@@ -1843,7 +1897,9 @@ void JaguarExecuteNew(void)
 //WriteLog("JEN: Time to next event (%u) is %f usec (%u RISC cycles)...\n", nextEvent, timeToNextEvent, USEC_TO_RISC_CYCLES(timeToNextEvent));
 
                m68k_execute(USEC_TO_M68K_CYCLES(timeToNextEvent));
-               GPUExec(USEC_TO_RISC_CYCLES(timeToNextEvent));
+
+               if (vjs.GPUEnabled)
+                       GPUExec(USEC_TO_RISC_CYCLES(timeToNextEvent));
 
                if (vjs.DSPEnabled)
                {
@@ -1854,37 +1910,32 @@ void JaguarExecuteNew(void)
                }
 
                HandleNextEvent();
-
-//             if (keystate[SDLK_ESCAPE])
-//                     break;
-
-//         SDL_PumpEvents();   // Needed to keep the keystate current...
        }
        while (!frameDone);
 }
 
 void ScanlineCallback(void)
 {
-       uint16 vc = TOMReadWord(0xF00006);
-       uint16 vp = TOMReadWord(0xF0003E) + 1;
-       uint16 vi = TOMReadWord(0xF0004E);
-//     uint16 vbb = TOMReadWord(0xF00040);
+       uint16 vc = TOMReadWord(0xF00006, JAGUAR);
+       uint16 vp = TOMReadWord(0xF0003E, JAGUAR) + 1;
+       uint16 vi = TOMReadWord(0xF0004E, JAGUAR);
+//     uint16 vbb = TOMReadWord(0xF00040, JAGUAR);
        vc++;
 
        if (vc >= vp)
                vc = 0;
 
 //WriteLog("SLC: Currently on line %u (VP=%u)...\n", vc, vp);
-       TOMWriteWord(0xF00006, vc);
+       TOMWriteWord(0xF00006, vc, JAGUAR);
 
 //This is a crappy kludge, but maybe it'll work for now...
 //Maybe it's not so bad, since the IRQ happens on a scanline boundary...
-       if (vc == vi && vc > 0 && TOMIRQEnabled(IRQ_VBLANK))    // Time for Vertical Interrupt?
+       if (vc == vi && vc > 0 && TOMIRQEnabled(IRQ_VIDEO))     // Time for Vertical Interrupt?
        {
                // We don't have to worry about autovectors & whatnot because the Jaguar
                // tells you through its HW registers who sent the interrupt...
                TOMSetPendingVideoInt();
-               m68k_set_irq(7);
+               m68k_set_irq(2);
        }
 
        TOMExecScanline(vc, true);
@@ -1895,26 +1946,20 @@ void ScanlineCallback(void)
 //     if (vc == vbb)
        {
                JoystickExec();
-//We comment this out so that the GUI can manage this instead. Which is how it should be anyway.
-//             RenderBackbuffer();
-               TOMResetBackbuffer(backbuffer);
                frameDone = true;
        }//*/
 
-//     if (vc == 0)
-//             TOMResetBackbuffer(backbuffer);
-
 //     SetCallbackTime(ScanlineCallback, 63.5555);
        SetCallbackTime(ScanlineCallback, 31.77775);
 }
 
-#endif
-
 // This isn't currently used, but maybe it should be...
+/*
+Nah, the scanline based code is good enough, and runs in 1 frame. The GUI
+handles all the rest, so this isn't needed. :-P
+*/
 void RenderCallback(void)
 {
-//     RenderBackbuffer();
-       TOMResetBackbuffer(backbuffer);
 //     SetCallbackTime(RenderCallback, 33303.082);     // # Scanlines * scanline time
        SetCallbackTime(RenderCallback, 16651.541);     // # Scanlines * scanline time
 }