ZXTape! 0Created with Ramsoft MakeTZXWorm '=  Worm  4:4:4: o10 ,0;2;7;1;" Worm ";2;7;0;"is loading (please wait). " (1,10 2N"Graphics""a"::"Screen":19,0;"Worm":4:4:"" <  Worm  QnGraphics PXiR?`<<>>BB<Screen @e<<<<<<x88888DDD8B88BBB@BB(8D8888x88D8h0DD B@BD(DDDDBZDDBBB@B<$8Dx8D:<$8 x8D><<<< xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx tWorm 'Y6Worm  P.Makinson & J.Wilson 1983 3:3: G10 ,5;7;2;1;"Press any key to play."  0  High=0 tscore=0  Worm  life=5 ,score=0:sheet=1:len=10 row=11 :column=1 q(400):w(400) p=1:j=1 r=11 :c=1 (m$="":a$="8" -2:4:4: /90,8;0;"HIGH=";High;" Sheet=";sheet 11,0;7;0;" Score=0000000";1,(14-score);7;0;score;" Lives left=";life 2>2,0;0;"" 400len=399 1000 a$=300, <"5"Ŧ>"8"300, a$= a$="5"m$="" a$="8"m$="" a$="6"m$="" a$="7"m$="" ,r=row:c=column 6row=row+(a$="6")-(a$="7") @!column=column+(a$="8")-(a$="5") J/(row,column)=39'2000:340T O$(row,column)34"2050 Tr,c;1;"" Yrow,column;1;m$ ^f  1000 =a$570: <"5"Ŧ>"8"570: a$= a$="5"m$="" a$="8"m$="" &a$="6"m$="" 0a$="7"m$="" :r=row:c=column Drow=row+(a$="6")-(a$="7") N!column=column+(a$="8")-(a$="5") X/(row,column)=39'2000:605] [$(row,column)34"2050 ] 1000 br,c;1;"" lrow,column;1;m$ q(j),w(j);2;" "  j=j+1 j=401j=1  500 q(p)=r w(p)=c  p=p+1 p=401p=1  score=score+5 tscore=tscore+5 .1}L,30 Mscore/10000'=(score/10000')life=life+1:.5,0 Sscore=10000000score=0:1,7;0;7;"0000000"  tscore=250len=len+2:row,column;2;" ":sheet=sheet+1:tscore=0:score=score+100d:f=1202:.1}L,f:f:25  21004  r,c;1;""  life=life-1 1,-10  Flife=0f=201-2:.1}L,f:f:9000(# *21004:2150f >51,(14-score);0;7;score H*1,28;0;7;life W kf=jj+len+1 mf=4012171{ pq(f),w(f);" " zf |%n=1(j+len+1)-400 ~q(n),w(n);2;" ":n r,c;2;" " r=11 :c=1 m$="":a$="8" p=1:j=1 )row=11 :column=1:190 #(3:0:3: #2::: #<score>HighHigh=score #>::: #A"YOU SCORED ";score #B:"YOU REACHED SHEET ";sheet #ZJhigh=score:::7;1;"A new high score":1,10 #)#0;"DO YOU WANT ANOTHER GAME Y/N" #="y"Ŧ="Y"7 #="n"Ŧ="N"0 # 9140#