Uncompressed - The Tech Heap

EXTENDED BASIC UNRAVELLED IIAPPENDIX AMEMORY MAPORIGIN:SPECTRAL ASSOCREVISED:12/26/1999 WALTER K ZYDHEK0001 C000 ROMPAK EQU $C00000020003 0008 BS EQU 8 BACKSPACE0004 000D CR EQU $D ENTER KEY0005 001B ESC EQU $1B ESCAPE CODE0006 000A LF EQU $A LINE FEED0007 000C FORMF EQU $C FORM FEED0008 0020 SPACE EQU $20 SPACE (BLANK)00090010 003A STKBUF EQU 58 STACK BUFFER ROOM0011 045E DEBDEL EQU $45E DEBOUNCE DELAY0012 00FA LBUFMX EQU 250 MAX NUMBER OF CHARS IN A BASIC LINE0013 00FA MAXLIN EQU $FA MAXIMUM MS BYTE OF LINE NUMBER00140015 2600 DOSBUF EQU $2600 RAM LOAD LOCATION FOR THE DOS COMMAND0016 0020 DIRLEN EQU 32 NUMBER OF BYTES IN DIRECTORY ENTRY0017 0100 SECLEN EQU 256 LENGTH OF SECTOR IN BYTES0018 0012 SECMAX EQU 18 MAXIMUM NUMBER OF SECTORS PER TRACK0019 1200 TRKLEN EQU SECMAX*SECLEN LENGTH OF TRACK IN BYTES0020 0023 TRKMAX EQU 35 MAX NUMBER OF TRACKS0021 004A FATLEN EQU 6+(TRKMAX-1)*2 FILE ALLOCATION TABLE LENGTH0022 0044 GRANMX EQU (TRKMAX-1)*2 MAXIMUM NUMBER OF GRANULES0023 0119 FCBLEN EQU SECLEN+25 FILE CONTROL BLOCK LENGTH0024 0010 INPFIL EQU $10 INPUT FILE TYPE0025 0020 OUTFIL EQU $20 OUTPUT FILE TYPE0026 0040 RANFIL EQU $40 RANDOM/DIRECT FILE TYPE00270028 * PSEUDO PSEUDO OPS0029 0021 SKP1 EQU $21 OP CODE OF BRN — SKIP ONE BYTE0030 008C SKP2 EQU $8C OP CODE OF CMPX # - SKIP TWO BYTES0031 0086 SKP1LD EQU $86 OP CODE OF LDA # - SKIP THE NEXT BYTE0032 * AND LOAD THE VALUE OF THAT BYTE INTO ACCA — THIS0033 * IS USUALLY USED TO LOAD ACCA WITH A NON ZERO VALUE00340035 * SUPER EXTENDED BASIC EQUATES0036 0018 ROWMAX EQU 24 MAXIMUM NUMBER OF ROWS IN HI-RES PRINT MODE0037 0000 RAMLINK EQU 0 DUMMY RAM LINK VECTOR0038 2000 HRESSCRN EQU $2000 ADDRESS OF THE HI-RES SCREEN IN THE CPU'S MEMORY SPACE0039 C000 HRESBUFF EQU $C000 ADDRESS OF THE GET/PUT BUFFERS IN THE CPU'S MEMORY SPACE0040 DFFF TMPSTACK EQU $DFFF ADDRESS OF THE HI-RES GRAPHICS STACK IN THE CPU'S MEMORY SPACE0041 0062 EBHITOK EQU $62 FIRST ENHANCED BASIC TOKEN NUMBER0042 0029 EBHISTOK EQU $29 FIRST ENHANCED BASIC FUNCTION TOKEN NUMBER BUG - SHOULD BE $280043 0020 CURCHAR EQU SPACE HI-RES CURSOR CHARACTER00440045 * HBUFF HGET/HPUT BUFFER HEADER EQUATES0046 0000 HB.ADDR EQU 0 ADDRESS OF THE NEXT BUFFER - 2 BYTES0047 0002 HB.NUM EQU 2 NUMBER OF THIS BUFFER - 1 BYTES0048 0003 HB.SIZE EQU 3 NUMBER OF BYTES IN THE BUFFER - 2 BYTES0049 0005 HB.LEN EQU 5 NUMBER OF BYTES IN THIS HEADER00500051 * VIDEO REGISTER EQUATES0052 * INIT0 BIT EQUATES0053 0080 COCO EQU $80 1 = Color Computer compatible0054 0040 MMUEN EQU $40 1 = MMU enabled0055 0020 IEN EQU $20 1 = GIME chip IRQ output enabled0056 0010 FEN EQU $10 1 = GIME chip FIRQ output enabled0057 0008 MC3 EQU 8 1 = RAM at XFEXX is constant0058 0004 MC2 EQU 4 1 = standard SCS0059 0002 MC1 EQU 2 ROM map control0060 0001 MC0 EQU 1 ROM map control00610062 * INTERRUPT REQUEST ENABLED0063 0020 TMR EQU $20 TIMER0064 0010 HBORD EQU $10 HORIZONTAL BORDER0065 0008 VBORD EQU 8 VERTICAL BORDER0066 0004 EI2 EQU 4 SERIAL DATA0067 0002 EI1 EQU 2 KEYBOARD0068 0001 EI0 EQU 1 CARTRIDGE00690070 * EXPANDED MEMORY DEFINITIONS0071 0030 BLOCK 6.0 EQU $30 BLOCKS $30-$33 ARE THE HI-RES GRAPHICS SCREEN0072 0031 BLOCK 6.1 EQU $31 HI-RES GRAPHICS SCREEN0073 0032 BLOCK 6.2 EQU $32 HI-RES GRAPHICS SCREEN0074 0033 BLOCK 6.3 EQU $33 HI-RES GRAPHICS SCREENA1