]> Shamusworld >> Repos - apple2/commitdiff
Fixes to make emulator //e compatible; display can do double hires now.
authorShamus Hammons <jlhamm@acm.org>
Thu, 19 Sep 2013 00:03:09 +0000 (19:03 -0500)
committerShamus Hammons <jlhamm@acm.org>
Thu, 19 Sep 2013 00:03:09 +0000 (19:03 -0500)
12 files changed:
ROMs/apple2.rom [changed mode: 0755->0644]
ROMs/apple2c.rom [changed mode: 0755->0644]
ROMs/apple2e-enhanced.rom [new file with mode: 0644]
ROMs/apple2e.rom [changed mode: 0755->0644]
apple2.cfg
src/apple2.cpp
src/apple2.h
src/applevideo.cpp
src/applevideo.h
src/firmware.h
src/sound.cpp
src/v65c02.cpp

old mode 100755 (executable)
new mode 100644 (file)
old mode 100755 (executable)
new mode 100644 (file)
diff --git a/ROMs/apple2e-enhanced.rom b/ROMs/apple2e-enhanced.rom
new file mode 100644 (file)
index 0000000..65bb648
Binary files /dev/null and b/ROMs/apple2e-enhanced.rom differ
old mode 100755 (executable)
new mode 100644 (file)
index 65bb648..916b318
Binary files a/ROMs/apple2e.rom and b/ROMs/apple2e.rom differ
index f67291817b150ef19aff1e96b435713b54e8e694..3aa30c37fd8a1b383aecd199b8b85d2b35f89014 100755 (executable)
@@ -4,7 +4,7 @@
 
 # Apple ROM paths
 
-BIOSROM = ./ROMs/apple2.rom
+BIOSROM = ./ROMs/apple2e-enhanced.rom
 diskROM = ./ROMs/disk.rom
 ROMs = ./ROMs
 
@@ -29,8 +29,8 @@ autoSaveState = 1
 #floppyImage2 = ./disks/bt3_character_fixed.dsk
 # Yes
 #floppyImage1 = ./disks/Sabotage.dsk
-# ??? (//c or //e w/128K required)
-#floppyImage1 = ./disks/airheart.dsk
+# ??? (//c or //e w/128K required) (dumps to monitor) 
+floppyImage1 = ./disks/airheart.dsk
 # Yes
 #floppyImage1 = ./disks/drol.dsk
 # Yes
@@ -51,6 +51,7 @@ autoSaveState = 1
 #floppyImage2 = ./disks/MoebiusIIB.dsk
 # Yes
 #floppyImage1 = ./disks/wind_walker_1.dsk
+#floppyImage2 = ./disks/wind_walker_2.dsk
 # Yes
 #floppyImage1 = ./disks/dino_eggs.dsk
 # ??? 1, yes; 2, no
@@ -74,7 +75,7 @@ autoSaveState = 1
 # Yes
 #floppyImage1 = ./disks/lode_runner.dsk
 # Yes
-floppyImage1 = ./disks/championship_lode_runner.dsk
+#floppyImage1 = ./disks/championship_lode_runner.dsk
 
 
 # OpenGL filtering type: 1 - blurry, 0 - sharp
index 8b6a36f140332c305a0a6c81aed2d335ef5695a2..572d758c7f2580c7717febf1ea04ca9177f19127 100755 (executable)
 
 #define THREADED_65C02
 #define CPU_THREAD_OVERFLOW_COMPENSATION
-//#define DEBUG_LC
+#define DEBUG_LC
 //#define CPU_CLOCK_CHECKING
-#define THREAD_DEBUGGING
+//#define THREAD_DEBUGGING
+#define SOFT_SWITCH_DEBUGGING
 
 // Global variables
 
 uint8_t ram[0x10000], rom[0x10000];                            // RAM & ROM spaces
-uint8_t ram2[0x10000];
+uint8_t ram2[0x10000];                                                 // Auxillary RAM
 uint8_t diskRom[0x100];                                                        // Disk ROM space
 V65C02REGS mainCPU;                                                            // v65C02 execution context
-uint8_t appleType = APPLE_TYPE_II;
+uint8_t appleType = APPLE_TYPE_IIE;
 FloppyDrive floppyDrive;
 
 // Local variables
@@ -77,6 +78,15 @@ static uint8_t lastKeyPressed = 0;
 static bool keyDown = false;
 static bool openAppleDown = false;
 static bool closedAppleDown = false;
+static bool store80Mode = false;
+static bool vbl = false;
+static bool slotCXROM = false;
+static bool slotC3ROM = false;
+static bool ramrd = false;
+static bool ramwrt = false;
+static bool altzp = false;
+static bool ioudis = true;
+bool dhires = false;
 
 //static FloppyDrive floppyDrive;
 
@@ -114,6 +124,8 @@ static bool cpuFinished = false;
 static bool cpuSleep = false;
 
 
