... 30 READ A$,A: LET T=0
40 LET C=F+ ...
50 LET B=(CODE A$(G*2-1)- ... 60 POKE D,B
70 LET T=T+B: LET D ... 64995[/COLOR][/B] THEN LET D=65280
90 ... /> 100 IF T-A THEN PRINT "Error in line "; ... c: STOP
110 PRINT "Line ";c;" OK"
...

... : LET C=14
125 REM GRAPHICS IN 130
130 PRINT ... AT 10,C;"ABC";AT 11,C;"DEF"
140 POKE ... 23692,255
200 GO SUB 2000
210 LET A$=INKEY ... 400
240 LET C=C1
250 PRINT PAPER 8;AT ...

... CODE] 10 CLEAR 49151: LET T=0: LET W=0: FOR F ... =47872 TO 48010
20 READ A: POKE ... F,A
30 LET T=T+A*W: LET W=W ... "]1115999[/COLOR][/B] THEN PRINT "CHECKSUM ERROR, PLEASE RE ... ": STOP
60 PRINT AT 10,1;"Play RENEGADE ...

... at once.... and got me a slap on the wrist lol ... )
30 LET T(1)=2: LET Y(1)=10: LET X(1 ...
40 LET T(2)=10: LET Y(2)=20: LET X(2 ... : LET C(2)=3: LET G(2)=142
50 POKE 23672,0: POKE ... 23673,0: LET CT=1: CLS ...

... this was supposed to be a 'Space docking simulation' (snigger snigger ... set the background to something a bit more outer space like ... : LET C(2)=3: LET G(2)=142
50 POKE 23672,0: POKE ... 23673,0: LET CT=1:[COLOR ...

... is fizzbuzz

added a start menu where you can ... keys

There is a annoying beep i added to ... redefining keys...
(will add a flashing message.)

Will ... )=142
50 POKE 23672,0: POKE 23673,0: LET CT=1: PAPER ...

... CLEAR 49151
20 LET T=0: LET W=0
30 ...
40 READ A: POKE L,A: LET T=T+A*W: LET W=W+1 ...
60 IF T1243247 THEN PRINT "CHECKSUM ERROR, TRY AGAIN": STOP ...
70 PRINT AT 10,2;"Play ATHENA ...

... ,1,142
50 POKE 23672,0: POKE 23673,0
60 ... ) THEN
LET t(n)=m(n): PRINT g$(n): LET g=CODE ... : PRINT #0;AT 1,0;m(2),
78 LET b=(a$="6")-(a ... $="7"): IF b THEN
PRINT g$(n): LET g ...

Interesting

[CODE] 2 dec = 00000010 in binary
34 dec = 00100010 in binary
162 dec = 10100010 in binary

where the data bits are
MSD -> 76543210

... LET T=0
30 FOR N=23307 TO 23430: READ A: LET ... T=T+A: POKE N,A: NEXT N
PRINT "CHECKSUM ERROR": STOP
50 ... N=N TO 1e9: READ A: IF A

... a dash of 8 pixels per byte.
Try POKE- ... need frequently, we'll let the computer choose where to ... empty stack
To print a black road we need 0 ... save road posn
xor a ;print new road
ld ( ... save road posn
xor a ;print new road
ld ...

... ] 10 CLEAR 65000
20 LET T=0
30 FOR ... TO 64316: READ A
40 POKE N,A: LET T=T+A: NEXT N ...
50 IF T12120 THEN PRINT ... N=N TO 1E9: READ A: IF A

...
20 CLEAR 28000: LET S=0: LET T=0
30 ... FOR I=23296 TO 23334: READ A: POKE ... I,A: LET T=T+A: NEXT I
40 IF T4868 THEN PRINT ... [/COLOR][/B] TO 1E9: READ A
60 IF ...

... u+7:
LET p=PEEK b: LET i=INT (p/ ... ): LET dr=d(p-i*16+1):
POKE a,dl: POKE a+1 ... ,dl:
POKE a+16,dr: POKE a+17,dr:
LET a=a+2 ... poking the display file to print the expanded characters the ...

... LET T=0: FOR N=65000 TO 65108: READ A: POKE N,A: LET T ... =T+A: NEXT N
30 IF T11835 THEN PRINT ...

... : LET a$(a)=CHR$ (PEEK (65399+a)): NEXT a
25 FOR a=1 TO dims: PRINT a$((a ... /> 35 FOR a=65425 TO 65449: POKE a-25,PEEK a: NEXT a
40 ...

... br /> LET l=FN p(p+2,+1)+4:
POKE 23620 ... ,10+(2 AND NOT FN i(n,a,z ... )):
[color=green] PRINT n,l:[/color]
LET t ... /> [color=green] LET p=p+l:[/color]
POKE 23620,14-(7 ...

... ]IF a$(a+b-1)" " THEN LET a$(xs TO xs+b-1)=a$(a TO a ... : LET xa=xa+1[/color]
9935 NEXT a
9940 PRINT "Old ... size = ";t: LET t=xs-1:
9942 POKE ... ):[/color]
[color=blue]PRINT a;TAB 3;a$(s TO s+CODE ...

[code]
REM CAT!RAM print the RAMdisk catalogue & file ... : POKE 23388,16+7:
REM RAMdisk catalogue: file name
LET a=a ... )=3 THEN
PRINT
9945 NEXT n: POKE 23388,16+0 ...

... /> [CODE]
1 let a=0.5
2 print a[/CODE]
and ... />
Yep... code #34 uses a slightly different scheme from the ... mean that the bytes to poke into BASIC are 7b 49 ...

... (BTW, there is a cracked/corrected/compressed version around ... 30 CLEAR 32767: LET B=1: LET D=32767
LET T=0: FOR N=1 TO 1E9: READ A: IF A ... A THEN PRINT "DATA ERROR IN BLOCK ";B: STOP
70 LET ... B=B+1: LET D=D+ ... INK 0: CLS : PRINT #0; INK 2; ...

... ]
2005 PRINT "'H' prefix for hex byte input": POKE 23658,8 ... "b" THEN STOP
2010 PRINT AT 21,0'
2011 ... i=1 TO 5:
POKE p,CODE "AEDCB"(i): INPUT ... i(0,LEN n$): LET A=b(i): PRINT CHR$ PEEK p;"=";b ...

... 've tidied up the display a bit (aligning the numbers) ... and added a couple of little progress indicators ... decodes the FP value into a decimal string and then replaces ... 900 : LET pt=k0: POKE 23658,k8: LET q$="":
LET iq=k0: LET db ...

- Yesterday I drew a room and an 8x8 ... 1030 READ g
1040 POKE 65368+j,g
1050 ... ,0
1110 REM print background
1120 FOR ... j=0 TO 15: PRINT AT j,0;CHR$ ... LET x=1: LET y=1: LET xo=1: LET yo=1: PRINT AT ... character
2020 LET xo=x: LET yo=y
...

... tonight working round a bug on my keyboard where ... /> 1030 READ g
1040 POKE 65368+j,g
1050 ... ,4,6
1110 REM print background
1120 FOR j ... =0 TO 15: PRINT AT j,0;CHR$ 143 ... : LET x=1: LET y=1: LET xo=1: LET yo=1: LET d=0: PRINT ...

... last version. This counts as a working demo of sorts.
1030 READ g
1040 POKE 65368+j,g
1050 ... : LET x=1: LET y=1: LET xo=1: LET yo=1: LET d=0: PRINT ... LET nx=5: LET ny=5: LET nxo=5: LET nxy=5: LET nd=0: PRINT ...

... !

- Made a start on combat last night ... is faster than doing a PLOT and a DRAW. When it ... to the missile weapon (a rock) anyone know whether ... 1030 READ g
1040 POKE 65368+j,g
1050 ... LET nx=5: LET ny=5: LET nxo=5: LET nxy=5: LET nd=0: PRINT ...

- Added a nest of bracketed conditionals (line ... =0 TO 31: READ g: POKE 65368+j,g: NEXT j ... print background
1220 INK 6: LET x=3: LET y=3: LET ... xo=3: LET yo=3: LET d=0: PRINT ... LET nx=5: LET ny=5: LET nxo=5: LET nxy=5: LET nd=0: PRINT ...