Apple ii Battery Charger User Manual


 
0303 81A0 9D 07 01 STA $0107,X
0304 81A3 BD 08 01 LDA $0108,X
0305 81A6 9D 04 01 STA $0104,X
0306 81A9 BD 06 01 LDA $0106,X
0307 81AC 9D 08 01 STA $0108,X
0308 81AF 98 TYA
0309 81B0 9D 06 01 STA $0106,X
0310 81B3 68 PLA
0311 81B4 AA TAX
0312 81B5 68 PLA
0313 81B6 28 PLP
0314 81B7 60 M15 RTS
0315 81B8 ; RESTORE EXCEPT A,F
0316 81B8 08 RESXAF PHP
0317 81B9 BA TSX
0318 81BA 9D 04 01 STA $0104,X
0319 81BD 28 PLP
0320 81BE ; RESTORE EXCEPT F
0321 81BE 08 RESXF PHP
0322 81BF 68 PLA
0323 81C0 BA TSX
0324 81C1 9D 04 01 STA $0104,X
0325 81C4 ; RESTORE ALL 100%
0326 81C4 68 RESALL PLA
0327 81C5 A8 TAY
0328 81C6 68 PLA
0329 81C7 AA TAX
0330 81C8 68 PLA
0331 81C9 28 PLP
0332 81CA 60 RTS
0333 81CB ;
0334 81CB ; MONITOR UTILITIES
0335 81CB ;
0336 81CB C9 20 ADVCK CMP #$20 ;SPACE?
0337 81CD F0 02 BEQ M1
0338 81CF C9 3E CMP #'>' ;FWD ARROW?
0339 81D1 38 M1 SEC
0340 81D2 60 RTS
0341 81D3 20 FA 82 OBCMIN JSR OUTBYT ;OUT BYTE, OUT COMMA, IN BYTE
0342 81D6 20 3A 83 COMINB JSR COMMA ;OUT COMMA, IN BYTE
0343 81D9 20 1B 8A INBYTE JSR INCHR
0344 81DC 20 75 82 JSR ASCNIB
0345 81DF B0 14 BCS OUT4
0346 81E1 0A ASL A
0347 81E2 0A ASL A
0348 81E3 0A ASL A
0349 81E4 0A ASL A
0350 81E5 8D 33 A6 STA SCR3
0351 81E8 20 1B 8A JSR INCHR
0352 81EB 20 75 82 JSR ASCNIB
0353 81EE B0 11 BCS OUT2
0354 81F0 0D 33 A6 ORA SCR3
0355 81F3 18 GOOD CLC
0356 81F4 60 RTS
0357 81F5 C9 3A OUT4 CMP #':' ;COLON ?
0358 81F7 D0 05 BNE OUT1
0359 81F9 20 1B 8A JSR INCHR
0360 81FC D0 F5 BNE GOOD ;CARRIAGE RETURN?
0361 81FE B8 OUT1 CLV
0362 81FF 50 03 BVC CRCHK
0363 8201 2C 04 82 OUT2 BIT CRCHK
0364 8204 C9 0D CRCHK CMP #$0D ;CHECK FOR C/R