+// NB: Apple //e Manual sez 6502 is running @ 1,022,727 Hz
+
 // Let's try a thread...
 /*
 Here's how it works: Execute 1 frame's worth, then sleep.
@@ -188,7 +200,7 @@ WriteLog("CPU: Execute65C02(&mainCPU, cycles);\n");
                }
 #endif
 
-WriteLog("CPUThread: Supposedly end of frame...\n");
+//WriteLog("CPUThread: Supposedly end of frame...\n");
 
 #ifdef THREAD_DEBUGGING
 WriteLog("CPU: SDL_mutexP(cpuMutex);\n");
@@ -288,7 +300,8 @@ if (addr >= 0xC080 && addr <= 0xC08F)
        {
                return lastKeyPressed | (keyDown ? 0x80 : 0x00);
        }
-       else if ((addr & 0xFFF0) == 0xC010)             // Read $C010-$C01F
+//     else if ((addr & 0xFFF8) == 0xC010)             // Read $C010-$C01F
+       else if (addr == 0xC010)
        {
 //This is bogus: keyDown is set to false, so return val NEVER is set...
 //Fixed...
@@ -297,6 +310,112 @@ if (addr >= 0xC080 && addr <= 0xC08F)
                keyDown = false;
                return retVal;
        }
+       // These are //e locations
+       else if (addr == 0xC011)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("RDBANK2 (read)\n");
+#endif
+               return (visibleBank == LC_BANK_2 ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC012)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("RDLCRAM (read)\n");
+#endif
+               return (readRAM ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC013)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("RAMRD (read)\n");
+#endif
+               return (ramrd ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC014)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("RAMWRT (read)\n");
+#endif
+               return (ramwrt ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC015)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("SLOTCXROM (read)\n");
+#endif
+               return (slotCXROM ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC016)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("ALTZP (read)\n");
+#endif
+               return (altzp ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC017)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("SLOTC3ROM (read)\n");
+#endif
+               return (slotC3ROM ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC018)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("80STORE (read)\n");
+#endif
+               return (store80Mode ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC019)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("VBL (read)\n");
+#endif
+               return (vbl ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC01A)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("TEXT (read)\n");
+#endif
+               return (textMode ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC01B)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("MIXED (read)\n");
+#endif
+               return (mixedMode ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC01C)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("PAGE2 (read)\n");
+#endif
+               return (displayPage2 ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC01D)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("HIRES (read)\n");
+#endif
+               return (hiRes ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC01E)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("ALTCHARSET (read)\n");
+#endif
+               return (alternateCharset ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC01F)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("80COL (read)\n");
+#endif
+               return (col80Mode ? 0x80 : 0x00);
+       }
        else if ((addr & 0xFFF0) == 0xC030)             // Read $C030-$C03F
        {
 /*
@@ -322,36 +441,76 @@ deltaT to zero. In the sound IRQ, if deltaT > buffer size, then subtract buffer
        }
        else if (addr == 0xC050)                                // Read $C050
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("TEXT off (read)\n");
+#endif
                textMode = false;
        }
        else if (addr == 0xC051)                                // Read $C051
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("TEXT on (read)\n");
+#endif
                textMode = true;
        }
        else if (addr == 0xC052)                                // Read $C052
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("MIXED off (read)\n");
+#endif
                mixedMode = false;
        }
        else if (addr == 0xC053)                                // Read $C053
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("MIXED on (read)\n");
+#endif
                mixedMode = true;
        }
        else if (addr == 0xC054)                                // Read $C054
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("PAGE2 off (read)\n");
+#endif
                displayPage2 = false;
        }
        else if (addr == 0xC055)                                // Read $C055
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("PAGE2 on (read)\n");
+#endif
                displayPage2 = true;
        }
        else if (addr == 0xC056)                                // Read $C056
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("HIRES off (read)\n");
+#endif
                hiRes = false;
        }
        else if (addr == 0xC057)                                // Read $C057
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("HIRES on (read)\n");
+#endif
                hiRes = true;
        }
+       else if (addr == 0xC05E)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("DHIRES on (read)\n");
+#endif
+               if (ioudis)
+                       dhires = true;
+       }
+       else if (addr == 0xC05F)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("DHIRES off (read)\n");
+#endif
+               if (ioudis)
+                       dhires = false;
+       }
        else if (addr == 0xC061)                                // Read $C061
        {
                // Open Apple key (or push button 0)
@@ -362,6 +521,40 @@ deltaT to zero. In the sound IRQ, if deltaT > buffer size, then subtract buffer
                // Open Apple key (or push button 0)
                return (closedAppleDown ? 0x80 : 0x00);
        }
+       // The way the paddles work is that a strobe is written (or read) to $C070,
+       // then software counts down the time that it takes for the paddle outputs
+       // to have bit 7 return to 0. If there are no paddles connected, bit 7
+       // stays at 1.
+       else if (addr == 0xC064)        // Paddles 0-3
+       {
+               return 0xFF;
+       }
+       else if (addr == 0xC065)
+       {
+               return 0xFF;
+       }
+       else if (addr == 0xC066)
+       {
+               return 0xFF;
+       }
+       else if (addr == 0xC067)
+       {
+               return 0xFF;
+       }
+       else if (addr == 0xC07E)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("IOUDIS (read)\n");
+#endif
+               return (ioudis ? 0x80 : 0x00);
+       }
+       else if (addr == 0xC07F)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("DHIRES (read)\n");
+#endif
+               return (dhires ? 0x80 : 0x00);
+       }
 
 //Note that this is a kludge: The $D000-$DFFF 4K space is shared (since $C000-$CFFF is
 //memory mapped) between TWO banks, and that that $E000-$FFFF RAM space is a single bank.
@@ -520,62 +713,107 @@ if (addr >= 0xD000 && addr <= 0xD00F)
        showpath = true;
 #endif
 //This sux...
-       if (addr >= 0xC100 && addr <= 0xCFFF)   // The $C000-$CFFF block is *never* RAM
-#ifdef LC_DEBUGGING
+       if (addr >= 0xC100 && addr <= 0xC7FF)   // The $C000-$CFFF block is *never* RAM
        {
-#endif
-               b = rom[addr];
+// Looks like the ][e ref manual got this one wrong: slotCXROM set should mean
+// use internal ROM, NOT slot ROM. :-/
+// (fixed now, by setting the switch correctly in the write mem section :-P)
+               if (!slotCXROM)
+//             if (slotCXROM)
+                       b = rom[addr];
+               else
+               {
+                       if (addr >= 0xC100 && addr <= 0xC1FF)
+                               b = parallelROM[addr & 0xFF];
+                       else if (addr >= 0xC600 && addr <= 0xC6FF)
+                               b = diskROM[addr & 0xFF];
+                       else if (addr >= 0xC300 && addr <= 0xC3FF && !slotC3ROM)
+                               b = rom[addr];
+                       else
+                               b = 0xFF;
+//                             b = rom[addr];
+               }
 #ifdef LC_DEBUGGING
 if (showpath)
        WriteLog("b is from $C100-$CFFF block...\n");
-       }
 #endif
+       }
+       else if (addr >= 0xC800 && addr <= 0xCFFF)      // 2K peripheral or OS ROM
+       {
+               b = rom[addr];
+       }
        else if (addr >= 0xD000)
        {
                if (readRAM)
                {
                        if (addr <= 0xDFFF && visibleBank == LC_BANK_1)
 #ifdef LC_DEBUGGING
-       {
+                       {
 #endif
                                b = ram[addr - 0x1000];
+//                             b = (ramrd ? ram2[addr - 0x1000] : ram[addr - 0x1000]);
 #ifdef LC_DEBUGGING
 if (showpath)
        WriteLog("b is from LC bank #1 (ram[addr - 0x1000])...\n");
-       }
+                       }
 #endif
                        else
 #ifdef LC_DEBUGGING
-       {
+                       {
 #endif
                                b = ram[addr];
+//                             b = (ramrd ? ram2[addr] : ram[addr]);
 #ifdef LC_DEBUGGING
 if (showpath)
        WriteLog("b is from LC bank #2 (ram[addr])...\n");
-       }
+                       }
 #endif
                }
                else
 #ifdef LC_DEBUGGING
-       {
+               {
 #endif
                        b = rom[addr];
 #ifdef LC_DEBUGGING
 if (showpath)
        WriteLog("b is from LC ROM (rom[addr])...\n");
-       }
+               }
 #endif
        }
        else
-#ifdef LC_DEBUGGING
        {
+#if 1
+               // Check for 80STORE mode (STORE80 takes precedence over RAMRD/WRT)...
+               if ((((addr >= 0x0400) && (addr <= 0x07FF)) || ((addr >= 0x2000) && (addr <= 0x3FFF))) && store80Mode)
+               {
+                       if (displayPage2)
+                               b = ram2[addr];
+                       else
+                               b = ram[addr];
+
+                       return b;
+               }
+
+               // Finally, check for auxillary/altzp write switches
 #endif
-               b = ram[addr];
+               if (addr < 0x0200)
+                       b = (altzp ? ram2[addr] : ram[addr]);
+               else
+                       b = (ramrd ? ram2[addr] : ram[addr]);
+//             if (ramrd)
+//                     b = ram2[addr];
+//             else
+//             {
+//                     if (altzp)
+//                             b = ram2[addr];
+//                     else
+//                             b = ram[addr];
+//             }
 #ifdef LC_DEBUGGING
 if (showpath)
        WriteLog("b is from ram[addr]...\n");
-       }
 #endif
+       }
 
 #ifdef LC_DEBUGGING
 if (addr >= 0xD000 && addr <= 0xD00F)
@@ -687,12 +925,117 @@ SET80VID = $C00D ;enable 80-column display mode (WR-only)
 CLRALTCH = $C00E ;use main char set- norm LC, Flash UC (WR-only)
 SETALTCH = $C00F ;use alt char set- norm inverse, LC; no Flash (WR-only)
 */
