home *** CD-ROM | disk | FTP | other *** search
/ The Unsorted BBS Collection / thegreatunsorted.tar / thegreatunsorted / misc / data.asm < prev    next >
Assembly Source File  |  1990-04-17  |  85KB  |  1,645 lines

  1.     Page    58,132
  2.     Title    DATA.ASM    Apple Emulator (65C02 Processor)
  3. ;******************************************************************************
  4. ;
  5. ;   Name:    DATA.ASM    Apple Emulator (65C02 Processor)
  6. ;
  7. ;   Group:    Emulator
  8. ;
  9. ;   Revision:    1.00
  10. ;
  11. ;   Date:    January 30, 1988
  12. ;
  13. ;   Author:    Randy W. Spurlock
  14. ;
  15. ;******************************************************************************
  16. ;
  17. ;  Module Functional Description:
  18. ;
  19. ;        This module contains all of the data areas for the
  20. ;    Apple emulator. (All data is in the code segment) This module
  21. ;    MUST be the last module linked.
  22. ;
  23. ;******************************************************************************
  24. ;
  25. ;  Changes:
  26. ;
  27. ;    DATE     REVISION                DESCRIPTION
  28. ;  --------   --------    -------------------------------------------------------
  29. ;   1/30/88    1.00    Original
  30. ;
  31. ;******************************************************************************
  32.     Page
  33. ;
  34. ;  Public Declarations
  35. ;
  36.     Public    Error_Table        ; Error string table
  37.     Public    Read_Table        ; Read memory page table
  38.     Public    Write_Table        ; Write memory page table
  39.     Public    Int_Table        ; Interrupt table
  40.     Public    IO_Read_Table        ; I/O read table
  41.     Public    IO_Write_Table        ; I/O write table
  42.     Public    CGA_Table        ; CGA I/O routines table
  43.     Public    EGA_Table        ; EGA I/O routines table
  44.     Public    Slot_ID         ; Expansion slot name table
  45.     Public    Slot_Init        ; Expansion slot initialization table
  46.     Public    Slot_Ctrl        ; Expansion slot control table
  47.     Public    Slot_Read        ; Expansion slot read table
  48.     Public    Slot_Write        ; Expansion slot write table
  49.     Public    Mem_Read        ; Expansion slot memory read table
  50.     Public    Mem_Write        ; Expansion slot memory write table
  51.     Public    Exp_Read        ; Expansion memory read table
  52.     Public    Exp_Write        ; Expansion memory write table
  53.     Public    Device_Table        ; Device type table
  54.     Public    Flag_Encode        ; CPU flag encoding table
  55.     Public    Flag_Decode        ; CPU flag decoding table
  56.     Public    System_ROM        ; Apple system ROM data file name
  57.     Public    Disk_ROM        ; Apple disk ctrl. ROM data file name
  58.     Public    Current_Slot        ; Current active slot number
  59.     Public    Emulate_Flag        ; Emulator system flag byte
  60.     Public    System_Flag        ; Apple system flag byte
  61.     Public    Video_Flag        ; Video system flag byte
  62.     Public    Original_Int_8        ; Original interrupt 8 vector storage
  63.     Public    Original_Int_9        ; Original interrupt 9 vector storage
  64.     Public    RAM_Space        ; RAM space segment value
  65.     Public    ALT_Space        ; Alternate RAM space segment value
  66. ;
  67. ;  External Declarations
  68. ;
  69.     Extrn    STD_Mem_Read:Near    ; Standard memory read routine (MEMORY)
  70.     Extrn    STD_Mem_Write:Near    ; Standard memory write routine(MEMORY)
  71.     Extrn    ROM_Mem_Read:Near    ; ROM memory read routine      (MEMORY)
  72.     Extrn    ROM_Mem_Write:Near    ; ROM memory write routine     (MEMORY)
  73.     Extrn    Special_Read:Near    ; Special none selected read   (MEMORY)
  74.     Extrn    Special_Write:Near    ; Special none selected write  (MEMORY)
  75.     Extrn    Text_Read_1:Near    ; Low res/text page 1 read    (VIDEO)
  76.     Extrn    Text_Read_2:Near    ; Low res/text page 2 read    (VIDEO)
  77.     Extrn    Graph_Read_1:Near    ; High res page 1 read        (VIDEO)
  78.     Extrn    Graph_Read_2:Near    ; High res page 2 read        (VIDEO)
  79.     Extrn    Hardware_Read:Near    ; Hardware read routine      (HARDWARE)
  80.     Extrn    Hardware_Write:Near    ; Hardware write routine     (HARDWARE)
  81.     Extrn    Utility_Strobe:Near    ; Apple utility strobe         (HARDWARE)
  82.     Extrn    Output_0_Off:Near    ; Annunciator output 0 off   (HARDWARE)
  83.     Extrn    Output_0_On:Near    ; Annunciator output 0 on    (HARDWARE)
  84.     Extrn    Output_1_Off:Near    ; Annunciator output 1 off   (HARDWARE)
  85.     Extrn    Output_1_On:Near    ; Annunciator output 1 on    (HARDWARE)
  86.     Extrn    Output_2_Off:Near    ; Annunciator output 2 off   (HARDWARE)
  87.     Extrn    Output_2_On:Near    ; Annunciator output 2 on    (HARDWARE)
  88.     Extrn    Output_3_Off:Near    ; Annunciator output 3 off   (HARDWARE)
  89.     Extrn    Output_3_On:Near    ; Annunciator output 3 on    (HARDWARE)
  90.     Extrn    Do_Nothing:Near     ; Do nothing             (HARDWARE)
  91.     Extrn    Keyboard_Input:Near    ; Keyboard input         (KEYBOARD)
  92.     Extrn    Clear_Keyboard:Near    ; Clear keyboard strobe      (KEYBOARD)
  93.     Extrn    Speaker_Toggle:Near    ; Speaker output toggle       (SPEAKER)
  94.     Extrn    Cassette_Toggle:Near    ; Cassette output toggle     (CASSETTE)
  95.     Extrn    Cassette_Input:Near    ; Cassette input         (CASSETTE)
  96.     Extrn    Button_1:Near        ; Button 1 input         (JOYSTICK)
  97.     Extrn    Button_2:Near        ; Button 2 input         (JOYSTICK)
  98.     Extrn    Button_3:Near        ; Button 3 input         (JOYSTICK)
  99.     Extrn    Joystick_1:Near     ; Joystick 1 input         (JOYSTICK)
  100.     Extrn    Joystick_2:Near     ; Joystick 2 input         (JOYSTICK)
  101.     Extrn    Joystick_3:Near     ; Joystick 3 input         (JOYSTICK)
  102.     Extrn    Joystick_4:Near     ; Joystick 4 input         (JOYSTICK)
  103.     Extrn    Joystick_Strobe:Near    ; Joystick clear strobe      (JOYSTICK)
  104.     Extrn    Exp_Slot_Read:Near    ; Expansion slot read routine  (DEVICE)
  105.     Extrn    Exp_Slot_Write:Near    ; Expansion slot write routine (DEVICE)
  106.     Extrn    Exp_Mem_Read:Near    ; Expansion mem. read routine  (DEVICE)
  107.     Extrn    Exp_Mem_Write:Near    ; Expansion mem. write routine (DEVICE)
  108.     Extrn    Dummy_Int:Near        ; Dummy interrupt routine      (INT)
  109.     Extrn    Reset_System:Near    ; Reset system interrupt routine(APPLE)
  110.     Extrn    Request_System:Near    ; System request int. routine    (APPLE)
  111.     Extrn    CGA_Text_1:Near     ; Low resolution/text page 1 write(CGA)
  112.     Extrn    CGA_Text_2:Near     ; Low resolution/text page 2 write(CGA)
  113.     Extrn    CGA_Graph_1:Near    ; High resolution page 1 write      (CGA)
  114.     Extrn    CGA_Graph_2:Near    ; High resolution page 2 write      (CGA)
  115.     Extrn    CGA_Text_Off:Near    ; Text mode off (Graphics)      (CGA)
  116.     Extrn    CGA_Text_On:Near    ; Text mode on (Text)          (CGA)
  117.     Extrn    CGA_Mixed_Off:Near    ; Mixed off (Text / Graphics)      (CGA)
  118.     Extrn    CGA_Mixed_On:Near    ; Mixed on (Text & Graphics)      (CGA)
  119.     Extrn    CGA_Page_1:Near     ; Select page 1 (Text & Graphics) (CGA)
  120.     Extrn    CGA_Page_2:Near     ; Select page 2 (Text & Graphics) (CGA)
  121.     Extrn    CGA_Low_Res:Near    ; Select low res. (Graphics)      (CGA)
  122.     Extrn    CGA_High_Res:Near    ; Select high res. (Graphics)      (CGA)
  123.     Extrn    EGA_Text_1:Near     ; Low resolution/text page 1 write(EGA)
  124.     Extrn    EGA_Text_2:Near     ; Low resolution/text page 2 write(EGA)
  125.     Extrn    EGA_Graph_1:Near    ; High resolution page 1 write      (EGA)
  126.     Extrn    EGA_Graph_2:Near    ; High resolution page 2 write      (EGA)
  127.     Extrn    EGA_Text_Off:Near    ; Text mode off (Graphics)      (EGA)
  128.     Extrn    EGA_Text_On:Near    ; Text mode on (Text)          (EGA)
  129.     Extrn    EGA_Mixed_Off:Near    ; Mixed off (Text / Graphics)      (EGA)
  130.     Extrn    EGA_Mixed_On:Near    ; Mixed on (Text & Graphics)      (EGA)
  131.     Extrn    EGA_Page_1:Near     ; Select page 1 (Text & Graphics) (EGA)
  132.     Extrn    EGA_Page_2:Near     ; Select page 2 (Text & Graphics) (EGA)
  133.     Extrn    EGA_Low_Res:Near    ; Select low res. (Graphics)      (EGA)
  134.     Extrn    EGA_High_Res:Near    ; Select high res. (Graphics)      (EGA)
  135. ;
  136. ;  Define any include files needed
  137. ;
  138.     Include     Macros.inc    ; Include the macro definitions
  139.     Include     Equates.inc    ; Include the equate definitions
  140. ;
  141. ;  Define the different device types (Generate needed externals)
  142. ;
  143.     Device    <Empty>         ; Define empty slot device    (EMPTY)
  144.     Device    <Lang>            ; Define language card device(LANGUAGE)
  145.     Device    <Serial>        ; Define serial port device    (SERIAL)
  146.     Device    <Disk>            ; Define disk controller device  (DISK)
  147.     Device    <Cart>            ; Define cartridge device    (CARTRIGE)
  148.     .286c                ; Include 80286 instructions
  149.     Page
  150. ;
  151. ;  Define the emulator code segment
  152. ;
  153. Emulate Segment Word Public 'EMULATE'   ; Emulator code segment
  154.     Assume    cs:Emulate, ds:Nothing, es:Nothing
  155. ;******************************************************************************
  156. ;
  157. ;    Define the Error Strings and Error Table
  158. ;
  159. ;******************************************************************************
  160. _Err_Cnt    =    0        ; Start error code number
  161.         Err_Str NO_MEMORY,<"Not enough memory for emulator">
  162.         Err_Str NO_SYSTEM_FILE,<"Missing system ROM file">
  163.         Err_Str BAD_SYSTEM_FILE,<"Bad system ROM file">
  164.         Err_Str BAD_SYSTEM_IMAGE,<"Bad system ROM image">
  165.         Err_Str BAD_ADAPTER,<"Color graphics adapter required">
  166.         Err_Str NO_DISK_FILE,<"Missing disk controller ROM file">
  167.         Err_Str BAD_DISK_FILE,<"Bad disk controller ROM file">
  168.         Err_Str BAD_DISK_IMAGE,<"Bad disk controller ROM image">
  169.         Err_Tbl
  170. ;******************************************************************************
  171. ;
  172. ;    Define the Expansion Slot and Device Tables
  173. ;
  174. ;******************************************************************************
  175.         Even            ; Force table to even address
  176.         Slot    0,Lang        ; Expansion slot 0 - Langauge card
  177.         Slot    1,Serial    ; Expansion slot 1 - Serial port card
  178.         Slot    2,Empty     ; Expansion slot 2 - Empty slot
  179.         Slot    3,Empty     ; Expansion slot 3 - Empty slot
  180.         Slot    4,Empty     ; Expansion slot 4 - Empty slot
  181.         Slot    5,Empty     ; Expansion slot 5 - Empty slot
  182.         Slot    6,Disk        ; Expansion slot 6 - Disk controller
  183.         Slot    7,Cart        ; Expansion slot 7 - Cartridge
  184.         Table            ; Define the expansion slot tables
  185. ;******************************************************************************
  186. ;
  187. ;    Define the Interrupt Table
  188. ;
  189. ;******************************************************************************
  190.         Even            ; Force table to even address
  191. Int_Table    Equ    This Word    ; Interrupt table
  192.         Dw    Dummy_Int    ; Emulate bit 7 - Dummy interrupt
  193.         Dw    Dummy_Int    ; Emulate bit 6 - Dummy interrupt
  194.         Dw    Dummy_Int    ; Emulate bit 5 - Dummy interrupt
  195.         Dw    Dummy_Int    ; Emulate bit 4 - Dummy interrupt
  196.         Dw    Dummy_Int    ; Emulate bit 3 - Dummy interrupt
  197.         Dw    Dummy_Int    ; Emulate bit 2 - Dummy interrupt
  198.         Dw    Reset_System    ; Emulate bit 1 - System reset int.
  199.         Dw    Request_System    ; Emulate bit 0 - System request int.
  200. ;******************************************************************************
  201. ;
  202. ;    Define the Video I/O Routines Tables
  203. ;
  204. ;******************************************************************************
  205.         Even            ; Force table to even address
  206. CGA_Table    Equ    This Word    ; CGA video I/O routines table
  207.         Dw    CGA_Text_1    ; Low resolution/text page 1 write
  208.         Dw    CGA_Text_2    ; Low resolution/text page 2 write
  209.         Dw    CGA_Graph_1    ; High resolution page 1 write
  210.         Dw    CGA_Graph_2    ; High resolution page 2 write
  211.         Dw    CGA_Text_Off    ; Text mode off (Graphics)
  212.         Dw    CGA_Text_On    ; Text mode on (Text)
  213.         Dw    CGA_Mixed_Off    ; Mixed off (Text / Graphics)
  214.         Dw    CGA_Mixed_On    ; Mixed on (Text & Graphics)
  215.         Dw    CGA_Page_1    ; Select video page 1 (Text & Graphics)
  216.         Dw    CGA_Page_2    ; Select video page 2 (Text & Graphics)
  217.         Dw    CGA_Low_Res    ; Select low resolution (Graphics)
  218.         Dw    CGA_High_Res    ; Select high resolution (Graphics)
  219. EGA_Table    Equ    This Word    ; EGA video I/O routines table
  220.         Dw    EGA_Text_1    ; Low resolution/text page 1 write
  221.         Dw    EGA_Text_2    ; Low resolution/text page 2 write
  222.         Dw    EGA_Graph_1    ; High resolution page 1 write
  223.         Dw    EGA_Graph_2    ; High resolution page 2 write
  224.         Dw    EGA_Text_Off    ; Text mode off (Graphics)
  225.         Dw    EGA_Text_On    ; Text mode on (Text)
  226.         Dw    EGA_Mixed_Off    ; Mixed off (Text / Graphics)
  227.         Dw    EGA_Mixed_On    ; Mixed on (Text & Graphics)
  228.         Dw    EGA_Page_1    ; Select video page 1 (Text & Graphics)
  229.         Dw    EGA_Page_2    ; Select video page 2 (Text & Graphics)
  230.         Dw    EGA_Low_Res    ; Select low resolution (Graphics)
  231.         Dw    EGA_High_Res    ; Select high resolution (Graphics)
  232. ;******************************************************************************
  233. ;
  234. ;    Define the Read Memory Page Table
  235. ;
  236. ;******************************************************************************
  237.         Even            ; Force table to even address
  238. Read_Table    Equ    This Word    ; Read memory page table
  239.         Dw    STD_Mem_Read    ; Page 00h - Standard memory read
  240.         Dw    STD_Mem_Read    ; Page 01h - Standard memory read
  241.         Dw    STD_Mem_Read    ; Page 02h - Standard memory read
  242.         Dw    STD_Mem_Read    ; Page 03h - Standard memory read
  243.         Dw    Text_Read_1    ; Page 04h - Low res/text page 1 read
  244.         Dw    Text_Read_1    ; Page 05h - Low res/text page 1 read
  245.         Dw    Text_Read_1    ; Page 06h - Low res/text page 1 read
  246.         Dw    Text_Read_1    ; Page 07h - Low res/text page 1 read
  247.         Dw    Text_Read_2    ; Page 08h - Low res/text page 2 read
  248.         Dw    Text_Read_2    ; Page 09h - Low res/text page 2 read
  249.         Dw    Text_Read_2    ; Page 0Ah - Low res/text page 2 read
  250.         Dw    Text_Read_2    ; Page 0Bh - Low res/text page 2 read
  251.         Dw    STD_Mem_Read    ; Page 0Ch - Standard memory read
  252.         Dw    STD_Mem_Read    ; Page 0Dh - Standard memory read
  253.         Dw    STD_Mem_Read    ; Page 0Eh - Standard memory read
  254.         Dw    STD_Mem_Read    ; Page 0Fh - Standard memory read
  255.         Dw    STD_Mem_Read    ; Page 10h - Standard memory read
  256.         Dw    STD_Mem_Read    ; Page 11h - Standard memory read
  257.         Dw    STD_Mem_Read    ; Page 12h - Standard memory read
  258.         Dw    STD_Mem_Read    ; Page 13h - Standard memory read
  259.         Dw    STD_Mem_Read    ; Page 14h - Standard memory read
  260.         Dw    STD_Mem_Read    ; Page 15h - Standard memory read
  261.         Dw    STD_Mem_Read    ; Page 16h - Standard memory read
  262.         Dw    STD_Mem_Read    ; Page 17h - Standard memory read
  263.         Dw    STD_Mem_Read    ; Page 18h - Standard memory read
  264.         Dw    STD_Mem_Read    ; Page 19h - Standard memory read
  265.         Dw    STD_Mem_Read    ; Page 1Ah - Standard memory read
  266.         Dw    STD_Mem_Read    ; Page 1Bh - Standard memory read
  267.         Dw    STD_Mem_Read    ; Page 1Ch - Standard memory read
  268.         Dw    STD_Mem_Read    ; Page 1Dh - Standard memory read
  269.         Dw    STD_Mem_Read    ; Page 1Eh - Standard memory read
  270.         Dw    STD_Mem_Read    ; Page 1Fh - Standard memory read
  271.         Dw    Graph_Read_1    ; Page 20h - High res page 1 read
  272.         Dw    Graph_Read_1    ; Page 21h - High res page 1 read
  273.         Dw    Graph_Read_1    ; Page 22h - High res page 1 read
  274.         Dw    Graph_Read_1    ; Page 23h - High res page 1 read
  275.         Dw    Graph_Read_1    ; Page 24h - High res page 1 read
  276.         Dw    Graph_Read_1    ; Page 25h - High res page 1 read
  277.         Dw    Graph_Read_1    ; Page 26h - High res page 1 read
  278.         Dw    Graph_Read_1    ; Page 27h - High res page 1 read
  279.         Dw    Graph_Read_1    ; Page 28h - High res page 1 read
  280.         Dw    Graph_Read_1    ; Page 29h - High res page 1 read
  281.         Dw    Graph_Read_1    ; Page 2Ah - High res page 1 read
  282.         Dw    Graph_Read_1    ; Page 2Bh - High res page 1 read
  283.         Dw    Graph_Read_1    ; Page 2Ch - High res page 1 read
  284.         Dw    Graph_Read_1    ; Page 2Dh - High res page 1 read
  285.         Dw    Graph_Read_1    ; Page 2Eh - High res page 1 read
  286.         Dw    Graph_Read_1    ; Page 2Fh - High res page 1 read
  287.         Dw    Graph_Read_1    ; Page 30h - High res page 1 read
  288.         Dw    Graph_Read_1    ; Page 31h - High res page 1 read
  289.         Dw    Graph_Read_1    ; Page 32h - High res page 1 read
  290.         Dw    Graph_Read_1    ; Page 33h - High res page 1 read
  291.         Dw    Graph_Read_1    ; Page 34h - High res page 1 read
  292.         Dw    Graph_Read_1    ; Page 35h - High res page 1 read
  293.         Dw    Graph_Read_1    ; Page 36h - High res page 1 read
  294.         Dw    Graph_Read_1    ; Page 37h - High res page 1 read
  295.         Dw    Graph_Read_1    ; Page 38h - High res page 1 read
  296.         Dw    Graph_Read_1    ; Page 39h - High res page 1 read
  297.         Dw    Graph_Read_1    ; Page 3Ah - High res page 1 read
  298.         Dw    Graph_Read_1    ; Page 3Bh - High res page 1 read
  299.         Dw    Graph_Read_1    ; Page 3Ch - High res page 1 read
  300.         Dw    Graph_Read_1    ; Page 3Dh - High res page 1 read
  301.         Dw    Graph_Read_1    ; Page 3Eh - High res page 1 read
  302.         Dw    Graph_Read_1    ; Page 3Fh - High res page 1 read
  303.         Dw    Graph_Read_2    ; Page 40h - High res page 2 read
  304.         Dw    Graph_Read_2    ; Page 41h - High res page 2 read
  305.         Dw    Graph_Read_2    ; Page 42h - High res page 2 read
  306.         Dw    Graph_Read_2    ; Page 43h - High res page 2 read
  307.         Dw    Graph_Read_2    ; Page 44h - High res page 2 read
  308.         Dw    Graph_Read_2    ; Page 45h - High res page 2 read
  309.         Dw    Graph_Read_2    ; Page 46h - High res page 2 read
  310.         Dw    Graph_Read_2    ; Page 47h - High res page 2 read
  311.         Dw    Graph_Read_2    ; Page 48h - High res page 2 read
  312.         Dw    Graph_Read_2    ; Page 49h - High res page 2 read
  313.         Dw    Graph_Read_2    ; Page 4Ah - High res page 2 read
  314.         Dw    Graph_Read_2    ; Page 4Bh - High res page 2 read
  315.         Dw    Graph_Read_2    ; Page 4Ch - High res page 2 read
  316.         Dw    Graph_Read_2    ; Page 4Dh - High res page 2 read
  317.         Dw    Graph_Read_2    ; Page 4Eh - High res page 2 read
  318.         Dw    Graph_Read_2    ; Page 4Fh - High res page 2 read
  319.         Dw    Graph_Read_2    ; Page 50h - High res page 2 read
  320.         Dw    Graph_Read_2    ; Page 51h - High res page 2 read
  321.         Dw    Graph_Read_2    ; Page 52h - High res page 2 read
  322.         Dw    Graph_Read_2    ; Page 53h - High res page 2 read
  323.         Dw    Graph_Read_2    ; Page 54h - High res page 2 read
  324.         Dw    Graph_Read_2    ; Page 55h - High res page 2 read
  325.         Dw    Graph_Read_2    ; Page 56h - High res page 2 read
  326.         Dw    Graph_Read_2    ; Page 57h - High res page 2 read
  327.         Dw    Graph_Read_2    ; Page 58h - High res page 2 read
  328.         Dw    Graph_Read_2    ; Page 59h - High res page 2 read
  329.         Dw    Graph_Read_2    ; Page 5Ah - High res page 2 read
  330.         Dw    Graph_Read_2    ; Page 5Bh - High res page 2 read
  331.         Dw    Graph_Read_2    ; Page 5Ch - High res page 2 read
  332.         Dw    Graph_Read_2    ; Page 5Dh - High res page 2 read
  333.         Dw    Graph_Read_2    ; Page 5Eh - High res page 2 read
  334.         Dw    Graph_Read_2    ; Page 5Fh - High res page 2 read
  335.         Dw    STD_Mem_Read    ; Page 60h - Standard memory read
  336.         Dw    STD_Mem_Read    ; Page 61h - Standard memory read
  337.         Dw    STD_Mem_Read    ; Page 62h - Standard memory read
  338.         Dw    STD_Mem_Read    ; Page 63h - Standard memory read
  339.         Dw    STD_Mem_Read    ; Page 64h - Standard memory read
  340.         Dw    STD_Mem_Read    ; Page 65h - Standard memory read
  341.         Dw    STD_Mem_Read    ; Page 66h - Standard memory read
  342.         Dw    STD_Mem_Read    ; Page 67h - Standard memory read
  343.         Dw    STD_Mem_Read    ; Page 68h - Standard memory read
  344.         Dw    STD_Mem_Read    ; Page 69h - Standard memory read
  345.         Dw    STD_Mem_Read    ; Page 6Ah - Standard memory read
  346.         Dw    STD_Mem_Read    ; Page 6Bh - Standard memory read
  347.         Dw    STD_Mem_Read    ; Page 6Ch - Standard memory read
  348.         Dw    STD_Mem_Read    ; Page 6Dh - Standard memory read
  349.         Dw    STD_Mem_Read    ; Page 6Eh - Standard memory read
  350.         Dw    STD_Mem_Read    ; Page 6Fh - Standard memory read
  351.         Dw    STD_Mem_Read    ; Page 70h - Standard memory read
  352.         Dw    STD_Mem_Read    ; Page 71h - Standard memory read
  353.         Dw    STD_Mem_Read    ; Page 72h - Standard memory read
  354.         Dw    STD_Mem_Read    ; Page 73h - Standard memory read
  355.         Dw    STD_Mem_Read    ; Page 74h - Standard memory read
  356.         Dw    STD_Mem_Read    ; Page 75h - Standard memory read
  357.         Dw    STD_Mem_Read    ; Page 76h - Standard memory read
  358.         Dw    STD_Mem_Read    ; Page 77h - Standard memory read
  359.         Dw    STD_Mem_Read    ; Page 78h - Standard memory read
  360.         Dw    STD_Mem_Read    ; Page 79h - Standard memory read
  361.         Dw    STD_Mem_Read    ; Page 7Ah - Standard memory read
  362.         Dw    STD_Mem_Read    ; Page 7Bh - Standard memory read
  363.         Dw    STD_Mem_Read    ; Page 7Ch - Standard memory read
  364.         Dw    STD_Mem_Read    ; Page 7Dh - Standard memory read
  365.         Dw    STD_Mem_Read    ; Page 7Eh - Standard memory read
  366.         Dw    STD_Mem_Read    ; Page 7Fh - Standard memory read
  367.         Dw    STD_Mem_Read    ; Page 80h - Standard memory read
  368.         Dw    STD_Mem_Read    ; Page 81h - Standard memory read
  369.         Dw    STD_Mem_Read    ; Page 82h - Standard memory read
  370.         Dw    STD_Mem_Read    ; Page 83h - Standard memory read
  371.         Dw    STD_Mem_Read    ; Page 84h - Standard memory read
  372.         Dw    STD_Mem_Read    ; Page 85h - Standard memory read
  373.         Dw    STD_Mem_Read    ; Page 86h - Standard memory read
  374.         Dw    STD_Mem_Read    ; Page 87h - Standard memory read
  375.         Dw    STD_Mem_Read    ; Page 88h - Standard memory read
  376.         Dw    STD_Mem_Read    ; Page 89h - Standard memory read
  377.         Dw    STD_Mem_Read    ; Page 8Ah - Standard memory read
  378.         Dw    STD_Mem_Read    ; Page 8Bh - Standard memory read
  379.         Dw    STD_Mem_Read    ; Page 8Ch - Standard memory read
  380.         Dw    STD_Mem_Read    ; Page 8Dh - Standard memory read
  381.         Dw    STD_Mem_Read    ; Page 8Eh - Standard memory read
  382.         Dw    STD_Mem_Read    ; Page 8Fh - Standard memory read
  383.         Dw    STD_Mem_Read    ; Page 90h - Standard memory read
  384.         Dw    STD_Mem_Read    ; Page 91h - Standard memory read
  385.         Dw    STD_Mem_Read    ; Page 92h - Standard memory read
  386.         Dw    STD_Mem_Read    ; Page 93h - Standard memory read
  387.         Dw    STD_Mem_Read    ; Page 94h - Standard memory read
  388.         Dw    STD_Mem_Read    ; Page 95h - Standard memory read
  389.         Dw    STD_Mem_Read    ; Page 96h - Standard memory read
  390.         Dw    STD_Mem_Read    ; Page 97h - Standard memory read
  391.         Dw    STD_Mem_Read    ; Page 98h - Standard memory read
  392.         Dw    STD_Mem_Read    ; Page 99h - Standard memory read
  393.         Dw    STD_Mem_Read    ; Page 9Ah - Standard memory read
  394.         Dw    STD_Mem_Read    ; Page 9Bh - Standard memory read
  395.         Dw    STD_Mem_Read    ; Page 9Ch - Standard memory read
  396.         Dw    STD_Mem_Read    ; Page 9Dh - Standard memory read
  397.         Dw    STD_Mem_Read    ; Page 9Eh - Standard memory read
  398.         Dw    STD_Mem_Read    ; Page 9Fh - Standard memory read
  399.         Dw    STD_Mem_Read    ; Page A0h - Standard memory read
  400.         Dw    STD_Mem_Read    ; Page A1h - Standard memory read
  401.         Dw    STD_Mem_Read    ; Page A2h - Standard memory read
  402.         Dw    STD_Mem_Read    ; Page A3h - Standard memory read
  403.         Dw    STD_Mem_Read    ; Page A4h - Standard memory read
  404.         Dw    STD_Mem_Read    ; Page A5h - Standard memory read
  405.         Dw    STD_Mem_Read    ; Page A6h - Standard memory read
  406.         Dw    STD_Mem_Read    ; Page A7h - Standard memory read
  407.         Dw    STD_Mem_Read    ; Page A8h - Standard memory read
  408.         Dw    STD_Mem_Read    ; Page A9h - Standard memory read
  409.         Dw    STD_Mem_Read    ; Page AAh - Standard memory read
  410.         Dw    STD_Mem_Read    ; Page ABh - Standard memory read
  411.         Dw    STD_Mem_Read    ; Page ACh - Standard memory read
  412.         Dw    STD_Mem_Read    ; Page ADh - Standard memory read
  413.         Dw    STD_Mem_Read    ; Page AEh - Standard memory read
  414.         Dw    STD_Mem_Read    ; Page AFh - Standard memory read
  415.         Dw    STD_Mem_Read    ; Page B0h - Standard memory read
  416.         Dw    STD_Mem_Read    ; Page B1h - Standard memory read
  417.         Dw    STD_Mem_Read    ; Page B2h - Standard memory read
  418.         Dw    STD_Mem_Read    ; Page B3h - Standard memory read
  419.         Dw    STD_Mem_Read    ; Page B4h - Standard memory read
  420.         Dw    STD_Mem_Read    ; Page B5h - Standard memory read
  421.         Dw    STD_Mem_Read    ; Page B6h - Standard memory read
  422.         Dw    STD_Mem_Read    ; Page B7h - Standard memory read
  423.         Dw    STD_Mem_Read    ; Page B8h - Standard memory read
  424.         Dw    STD_Mem_Read    ; Page B9h - Standard memory read
  425.         Dw    STD_Mem_Read    ; Page BAh - Standard memory read
  426.         Dw    STD_Mem_Read    ; Page BBh - Standard memory read
  427.         Dw    STD_Mem_Read    ; Page BCh - Standard memory read
  428.         Dw    STD_Mem_Read    ; Page BDh - Standard memory read
  429.         Dw    STD_Mem_Read    ; Page BEh - Standard memory read
  430.         Dw    STD_Mem_Read    ; Page BFh - Standard memory read
  431.         Dw    Hardware_Read    ; Page C0h - Hardware page read
  432.         Dw    Exp_Slot_Read    ; Page C1h - Expansion slot 1 read
  433.         Dw    Exp_Slot_Read    ; Page C2h - Expansion slot 2 read
  434.         Dw    Exp_Slot_Read    ; Page C3h - Expansion slot 3 read
  435.         Dw    Exp_Slot_Read    ; Page C4h - Expansion slot 4 read
  436.         Dw    Exp_Slot_Read    ; Page C5h - Expansion slot 5 read
  437.         Dw    Exp_Slot_Read    ; Page C6h - Expansion slot 6 read
  438.         Dw    Exp_Slot_Read    ; Page C7h - Expansion slot 7 read
  439.         Dw    Exp_Mem_Read    ; Page C8h - Expansion memory read
  440.         Dw    Exp_Mem_Read    ; Page C9h - Expansion memory read
  441.         Dw    Exp_Mem_Read    ; Page CAh - Expansion memory read
  442.         Dw    Exp_Mem_Read    ; Page CBh - Expansion memory read
  443.         Dw    Exp_Mem_Read    ; Page CCh - Expansion memory read
  444.         Dw    Exp_Mem_Read    ; Page CDh - Expansion memory read
  445.         Dw    Exp_Mem_Read    ; Page CEh - Expansion memory read
  446.         Dw    Exp_Mem_Read    ; Page CFh - Expansion memory read
  447.         Dw    ROM_Mem_Read    ; Page D0h - System ROM memory read
  448.         Dw    ROM_Mem_Read    ; Page D1h - System ROM memory read
  449.         Dw    ROM_Mem_Read    ; Page D2h - System ROM memory read
  450.         Dw    ROM_Mem_Read    ; Page D3h - System ROM memory read
  451.         Dw    ROM_Mem_Read    ; Page D4h - System ROM memory read
  452.         Dw    ROM_Mem_Read    ; Page D5h - System ROM memory read
  453.         Dw    ROM_Mem_Read    ; Page D6h - System ROM memory read
  454.         Dw    ROM_Mem_Read    ; Page D7h - System ROM memory read
  455.         Dw    ROM_Mem_Read    ; Page D8h - System ROM memory read
  456.         Dw    ROM_Mem_Read    ; Page D9h - System ROM memory read
  457.         Dw    ROM_Mem_Read    ; Page DAh - System ROM memory read
  458.         Dw    ROM_Mem_Read    ; Page DBh - System ROM memory read
  459.         Dw    ROM_Mem_Read    ; Page DCh - System ROM memory read
  460.         Dw    ROM_Mem_Read    ; Page DDh - System ROM memory read
  461.         Dw    ROM_Mem_Read    ; Page DEh - System ROM memory read
  462.         Dw    ROM_Mem_Read    ; Page DFh - System ROM memory read
  463.         Dw    ROM_Mem_Read    ; Page E0h - System ROM memory read
  464.         Dw    ROM_Mem_Read    ; Page E1h - System ROM memory read
  465.         Dw    ROM_Mem_Read    ; Page E2h - System ROM memory read
  466.         Dw    ROM_Mem_Read    ; Page E3h - System ROM memory read
  467.         Dw    ROM_Mem_Read    ; Page E4h - System ROM memory read
  468.         Dw    ROM_Mem_Read    ; Page E5h - System ROM memory read
  469.         Dw    ROM_Mem_Read    ; Page E6h - System ROM memory read
  470.         Dw    ROM_Mem_Read    ; Page E7h - System ROM memory read
  471.         Dw    ROM_Mem_Read    ; Page E8h - System ROM memory read
  472.         Dw    ROM_Mem_Read    ; Page E9h - System ROM memory read
  473.         Dw    ROM_Mem_Read    ; Page EAh - System ROM memory read
  474.         Dw    ROM_Mem_Read    ; Page EBh - System ROM memory read
  475.         Dw    ROM_Mem_Read    ; Page ECh - System ROM memory read
  476.         Dw    ROM_Mem_Read    ; Page EDh - System ROM memory read
  477.         Dw    ROM_Mem_Read    ; Page EEh - System ROM memory read
  478.         Dw    ROM_Mem_Read    ; Page EFh - System ROM memory read
  479.         Dw    ROM_Mem_Read    ; Page F0h - System ROM memory read
  480.         Dw    ROM_Mem_Read    ; Page F1h - System ROM memory read
  481.         Dw    ROM_Mem_Read    ; Page F2h - System ROM memory read
  482.         Dw    ROM_Mem_Read    ; Page F3h - System ROM memory read
  483.         Dw    ROM_Mem_Read    ; Page F4h - System ROM memory read
  484.         Dw    ROM_Mem_Read    ; Page F5h - System ROM memory read
  485.         Dw    ROM_Mem_Read    ; Page F6h - System ROM memory read
  486.         Dw    ROM_Mem_Read    ; Page F7h - System ROM memory read
  487.         Dw    ROM_Mem_Read    ; Page F8h - System ROM memory read
  488.         Dw    ROM_Mem_Read    ; Page F9h - System ROM memory read
  489.         Dw    ROM_Mem_Read    ; Page FAh - System ROM memory read
  490.         Dw    ROM_Mem_Read    ; Page FBh - System ROM memory read
  491.         Dw    ROM_Mem_Read    ; Page FCh - System ROM memory read
  492.         Dw    ROM_Mem_Read    ; Page FDh - System ROM memory read
  493.         Dw    ROM_Mem_Read    ; Page FEh - System ROM memory read
  494.         Dw    ROM_Mem_Read    ; Page FFh - System ROM memory read
  495. ;******************************************************************************
  496. ;
  497. ;    Define the Write Memory Page Table
  498. ;
  499. ;******************************************************************************
  500.         Even            ; Force table to even address
  501. Write_Table    Equ    This Word    ; Write memory page table
  502.         Dw    STD_Mem_Write    ; Page 00h - Standard memory write
  503.         Dw    STD_Mem_Write    ; Page 01h - Standard memory write
  504.         Dw    STD_Mem_Write    ; Page 02h - Standard memory write
  505.         Dw    STD_Mem_Write    ; Page 03h - Standard memory write
  506.         Dw    0000h        ; Page 04h - Low res/text page 1 write
  507.         Dw    0000h        ; Page 05h - Low res/text page 1 write
  508.         Dw    0000h        ; Page 06h - Low res/text page 1 write
  509.         Dw    0000h        ; Page 07h - Low res/text page 1 write
  510.         Dw    0000h        ; Page 08h - Low res/text page 2 write
  511.         Dw    0000h        ; Page 09h - Low res/text page 2 write
  512.         Dw    0000h        ; Page 0Ah - Low res/text page 2 write
  513.         Dw    0000h        ; Page 0Bh - Low res/text page 2 write
  514.         Dw    STD_Mem_Write    ; Page 0Ch - Standard memory write
  515.         Dw    STD_Mem_Write    ; Page 0Dh - Standard memory write
  516.         Dw    STD_Mem_Write    ; Page 0Eh - Standard memory write
  517.         Dw    STD_Mem_Write    ; Page 0Fh - Standard memory write
  518.         Dw    STD_Mem_Write    ; Page 10h - Standard memory write
  519.         Dw    STD_Mem_Write    ; Page 11h - Standard memory write
  520.         Dw    STD_Mem_Write    ; Page 12h - Standard memory write
  521.         Dw    STD_Mem_Write    ; Page 13h - Standard memory write
  522.         Dw    STD_Mem_Write    ; Page 14h - Standard memory write
  523.         Dw    STD_Mem_Write    ; Page 15h - Standard memory write
  524.         Dw    STD_Mem_Write    ; Page 16h - Standard memory write
  525.         Dw    STD_Mem_Write    ; Page 17h - Standard memory write
  526.         Dw    STD_Mem_Write    ; Page 18h - Standard memory write
  527.         Dw    STD_Mem_Write    ; Page 19h - Standard memory write
  528.         Dw    STD_Mem_Write    ; Page 1Ah - Standard memory write
  529.         Dw    STD_Mem_Write    ; Page 1Bh - Standard memory write
  530.         Dw    STD_Mem_Write    ; Page 1Ch - Standard memory write
  531.         Dw    STD_Mem_Write    ; Page 1Dh - Standard memory write
  532.         Dw    STD_Mem_Write    ; Page 1Eh - Standard memory write
  533.         Dw    STD_Mem_Write    ; Page 1Fh - Standard memory write
  534.         Dw    0000h        ; Page 20h - High res page 1 write
  535.         Dw    0000h        ; Page 21h - High res page 1 write
  536.         Dw    0000h        ; Page 22h - High res page 1 write
  537.         Dw    0000h        ; Page 23h - High res page 1 write
  538.         Dw    0000h        ; Page 24h - High res page 1 write
  539.         Dw    0000h        ; Page 25h - High res page 1 write
  540.         Dw    0000h        ; Page 26h - High res page 1 write
  541.         Dw    0000h        ; Page 27h - High res page 1 write
  542.         Dw    0000h        ; Page 28h - High res page 1 write
  543.         Dw    0000h        ; Page 29h - High res page 1 write
  544.         Dw    0000h        ; Page 2Ah - High res page 1 write
  545.         Dw    0000h        ; Page 2Bh - High res page 1 write
  546.         Dw    0000h        ; Page 2Ch - High res page 1 write
  547.         Dw    0000h        ; Page 2Dh - High res page 1 write
  548.         Dw    0000h        ; Page 2Eh - High res page 1 write
  549.         Dw    0000h        ; Page 2Fh - High res page 1 write
  550.         Dw    0000h        ; Page 30h - High res page 1 write
  551.         Dw    0000h        ; Page 31h - High res page 1 write
  552.         Dw    0000h        ; Page 32h - High res page 1 write
  553.         Dw    0000h        ; Page 33h - High res page 1 write
  554.         Dw    0000h        ; Page 34h - High res page 1 write
  555.         Dw    0000h        ; Page 35h - High res page 1 write
  556.         Dw    0000h        ; Page 36h - High res page 1 write
  557.         Dw    0000h        ; Page 37h - High res page 1 write
  558.         Dw    0000h        ; Page 38h - High res page 1 write
  559.         Dw    0000h        ; Page 39h - High res page 1 write
  560.         Dw    0000h        ; Page 3Ah - High res page 1 write
  561.         Dw    0000h        ; Page 3Bh - High res page 1 write
  562.         Dw    0000h        ; Page 3Ch - High res page 1 write
  563.         Dw    0000h        ; Page 3Dh - High res page 1 write
  564.         Dw    0000h        ; Page 3Eh - High res page 1 write
  565.         Dw    0000h        ; Page 3Fh - High res page 1 write
  566.         Dw    0000h        ; Page 40h - High res page 2 write
  567.         Dw    0000h        ; Page 41h - High res page 2 write
  568.         Dw    0000h        ; Page 42h - High res page 2 write
  569.         Dw    0000h        ; Page 43h - High res page 2 write
  570.         Dw    0000h        ; Page 44h - High res page 2 write
  571.         Dw    0000h        ; Page 45h - High res page 2 write
  572.         Dw    0000h        ; Page 46h - High res page 2 write
  573.         Dw    0000h        ; Page 47h - High res page 2 write
  574.         Dw    0000h        ; Page 48h - High res page 2 write
  575.         Dw    0000h        ; Page 49h - High res page 2 write
  576.         Dw    0000h        ; Page 4Ah - High res page 2 write
  577.         Dw    0000h        ; Page 4Bh - High res page 2 write
  578.         Dw    0000h        ; Page 4Ch - High res page 2 write
  579.         Dw    0000h        ; Page 4Dh - High res page 2 write
  580.         Dw    0000h        ; Page 4Eh - High res page 2 write
  581.         Dw    0000h        ; Page 4Fh - High res page 2 write
  582.         Dw    0000h        ; Page 50h - High res page 2 write
  583.         Dw    0000h        ; Page 51h - High res page 2 write
  584.         Dw    0000h        ; Page 52h - High res page 2 write
  585.         Dw    0000h        ; Page 53h - High res page 2 write
  586.         Dw    0000h        ; Page 54h - High res page 2 write
  587.         Dw    0000h        ; Page 55h - High res page 2 write
  588.         Dw    0000h        ; Page 56h - High res page 2 write
  589.         Dw    0000h        ; Page 57h - High res page 2 write
  590.         Dw    0000h        ; Page 58h - High res page 2 write
  591.         Dw    0000h        ; Page 59h - High res page 2 write
  592.         Dw    0000h        ; Page 5Ah - High res page 2 write
  593.         Dw    0000h        ; Page 5Bh - High res page 2 write
  594.         Dw    0000h        ; Page 5Ch - High res page 2 write
  595.         Dw    0000h        ; Page 5Dh - High res page 2 write
  596.         Dw    0000h        ; Page 5Eh - High res page 2 write
  597.         Dw    0000h        ; Page 5Fh - High res page 2 write
  598.         Dw    STD_Mem_Write    ; Page 60h - Standard memory write
  599.         Dw    STD_Mem_Write    ; Page 61h - Standard memory write
  600.         Dw    STD_Mem_Write    ; Page 62h - Standard memory write
  601.         Dw    STD_Mem_Write    ; Page 63h - Standard memory write
  602.         Dw    STD_Mem_Write    ; Page 64h - Standard memory write
  603.         Dw    STD_Mem_Write    ; Page 65h - Standard memory write
  604.         Dw    STD_Mem_Write    ; Page 66h - Standard memory write
  605.         Dw    STD_Mem_Write    ; Page 67h - Standard memory write
  606.         Dw    STD_Mem_Write    ; Page 68h - Standard memory write
  607.         Dw    STD_Mem_Write    ; Page 69h - Standard memory write
  608.         Dw    STD_Mem_Write    ; Page 6Ah - Standard memory write
  609.         Dw    STD_Mem_Write    ; Page 6Bh - Standard memory write
  610.         Dw    STD_Mem_Write    ; Page 6Ch - Standard memory write
  611.         Dw    STD_Mem_Write    ; Page 6Dh - Standard memory write
  612.         Dw    STD_Mem_Write    ; Page 6Eh - Standard memory write
  613.         Dw    STD_Mem_Write    ; Page 6Fh - Standard memory write
  614.         Dw    STD_Mem_Write    ; Page 70h - Standard memory write
  615.         Dw    STD_Mem_Write    ; Page 71h - Standard memory write
  616.         Dw    STD_Mem_Write    ; Page 72h - Standard memory write
  617.         Dw    STD_Mem_Write    ; Page 73h - Standard memory write
  618.         Dw    STD_Mem_Write    ; Page 74h - Standard memory write
  619.         Dw    STD_Mem_Write    ; Page 75h - Standard memory write
  620.         Dw    STD_Mem_Write    ; Page 76h - Standard memory write
  621.         Dw    STD_Mem_Write    ; Page 77h - Standard memory write
  622.         Dw    STD_Mem_Write    ; Page 78h - Standard memory write
  623.         Dw    STD_Mem_Write    ; Page 79h - Standard memory write
  624.         Dw    STD_Mem_Write    ; Page 7Ah - Standard memory write
  625.         Dw    STD_Mem_Write    ; Page 7Bh - Standard memory write
  626.         Dw    STD_Mem_Write    ; Page 7Ch - Standard memory write
  627.         Dw    STD_Mem_Write    ; Page 7Dh - Standard memory write
  628.         Dw    STD_Mem_Write    ; Page 7Eh - Standard memory write
  629.         Dw    STD_Mem_Write    ; Page 7Fh - Standard memory write
  630.         Dw    STD_Mem_Write    ; Page 80h - Standard memory write
  631.         Dw    STD_Mem_Write    ; Page 81h - Standard memory write
  632.         Dw    STD_Mem_Write    ; Page 82h - Standard memory write
  633.         Dw    STD_Mem_Write    ; Page 83h - Standard memory write
  634.         Dw    STD_Mem_Write    ; Page 84h - Standard memory write
  635.         Dw    STD_Mem_Write    ; Page 85h - Standard memory write
  636.         Dw    STD_Mem_Write    ; Page 86h - Standard memory write
  637.         Dw    STD_Mem_Write    ; Page 87h - Standard memory write
  638.         Dw    STD_Mem_Write    ; Page 88h - Standard memory write
  639.         Dw    STD_Mem_Write    ; Page 89h - Standard memory write
  640.         Dw    STD_Mem_Write    ; Page 8Ah - Standard memory write
  641.         Dw    STD_Mem_Write    ; Page 8Bh - Standard memory write
  642.         Dw    STD_Mem_Write    ; Page 8Ch - Standard memory write
  643.         Dw    STD_Mem_Write    ; Page 8Dh - Standard memory write
  644.         Dw    STD_Mem_Write    ; Page 8Eh - Standard memory write
  645.         Dw    STD_Mem_Write    ; Page 8Fh - Standard memory write
  646.         Dw    STD_Mem_Write    ; Page 90h - Standard memory write
  647.         Dw    STD_Mem_Write    ; Page 91h - Standard memory write
  648.         Dw    STD_Mem_Write    ; Page 92h - Standard memory write
  649.         Dw    STD_Mem_Write    ; Page 93h - Standard memory write
  650.         Dw    STD_Mem_Write    ; Page 94h - Standard memory write
  651.         Dw    STD_Mem_Write    ; Page 95h - Standard memory write
  652.         Dw    STD_Mem_Write    ; Page 96h - Standard memory write
  653.         Dw    STD_Mem_Write    ; Page 97h - Standard memory write
  654.         Dw    STD_Mem_Write    ; Page 98h - Standard memory write
  655.         Dw    STD_Mem_Write    ; Page 99h - Standard memory write
  656.         Dw    STD_Mem_Write    ; Page 9Ah - Standard memory write
  657.         Dw    STD_Mem_Write    ; Page 9Bh - Standard memory write
  658.         Dw    STD_Mem_Write    ; Page 9Ch - Standard memory write
  659.         Dw    STD_Mem_Write    ; Page 9Dh - Standard memory write
  660.         Dw    STD_Mem_Write    ; Page 9Eh - Standard memory write
  661.         Dw    STD_Mem_Write    ; Page 9Fh - Standard memory write
  662.         Dw    STD_Mem_Write    ; Page A0h - Standard memory write
  663.         Dw    STD_Mem_Write    ; Page A1h - Standard memory write
  664.         Dw    STD_Mem_Write    ; Page A2h - Standard memory write
  665.         Dw    STD_Mem_Write    ; Page A3h - Standard memory write
  666.         Dw    STD_Mem_Write    ; Page A4h - Standard memory write
  667.         Dw    STD_Mem_Write    ; Page A5h - Standard memory write
  668.         Dw    STD_Mem_Write    ; Page A6h - Standard memory write
  669.         Dw    STD_Mem_Write    ; Page A7h - Standard memory write
  670.         Dw    STD_Mem_Write    ; Page A8h - Standard memory write
  671.         Dw    STD_Mem_Write    ; Page A9h - Standard memory write
  672.         Dw    STD_Mem_Write    ; Page AAh - Standard memory write
  673.         Dw    STD_Mem_Write    ; Page ABh - Standard memory write
  674.         Dw    STD_Mem_Write    ; Page ACh - Standard memory write
  675.         Dw    STD_Mem_Write    ; Page ADh - Standard memory write
  676.         Dw    STD_Mem_Write    ; Page AEh - Standard memory write
  677.         Dw    STD_Mem_Write    ; Page AFh - Standard memory write
  678.         Dw    STD_Mem_Write    ; Page B0h - Standard memory write
  679.         Dw    STD_Mem_Write    ; Page B1h - Standard memory write
  680.         Dw    STD_Mem_Write    ; Page B2h - Standard memory write
  681.         Dw    STD_Mem_Write    ; Page B3h - Standard memory write
  682.         Dw    STD_Mem_Write    ; Page B4h - Standard memory write
  683.         Dw    STD_Mem_Write    ; Page B5h - Standard memory write
  684.         Dw    STD_Mem_Write    ; Page B6h - Standard memory write
  685.         Dw    STD_Mem_Write    ; Page B7h - Standard memory write
  686.         Dw    STD_Mem_Write    ; Page B8h - Standard memory write
  687.         Dw    STD_Mem_Write    ; Page B9h - Standard memory write
  688.         Dw    STD_Mem_Write    ; Page BAh - Standard memory write
  689.         Dw    STD_Mem_Write    ; Page BBh - Standard memory write
  690.         Dw    STD_Mem_Write    ; Page BCh - Standard memory write
  691.         Dw    STD_Mem_Write    ; Page BDh - Standard memory write
  692.         Dw    STD_Mem_Write    ; Page BEh - Standard memory write
  693.         Dw    STD_Mem_Write    ; Page BFh - Standard memory write
  694.         Dw    Hardware_Write    ; Page C0h - Hardware write
  695.         Dw    Exp_Slot_Write    ; Page C1h - Expansion slot 1 write
  696.         Dw    Exp_Slot_Write    ; Page C2h - Expansion slot 2 write
  697.         Dw    Exp_Slot_Write    ; Page C3h - Expansion slot 3 write
  698.         Dw    Exp_Slot_Write    ; Page C4h - Expansion slot 4 write
  699.         Dw    Exp_Slot_Write    ; Page C5h - Expansion slot 5 write
  700.         Dw    Exp_Slot_Write    ; Page C6h - Expansion slot 6 write
  701.         Dw    Exp_Slot_Write    ; Page C7h - Expansion slot 7 write
  702.         Dw    Exp_Mem_Write    ; Page C8h - Expansion memory write
  703.         Dw    Exp_Mem_Write    ; Page C9h - Expansion memory write
  704.         Dw    Exp_Mem_Write    ; Page CAh - Expansion memory write
  705.         Dw    Exp_Mem_Write    ; Page CBh - Expansion memory write
  706.         Dw    Exp_Mem_Write    ; Page CCh - Expansion memory write
  707.         Dw    Exp_Mem_Write    ; Page CDh - Expansion memory write
  708.         Dw    Exp_Mem_Write    ; Page CEh - Expansion memory write
  709.         Dw    Exp_Mem_Write    ; Page CFh - Expansion memory write
  710.         Dw    ROM_Mem_Write    ; Page D0h - System ROM memory write
  711.         Dw    ROM_Mem_Write    ; Page D1h - System ROM memory write
  712.         Dw    ROM_Mem_Write    ; Page D2h - System ROM memory write
  713.         Dw    ROM_Mem_Write    ; Page D3h - System ROM memory write
  714.         Dw    ROM_Mem_Write    ; Page D4h - System ROM memory write
  715.         Dw    ROM_Mem_Write    ; Page D5h - System ROM memory write
  716.         Dw    ROM_Mem_Write    ; Page D6h - System ROM memory write
  717.         Dw    ROM_Mem_Write    ; Page D7h - System ROM memory write
  718.         Dw    ROM_Mem_Write    ; Page D8h - System ROM memory write
  719.         Dw    ROM_Mem_Write    ; Page D9h - System ROM memory write
  720.         Dw    ROM_Mem_Write    ; Page DAh - System ROM memory write
  721.         Dw    ROM_Mem_Write    ; Page DBh - System ROM memory write
  722.         Dw    ROM_Mem_Write    ; Page DCh - System ROM memory write
  723.         Dw    ROM_Mem_Write    ; Page DDh - System ROM memory write
  724.         Dw    ROM_Mem_Write    ; Page DEh - System ROM memory write
  725.         Dw    ROM_Mem_Write    ; Page DFh - System ROM memory write
  726.         Dw    ROM_Mem_Write    ; Page E0h - System ROM memory write
  727.         Dw    ROM_Mem_Write    ; Page E1h - System ROM memory write
  728.         Dw    ROM_Mem_Write    ; Page E2h - System ROM memory write
  729.         Dw    ROM_Mem_Write    ; Page E3h - System ROM memory write
  730.         Dw    ROM_Mem_Write    ; Page E4h - System ROM memory write
  731.         Dw    ROM_Mem_Write    ; Page E5h - System ROM memory write
  732.         Dw    ROM_Mem_Write    ; Page E6h - System ROM memory write
  733.         Dw    ROM_Mem_Write    ; Page E7h - System ROM memory write
  734.         Dw    ROM_Mem_Write    ; Page E8h - System ROM memory write
  735.         Dw    ROM_Mem_Write    ; Page E9h - System ROM memory write
  736.         Dw    ROM_Mem_Write    ; Page EAh - System ROM memory write
  737.         Dw    ROM_Mem_Write    ; Page EBh - System ROM memory write
  738.         Dw    ROM_Mem_Write    ; Page ECh - System ROM memory write
  739.         Dw    ROM_Mem_Write    ; Page EDh - System ROM memory write
  740.         Dw    ROM_Mem_Write    ; Page EEh - System ROM memory write
  741.         Dw    ROM_Mem_Write    ; Page EFh - System ROM memory write
  742.         Dw    ROM_Mem_Write    ; Page F0h - System ROM memory write
  743.         Dw    ROM_Mem_Write    ; Page F1h - System ROM memory write
  744.         Dw    ROM_Mem_Write    ; Page F2h - System ROM memory write
  745.         Dw    ROM_Mem_Write    ; Page F3h - System ROM memory write
  746.         Dw    ROM_Mem_Write    ; Page F4h - System ROM memory write
  747.         Dw    ROM_Mem_Write    ; Page F5h - System ROM memory write
  748.         Dw    ROM_Mem_Write    ; Page F6h - System ROM memory write
  749.         Dw    ROM_Mem_Write    ; Page F7h - System ROM memory write
  750.         Dw    ROM_Mem_Write    ; Page F8h - System ROM memory write
  751.         Dw    ROM_Mem_Write    ; Page F9h - System ROM memory write
  752.         Dw    ROM_Mem_Write    ; Page FAh - System ROM memory write
  753.         Dw    ROM_Mem_Write    ; Page FBh - System ROM memory write
  754.         Dw    ROM_Mem_Write    ; Page FCh - System ROM memory write
  755.         Dw    ROM_Mem_Write    ; Page FDh - System ROM memory write
  756.         Dw    ROM_Mem_Write    ; Page FEh - System ROM memory write
  757.         Dw    ROM_Mem_Write    ; Page FFh - System ROM memory write
  758. ;******************************************************************************
  759. ;
  760. ;    Define the I/O Read Table
  761. ;
  762. ;******************************************************************************
  763.         Even            ; Force table to even address
  764. IO_Read_Table    Equ    This Word    ; I/O read table
  765.         Dw    Keyboard_Input    ; Location 00h - Keyboard input
  766.         Dw    Keyboard_Input    ; Location 01h - Keyboard input
  767.         Dw    Keyboard_Input    ; Location 02h - Keyboard input
  768.         Dw    Keyboard_Input    ; Location 03h - Keyboard input
  769.         Dw    Keyboard_Input    ; Location 04h - Keyboard input
  770.         Dw    Keyboard_Input    ; Location 05h - Keyboard input
  771.         Dw    Keyboard_Input    ; Location 06h - Keyboard input
  772.         Dw    Keyboard_Input    ; Location 07h - Keyboard input
  773.         Dw    Keyboard_Input    ; Location 08h - Keyboard input
  774.         Dw    Keyboard_Input    ; Location 09h - Keyboard input
  775.         Dw    Keyboard_Input    ; Location 0Ah - Keyboard input
  776.         Dw    Keyboard_Input    ; Location 0Bh - Keyboard input
  777.         Dw    Keyboard_Input    ; Location 0Ch - Keyboard input
  778.         Dw    Keyboard_Input    ; Location 0Dh - Keyboard input
  779.         Dw    Keyboard_Input    ; Location 0Eh - Keyboard input
  780.         Dw    Keyboard_Input    ; Location 0Fh - Keyboard input
  781.         Dw    Clear_Keyboard    ; Location 10h - Clear keyboard strobe
  782.         Dw    Clear_Keyboard    ; Location 11h - Clear keyboard strobe
  783.         Dw    Clear_Keyboard    ; Location 12h - Clear keyboard strobe
  784.         Dw    Clear_Keyboard    ; Location 13h - Clear keyboard strobe
  785.         Dw    Clear_Keyboard    ; Location 14h - Clear keyboard strobe
  786.         Dw    Clear_Keyboard    ; Location 15h - Clear keyboard strobe
  787.         Dw    Clear_Keyboard    ; Location 16h - Clear keyboard strobe
  788.         Dw    Clear_Keyboard    ; Location 17h - Clear keyboard strobe
  789.         Dw    Clear_Keyboard    ; Location 18h - Clear keyboard strobe
  790.         Dw    Clear_Keyboard    ; Location 19h - Clear keyboard strobe
  791.         Dw    Clear_Keyboard    ; Location 1Ah - Clear keyboard strobe
  792.         Dw    Clear_Keyboard    ; Location 1Bh - Clear keyboard strobe
  793.         Dw    Clear_Keyboard    ; Location 1Ch - Clear keyboard strobe
  794.         Dw    Clear_Keyboard    ; Location 1Dh - Clear keyboard strobe
  795.         Dw    Clear_Keyboard    ; Location 1Eh - Clear keyboard strobe
  796.         Dw    Clear_Keyboard    ; Location 1Fh - Clear keyboard strobe
  797.         Dw    Cassette_Toggle ; Location 20h - Cassette output toggle
  798.         Dw    Cassette_Toggle ; Location 21h - Cassette output toggle
  799.         Dw    Cassette_Toggle ; Location 22h - Cassette output toggle
  800.         Dw    Cassette_Toggle ; Location 23h - Cassette output toggle
  801.         Dw    Cassette_Toggle ; Location 24h - Cassette output toggle
  802.         Dw    Cassette_Toggle ; Location 25h - Cassette output toggle
  803.         Dw    Cassette_Toggle ; Location 26h - Cassette output toggle
  804.         Dw    Cassette_Toggle ; Location 27h - Cassette output toggle
  805.         Dw    Cassette_Toggle ; Location 28h - Cassette output toggle
  806.         Dw    Cassette_Toggle ; Location 29h - Cassette output toggle
  807.         Dw    Cassette_Toggle ; Location 2Ah - Cassette output toggle
  808.         Dw    Cassette_Toggle ; Location 2Bh - Cassette output toggle
  809.         Dw    Cassette_Toggle ; Location 2Ch - Cassette output toggle
  810.         Dw    Cassette_Toggle ; Location 2Dh - Cassette output toggle
  811.         Dw    Cassette_Toggle ; Location 2Eh - Cassette output toggle
  812.         Dw    Cassette_Toggle ; Location 2Fh - Cassette output toggle
  813.         Dw    Speaker_Toggle    ; Location 30h - Speaker output toggle
  814.         Dw    Speaker_Toggle    ; Location 31h - Speaker output toggle
  815.         Dw    Speaker_Toggle    ; Location 32h - Speaker output toggle
  816.         Dw    Speaker_Toggle    ; Location 33h - Speaker output toggle
  817.         Dw    Speaker_Toggle    ; Location 34h - Speaker output toggle
  818.         Dw    Speaker_Toggle    ; Location 35h - Speaker output toggle
  819.         Dw    Speaker_Toggle    ; Location 36h - Speaker output toggle
  820.         Dw    Speaker_Toggle    ; Location 37h - Speaker output toggle
  821.         Dw    Speaker_Toggle    ; Location 38h - Speaker output toggle
  822.         Dw    Speaker_Toggle    ; Location 39h - Speaker output toggle
  823.         Dw    Speaker_Toggle    ; Location 3Ah - Speaker output toggle
  824.         Dw    Speaker_Toggle    ; Location 3Bh - Speaker output toggle
  825.         Dw    Speaker_Toggle    ; Location 3Ch - Speaker output toggle
  826.         Dw    Speaker_Toggle    ; Location 3Dh - Speaker output toggle
  827.         Dw    Speaker_Toggle    ; Location 3Eh - Speaker output toggle
  828.         Dw    Speaker_Toggle    ; Location 3Fh - Speaker output toggle
  829.         Dw    Utility_Strobe    ; Location 40h - Utility output strobe
  830.         Dw    Utility_Strobe    ; Location 41h - Utility output strobe
  831.         Dw    Utility_Strobe    ; Location 42h - Utility output strobe
  832.         Dw    Utility_Strobe    ; Location 43h - Utility output strobe
  833.         Dw    Utility_Strobe    ; Location 44h - Utility output strobe
  834.         Dw    Utility_Strobe    ; Location 45h - Utility output strobe
  835.         Dw    Utility_Strobe    ; Location 46h - Utility output strobe
  836.         Dw    Utility_Strobe    ; Location 47h - Utility output strobe
  837.         Dw    Utility_Strobe    ; Location 48h - Utility output strobe
  838.         Dw    Utility_Strobe    ; Location 49h - Utility output strobe
  839.         Dw    Utility_Strobe    ; Location 4Ah - Utility output strobe
  840.         Dw    Utility_Strobe    ; Location 4Bh - Utility output strobe
  841.         Dw    Utility_Strobe    ; Location 4Ch - Utility output strobe
  842.         Dw    Utility_Strobe    ; Location 4Dh - Utility output strobe
  843.         Dw    Utility_Strobe    ; Location 4Eh - Utility output strobe
  844.         Dw    Utility_Strobe    ; Location 4Fh - Utility output strobe
  845.         Dw    0000h        ; Location 50h - Text off (Graphics)
  846.         Dw    0000h        ; Location 51h - Text on (Text)
  847.         Dw    0000h        ; Location 52h - Mixed off
  848.         Dw    0000h        ; Location 53h - Mixed on (Text/Graph)
  849.         Dw    0000h        ; Location 54h - Select page 1
  850.         Dw    0000h        ; Location 55h - Select page 2
  851.         Dw    0000h        ; Location 56h - Low res. graphics
  852.         Dw    0000h        ; Location 57h - High res. graphics
  853.         Dw    Output_0_Off    ; Location 58h - Output 0 Off
  854.         Dw    Output_0_On    ; Location 59h - Output 0 On
  855.         Dw    Output_1_Off    ; Location 5Ah - Output 1 Off
  856.         Dw    Output_1_On    ; Location 5Bh - Output 1 On
  857.         Dw    Output_2_Off    ; Location 5Ch - Output 2 Off
  858.         Dw    Output_2_On    ; Location 5Dh - Output 2 On
  859.         Dw    Output_3_Off    ; Location 5Eh - Output 3 Off
  860.         Dw    Output_3_On    ; Location 5Fh - Output 3 On
  861.         Dw    Cassette_Input    ; Location 60h - Cassette input
  862.         Dw    Button_1    ; Location 61h - Button 1 input
  863.         Dw    Button_2    ; Location 62h - Button 2 input
  864.         Dw    Button_3    ; Location 63h - Button 3 input
  865.         Dw    Joystick_1    ; Location 64h - Joystick 1 input
  866.         Dw    Joystick_2    ; Location 65h - Joystick 2 input
  867.         Dw    Joystick_3    ; Location 66h - Joystick 3 input
  868.         Dw    Joystick_4    ; Location 67h - Joystick 4 input
  869.         Dw    Cassette_Input    ; Location 68h - Cassette input
  870.         Dw    Button_1    ; Location 69h - Button 1 input
  871.         Dw    Button_2    ; Location 6Ah - Button 2 input
  872.         Dw    Button_3    ; Location 6Bh - Button 3 input
  873.         Dw    Joystick_1    ; Location 6Ch - Joystick 1 input
  874.         Dw    Joystick_2    ; Location 6Dh - Joystick 2 input
  875.         Dw    Joystick_3    ; Location 6Eh - Joystick 3 input
  876.         Dw    Joystick_4    ; Location 6Fh - Joystick 4 input
  877.         Dw    Joystick_Strobe ; Location 70h - Joystick strobe
  878.         Dw    Joystick_Strobe ; Location 71h - Joystick strobe
  879.         Dw    Joystick_Strobe ; Location 72h - Joystick strobe
  880.         Dw    Joystick_Strobe ; Location 73h - Joystick strobe
  881.         Dw    Joystick_Strobe ; Location 74h - Joystick strobe
  882.         Dw    Joystick_Strobe ; Location 75h - Joystick strobe
  883.         Dw    Joystick_Strobe ; Location 76h - Joystick strobe
  884.         Dw    Joystick_Strobe ; Location 77h - Joystick strobe
  885.         Dw    Joystick_Strobe ; Location 78h - Joystick strobe
  886.         Dw    Joystick_Strobe ; Location 79h - Joystick strobe
  887.         Dw    Joystick_Strobe ; Location 7Ah - Joystick strobe
  888.         Dw    Joystick_Strobe ; Location 7Bh - Joystick strobe
  889.         Dw    Joystick_Strobe ; Location 7Ch - Joystick strobe
  890.         Dw    Joystick_Strobe ; Location 7Dh - Joystick strobe
  891.         Dw    Joystick_Strobe ; Location 7Eh - Joystick strobe
  892.         Dw    Joystick_Strobe ; Location 7Fh - Joystick strobe
  893. ;******************************************************************************
  894. ;
  895. ;    Define the I/O Write Table
  896. ;
  897. ;******************************************************************************
  898.         Even            ; Force table to even address
  899. IO_Write_Table    Equ    This Word    ; I/O write table
  900.         Dw    Do_Nothing    ; Location 00h - Do nothing
  901.         Dw    Do_Nothing    ; Location 01h - Do nothing
  902.         Dw    Do_Nothing    ; Location 02h - Do nothing
  903.         Dw    Do_Nothing    ; Location 03h - Do nothing
  904.         Dw    Do_Nothing    ; Location 04h - Do nothing
  905.         Dw    Do_Nothing    ; Location 05h - Do nothing
  906.         Dw    Do_Nothing    ; Location 06h - Do nothing
  907.         Dw    Do_Nothing    ; Location 07h - Do nothing
  908.         Dw    Do_Nothing    ; Location 08h - Do nothing
  909.         Dw    Do_Nothing    ; Location 09h - Do nothing
  910.         Dw    Do_Nothing    ; Location 0Ah - Do nothing
  911.         Dw    Do_Nothing    ; Location 0Bh - Do nothing
  912.         Dw    Do_Nothing    ; Location 0Ch - Do nothing
  913.         Dw    Do_Nothing    ; Location 0Dh - Do nothing
  914.         Dw    Do_Nothing    ; Location 0Eh - Do nothing
  915.         Dw    Do_Nothing    ; Location 0Fh - Do nothing
  916.         Dw    Clear_Keyboard    ; Location 10h - Clear keyboard strobe
  917.         Dw    Clear_Keyboard    ; Location 11h - Clear keyboard strobe
  918.         Dw    Clear_Keyboard    ; Location 12h - Clear keyboard strobe
  919.         Dw    Clear_Keyboard    ; Location 13h - Clear keyboard strobe
  920.         Dw    Clear_Keyboard    ; Location 14h - Clear keyboard strobe
  921.         Dw    Clear_Keyboard    ; Location 15h - Clear keyboard strobe
  922.         Dw    Clear_Keyboard    ; Location 16h - Clear keyboard strobe
  923.         Dw    Clear_Keyboard    ; Location 17h - Clear keyboard strobe
  924.         Dw    Clear_Keyboard    ; Location 18h - Clear keyboard strobe
  925.         Dw    Clear_Keyboard    ; Location 19h - Clear keyboard strobe
  926.         Dw    Clear_Keyboard    ; Location 1Ah - Clear keyboard strobe
  927.         Dw    Clear_Keyboard    ; Location 1Bh - Clear keyboard strobe
  928.         Dw    Clear_Keyboard    ; Location 1Ch - Clear keyboard strobe
  929.         Dw    Clear_Keyboard    ; Location 1Dh - Clear keyboard strobe
  930.         Dw    Clear_Keyboard    ; Location 1Eh - Clear keyboard strobe
  931.         Dw    Clear_Keyboard    ; Location 1Fh - Clear keyboard strobe
  932.         Dw    Do_Nothing    ; Location 20h - Do nothing
  933.         Dw    Do_Nothing    ; Location 21h - Do nothing
  934.         Dw    Do_Nothing    ; Location 22h - Do nothing
  935.         Dw    Do_Nothing    ; Location 23h - Do nothing
  936.         Dw    Do_Nothing    ; Location 24h - Do nothing
  937.         Dw    Do_Nothing    ; Location 25h - Do nothing
  938.         Dw    Do_Nothing    ; Location 26h - Do nothing
  939.         Dw    Do_Nothing    ; Location 27h - Do nothing
  940.         Dw    Do_Nothing    ; Location 28h - Do nothing
  941.         Dw    Do_Nothing    ; Location 29h - Do nothing
  942.         Dw    Do_Nothing    ; Location 2Ah - Do nothing
  943.         Dw    Do_Nothing    ; Location 2Bh - Do nothing
  944.         Dw    Do_Nothing    ; Location 2Ch - Do nothing
  945.         Dw    Do_Nothing    ; Location 2Dh - Do nothing
  946.         Dw    Do_Nothing    ; Location 2Eh - Do nothing
  947.         Dw    Do_Nothing    ; Location 2Fh - Do nothing
  948.         Dw    Speaker_Toggle    ; Location 30h - Speaker output toggle
  949.         Dw    Speaker_Toggle    ; Location 31h - Speaker output toggle
  950.         Dw    Speaker_Toggle    ; Location 32h - Speaker output toggle
  951.         Dw    Speaker_Toggle    ; Location 33h - Speaker output toggle
  952.         Dw    Speaker_Toggle    ; Location 34h - Speaker output toggle
  953.         Dw    Speaker_Toggle    ; Location 35h - Speaker output toggle
  954.         Dw    Speaker_Toggle    ; Location 36h - Speaker output toggle
  955.         Dw    Speaker_Toggle    ; Location 37h - Speaker output toggle
  956.         Dw    Speaker_Toggle    ; Location 38h - Speaker output toggle
  957.         Dw    Speaker_Toggle    ; Location 39h - Speaker output toggle
  958.         Dw    Speaker_Toggle    ; Location 3Ah - Speaker output toggle
  959.         Dw    Speaker_Toggle    ; Location 3Bh - Speaker output toggle
  960.         Dw    Speaker_Toggle    ; Location 3Ch - Speaker output toggle
  961.         Dw    Speaker_Toggle    ; Location 3Dh - Speaker output toggle
  962.         Dw    Speaker_Toggle    ; Location 3Eh - Speaker output toggle
  963.         Dw    Speaker_Toggle    ; Location 3Fh - Speaker output toggle
  964.         Dw    Utility_Strobe    ; Location 40h - Utility output strobe
  965.         Dw    Utility_Strobe    ; Location 41h - Utility output strobe
  966.         Dw    Utility_Strobe    ; Location 42h - Utility output strobe
  967.         Dw    Utility_Strobe    ; Location 43h - Utility output strobe
  968.         Dw    Utility_Strobe    ; Location 44h - Utility output strobe
  969.         Dw    Utility_Strobe    ; Location 45h - Utility output strobe
  970.         Dw    Utility_Strobe    ; Location 46h - Utility output strobe
  971.         Dw    Utility_Strobe    ; Location 47h - Utility output strobe
  972.         Dw    Utility_Strobe    ; Location 48h - Utility output strobe
  973.         Dw    Utility_Strobe    ; Location 49h - Utility output strobe
  974.         Dw    Utility_Strobe    ; Location 4Ah - Utility output strobe
  975.         Dw    Utility_Strobe    ; Location 4Bh - Utility output strobe
  976.         Dw    Utility_Strobe    ; Location 4Ch - Utility output strobe
  977.         Dw    Utility_Strobe    ; Location 4Dh - Utility output strobe
  978.         Dw    Utility_Strobe    ; Location 4Eh - Utility output strobe
  979.         Dw    Utility_Strobe    ; Location 4Fh - Utility output strobe
  980.         Dw    0000h        ; Location 50h - Text off (Graphics)
  981.         Dw    0000h        ; Location 51h - Text on (Text)
  982.         Dw    0000h        ; Location 52h - Mixed off
  983.         Dw    0000h        ; Location 53h - Mixed on (Text/Graph)
  984.         Dw    0000h        ; Location 54h - Select page 1
  985.         Dw    0000h        ; Location 55h - Select page 2
  986.         Dw    0000h        ; Location 56h - Low res. graphics
  987.         Dw    0000h        ; Location 57h - High res. graphics
  988.         Dw    Output_0_Off    ; Location 58h - Output 0 Off
  989.         Dw    Output_0_On    ; Location 59h - Output 0 On
  990.         Dw    Output_1_Off    ; Location 5Ah - Output 1 Off
  991.         Dw    Output_1_On    ; Location 5Bh - Output 1 On
  992.         Dw    Output_2_Off    ; Location 5Ch - Output 2 Off
  993.         Dw    Output_2_On    ; Location 5Dh - Output 2 On
  994.         Dw    Output_3_Off    ; Location 5Eh - Output 3 Off
  995.         Dw    Output_3_On    ; Location 5Fh - Output 3 On
  996.         Dw    Do_Nothing    ; Location 60h - Do nothing
  997.         Dw    Do_Nothing    ; Location 61h - Do nothing
  998.         Dw    Do_Nothing    ; Location 62h - Do nothing
  999.         Dw    Do_Nothing    ; Location 63h - Do nothing
  1000.         Dw    Do_Nothing    ; Location 64h - Do nothing
  1001.         Dw    Do_Nothing    ; Location 65h - Do nothing
  1002.         Dw    Do_Nothing    ; Location 66h - Do nothing
  1003.         Dw    Do_Nothing    ; Location 67h - Do nothing
  1004.         Dw    Do_Nothing    ; Location 68h - Do nothing
  1005.         Dw    Do_Nothing    ; Location 69h - Do nothing
  1006.         Dw    Do_Nothing    ; Location 6Ah - Do nothing
  1007.         Dw    Do_Nothing    ; Location 6Bh - Do nothing
  1008.         Dw    Do_Nothing    ; Location 6Ch - Do nothing
  1009.         Dw    Do_Nothing    ; Location 6Dh - Do nothing
  1010.         Dw    Do_Nothing    ; Location 6Eh - Do nothing
  1011.         Dw    Do_Nothing    ; Location 6Fh - Do nothing
  1012.         Dw    Joystick_Strobe ; Location 70h - Joystick strobe
  1013.         Dw    Joystick_Strobe ; Location 71h - Joystick strobe
  1014.         Dw    Joystick_Strobe ; Location 72h - Joystick strobe
  1015.         Dw    Joystick_Strobe ; Location 73h - Joystick strobe
  1016.         Dw    Joystick_Strobe ; Location 74h - Joystick strobe
  1017.         Dw    Joystick_Strobe ; Location 75h - Joystick strobe
  1018.         Dw    Joystick_Strobe ; Location 76h - Joystick strobe
  1019.         Dw    Joystick_Strobe ; Location 77h - Joystick strobe
  1020.         Dw    Joystick_Strobe ; Location 78h - Joystick strobe
  1021.         Dw    Joystick_Strobe ; Location 79h - Joystick strobe
  1022.         Dw    Joystick_Strobe ; Location 7Ah - Joystick strobe
  1023.         Dw    Joystick_Strobe ; Location 7Bh - Joystick strobe
  1024.         Dw    Joystick_Strobe ; Location 7Ch - Joystick strobe
  1025.         Dw    Joystick_Strobe ; Location 7Dh - Joystick strobe
  1026.         Dw    Joystick_Strobe ; Location 7Eh - Joystick strobe
  1027.         Dw    Joystick_Strobe ; Location 7Fh - Joystick strobe
  1028. ;******************************************************************************
  1029. ;
  1030. ;    Define the Flag Encoding Table
  1031. ;
  1032. ;******************************************************************************
  1033.         Even            ; Force table to even address
  1034. Flag_Encode    Equ    This Byte    ; CPU flag encoding table
  1035.         Encode    <00000000b>    ; Flag value 00000000b encoded
  1036.         Encode    <00000001b>    ; Flag value 00000001b encoded
  1037.         Encode    <00000010b>    ; Flag value 00000010b encoded
  1038.         Encode    <00000011b>    ; Flag value 00000011b encoded
  1039.         Encode    <00000100b>    ; Flag value 00000100b encoded
  1040.         Encode    <00000101b>    ; Flag value 00000101b encoded
  1041.         Encode    <00000110b>    ; Flag value 00000110b encoded
  1042.         Encode    <00000111b>    ; Flag value 00000111b encoded
  1043.         Encode    <00001000b>    ; Flag value 00001000b encoded
  1044.         Encode    <00001001b>    ; Flag value 00001001b encoded
  1045.         Encode    <00001010b>    ; Flag value 00001010b encoded
  1046.         Encode    <00001011b>    ; Flag value 00001011b encoded
  1047.         Encode    <00001100b>    ; Flag value 00001100b encoded
  1048.         Encode    <00001101b>    ; Flag value 00001101b encoded
  1049.         Encode    <00001110b>    ; Flag value 00001110b encoded
  1050.         Encode    <00001111b>    ; Flag value 00001111b encoded
  1051.         Encode    <00010000b>    ; Flag value 00010000b encoded
  1052.         Encode    <00010001b>    ; Flag value 00010001b encoded
  1053.         Encode    <00010010b>    ; Flag value 00010010b encoded
  1054.         Encode    <00010011b>    ; Flag value 00010011b encoded
  1055.         Encode    <00010100b>    ; Flag value 00010100b encoded
  1056.         Encode    <00010101b>    ; Flag value 00010101b encoded
  1057.         Encode    <00010110b>    ; Flag value 00010110b encoded
  1058.         Encode    <00010111b>    ; Flag value 00010111b encoded
  1059.         Encode    <00011000b>    ; Flag value 00011000b encoded
  1060.         Encode    <00011001b>    ; Flag value 00011001b encoded
  1061.         Encode    <00011010b>    ; Flag value 00011010b encoded
  1062.         Encode    <00011011b>    ; Flag value 00011011b encoded
  1063.         Encode    <00011100b>    ; Flag value 00011100b encoded
  1064.         Encode    <00011101b>    ; Flag value 00011101b encoded
  1065.         Encode    <00011110b>    ; Flag value 00011110b encoded
  1066.         Encode    <00011111b>    ; Flag value 00011111b encoded
  1067.         Encode    <00100000b>    ; Flag value 00100000b encoded
  1068.         Encode    <00100001b>    ; Flag value 00100001b encoded
  1069.         Encode    <00100010b>    ; Flag value 00100010b encoded
  1070.         Encode    <00100011b>    ; Flag value 00100011b encoded
  1071.         Encode    <00100100b>    ; Flag value 00100100b encoded
  1072.         Encode    <00100101b>    ; Flag value 00100101b encoded
  1073.         Encode    <00100110b>    ; Flag value 00100110b encoded
  1074.         Encode    <00100111b>    ; Flag value 00100111b encoded
  1075.         Encode    <00101000b>    ; Flag value 00101000b encoded
  1076.         Encode    <00101001b>    ; Flag value 00101001b encoded
  1077.         Encode    <00101010b>    ; Flag value 00101010b encoded
  1078.         Encode    <00101011b>    ; Flag value 00101011b encoded
  1079.         Encode    <00101100b>    ; Flag value 00101100b encoded
  1080.         Encode    <00101101b>    ; Flag value 00101101b encoded
  1081.         Encode    <00101110b>    ; Flag value 00101110b encoded
  1082.         Encode    <00101111b>    ; Flag value 00101111b encoded
  1083.         Encode    <00110000b>    ; Flag value 00110000b encoded
  1084.         Encode    <00110001b>    ; Flag value 00110001b encoded
  1085.         Encode    <00110010b>    ; Flag value 00110010b encoded
  1086.         Encode    <00110011b>    ; Flag value 00110011b encoded
  1087.         Encode    <00110100b>    ; Flag value 00110100b encoded
  1088.         Encode    <00110101b>    ; Flag value 00110101b encoded
  1089.         Encode    <00110110b>    ; Flag value 00110110b encoded
  1090.         Encode    <00110111b>    ; Flag value 00110111b encoded
  1091.         Encode    <00111000b>    ; Flag value 00111000b encoded
  1092.         Encode    <00111001b>    ; Flag value 00111001b encoded
  1093.         Encode    <00111010b>    ; Flag value 00111010b encoded
  1094.         Encode    <00111011b>    ; Flag value 00111011b encoded
  1095.         Encode    <00111100b>    ; Flag value 00111100b encoded
  1096.         Encode    <00111101b>    ; Flag value 00111101b encoded
  1097.         Encode    <00111110b>    ; Flag value 00111110b encoded
  1098.         Encode    <00111111b>    ; Flag value 00111111b encoded
  1099.         Encode    <01000000b>    ; Flag value 01000000b encoded
  1100.         Encode    <01000001b>    ; Flag value 01000001b encoded
  1101.         Encode    <01000010b>    ; Flag value 01000010b encoded
  1102.         Encode    <01000011b>    ; Flag value 01000011b encoded
  1103.         Encode    <01000100b>    ; Flag value 01000100b encoded
  1104.         Encode    <01000101b>    ; Flag value 01000101b encoded
  1105.         Encode    <01000110b>    ; Flag value 01000110b encoded
  1106.         Encode    <01000111b>    ; Flag value 01000111b encoded
  1107.         Encode    <01001000b>    ; Flag value 01001000b encoded
  1108.         Encode    <01001001b>    ; Flag value 01001001b encoded
  1109.         Encode    <01001010b>    ; Flag value 01001010b encoded
  1110.         Encode    <01001011b>    ; Flag value 01001011b encoded
  1111.         Encode    <01001100b>    ; Flag value 01001100b encoded
  1112.         Encode    <01001101b>    ; Flag value 01001101b encoded
  1113.         Encode    <01001110b>    ; Flag value 01001110b encoded
  1114.         Encode    <01001111b>    ; Flag value 01001111b encoded
  1115.         Encode    <01010000b>    ; Flag value 01010000b encoded
  1116.         Encode    <01010001b>    ; Flag value 01010001b encoded
  1117.         Encode    <01010010b>    ; Flag value 01010010b encoded
  1118.         Encode    <01010011b>    ; Flag value 01010011b encoded
  1119.         Encode    <01010100b>    ; Flag value 01010100b encoded
  1120.         Encode    <01010101b>    ; Flag value 01010101b encoded
  1121.         Encode    <01010110b>    ; Flag value 01010110b encoded
  1122.         Encode    <01010111b>    ; Flag value 01010111b encoded
  1123.         Encode    <01011000b>    ; Flag value 01011000b encoded
  1124.         Encode    <01011001b>    ; Flag value 01011001b encoded
  1125.         Encode    <01011010b>    ; Flag value 01011010b encoded
  1126.         Encode    <01011011b>    ; Flag value 01011011b encoded
  1127.         Encode    <01011100b>    ; Flag value 01011100b encoded
  1128.         Encode    <01011101b>    ; Flag value 01011101b encoded
  1129.         Encode    <01011110b>    ; Flag value 01011110b encoded
  1130.         Encode    <01011111b>    ; Flag value 01011111b encoded
  1131.         Encode    <01100000b>    ; Flag value 01100000b encoded
  1132.         Encode    <01100001b>    ; Flag value 01100001b encoded
  1133.         Encode    <01100010b>    ; Flag value 01100010b encoded
  1134.         Encode    <01100011b>    ; Flag value 01100011b encoded
  1135.         Encode    <01100100b>    ; Flag value 01100100b encoded
  1136.         Encode    <01100101b>    ; Flag value 01100101b encoded
  1137.         Encode    <01100110b>    ; Flag value 01100110b encoded
  1138.         Encode    <01100111b>    ; Flag value 01100111b encoded
  1139.         Encode    <01101000b>    ; Flag value 01101000b encoded
  1140.         Encode    <01101001b>    ; Flag value 01101001b encoded
  1141.         Encode    <01101010b>    ; Flag value 01101010b encoded
  1142.         Encode    <01101011b>    ; Flag value 01101011b encoded
  1143.         Encode    <01101100b>    ; Flag value 01101100b encoded
  1144.         Encode    <01101101b>    ; Flag value 01101101b encoded
  1145.         Encode    <01101110b>    ; Flag value 01101110b encoded
  1146.         Encode    <01101111b>    ; Flag value 01101111b encoded
  1147.         Encode    <01110000b>    ; Flag value 01110000b encoded
  1148.         Encode    <01110001b>    ; Flag value 01110001b encoded
  1149.         Encode    <01110010b>    ; Flag value 01110010b encoded
  1150.         Encode    <01110011b>    ; Flag value 01110011b encoded
  1151.         Encode    <01110100b>    ; Flag value 01110100b encoded
  1152.         Encode    <01110101b>    ; Flag value 01110101b encoded
  1153.         Encode    <01110110b>    ; Flag value 01110110b encoded
  1154.         Encode    <01110111b>    ; Flag value 01110111b encoded
  1155.         Encode    <01111000b>    ; Flag value 01111000b encoded
  1156.         Encode    <01111001b>    ; Flag value 01111001b encoded
  1157.         Encode    <01111010b>    ; Flag value 01111010b encoded
  1158.         Encode    <01111011b>    ; Flag value 01111011b encoded
  1159.         Encode    <01111100b>    ; Flag value 01111100b encoded
  1160.         Encode    <01111101b>    ; Flag value 01111101b encoded
  1161.         Encode    <01111110b>    ; Flag value 01111110b encoded
  1162.         Encode    <01111111b>    ; Flag value 01111111b encoded
  1163.         Encode    <10000000b>    ; Flag value 10000000b encoded
  1164.         Encode    <10000001b>    ; Flag value 10000001b encoded
  1165.         Encode    <10000010b>    ; Flag value 10000010b encoded
  1166.         Encode    <10000011b>    ; Flag value 10000011b encoded
  1167.         Encode    <10000100b>    ; Flag value 10000100b encoded
  1168.         Encode    <10000101b>    ; Flag value 10000101b encoded
  1169.         Encode    <10000110b>    ; Flag value 10000110b encoded
  1170.         Encode    <10000111b>    ; Flag value 10000111b encoded
  1171.         Encode    <10001000b>    ; Flag value 10001000b encoded
  1172.         Encode    <10001001b>    ; Flag value 10001001b encoded
  1173.         Encode    <10001010b>    ; Flag value 10001010b encoded
  1174.         Encode    <10001011b>    ; Flag value 10001011b encoded
  1175.         Encode    <10001100b>    ; Flag value 10001100b encoded
  1176.         Encode    <10001101b>    ; Flag value 10001101b encoded
  1177.         Encode    <10001110b>    ; Flag value 10001110b encoded
  1178.         Encode    <10001111b>    ; Flag value 10001111b encoded
  1179.         Encode    <10010000b>    ; Flag value 10010000b encoded
  1180.         Encode    <10010001b>    ; Flag value 10010001b encoded
  1181.         Encode    <10010010b>    ; Flag value 10010010b encoded
  1182.         Encode    <10010011b>    ; Flag value 10010011b encoded
  1183.         Encode    <10010100b>    ; Flag value 10010100b encoded
  1184.         Encode    <10010101b>    ; Flag value 10010101b encoded
  1185.         Encode    <10010110b>    ; Flag value 10010110b encoded
  1186.         Encode    <10010111b>    ; Flag value 10010111b encoded
  1187.         Encode    <10011000b>    ; Flag value 10011000b encoded
  1188.         Encode    <10011001b>    ; Flag value 10011001b encoded
  1189.         Encode    <10011010b>    ; Flag value 10011010b encoded
  1190.         Encode    <10011011b>    ; Flag value 10011011b encoded
  1191.         Encode    <10011100b>    ; Flag value 10011100b encoded
  1192.         Encode    <10011101b>    ; Flag value 10011101b encoded
  1193.         Encode    <10011110b>    ; Flag value 10011110b encoded
  1194.         Encode    <10011111b>    ; Flag value 10011111b encoded
  1195.         Encode    <10100000b>    ; Flag value 10100000b encoded
  1196.         Encode    <10100001b>    ; Flag value 10100001b encoded
  1197.         Encode    <10100010b>    ; Flag value 10100010b encoded
  1198.         Encode    <10100011b>    ; Flag value 10100011b encoded
  1199.         Encode    <10100100b>    ; Flag value 10100100b encoded
  1200.         Encode    <10100101b>    ; Flag value 10100101b encoded
  1201.         Encode    <10100110b>    ; Flag value 10100110b encoded
  1202.         Encode    <10100111b>    ; Flag value 10100111b encoded
  1203.         Encode    <10101000b>    ; Flag value 10101000b encoded
  1204.         Encode    <10101001b>    ; Flag value 10101001b encoded
  1205.         Encode    <10101010b>    ; Flag value 10101010b encoded
  1206.         Encode    <10101011b>    ; Flag value 10101011b encoded
  1207.         Encode    <10101100b>    ; Flag value 10101100b encoded
  1208.         Encode    <10101101b>    ; Flag value 10101101b encoded
  1209.         Encode    <10101110b>    ; Flag value 10101110b encoded
  1210.         Encode    <10101111b>    ; Flag value 10101111b encoded
  1211.         Encode    <10110000b>    ; Flag value 10110000b encoded
  1212.         Encode    <10110001b>    ; Flag value 10110001b encoded
  1213.         Encode    <10110010b>    ; Flag value 10110010b encoded
  1214.         Encode    <10110011b>    ; Flag value 10110011b encoded
  1215.         Encode    <10110100b>    ; Flag value 10110100b encoded
  1216.         Encode    <10110101b>    ; Flag value 10110101b encoded
  1217.         Encode    <10110110b>    ; Flag value 10110110b encoded
  1218.         Encode    <10110111b>    ; Flag value 10110111b encoded
  1219.         Encode    <10111000b>    ; Flag value 10111000b encoded
  1220.         Encode    <10111001b>    ; Flag value 10111001b encoded
  1221.         Encode    <10111010b>    ; Flag value 10111010b encoded
  1222.         Encode    <10111011b>    ; Flag value 10111011b encoded
  1223.         Encode    <10111100b>    ; Flag value 10111100b encoded
  1224.         Encode    <10111101b>    ; Flag value 10111101b encoded
  1225.         Encode    <10111110b>    ; Flag value 10111110b encoded
  1226.         Encode    <10111111b>    ; Flag value 10111111b encoded
  1227.         Encode    <11000000b>    ; Flag value 11000000b encoded
  1228.         Encode    <11000001b>    ; Flag value 11000001b encoded
  1229.         Encode    <11000010b>    ; Flag value 11000010b encoded
  1230.         Encode    <11000011b>    ; Flag value 11000011b encoded
  1231.         Encode    <11000100b>    ; Flag value 11000100b encoded
  1232.         Encode    <11000101b>    ; Flag value 11000101b encoded
  1233.         Encode    <11000110b>    ; Flag value 11000110b encoded
  1234.         Encode    <11000111b>    ; Flag value 11000111b encoded
  1235.         Encode    <11001000b>    ; Flag value 11001000b encoded
  1236.         Encode    <11001001b>    ; Flag value 11001001b encoded
  1237.         Encode    <11001010b>    ; Flag value 11001010b encoded
  1238.         Encode    <11001011b>    ; Flag value 11001011b encoded
  1239.         Encode    <11001100b>    ; Flag value 11001100b encoded
  1240.         Encode    <11001101b>    ; Flag value 11001101b encoded
  1241.         Encode    <11001110b>    ; Flag value 11001110b encoded
  1242.         Encode    <11001111b>    ; Flag value 11001111b encoded
  1243.         Encode    <11010000b>    ; Flag value 11010000b encoded
  1244.         Encode    <11010001b>    ; Flag value 11010001b encoded
  1245.         Encode    <11010010b>    ; Flag value 11010010b encoded
  1246.         Encode    <11010011b>    ; Flag value 11010011b encoded
  1247.         Encode    <11010100b>    ; Flag value 11010100b encoded
  1248.         Encode    <11010101b>    ; Flag value 11010101b encoded
  1249.         Encode    <11010110b>    ; Flag value 11010110b encoded
  1250.         Encode    <11010111b>    ; Flag value 11010111b encoded
  1251.         Encode    <11011000b>    ; Flag value 11011000b encoded
  1252.         Encode    <11011001b>    ; Flag value 11011001b encoded
  1253.         Encode    <11011010b>    ; Flag value 11011010b encoded
  1254.         Encode    <11011011b>    ; Flag value 11011011b encoded
  1255.         Encode    <11011100b>    ; Flag value 11011100b encoded
  1256.         Encode    <11011101b>    ; Flag value 11011101b encoded
  1257.         Encode    <11011110b>    ; Flag value 11011110b encoded
  1258.         Encode    <11011111b>    ; Flag value 11011111b encoded
  1259.         Encode    <11100000b>    ; Flag value 11100000b encoded
  1260.         Encode    <11100001b>    ; Flag value 11100001b encoded
  1261.         Encode    <11100010b>    ; Flag value 11100010b encoded
  1262.         Encode    <11100011b>    ; Flag value 11100011b encoded
  1263.         Encode    <11100100b>    ; Flag value 11100100b encoded
  1264.         Encode    <11100101b>    ; Flag value 11100101b encoded
  1265.         Encode    <11100110b>    ; Flag value 11100110b encoded
  1266.         Encode    <11100111b>    ; Flag value 11100111b encoded
  1267.         Encode    <11101000b>    ; Flag value 11101000b encoded
  1268.         Encode    <11101001b>    ; Flag value 11101001b encoded
  1269.         Encode    <11101010b>    ; Flag value 11101010b encoded
  1270.         Encode    <11101011b>    ; Flag value 11101011b encoded
  1271.         Encode    <11101100b>    ; Flag value 11101100b encoded
  1272.         Encode    <11101101b>    ; Flag value 11101101b encoded
  1273.         Encode    <11101110b>    ; Flag value 11101110b encoded
  1274.         Encode    <11101111b>    ; Flag value 11101111b encoded
  1275.         Encode    <11110000b>    ; Flag value 11110000b encoded
  1276.         Encode    <11110001b>    ; Flag value 11110001b encoded
  1277.         Encode    <11110010b>    ; Flag value 11110010b encoded
  1278.         Encode    <11110011b>    ; Flag value 11110011b encoded
  1279.         Encode    <11110100b>    ; Flag value 11110100b encoded
  1280.         Encode    <11110101b>    ; Flag value 11110101b encoded
  1281.         Encode    <11110110b>    ; Flag value 11110110b encoded
  1282.         Encode    <11110111b>    ; Flag value 11110111b encoded
  1283.         Encode    <11111000b>    ; Flag value 11111000b encoded
  1284.         Encode    <11111001b>    ; Flag value 11111001b encoded
  1285.         Encode    <11111010b>    ; Flag value 11111010b encoded
  1286.         Encode    <11111011b>    ; Flag value 11111011b encoded
  1287.         Encode    <11111100b>    ; Flag value 11111100b encoded
  1288.         Encode    <11111101b>    ; Flag value 11111101b encoded
  1289.         Encode    <11111110b>    ; Flag value 11111110b encoded
  1290.         Encode    <11111111b>    ; Flag value 11111111b encoded
  1291. ;******************************************************************************
  1292. ;
  1293. ;    Define the Flag Decoding Table
  1294. ;
  1295. ;******************************************************************************
  1296.         Even            ; Force table to even address
  1297. Flag_Decode    Equ    This Byte    ; CPU flag decoding table
  1298.         Decode    <00000000b>    ; Flag value 00000000b decoded
  1299.         Decode    <00000001b>    ; Flag value 00000001b decoded
  1300.         Decode    <00000010b>    ; Flag value 00000010b decoded
  1301.         Decode    <00000011b>    ; Flag value 00000011b decoded
  1302.         Decode    <00000100b>    ; Flag value 00000100b decoded
  1303.         Decode    <00000101b>    ; Flag value 00000101b decoded
  1304.         Decode    <00000110b>    ; Flag value 00000110b decoded
  1305.         Decode    <00000111b>    ; Flag value 00000111b decoded
  1306.         Decode    <00001000b>    ; Flag value 00001000b decoded
  1307.         Decode    <00001001b>    ; Flag value 00001001b decoded
  1308.         Decode    <00001010b>    ; Flag value 00001010b decoded
  1309.         Decode    <00001011b>    ; Flag value 00001011b decoded
  1310.         Decode    <00001100b>    ; Flag value 00001100b decoded
  1311.         Decode    <00001101b>    ; Flag value 00001101b decoded
  1312.         Decode    <00001110b>    ; Flag value 00001110b decoded
  1313.         Decode    <00001111b>    ; Flag value 00001111b decoded
  1314.         Decode    <00010000b>    ; Flag value 00010000b decoded
  1315.         Decode    <00010001b>    ; Flag value 00010001b decoded
  1316.         Decode    <00010010b>    ; Flag value 00010010b decoded
  1317.         Decode    <00010011b>    ; Flag value 00010011b decoded
  1318.         Decode    <00010100b>    ; Flag value 00010100b decoded
  1319.         Decode    <00010101b>    ; Flag value 00010101b decoded
  1320.         Decode    <00010110b>    ; Flag value 00010110b decoded
  1321.         Decode    <00010111b>    ; Flag value 00010111b decoded
  1322.         Decode    <00011000b>    ; Flag value 00011000b decoded
  1323.         Decode    <00011001b>    ; Flag value 00011001b decoded
  1324.         Decode    <00011010b>    ; Flag value 00011010b decoded
  1325.         Decode    <00011011b>    ; Flag value 00011011b decoded
  1326.         Decode    <00011100b>    ; Flag value 00011100b decoded
  1327.         Decode    <00011101b>    ; Flag value 00011101b decoded
  1328.         Decode    <00011110b>    ; Flag value 00011110b decoded
  1329.         Decode    <00011111b>    ; Flag value 00011111b decoded
  1330.         Decode    <00100000b>    ; Flag value 00100000b decoded
  1331.         Decode    <00100001b>    ; Flag value 00100001b decoded
  1332.         Decode    <00100010b>    ; Flag value 00100010b decoded
  1333.         Decode    <00100011b>    ; Flag value 00100011b decoded
  1334.         Decode    <00100100b>    ; Flag value 00100100b decoded
  1335.         Decode    <00100101b>    ; Flag value 00100101b decoded
  1336.         Decode    <00100110b>    ; Flag value 00100110b decoded
  1337.         Decode    <00100111b>    ; Flag value 00100111b decoded
  1338.         Decode    <00101000b>    ; Flag value 00101000b decoded
  1339.         Decode    <00101001b>    ; Flag value 00101001b decoded
  1340.         Decode    <00101010b>    ; Flag value 00101010b decoded
  1341.         Decode    <00101011b>    ; Flag value 00101011b decoded
  1342.         Decode    <00101100b>    ; Flag value 00101100b decoded
  1343.         Decode    <00101101b>    ; Flag value 00101101b decoded
  1344.         Decode    <00101110b>    ; Flag value 00101110b decoded
  1345.         Decode    <00101111b>    ; Flag value 00101111b decoded
  1346.         Decode    <00110000b>    ; Flag value 00110000b decoded
  1347.         Decode    <00110001b>    ; Flag value 00110001b decoded
  1348.         Decode    <00110010b>    ; Flag value 00110010b decoded
  1349.         Decode    <00110011b>    ; Flag value 00110011b decoded
  1350.         Decode    <00110100b>    ; Flag value 00110100b decoded
  1351.         Decode    <00110101b>    ; Flag value 00110101b decoded
  1352.         Decode    <00110110b>    ; Flag value 00110110b decoded
  1353.         Decode    <00110111b>    ; Flag value 00110111b decoded
  1354.         Decode    <00111000b>    ; Flag value 00111000b decoded
  1355.         Decode    <00111001b>    ; Flag value 00111001b decoded
  1356.         Decode    <00111010b>    ; Flag value 00111010b decoded
  1357.         Decode    <00111011b>    ; Flag value 00111011b decoded
  1358.         Decode    <00111100b>    ; Flag value 00111100b decoded
  1359.         Decode    <00111101b>    ; Flag value 00111101b decoded
  1360.         Decode    <00111110b>    ; Flag value 00111110b decoded
  1361.         Decode    <00111111b>    ; Flag value 00111111b decoded
  1362.         Decode    <01000000b>    ; Flag value 01000000b decoded
  1363.         Decode    <01000001b>    ; Flag value 01000001b decoded
  1364.         Decode    <01000010b>    ; Flag value 01000010b decoded
  1365.         Decode    <01000011b>    ; Flag value 01000011b decoded
  1366.         Decode    <01000100b>    ; Flag value 01000100b decoded
  1367.         Decode    <01000101b>    ; Flag value 01000101b decoded
  1368.         Decode    <01000110b>    ; Flag value 01000110b decoded
  1369.         Decode    <01000111b>    ; Flag value 01000111b decoded
  1370.         Decode    <01001000b>    ; Flag value 01001000b decoded
  1371.         Decode    <01001001b>    ; Flag value 01001001b decoded
  1372.         Decode    <01001010b>    ; Flag value 01001010b decoded
  1373.         Decode    <01001011b>    ; Flag value 01001011b decoded
  1374.         Decode    <01001100b>    ; Flag value 01001100b decoded
  1375.         Decode    <01001101b>    ; Flag value 01001101b decoded
  1376.         Decode    <01001110b>    ; Flag value 01001110b decoded
  1377.         Decode    <01001111b>    ; Flag value 01001111b decoded
  1378.         Decode    <01010000b>    ; Flag value 01010000b decoded
  1379.         Decode    <01010001b>    ; Flag value 01010001b decoded
  1380.         Decode    <01010010b>    ; Flag value 01010010b decoded
  1381.         Decode    <01010011b>    ; Flag value 01010011b decoded
  1382.         Decode    <01010100b>    ; Flag value 01010100b decoded
  1383.         Decode    <01010101b>    ; Flag value 01010101b decoded
  1384.         Decode    <01010110b>    ; Flag value 01010110b decoded
  1385.         Decode    <01010111b>    ; Flag value 01010111b decoded
  1386.         Decode    <01011000b>    ; Flag value 01011000b decoded
  1387.         Decode    <01011001b>    ; Flag value 01011001b decoded
  1388.         Decode    <01011010b>    ; Flag value 01011010b decoded
  1389.         Decode    <01011011b>    ; Flag value 01011011b decoded
  1390.         Decode    <01011100b>    ; Flag value 01011100b decoded
  1391.         Decode    <01011101b>    ; Flag value 01011101b decoded
  1392.         Decode    <01011110b>    ; Flag value 01011110b decoded
  1393.         Decode    <01011111b>    ; Flag value 01011111b decoded
  1394.         Decode    <01100000b>    ; Flag value 01100000b decoded
  1395.         Decode    <01100001b>    ; Flag value 01100001b decoded
  1396.         Decode    <01100010b>    ; Flag value 01100010b decoded
  1397.         Decode    <01100011b>    ; Flag value 01100011b decoded
  1398.         Decode    <01100100b>    ; Flag value 01100100b decoded
  1399.         Decode    <01100101b>    ; Flag value 01100101b decoded
  1400.         Decode    <01100110b>    ; Flag value 01100110b decoded
  1401.         Decode    <01100111b>    ; Flag value 01100111b decoded
  1402.         Decode    <01101000b>    ; Flag value 01101000b decoded
  1403.         Decode    <01101001b>    ; Flag value 01101001b decoded
  1404.         Decode    <01101010b>    ; Flag value 01101010b decoded
  1405.         Decode    <01101011b>    ; Flag value 01101011b decoded
  1406.         Decode    <01101100b>    ; Flag value 01101100b decoded
  1407.         Decode    <01101101b>    ; Flag value 01101101b decoded
  1408.         Decode    <01101110b>    ; Flag value 01101110b decoded
  1409.         Decode    <01101111b>    ; Flag value 01101111b decoded
  1410.         Decode    <01110000b>    ; Flag value 01110000b decoded
  1411.         Decode    <01110001b>    ; Flag value 01110001b decoded
  1412.         Decode    <01110010b>    ; Flag value 01110010b decoded
  1413.         Decode    <01110011b>    ; Flag value 01110011b decoded
  1414.         Decode    <01110100b>    ; Flag value 01110100b decoded
  1415.         Decode    <01110101b>    ; Flag value 01110101b decoded
  1416.         Decode    <01110110b>    ; Flag value 01110110b decoded
  1417.         Decode    <01110111b>    ; Flag value 01110111b decoded
  1418.         Decode    <01111000b>    ; Flag value 01111000b decoded
  1419.         Decode    <01111001b>    ; Flag value 01111001b decoded
  1420.         Decode    <01111010b>    ; Flag value 01111010b decoded
  1421.         Decode    <01111011b>    ; Flag value 01111011b decoded
  1422.         Decode    <01111100b>    ; Flag value 01111100b decoded
  1423.         Decode    <01111101b>    ; Flag value 01111101b decoded
  1424.         Decode    <01111110b>    ; Flag value 01111110b decoded
  1425.         Decode    <01111111b>    ; Flag value 01111111b decoded
  1426.         Decode    <10000000b>    ; Flag value 10000000b decoded
  1427.         Decode    <10000001b>    ; Flag value 10000001b decoded
  1428.         Decode    <10000010b>    ; Flag value 10000010b decoded
  1429.         Decode    <10000011b>    ; Flag value 10000011b decoded
  1430.         Decode    <10000100b>    ; Flag value 10000100b decoded
  1431.         Decode    <10000101b>    ; Flag value 10000101b decoded
  1432.         Decode    <10000110b>    ; Flag value 10000110b decoded
  1433.         Decode    <10000111b>    ; Flag value 10000111b decoded
  1434.         Decode    <10001000b>    ; Flag value 10001000b decoded
  1435.         Decode    <10001001b>    ; Flag value 10001001b decoded
  1436.         Decode    <10001010b>    ; Flag value 10001010b decoded
  1437.         Decode    <10001011b>    ; Flag value 10001011b decoded
  1438.         Decode    <10001100b>    ; Flag value 10001100b decoded
  1439.         Decode    <10001101b>    ; Flag value 10001101b decoded
  1440.         Decode    <10001110b>    ; Flag value 10001110b decoded
  1441.         Decode    <10001111b>    ; Flag value 10001111b decoded
  1442.         Decode    <10010000b>    ; Flag value 10010000b decoded
  1443.         Decode    <10010001b>    ; Flag value 10010001b decoded
  1444.         Decode    <10010010b>    ; Flag value 10010010b decoded
  1445.         Decode    <10010011b>    ; Flag value 10010011b decoded
  1446.         Decode    <10010100b>    ; Flag value 10010100b decoded
  1447.         Decode    <10010101b>    ; Flag value 10010101b decoded
  1448.         Decode    <10010110b>    ; Flag value 10010110b decoded
  1449.         Decode    <10010111b>    ; Flag value 10010111b decoded
  1450.         Decode    <10011000b>    ; Flag value 10011000b decoded
  1451.         Decode    <10011001b>    ; Flag value 10011001b decoded
  1452.         Decode    <10011010b>    ; Flag value 10011010b decoded
  1453.         Decode    <10011011b>    ; Flag value 10011011b decoded
  1454.         Decode    <10011100b>    ; Flag value 10011100b decoded
  1455.         Decode    <10011101b>    ; Flag value 10011101b decoded
  1456.         Decode    <10011110b>    ; Flag value 10011110b decoded
  1457.         Decode    <10011111b>    ; Flag value 10011111b decoded
  1458.         Decode    <10100000b>    ; Flag value 10100000b decoded
  1459.         Decode    <10100001b>    ; Flag value 10100001b decoded
  1460.         Decode    <10100010b>    ; Flag value 10100010b decoded
  1461.         Decode    <10100011b>    ; Flag value 10100011b decoded
  1462.         Decode    <10100100b>    ; Flag value 10100100b decoded
  1463.         Decode    <10100101b>    ; Flag value 10100101b decoded
  1464.         Decode    <10100110b>    ; Flag value 10100110b decoded
  1465.         Decode    <10100111b>    ; Flag value 10100111b decoded
  1466.         Decode    <10101000b>    ; Flag value 10101000b decoded
  1467.         Decode    <10101001b>    ; Flag value 10101001b decoded
  1468.         Decode    <10101010b>    ; Flag value 10101010b decoded
  1469.         Decode    <10101011b>    ; Flag value 10101011b decoded
  1470.         Decode    <10101100b>    ; Flag value 10101100b decoded
  1471.         Decode    <10101101b>    ; Flag value 10101101b decoded
  1472.         Decode    <10101110b>    ; Flag value 10101110b decoded
  1473.         Decode    <10101111b>    ; Flag value 10101111b decoded
  1474.         Decode    <10110000b>    ; Flag value 10110000b decoded
  1475.         Decode    <10110001b>    ; Flag value 10110001b decoded
  1476.         Decode    <10110010b>    ; Flag value 10110010b decoded
  1477.         Decode    <10110011b>    ; Flag value 10110011b decoded
  1478.         Decode    <10110100b>    ; Flag value 10110100b decoded
  1479.         Decode    <10110101b>    ; Flag value 10110101b decoded
  1480.         Decode    <10110110b>    ; Flag value 10110110b decoded
  1481.         Decode    <10110111b>    ; Flag value 10110111b decoded
  1482.         Decode    <10111000b>    ; Flag value 10111000b decoded
  1483.         Decode    <10111001b>    ; Flag value 10111001b decoded
  1484.         Decode    <10111010b>    ; Flag value 10111010b decoded
  1485.         Decode    <10111011b>    ; Flag value 10111011b decoded
  1486.         Decode    <10111100b>    ; Flag value 10111100b decoded
  1487.         Decode    <10111101b>    ; Flag value 10111101b decoded
  1488.         Decode    <10111110b>    ; Flag value 10111110b decoded
  1489.         Decode    <10111111b>    ; Flag value 10111111b decoded
  1490.         Decode    <11000000b>    ; Flag value 11000000b decoded
  1491.         Decode    <11000001b>    ; Flag value 11000001b decoded
  1492.         Decode    <11000010b>    ; Flag value 11000010b decoded
  1493.         Decode    <11000011b>    ; Flag value 11000011b decoded
  1494.         Decode    <11000100b>    ; Flag value 11000100b decoded
  1495.         Decode    <11000101b>    ; Flag value 11000101b decoded
  1496.         Decode    <11000110b>    ; Flag value 11000110b decoded
  1497.         Decode    <11000111b>    ; Flag value 11000111b decoded
  1498.         Decode    <11001000b>    ; Flag value 11001000b decoded
  1499.         Decode    <11001001b>    ; Flag value 11001001b decoded
  1500.         Decode    <11001010b>    ; Flag value 11001010b decoded
  1501.         Decode    <11001011b>    ; Flag value 11001011b decoded
  1502.         Decode    <11001100b>    ; Flag value 11001100b decoded
  1503.         Decode    <11001101b>    ; Flag value 11001101b decoded
  1504.         Decode    <11001110b>    ; Flag value 11001110b decoded
  1505.         Decode    <11001111b>    ; Flag value 11001111b decoded
  1506.         Decode    <11010000b>    ; Flag value 11010000b decoded
  1507.         Decode    <11010001b>    ; Flag value 11010001b decoded
  1508.         Decode    <11010010b>    ; Flag value 11010010b decoded
  1509.         Decode    <11010011b>    ; Flag value 11010011b decoded
  1510.         Decode    <11010100b>    ; Flag value 11010100b decoded
  1511.         Decode    <11010101b>    ; Flag value 11010101b decoded
  1512.         Decode    <11010110b>    ; Flag value 11010110b decoded
  1513.         Decode    <11010111b>    ; Flag value 11010111b decoded
  1514.         Decode    <11011000b>    ; Flag value 11011000b decoded
  1515.         Decode    <11011001b>    ; Flag value 11011001b decoded
  1516.         Decode    <11011010b>    ; Flag value 11011010b decoded
  1517.         Decode    <11011011b>    ; Flag value 11011011b decoded
  1518.         Decode    <11011100b>    ; Flag value 11011100b decoded
  1519.         Decode    <11011101b>    ; Flag value 11011101b decoded
  1520.         Decode    <11011110b>    ; Flag value 11011110b decoded
  1521.         Decode    <11011111b>    ; Flag value 11011111b decoded
  1522.         Decode    <11100000b>    ; Flag value 11100000b decoded
  1523.         Decode    <11100001b>    ; Flag value 11100001b decoded
  1524.         Decode    <11100010b>    ; Flag value 11100010b decoded
  1525.         Decode    <11100011b>    ; Flag value 11100011b decoded
  1526.         Decode    <11100100b>    ; Flag value 11100100b decoded
  1527.         Decode    <11100101b>    ; Flag value 11100101b decoded
  1528.         Decode    <11100110b>    ; Flag value 11100110b decoded
  1529.         Decode    <11100111b>    ; Flag value 11100111b decoded
  1530.         Decode    <11101000b>    ; Flag value 11101000b decoded
  1531.         Decode    <11101001b>    ; Flag value 11101001b decoded
  1532.         Decode    <11101010b>    ; Flag value 11101010b decoded
  1533.         Decode    <11101011b>    ; Flag value 11101011b decoded
  1534.         Decode    <11101100b>    ; Flag value 11101100b decoded
  1535.         Decode    <11101101b>    ; Flag value 11101101b decoded
  1536.         Decode    <11101110b>    ; Flag value 11101110b decoded
  1537.         Decode    <11101111b>    ; Flag value 11101111b decoded
  1538.         Decode    <11110000b>    ; Flag value 11110000b decoded
  1539.         Decode    <11110001b>    ; Flag value 11110001b decoded
  1540.         Decode    <11110010b>    ; Flag value 11110010b decoded
  1541.         Decode    <11110011b>    ; Flag value 11110011b decoded
  1542.         Decode    <11110100b>    ; Flag value 11110100b decoded
  1543.         Decode    <11110101b>    ; Flag value 11110101b decoded
  1544.         Decode    <11110110b>    ; Flag value 11110110b decoded
  1545.         Decode    <11110111b>    ; Flag value 11110111b decoded
  1546.         Decode    <11111000b>    ; Flag value 11111000b decoded
  1547.         Decode    <11111001b>    ; Flag value 11111001b decoded
  1548.         Decode    <11111010b>    ; Flag value 11111010b decoded
  1549.         Decode    <11111011b>    ; Flag value 11111011b decoded
  1550.         Decode    <11111100b>    ; Flag value 11111100b decoded
  1551.         Decode    <11111101b>    ; Flag value 11111101b decoded
  1552.         Decode    <11111110b>    ; Flag value 11111110b decoded
  1553.         Decode    <11111111b>    ; Flag value 11111111b decoded
  1554. ;******************************************************************************
  1555. ;
  1556. ;    Define the Apple ROM Data File
  1557. ;
  1558. ;******************************************************************************
  1559. System_ROM    Db    "Apple.ROM",0   ; Apple system ROM data file
  1560. Disk_ROM    Db    "Disk.ROM",0    ; Apple disk controller ROM data file
  1561. ;******************************************************************************
  1562. ;
  1563. ;    Define the Apple system flag byte
  1564. ;
  1565. ;    -----------------
  1566. ;    |7|6|5|4|3|2|1|0|
  1567. ;    -----------------
  1568. ;     | | | | | | | |
  1569. ;     | | | | | | | -------> Video type (0 = CGA, 1 = EGA)
  1570. ;     | | | | | | ---------> Display type (0 = CGA, 1 = EGA)
  1571. ;     | | | | | -----------> Interrupt status (0 = Normal, 1 = Patched)
  1572. ;     | | | | -------------> Video status (0 = Normal, 1 = Initialized)
  1573. ;     | | | ---------------> ***** Reserved *****
  1574. ;     | | -----------------> ***** Reserved *****
  1575. ;     | -------------------> ***** Reserved *****
  1576. ;     ---------------------> ***** Reserved *****
  1577. ;
  1578. ;******************************************************************************
  1579.         Even            ; Force byte to even address
  1580. System_Flag    Db    00h        ; System flag byte
  1581. ;******************************************************************************
  1582. ;
  1583. ;    Define the Video system flag byte
  1584. ;
  1585. ;    -----------------
  1586. ;    |7|6|5|4|3|2|1|0|
  1587. ;    -----------------
  1588. ;     | | | | | | | |
  1589. ;     | | | | | | | -------> Video Mode    (0 = Text,   1 = Graphics)
  1590. ;     | | | | | | ---------> Page Number    (0 = Page 1, 1 = Page 2)
  1591. ;     | | | | | -----------> Resolution    (0 = Low,    1 = High)
  1592. ;     | | | | -------------> Mixed Mode    (0 = Normal, 1 = Mixed)
  1593. ;     | | | ---------------> Video Mode    (1 = Text,   0 = Graphics)
  1594. ;     | | -----------------> Page Number    (1 = Page 1, 0 = Page 2)
  1595. ;     | -------------------> Resolution    (1 = Low,    0 = High)
  1596. ;     ---------------------> Mixed Mode    (1 = Normal, 0 = Mixed)
  1597. ;
  1598. ;******************************************************************************
  1599.         Even            ; Force byte to even address
  1600. Video_Flag    Db    0E1h        ; Video flag byte (Graphics Mode)
  1601. ;******************************************************************************
  1602. ;
  1603. ;    Define the Emulator system flag byte
  1604. ;
  1605. ;    -----------------
  1606. ;    |7|6|5|4|3|2|1|0|
  1607. ;    -----------------
  1608. ;     | | | | | | | |
  1609. ;     | | | | | | | -------> System Request Interrupt has Occurred
  1610. ;     | | | | | | ---------> System Reset Interrupt has Occurred
  1611. ;     | | | | | -----------> ***** Reserved ***** (Dummy interrupt)
  1612. ;     | | | | -------------> ***** Reserved ***** (Dummy interrupt)
  1613. ;     | | | ---------------> ***** Reserved ***** (Dummy interrupt)
  1614. ;     | | -----------------> ***** Reserved ***** (Dummy interrupt)
  1615. ;     | -------------------> ***** Reserved ***** (Dummy interrupt)
  1616. ;     ---------------------> ***** Reserved ***** (Dummy interrupt)
  1617. ;
  1618. ;******************************************************************************
  1619.         Even            ; Force byte to even address
  1620. Emulate_Flag    Db    00h        ; Emulator flag byte
  1621. ;******************************************************************************
  1622. ;
  1623. ;    Define the interrupt vector save area
  1624. ;
  1625. ;******************************************************************************
  1626.         Even            ; Force dwords to even address
  1627. Original_Int_8    Dd    ?        ; Original interrupt 8 (Timer) vector
  1628. Original_Int_9    Dd    ?        ; Original interrupt 9 (Keyboard) vector
  1629. ;******************************************************************************
  1630. ;
  1631. ;    Define all other needed data values
  1632. ;
  1633. ;******************************************************************************
  1634.         Even            ; Force byte to even address
  1635. Current_Slot    Db    SLOT_MAX    ; Current active expansion slot
  1636. RAM_Space    Dw    (?)        ; RAM space segment save area
  1637. ALT_Space    Dw    (?)        ; Alternate RAM space segment save area
  1638. ;******************************************************************************
  1639. ;
  1640. ;    Define the end of the Apple Emulator Code Segment
  1641. ;
  1642. ;******************************************************************************
  1643. Emulate Ends
  1644.     End                ; End of the data module
  1645.