$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 |