-       if (addr == 0xC00E)
+       if (addr == 0xC000)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("80STORE off (write)\n");
+#endif
+               store80Mode = false;
+       }
+       else if (addr == 0xC001)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("80STORE on (write)\n");
+#endif
+               store80Mode = true;
+       }
+       else if (addr == 0xC002)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("RAMRD off (write)\n");
+#endif
+               ramrd = false;
+       }
+       else if (addr == 0xC003)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("RAMRD on (write)\n");
+#endif
+               ramrd = true;
+       }
+       else if (addr == 0xC004)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("RAMWRT off (write)\n");
+#endif
+               ramwrt = false;
+       }
+       else if (addr == 0xC005)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("RAMWRT on (write)\n");
+#endif
+               ramwrt = true;
+       }
+       else if (addr == 0xC006)
+       {
+               // This is the only soft switch that breaks the usual convention.
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("SLOTCXROM on (write)\n");
+#endif
+               slotCXROM = true;
+       }
+       else if (addr == 0xC007)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("SLOTCXROM off (write)\n");
+#endif
+               slotCXROM = false;
+       }
+       else if (addr == 0xC008)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("ALTZP off (write)\n");
+#endif
+               altzp = false;
+       }
+       else if (addr == 0xC009)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("ALTZP on (write)\n");
+#endif
+               altzp = true;
+       }
+       else if (addr == 0xC00A)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("SLOTC3ROM off (write)\n");
+#endif
+               slotC3ROM = false;
+       }
+       else if (addr == 0xC00B)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("SLOTC3ROM on (write)\n");
+#endif
+               slotC3ROM = true;
+       }
+       else if (addr == 0xC00C)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("80COL off (write)\n");
+#endif
+               col80Mode = false;
+       }
+       else if (addr == 0xC00D)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("80COL on (write)\n");
+#endif
+               col80Mode = true;
+       }
+       else if (addr == 0xC00E)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("ALTCHARSET off (write)\n");
+#endif
                alternateCharset = false;
        }
        else if (addr == 0xC00F)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("ALTCHARSET on (write)\n");
