Files
basicinterpreter/basicruntime_commands.go
Andrew Kesterson a0e6d4a899 POKE is in progress but doesn't work correctly yet.
LIST
5 A# = 123456
10 GOTO 60
20 FOR I# = 0 TO 8
30 B# = POINTER(A#)+I#
40 PRINT PEEK(B#)
50 NEXT I#
55 RETURN
60 B# = POINTER(A#)
70 POKE B#, 255
80 B# = B# + 1
90 POKE B#, 0
100 B# = B# + 1
110 POKE B#, 0
120 PRINT A#
125 GOSUB 20
RUN
addr: 824635009832
Before set: 64
After set: 255
addr: 824635009833
Before set: 171
After set: 0
addr: 824635009834
Before set: 19
After set: 0
123456
64
226
1
0
0
0
0
0
0
2025-06-27 23:35:32 -04:00

13 KiB