$A642/42562: Perform [new]
A642: D0 FD BNE $A641 ; Search for Line Number
Jump from $E444:
A644: A9 00 LDA #$00
A646: A8 TAY
A647: 91 2B STA ($2B),Y ; Pointer: Start of BASIC Text Area
A649: C8 INY
A64A: 91 2B STA ($2B),Y ; Pointer: Start of BASIC Text Area
A64C: A5 2B LDA $2B ; Pointer: Start of BASIC Text Area
A64E: 18 CLC
A64F: 69 02 ADC #$02
A651: 85 2D STA $2D ; Pointer: Start of BASIC Variables
A653: A5 2C LDA $2C ; Pointer: Start of BASIC Text Area
A655: 69 00 ADC #$00
A657: 85 2E STA $2E ; Pointer: Start of BASIC Variables
Jump from $A4ED, $A52A, $A87A:
A659: 20 8E A6 JSR $A68E ; Reset TXTPTR
A65C: A9 00 LDA #$00
Previous Page / Next Page
Kernal-Reference:
BIT $A650 : $EFC4