+#endif
                alternateCharset = true;
        }
        else if ((addr & 0xFFF0) == 0xC010)             // Keyboard strobe
@@ -704,36 +1047,95 @@ SETALTCH = $C00F ;use alt char set- norm inverse, LC; no Flash (WR-only)
        }
        else if (addr == 0xC050)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("TEXT off (write)\n");
+#endif
                textMode = false;
        }
        else if (addr == 0xC051)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("TEXT on (write)\n");
+#endif
                textMode = true;
        }
        else if (addr == 0xC052)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("MIXED off (write)\n");
+#endif
                mixedMode = false;
        }
        else if (addr == 0xC053)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("MIXED on (write)\n");
+#endif
                mixedMode = true;
        }
        else if (addr == 0xC054)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("PAGE2 off (write)\n");
+#endif
                displayPage2 = false;
        }
        else if (addr == 0xC055)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("PAGE2 on (write)\n");
+#endif
                displayPage2 = true;
        }
        else if (addr == 0xC056)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("HIRES off (write)\n");
+#endif
                hiRes = false;
        }
        else if (addr == 0xC057)
        {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("HIRES on (write)\n");
+#endif
                hiRes = true;
        }
+       else if (addr == 0xC05E)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("DHIRES on (write)\n");
+#endif
+               if (ioudis)
+                       dhires = true;
+
+//static int goDumpDis = 0;
+//goDumpDis++;
+//if (goDumpDis == 2)
+//     dumpDis = true;
+       }
+       else if (addr == 0xC05F)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("DHIRES off (write)\n");
+#endif
+               if (ioudis)
+                       dhires = false;
+       }
+       else if (addr == 0xC07E)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("IOUDIS on (write)\n");
+#endif
+               ioudis = true;
+       }
+       else if (addr == 0xC07F)
+       {
+#ifdef SOFT_SWITCH_DEBUGGING
+WriteLog("IOUDIS off (write)\n");
+#endif
+               ioudis = false;
+       }
        else if ((addr & 0xFFFB) == 0xC080)
        {
 #ifdef DEBUG_LC
@@ -861,16 +1263,70 @@ if (addr >= 0xD000 && addr <= 0xD00F)
        {
                if (writeRAM)
                {
+#if 1
                        if (addr <= 0xDFFF && visibleBank == LC_BANK_1)
                                ram[addr - 0x1000] = b;
                        else
                                ram[addr] = b;
+#else
+                       if (addr <= 0xDFFF && visibleBank == LC_BANK_1)
+                       {
+                               if (ramwrt)
+                                       ram2[addr - 0x1000] = b;
+                               else
+                                       ram[addr - 0x1000] = b;
+                       }
+                       else
+                       {
+                               if (ramwrt)
+                                       ram2[addr] = b;
+                               else
+                                       ram[addr] = b;
+                       }
+#endif
                }
 
                return;
        }
 
-       ram[addr] = b;
+       // Check for 80STORE mode (STORE80 takes precedence over RAMRD/WRT)...
+       if ((((addr >= 0x0400) && (addr <= 0x07FF)) || ((addr >= 0x2000) && (addr <= 0x3FFF))) && store80Mode)
+       {
+               if (displayPage2)
+                       ram2[addr] = b;
+               else
+                       ram[addr] = b;
+
+               return;
+       }
+
+       // Finally, check for auxillary/altzp write switches
+#if 0
+       if (ramwrt)
+               ram2[addr] = b;
+       else
+       {
+               if (altzp)
+                       ram2[addr] = b;
+               else
+                       ram[addr] = b;
+       }
+#else
+       if (addr < 0x0200)
+       {
+               if (altzp)
+                       ram2[addr] = b;
+               else
+                       ram[addr] = b;
+       }
+       else
+       {
+               if (ramwrt)
+                       ram2[addr] = b;
+               else
+                       ram[addr] = b;
+       }
+#endif
 }
 
 
@@ -928,7 +1384,9 @@ int main(int /*argc*/, char * /*argv*/[])
        mainCPU.WrMem = WrMem;
        mainCPU.cpuFlags |= V65C02_ASSERT_LINE_RESET;
 
