Apple II User Manual

Page of 257
FFA0: 95 41     1077          STA   A3H,X
FFA2: E8        1078 NXTBS2   INX
FFA3: F0 F3     1079          BEQ   NXTBAS
FFA5: D0 06     1080          BNE   NXTCHR
FFA7: A2 00     1081 GETNUM   LDX   #$00       ;CLEAR A2
FFA9: 86 3E     1082          STX   A2L
FFAB: 86 3F     1083          STX   A2H
FFAD: B9 00 02  1084 NXTCHR   LDA   IN,Y       ;GET CHAR
FFB0: C8        1085          INY
FFB1: 49 B0     1086          EOR   #$B0
FFB3: C9 0A     1087          CMP   #$0A
FFB5: 90 D3     1088          BCC   DIG        ;IF HEX DIG, THEN
FFB7: 69 88     1089          ADC   #$88
FFB9: C9 FA     1090          CMP   #$FA
FFBB: B0 CD     1091          BCS   DIG
FFBD: 60        1092          RTS
FFBE: A9 FE     1093 TOSUB    LDA   #GO/256    ;PUSH HIGH-ORDER
FFC0: 48        1094          PHA              ;  SUBR ADR ON STK
FFC1: B9 E3 FF  1095          LDA   SUBTBL,Y   ;PUSH LOW-ORDER
FFC4: 48        1096          PHA              ;  SUBR ADR ON STK
FFC5: A5 31     1097          LDA   MODE
FFC7: A0 00     1098 ZMODE    LDY   #$00       ;CLR MODE, OLD MODE
FFC9: 84 31     1099          STY   MODE       ;  TO A-REG
FFCB: 60        1100          RTS              ; GO TO SUBR VIA RTS
FFCC: BC        1101 CHRTBL   DFB   $BC        ;F("CTRL-C")
FFCD: B2        1102          DFB   $B2        ;F("CTRL-Y")
FFCE: BE        1103          DFB   $BE        ;F("CTRL-E")
FFCF: ED        1104          DFB   $ED        ;F("T")
FFD0: EF        1105          DFB   $EF        ;F("V")
FFD1: C4        1106          DFB   $C4        ;F("CTRL-K")
FFD2: EC        1107          DFB   $EC        ;F("S")
FFD3: A9        1108          DFB   $A9        ;F("CTRL-P")
FFD4: BB        1109          DFB   $BB        ;F("CTRL-B")
FFD5: A6        1110          DFB   $A6        ;F("-")
FFD6: A4        1111          DFB   $A4        ;F("+")
FFD7: 06        1112          DFB   $06        ;F("M") (F=EX-OR $B0+$89)
FFD8: 95        1113          DFB   $95        ;F("<")
FFD9: 07        1114          DFB   $07        ;F("N")
FFDA: 02        1115          DFB   $02        ;F("I")
FFDB: 05        1116          DFB   $05        ;F("L")
FFDC: F0        1117          DFB   $F0        ;F("W")
FFDD: 00        1118          DFB   $00        ;F("G")
FFDE: EB        1119          DFB   $EB        ;F("R")
FFDF: 93        1120          DFB   $93        ;F(":")
FFE0: A7        1121          DFB   $A7        ;F(".")
FFE1: C6        1122          DFB   $C6        ;F("CR")
FFE2: 99        1123          DFB   $99        ;F(BLANK)
FFE3: B2        1124 SUBTBL   DFB   BASCONT-1
FFE4: C9        1125          DFB   USR-1
FFE5: BE        1126          DFB   REGZ-1
FFE6: C1        1127          DFB   TRACE-1
FFE7: 35        1128          DFB   VFY-1
FFE8: 8C        1129          DFB   INPRT-1
FFE9: C3        1130          DFB   STEPZ-1
FFEA: 96        1131          DFB   OUTPRT-1
FFEB: AF        1132          DFB   XBASIC-1
FFEC: 17        1133          DFB   SETMODE-1
FFED: 17        1134          DFB   SETMODE-1
FFEE: 2B        1135          DFB   MOVE-1
FFEF: 1F        1136          DFB   LT-1
FFF0: 83        1137          DFB   SETNORM-1
FFF1: 7F        1138          DFB   SETINV-1