1 :' Thing Bounces Back - tape
2 :' by Peter Featherstone
3 :' 080
10 MODE 1: MEMORY &1FFF
20 LOAD"!",&2000: POKE &2005,&5E
30 POKE &2006,&3
40 FOR f=&350 TO &400: READ a$
50 IF a$="BOING" THEN 70
60 NEXT f
70 CALL &350
80 DATA 21,00,20,11,00,01,01,00
90 DATA 02,ed,b0,c3,00,01,af
100 DATA 32,f4,a3 ' panics
110 DATA 32,08,b0,32,ff,af ' slinkies
120 DATA 32,19,92 ' oil
130 DATA 3e,c9,32,35,93 ' lives
140 :'leave following line
150 DATA c3,00,88,BOING

1 :'Thing Bounces Back - Disk
2 :'by Declan Kennedy
3 :' 081
10 MODE 1: TOTAL=0
20 FOR x=&40 TO &6A
30 READ A$:A=VAL("&"+A$)
40 POKE X,A:TOTAL=TOTAL+A
50 NEXT
60 IF TOTAL<>2799 THEN PRINT CHR$(7);"DATA ERROR":END
70 PRINT "PLACE THING IN DISK DRIVE":PRINT"AND PRESS ANY KEY":CALL &BB18
80 CALL &40
90 DATA 21,69,00,CD,D4,BC,79,22
100 DATA 80,00,32,82,00,21,00,01
110 DATA 11,00,00,0E,41,DF,80,00
120 DATA 21,61,00,22,05,01,C3,00
130 DATA 01,3E,00,32,19,92,C3,00
140 DATA 88,84,00