-       if (!LoadImg(settings.BIOSPath, rom + 0xD000, 0x3000))
+//     alternateCharset = true;
+//     if (!LoadImg(settings.BIOSPath, rom + 0xD000, 0x3000))
+       if (!LoadImg(settings.BIOSPath, rom + 0xC000, 0x4000))
        {
                WriteLog("Could not open file '%s'!\n", settings.BIOSPath);
                return -1;
@@ -948,7 +1406,7 @@ int main(int /*argc*/, char * /*argv*/[])
 
 //Kill the DOS ROM in slot 6 for now...
 //not
-       memcpy(rom + 0xC600, diskROM, 0x100);
+//     memcpy(rom + 0xC600, diskROM, 0x100);
 //     memcpy(rom + 0xC700, diskROM, 0x100);   // Slot 7???
 
        WriteLog("About to initialize video...\n");
@@ -1156,7 +1614,7 @@ Z         $DA     $9A     $DA     $9A
 ESC            $9B     $9B     $9B     $9B             No xlation
 
 */
-static uint64_t lastCPUCycles = 0;
+//static uint64_t lastCPUCycles = 0;
 static uint32_t frameCount = 0;
 static void FrameCallback(void)
 {
@@ -1179,8 +1637,8 @@ static void FrameCallback(void)
 
                        //kludge: should have a caps lock thingy here...
                        //or all uppercase for ][+...
-                       if (lastKeyPressed >= 'a' && lastKeyPressed <='z')
-                               lastKeyPressed &= 0xDF;         // Convert to upper case...
+//                     if (lastKeyPressed >= 'a' && lastKeyPressed <='z')
+//                             lastKeyPressed &= 0xDF;         // Convert to upper case...
 
                        break;
                case SDL_KEYDOWN:
@@ -1197,10 +1655,16 @@ static void FrameCallback(void)
                                lastKeyPressed = 0x15, keyDown = true;
                        else if (event.key.keysym.sym == SDLK_LEFT)
                                lastKeyPressed = 0x08, keyDown = true;
+                       else if (event.key.keysym.sym == SDLK_UP)
+                               lastKeyPressed = 0x0B, keyDown = true;
+                       else if (event.key.keysym.sym == SDLK_DOWN)
+                               lastKeyPressed = 0x0A, keyDown = true;
                        else if (event.key.keysym.sym == SDLK_RETURN)
                                lastKeyPressed = 0x0D, keyDown = true;
                        else if (event.key.keysym.sym == SDLK_ESCAPE)
                                lastKeyPressed = 0x1B, keyDown = true;
+                       else if (event.key.keysym.sym == SDLK_BACKSPACE)
+                               lastKeyPressed = 0x7F, keyDown = true;
 
                        // Fix CTRL+key combo...
                        if (event.key.keysym.mod & KMOD_CTRL)
@@ -1337,7 +1801,7 @@ if (counter == 60)
                SDL_Delay(1);                                                   // Wait for next frame...
 
        startTicks = SDL_GetTicks();
-#if 1
+#if 0
        uint64_t cpuCycles = GetCurrentV65C02Clock();
        uint32_t cyclesBurned = (uint32_t)(cpuCycles - lastCPUCycles);
        WriteLog("FrameCallback: used %i cycles\n", cyclesBurned);
index 958bb0b13572115438091a0fc797df2a3efee8ba..7696c5aa915fd4581921a8ee25162a8aff6039a2 100755 (executable)
@@ -10,5 +10,7 @@ enum { APPLE_TYPE_II, APPLE_TYPE_IIE, APPLE_TYPE_IIC };
 // Global variables (exported)
 
 extern uint8_t ram[0x10000], rom[0x10000];             // RAM & ROM pointers
+extern uint8_t ram2[0x10000];                                  // Auxillary RAM
 extern uint8_t appleType;
 extern FloppyDrive floppyDrive;
+extern bool dhires;
index 919776f0ec06c6f290911f16663cff5d9c5c78ee..d3060bf96719278c9128fbb1f2706d12eb1c4f46 100755 (executable)
 
 // Global variables
 
-bool flash;
-bool textMode;
-bool mixedMode;
-bool displayPage2;
-bool hiRes;
-bool alternateCharset;
+bool flash = false;
+bool textMode = true;
+bool mixedMode = false;
+bool displayPage2 = false;
+bool hiRes = false;
+bool alternateCharset = false;
+bool col80Mode = false;
 //void SpawnMessage(const char * text, ...);
 
 // Local variables
@@ -228,6 +229,7 @@ uint16_t appleHiresToMono[0x200] = {
 
 //static uint8_t blurTable[0x800][8];                          // Color TV blur table
 static uint8_t blurTable[0x80][8];                             // Color TV blur table
+static uint8_t mirrorTable[0x100];
 static uint32_t * palette = (uint32_t *)altColors;
 enum { ST_FIRST_ENTRY = 0, ST_COLOR_TV = 0, ST_WHITE_MONO, ST_GREEN_MONO, ST_LAST_ENTRY };
 static uint8_t screenType = ST_COLOR_TV;
@@ -235,9 +237,12 @@ static uint8_t screenType = ST_COLOR_TV;
 // Local functions
 
 static void Render40ColumnTextLine(uint8_t line);
+static void Render80ColumnTextLine(uint8_t line);
 static void Render40ColumnText(void);
+static void Render80ColumnText(void);
 static void RenderLoRes(uint16_t toLine = 24);
 static void RenderHiRes(uint16_t toLine = 192);
+static void RenderDHiRes(uint16_t toLine = 192);
 
 
 void SetupBlurTable(void)
@@ -294,6 +299,18 @@ void SetupBlurTable(void)
                }
        }
 #endif
+
+       for(int i=0; i<256; i++)
+       {
+               mirrorTable[i] = ((i & 0x01) << 7)
+                       | ((i & 0x02) << 5)
+                       | ((i & 0x04) << 3)
+                       | ((i & 0x08) << 1)
+                       | ((i & 0x10) >> 1)
+                       | ((i & 0x20) >> 3)
+                       | ((i & 0x40) >> 5)
+                       | ((i & 0x80) >> 7);
+       }
 }
 
 
