$B7B5/47029: Convert ASCII String to Flpt
Jump from $B7B0:
B7B5: A6 7A LDX $7A ; Pointer: Current Byte of BASIC Text
B7B7: A4 7B LDY $7B ; Pointer: Current Byte of BASIC Text
B7B9: 86 71 STX $71 ; Pointer: Used during CRUNCH/ASCII conversion
B7BB: 84 72 STY $72 ; Pointer: Used during CRUNCH/ASCII conversion
B7BD: A6 22 LDX $22 ; Second Utility Pointer
B7BF: 86 7A STX $7A ; Pointer: Current Byte of BASIC Text
B7C1: 18 CLC
B7C2: 65 22 ADC $22 ; Second Utility Pointer
B7C4: 85 24 STA $24 ; Second Utility Pointer
B7C6: A6 23 LDX $23 ; Second Utility Pointer
B7C8: 86 7B STX $7B ; Pointer: Current Byte of BASIC Text
B7CA: 90 01 BCC $B7CD
B7CC: E8 INX
Jump from $B7CA:
B7CD: 86 25 STX $25 ; Second Utility Pointer
B7CF: A0 00 LDY #$00
B7D1: B1 24 LDA ($24),Y ; Second Utility Pointer
B7D3: 48 PHA
B7D4: 98 TYA
B7D5: 91 24 STA ($24),Y ; Second Utility Pointer
B7D7: 20 79 00 JSR $0079 ; CHRGOT: Get same Byte again
B7DA: 20 F3 BC JSR $BCF3 ; Convert ASCII String to a Number in FAC
B7DD: 68 PLA
B7DE: A0 00 LDY #$00
B7E0: 91 24 STA ($24),Y ; Second Utility Pointer
Jump from $AC80, $AEC9:
B7E2: A6 71 LDX $71 ; Pointer: Used during CRUNCH/ASCII conversion
B7E4: A4 72 LDY $72 ; Pointer: Used during CRUNCH/ASCII conversion
B7E6: 86 7A STX $7A ; Pointer: Current Byte of BASIC Text
B7E8: 84 7B STY $7B ; Pointer: Current Byte of BASIC Text
B7EA: 60 RTS
Previous Page / Next Page