Prev: 4000 Up: Map Next: 5CCB
5B01: Bootstrap Workspace
Tape payload for Run_Bootstrap. The first 3E bytes replace the decoy line at PROG with the opening of BASIC line 15; the two words that follow feed reclaim and NEWPPC.
BASIC line header (big-endian line number, little-endian length).
Bootstrap_Workspace 5B01 DEFB $00,$0F Line number 0F (15).
5B03 DEFB $6F,$00 Length 6F (body continues past this copy into PROG).
Start of line 15 body (tokens), copied over PROG: PAPER R: CLS: PRINT AT 6,9;"HOWDY PARDNER!": PRINT: PRINT TAB 4;"WHAT ".
5B05 DEFB $DA,$52,$3A,$FB,$3A,$F5,$AC,$36
5B0D DEFB $0E,$00,$00,$06,$00,$00,$2C,$39
5B15 DEFB $0E,$00,$00,$09,$00,$00,$3B,$22
5B1D DEFB $48,$4F,$57,$44,$59,$20,$50,$41
5B25 DEFB $52,$44,$4E,$45,$52,$21,$22,$3A
5B2D DEFB $F5,$3A,$F5,$AD,$34,$0E,$00,$00
5B35 DEFB $04,$00,$00,$3B,$22,$57,$48,$41
5B3D DEFB $54,$20
End address for RECLAIM-1, read at E974.
Bootstrap_Reclaim_End 5B3F DEFW $0000
Line number written to NEWPPC (270F = 9999).
Bootstrap_New_Line 5B41 DEFW $270F
Prev: 4000 Up: Map Next: 5CCB