@@ -425,10 +442,9 @@ static void Render40ColumnTextLine(uint8_t line)
                        {
                                uint32_t pixel = 0xFF000000;
 
-                               if (!alternateCharset)
+                               if (alternateCharset)
                                {
                                        if (textChar[((chr & 0x3F) * 56) + cx + (cy * 7)])
-//                                             pixel = 0xFFFFFFFF;
                                                pixel = pixelOn;
 
                                        if (chr < 0x80)
@@ -440,12 +456,9 @@ static void Render40ColumnTextLine(uint8_t line)
                                else
                                {
                                        if (textChar2e[(chr * 56) + cx + (cy * 7)])
-//                                             pixel = 0xFFFFFFFF;
                                                pixel = pixelOn;
                                }
 
-//                             scrBuffer[(x * 7 * 2) + (line * VIRTUAL_SCREEN_WIDTH * 8) + (cx * 2) + 0 + (cy * VIRTUAL_SCREEN_WIDTH)] = pixel;
-//                             scrBuffer[(x * 7 * 2) + (line * VIRTUAL_SCREEN_WIDTH * 8) + (cx * 2) + 1 + (cy * VIRTUAL_SCREEN_WIDTH)] = pixel;
                                scrBuffer[(x * 7 * 2) + (line * VIRTUAL_SCREEN_WIDTH * 8 * 2) + (cx * 2) + 0 + (cy * VIRTUAL_SCREEN_WIDTH * 2)] = pixel;
                                scrBuffer[(x * 7 * 2) + (line * VIRTUAL_SCREEN_WIDTH * 8 * 2) + (cx * 2) + 1 + (cy * VIRTUAL_SCREEN_WIDTH * 2)] = pixel;
 
@@ -454,8 +467,8 @@ static void Render40ColumnTextLine(uint8_t line)
                                        pixel = 0xFF000000;
 
                                {
-                               scrBuffer[(x * 7 * 2) + (line * VIRTUAL_SCREEN_WIDTH * 8 * 2) + (cx * 2) + 0 + (((cy * 2) + 1) * VIRTUAL_SCREEN_WIDTH)] = pixel;
-                               scrBuffer[(x * 7 * 2) + (line * VIRTUAL_SCREEN_WIDTH * 8 * 2) + (cx * 2) + 1 + (((cy * 2) + 1) * VIRTUAL_SCREEN_WIDTH)] = pixel;
+                                       scrBuffer[(x * 7 * 2) + (line * VIRTUAL_SCREEN_WIDTH * 8 * 2) + (cx * 2) + 0 + (((cy * 2) + 1) * VIRTUAL_SCREEN_WIDTH)] = pixel;
+                                       scrBuffer[(x * 7 * 2) + (line * VIRTUAL_SCREEN_WIDTH * 8 * 2) + (cx * 2) + 1 + (((cy * 2) + 1) * VIRTUAL_SCREEN_WIDTH)] = pixel;
                                }
                        }
                }
@@ -463,6 +476,65 @@ static void Render40ColumnTextLine(uint8_t line)
 }
 
 
+static void Render80ColumnTextLine(uint8_t line)
+{
+       uint32_t pixelOn = (screenType == ST_GREEN_MONO ? 0xFF61FF61 : 0xFFFFFFFF);
+
+       for(int x=0; x<80; x++)
+       {
+#if 0
+// This is wrong; it should grab from the alt bank if Page2 is set, not main RAM @ $0
+               uint8_t chr = ram[lineAddrLoRes[line] + (displayPage2 ? 0x0400 : 0x0000) + x];
+
+               if (x > 39)
+                       chr = ram2[lineAddrLoRes[line] + (displayPage2 ? 0x0400 : 0x0000) + x - 40];
+#else
+               uint8_t chr;
+
+               if (x & 0x01)
+                       chr = ram[lineAddrLoRes[line] + (x >> 1)];
+               else
+                       chr = ram2[lineAddrLoRes[line] + (x >> 1)];     
+#endif
+
+               // Render character at (x, y)
+
+               for(int cy=0; cy<8; cy++)
+               {
+                       for(int cx=0; cx<7; cx++)
+                       {
+                               uint32_t pixel = 0xFF000000;
+
+                               if (alternateCharset)
+                               {
+                                       if (textChar[((chr & 0x3F) * 56) + cx + (cy * 7)])
+                                               pixel = pixelOn;
+
+                                       if (chr < 0x80)
+                                               pixel = pixel ^ (screenType == ST_GREEN_MONO ? 0x0061FF61 : 0x00FFFFFF);
+
+                                       if ((chr & 0xC0) == 0x40 && flash)
+                                               pixel = 0xFF000000;
+                               }
+                               else
+                               {
+                                       if (textChar2e[(chr * 56) + cx + (cy * 7)])
+                                               pixel = pixelOn;
+                               }
+
+                               scrBuffer[(x * 7) + (line * VIRTUAL_SCREEN_WIDTH * 8 * 2) + cx + (cy * 2 * VIRTUAL_SCREEN_WIDTH)] = pixel;
+
+                               // QnD method to get blank alternate lines in text mode
+                               if (screenType == ST_GREEN_MONO)
+                                       pixel = 0xFF000000;
+
+                               scrBuffer[(x * 7) + (line * VIRTUAL_SCREEN_WIDTH * 8 * 2) + cx + (((cy * 2) + 1) * VIRTUAL_SCREEN_WIDTH)] = pixel;
+                       }
+               }
+       }
+}
+
+
 static void Render40ColumnText(void)
 {
        for(uint8_t line=0; line<24; line++)
@@ -470,6 +542,13 @@ static void Render40ColumnText(void)
 }
 
 
+static void Render80ColumnText(void)
+{
+       for(uint8_t line=0; line<24; line++)
+               Render80ColumnTextLine(line);
+}
+
+
 static void RenderLoRes(uint16_t toLine/*= 24*/)
 {
 // NOTE: The green mono rendering doesn't skip every other line... !!! FIX !!!
@@ -716,6 +795,75 @@ static void RenderHiRes(uint16_t toLine/*= 192*/)
 }
 
 
