Apple II User Manual

Page of 257
1543   8BAF AD 54 A6           LDA TOUTFL
1544   8BB2 09 40              ORA #$40
1545   8BB4 8D 54 A6           STA TOUTFL
1546   8BB7 20 86 8B    VECSW  JSR ACCESS      ;UN WRITE PROT RAM
1547   8BBA A2 08              LDX #$8
1548   8BBC BD 6F 8C    SWLP2  LDA TRMTBL,X
1549   8BBF 9D 60 A6           STA INVEC,X
1550   8BC2 CA                 DEX
1551   8BC3 10 F7              BPL SWLP2
1552   8BC5 60                 RTS
1553   8BC6             ;
1554   8BC6             ;***
1555   8BC6             ;*** TABLES (I/O CONFIGURATIONS, KEY CODES, ASCII CODES)
1556   8BC6             ;***
1557   8BC6 00 80 08 37 VALS   .DB $00,$80,$08,$37  ;KB SENSE, A=1
1558   8BCA 00 7F 00 30        .DB $00,$7F,$00,$30  ;KB LRN, A=5
1559   8BCE 00 FF 00 3F        .DB $00,$FF,$00,$3F  ;SCAN DSP, A=9
1560   8BD2 00 00 07 3F        .DB $00,$00,$07,$3F  ;BEEP, A=D
1561   8BD6             VALSP2 =VALS+2
1562   8BD6             SYM    =*              ;KEY CODES RETURNED BY LRNKEY
1563   8BD6             TABLE  =*
1564   8BD6 01                 .DB $01         ;0/U0
1565   8BD7 41                 .DB $41         ;1/U1
1566   8BD8 81                 .DB $81         ;2/U2
1567   8BD9 C1                 .DB $C1         ;3/U3
1568   8BDA 02                 .DB $02         ;4/U4
1569   8BDB 42                 .DB $42         ;5/U5
1570   8BDC 82                 .DB $82         ;6/U6
1571   8BDD C2                 .DB $C2         ;7/U7
1572   8BDE 04                 .DB $04         ;8/JMP
1573   8BDF 44                 .DB $44         ;9/VER
1574   8BE0 84                 .DB $84         ;A/ASCII
1575   8BE1 C4                 .DB $C4         ;B/BLK MOV
1576   8BE2 08                 .DB $08         ;C/CALC
1577   8BE3 48                 .DB $48         ;D/DEP
1578   8BE4 88                 .DB $88         ;E/EXEC
1579   8BE5 C8                 .DB $C8         ;F/FILL
1580   8BE6 10                 .DB $10         ;CR/SD
1581   8BE7 50                 .DB $50         ;-/+
1582   8BE8 90                 .DB $90         ;>/<
1583   8BE9 D0                 .DB $D0         ;SHIFT
1584   8BEA 20                 .DB $20         ;GO/LP
1585   8BEB 60                 .DB $60         ;REG/SP
1586   8BEC A0                 .DB $A0         ;MEM/WP
1587   8BED 00                 .DB $00         ;L2/L1
1588   8BEE 40                 .DB $40         ;S2/S1
1589   8BEF             ASCIM1 =*-1
1590   8BEF             ASCII  =*              ;ASCII CODES AND HASH CODES
1591   8BEF 30                 .DB $30         ;ZERO
1592   8BF0 31                 .DB $31         ;ONE
1593   8BF1 32                 .DB $32         ;TWO
1594   8BF2 33                 .DB $33         ;THREE
1595   8BF3 34                 .DB $34         ;FOUR
1596   8BF4 35                 .DB $35         ;FIVE
1597   8BF5 36                 .DB $36         ;SIX
1598   8BF6 37                 .DB $37         ;SEVEN
1599   8BF7 38                 .DB $38         ;EIGHT
1600   8BF8 39                 .DB $39         ;NINE
1601   8BF9 41                 .DB $41         ;A
1602   8BFA 42                 .DB $42         ;B
1603   8BFB 43                 .DB $43         ;C
1604   8BFC 44                 .DB $44         ;D