This protection system was quite clever. It used certain registers set by commands in the Basic program - quite a neat touch. Anyway, here's a routine for infinite time. Play the tape from the start.

This hack does not work. Upon running it you will get the dreaded 'DATA ERROR' message, because the final checksum does not match the final number for all the data lines.

10 LET T=0
20 FOR F=23296 TO 23454
30 READ A : POKE F,A
40 LET T=T+(F-23286) * A : NEXT F
50 IF T<>1681107 THEN PRINT "DATA
ERROR - RECHECK DATA LINES" :
STOP
60 RANDOMIZE USR 23296
70 DATA 221,33,203,92,17
80 DATA 130,2,62,255,55
90 DATA 205,86,5,48,241
100 DATA 221,33,77,95,33
110 DATA 171,93,17,0,80
120 DATA 1,18,0,237,176
130 DATA 235,54,16,35,54
140 DATA 236,35,54,201,33
150 DATA 189,93,17,118,200
160 DATA 1,118,27,205,0
170 DATA 80,49,151,99,229
180 DATA 33,217,93,54,195
190 DATA 35,54,70,35,54
200 DATA 91,225,195,194,93
210 DATA 17,0,75,229,197
220 DATA 33,221,93,1,13
230 DATA 0,237,176,235,54
240 DATA 16,35,54,241,35
250 DATA 54,201,193,225,17
260 DATA 154,99,205,0,75
270 DATA 175,50,242,93,205
280 DATA 236,93,62,195,50
290 DATA 157,254,33,128,91
300 DATA 34,158,254,195,232
310 DATA 254,53,95,49,16
320 DATA 13,11,23,62,195
330 DATA 50,202,254,33,148
340 DATA 91,34,203,254,33
350 DATA 205,83,17,107,50
360 DATA 195,164,254,49,151
370 DATA 99,62,201,50,84
380 DATA 172,195,205,254