+static void RenderDHiRes(uint16_t toLine/*= 192*/)
+{
+// NOTE: Not endian safe. !!! FIX !!! [DONE]
+#if 0
+       uint32_t pixelOn = (screenType == ST_WHITE_MONO ? 0xFFFFFFFF : 0xFF61FF61);
+#else
+// Now it is. Now roll this fix into all the other places... !!! FIX !!!
+// The colors are set in the 8-bit array as R G B A
+       uint8_t monoColors[8] = { 0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0xFF, 0x61, 0xFF };
+       uint32_t * colorPtr = (uint32_t *)monoColors;
+       uint32_t pixelOn = (screenType == ST_WHITE_MONO ? colorPtr[0] : colorPtr[1]);
+#endif
+
+       for(uint16_t y=0; y<toLine; y++)
+       {
+               uint16_t previousLoPixel = 0;
+               uint32_t previous3bits = 0;
+
+               for(uint16_t x=0; x<40; x+=2)
+               {
+                       uint8_t screenByte = ram[lineAddrHiRes[y] + (displayPage2 ? 0x2000 : 0x0000) + x];
+                       uint32_t pixels = (mirrorTable[screenByte & 0x7F]) << 14;
+                       screenByte = ram[lineAddrHiRes[y] + (displayPage2 ? 0x2000 : 0x0000) + x + 1];
+                       pixels = pixels | (mirrorTable[screenByte & 0x7F]);
+                       screenByte = ram2[lineAddrHiRes[y] + (displayPage2 ? 0x2000 : 0x0000) + x];
+                       pixels = pixels | ((mirrorTable[screenByte & 0x7F]) << 21);
+                       screenByte = ram2[lineAddrHiRes[y] + (displayPage2 ? 0x2000 : 0x0000) + x + 1];
+                       pixels = pixels | ((mirrorTable[screenByte & 0x7F]) << 7);
+                       pixels = previous3bits | (pixels >> 1);
+
+                       // We now have 28 pixels (expanded from 14) in word: mask is $0F FF FF FF
+                       // 0ppp 1111 1111 1111 1111 1111 1111 1111
+                       // 31   27   23   19   15   11   7    3  0
+
+                       if (screenType == ST_COLOR_TV)
+                       {
+                               for(uint8_t i=0; i<7; i++)
+                               {
+                                       uint8_t bitPat = (pixels & 0x7F000000) >> 24;
+                                       pixels <<= 4;
+
+                                       for(uint8_t j=0; j<4; j++)
+                                       {
+                                               uint8_t color = blurTable[bitPat][j];
+                                               scrBuffer[(x * 14) + (i * 4) + j + (((y * 2) + 0) * VIRTUAL_SCREEN_WIDTH)] = palette[color];
+                                               scrBuffer[(x * 14) + (i * 4) + j + (((y * 2) + 1) * VIRTUAL_SCREEN_WIDTH)] = palette[color];
+                                       }
+                               }
+
+                               previous3bits = pixels & 0x70000000;
+                       }
+                       else
+                       {
+                               for(int j=0; j<28; j++)
+                               {
+                                       scrBuffer[(x * 14) + j + (((y * 2) + 0) * VIRTUAL_SCREEN_WIDTH)] = (pixels & 0x08000000 ? pixelOn : 0xFF000000);
+
+                                       if (screenType == ST_GREEN_MONO)
+                                               pixels &= 0x07FFFFFF;
+
+                                       scrBuffer[(x * 14) + j + (((y * 2) + 1) * VIRTUAL_SCREEN_WIDTH)] = (pixels & 0x08000000 ? pixelOn : 0xFF000000);
+                                       pixels <<= 1;
+                               }
+                       }
+               }
+       }
+}
+
+
 void RenderVideoFrame(void)
 {
 //temp...
@@ -726,7 +874,10 @@ return;//*/
        if (textMode)
        {
                // There's prolly more to it than this (like 80 column text), but this'll have to do for now...
-               Render40ColumnText();
+               if (!col80Mode)
+                       Render40ColumnText();
+               else
+                       Render80ColumnText();
        }
        else
        {
@@ -751,7 +902,9 @@ return;//*/
                }
                else
                {
-                       if (hiRes)
+                       if (dhires)
+                               RenderDHiRes();
+                       else if (hiRes)
                                RenderHiRes();
                        else
                                RenderLoRes();
index fcb2cace35f582e54a51f666a54734a2dc52cfb4..e0707ac084f0ab0f4ba41c223af6886784b8be4b 100755 (executable)
@@ -13,6 +13,7 @@ extern bool mixedMode;
 extern bool displayPage2;
 extern bool hiRes;
 extern bool alternateCharset;
+extern bool col80Mode;
 
 // Functions (exported)
 
index d27fcc8e49c1eb17850406e29ca028d2364bf9f5..63cc197a63f7001fd9bee66a1350ebc9cdaa2c32 100755 (executable)
@@ -40,6 +40,25 @@ char hdROM[0x100] = {                // Loads at $C700 (slot 7)
        0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF, 0x7F, 0xD7, 0x46
 };
 
+char parallelROM[0x100] = {
+       0x18, 0xB0, 0x38, 0x48, 0x8A, 0x48, 0x98, 0x48, 0x08, 0x78, 0x20, 0x58, 0xFF, 0xBA, 0x68, 0x68, 
+       0x68, 0x68, 0xA8, 0xCA, 0x9A, 0x68, 0x28, 0xAA, 0x90, 0x38, 0xBD, 0xB8, 0x05, 0x10, 0x19, 0x98, 
+       0x29, 0x7F, 0x49, 0x30, 0xC9, 0x0A, 0x90, 0x3B, 0xC9, 0x78, 0xB0, 0x29, 0x49, 0x3D, 0xF0, 0x21, 
+       0x98, 0x29, 0x9F, 0x9D, 0x38, 0x06, 0x90, 0x7E, 0xBD, 0xB8, 0x06, 0x30, 0x14, 0xA5, 0x24, 0xDD, 
+       0x38, 0x07, 0xB0, 0x0D, 0xC9, 0x11, 0xB0, 0x09, 0x09, 0xF0, 0x3D, 0x38, 0x07, 0x65, 0x24, 0x85, 
+       0x24, 0x4A, 0x38, 0xB0, 0x6D, 0x18, 0x6A, 0x3D, 0xB8, 0x06, 0x90, 0x02, 0x49, 0x81, 0x9D, 0xB8, 
+       0x06, 0xD0, 0x53, 0xA0, 0x0A, 0x7D, 0x38, 0x05, 0x88, 0xD0, 0xFA, 0x9D, 0xB8, 0x04, 0x9D, 0x38, 
+       0x05, 0x38, 0xB0, 0x43, 0xC5, 0x24, 0x90, 0x3A, 0x68, 0xA8, 0x68, 0xAA, 0x68, 0x4C, 0xF0, 0xFD, 
+       0x90, 0xFE, 0xB0, 0xFE, 0x99, 0x80, 0xC0, 0x90, 0x37, 0x49, 0x07, 0xA8, 0x49, 0x0A, 0x0A, 0xD0, 
+       0x06, 0xB8, 0x85, 0x24, 0x9D, 0x38, 0x07, 0xBD, 0xB8, 0x06, 0x4A, 0x70, 0x02, 0xB0, 0x23, 0x0A, 
+       0x0A, 0xA9, 0x27, 0xB0, 0xCF, 0xBD, 0x38, 0x07, 0xFD, 0xB8, 0x04, 0xC9, 0xF8, 0x90, 0x03, 0x69, 
+       0x27, 0xAC, 0xA9, 0x00, 0x85, 0x24, 0x18, 0x7E, 0xB8, 0x05, 0x68, 0xA8, 0x68, 0xAA, 0x68, 0x60, 
+       0x90, 0x27, 0xB0, 0x00, 0x10, 0x11, 0xA9, 0x89, 0x9D, 0x38, 0x06, 0x9D, 0xB8, 0x06, 0xA9, 0x28, 
+       0x9D, 0xB8, 0x04, 0xA9, 0x02, 0x85, 0x36, 0x98, 0x5D, 0x38, 0x06, 0x0A, 0xF0, 0x90, 0x5E, 0xB8, 
+       0x05, 0x98, 0x48, 0x8A, 0x0A, 0x0A, 0x0A, 0x0A, 0xA8, 0xBD, 0x38, 0x07, 0xC5, 0x24, 0x68, 0xB0, 
+       0x05, 0x48, 0x29, 0x80, 0x09, 0x20, 0x2C, 0x58, 0xFF, 0xF0, 0x03, 0xFE, 0x38, 0x07, 0x70, 0x84
+};
+
 // Various firmware from the IIe ROM file...
 
 //Not sure what the heck this is...
index 0d794c997ede1d06bf42c9efd866375a2f86a9da..22a027d2cc46c8834fb2184f4316155d619c0c05 100755 (executable)
@@ -162,7 +162,7 @@ static void SDLSoundCallback(void * /*userdata*/, Uint8 * buffer8, int length8)
 
        // Let's try using a mutex for shared resource consumption...
 //Actually, I think Lock/UnlockAudio() does this already...
-WriteLog("SDLSoundCallback: soundBufferPos = %i\n", soundBufferPos);
+//WriteLog("SDLSoundCallback: soundBufferPos = %i\n", soundBufferPos);
        SDL_mutexP(mutex2);
 
        // Recast this as a 16-bit type...
index 7f86895c6927f5ff3afff81299bcebe13fc566df..e10006c969f0eeeb72122cad73ea4daf18c9ae65 100755 (executable)
@@ -2844,8 +2844,14 @@ FBEF: 60        602  RTS2B    RTS
 //int instCount[256];
 #ifdef __DEBUG__
 bool dumpDis = false;
+//bool dumpDis = true;
 #endif
 
+/*
+On //e, $FCAA is the delay routine. (seems to not have changed from ][+)
+*/
+
+
 //Note: could enforce regs.clock to zero on starting the CPU with an Init() function...
 //bleh.
 //static uint32_t limit = 0;
@@ -2899,6 +2905,47 @@ if (regs.pc == 0x444E)
 }//*/
 #endif
 
+#if 0
+/*if (regs.pc == 0x0801)
+{
+       WriteLog("\n*** DISK BOOT subroutine...\n\n");
+       dumpDis = true;
+}//*/
+if (regs.pc == 0xE000)
+{
+#if 0
+       WriteLog("\n*** Dump of $E000 routine ***\n\n");
+
+       for(uint32_t addr=0xE000; addr<0xF000;)
+       {
+               addr += Decode65C02(addr);
+               WriteLog("\n");
+       }
+#endif
+       WriteLog("\n*** DISK part II subroutine...\n\n");
+       dumpDis = true;
+}//*/
+if (regs.pc == 0xD000)
+{
+       WriteLog("\n*** CUSTOM DISK READ subroutine...\n\n");
+       dumpDis = false;
+}//*/
+if (regs.pc == 0xD1BE)
+{
+//     WriteLog("\n*** DISK part II subroutine...\n\n");
+       dumpDis = true;
+}//*/
+if (regs.pc == 0xD200)
+{
+       WriteLog("\n*** CUSTOM SCREEN subroutine...\n\n");
+       dumpDis = false;
+}//*/
+if (regs.pc == 0xD269)
+{
+//     WriteLog("\n*** DISK part II subroutine...\n\n");
+       dumpDis = true;
+}//*/
+#endif
 #ifdef __DEBUGMON__
 //WAIT is commented out here because it's called by BELL1...
 if (regs.pc == 0xFCA8)