Prev: B7F7 Up: Map Next: B824
B80D: perform PEEK()
B80D A5 15 LDA $15 get line number high byte
B80F 48 PHA save line number high byte
B810 A5 14 LDA $14 get line number low byte
B812 48 PHA save line number low byte
B813 20 F7 B7 JSR $B7F7 convert FAC_1 to integer in temporary integer
B816 A0 00 LDY #$00 clear index
B818 B1 14 LDA ($14),Y read byte
B81A A8 TAY copy byte to A
B81B 68 PLA pull byte
B81C 85 14 STA $14 restore line number low byte
B81E 68 PLA pull byte
B81F 85 15 STA $15 restore line number high byte
B821 4C A2 B3 JMP $B3A2 convert Y to byte in FAC_1 and return
Prev: B7F7 Up: Map Next: B824