TRAIN_UDGsB7#B.DÿdêTrainspotter Game UDGs by Christiaan Coenraad from Your Sinclair #8 (Aug'86V) #(”ä208Ð,208Ð,200È,228ä,115s,568,31,15,0,0,0,0,255ÿ,0,255ÿ,255ÿ #)šä11 ,11 ,19,39',206Î,28,248ø,240ð,60<,126~,255ÿ,255ÿ,255ÿ,255ÿ,126~,60< #*“ä255ÿ,255ÿ,0,18,27,0,63?,127,252ü,254þ,14,7,7,0,253ý,253ý #+¡ä255ÿ,255ÿ,255ÿ,255ÿ,255ÿ,127,254þ,253ý,253ý,225á,195Ã,255ÿ,255ÿ,127,255ÿ,255ÿ #,™ä63?,127,112p,224à,224à,0,191¿,191¿,255ÿ,255ÿ,0,72H,216Ø,0,252ü,254þ #-¡ä191¿,135‡,195Ã,255ÿ,255ÿ,254þ,255ÿ,255ÿ,255ÿ,255ÿ,255ÿ,255ÿ,255ÿ,254þ,127,191¿ #.™ä255ÿ,255ÿ,0,82R,219Û,192À,223ß,255ÿ,224à,240ð,579,27,27,3,251û,251û #/ ä127,127,127,127,63?,127,253ý,248ø,255ÿ,255ÿ,254þ,248ø,248ø,240ð,248ø,248ø #0—ä224à,255ÿ,255ÿ,255ÿ,224à,224à,224à,224à,7,255ÿ,255ÿ,255ÿ,7,7,7,7 #1žä204Ì,190¾,247÷,125},231ç,189½,151—,239ï,224à,64@,127,255ÿ,255ÿ,127,59;,16 #2Nä255ÿ,82R,210Ò,222Þ,255ÿ,255ÿ,221Ý,8 #7 å9000(# #<ëa=0Ì167§ #Fãb #P ôÀ"a"+a,b #Zóa #d ï"TRAINSPOT" ¯TRAINSPOT 88z:ÿXêThe Trainspotter Game by Christiaan Coenraad from Your Sinclair #8 (Aug'86) bén(2):él(2):ém(2):éq$(3,6,4):ñz=0:ñi=0:ñj=3 Ú0:ç0:Ü1:û êset up screen # ño=0 (ëa=0Ì31 29Ù4:õ¬6,a;"¢";¬13 ,a;"¢";¬20,a;"¢" <óa Aí5000ˆ+(z*502) B'õ¬21,0;Ù7;"TIME: ";h C)õ¬21,10 ;Ù7;"LIVES: ";j D)õ¬21,20;Ù7;"SCORE: ";i E[õ¬8,0;Ù6;v$:ò0:õ¬8,0;" " Fún(1)=0Ëì110n Pëa=13 Ì17 ZGÙ4:õ¬a,l(1)+1;" ¡":ún(1)=1Ëóa:ì110n dõ¬a,l(2)+1;" ¡":óa nún(2)=0Ëì150– xëa=6Ì10 ‚GÙ4:õ¬a,m(1)+1;" ¡":ún(2)=1Ëóa:ì150– Œõ¬a,m(2)+1;" ¡":óa –ëa=0Ì26Í5  EÙ5:úaÉl(1)ÆaÉl(2)Ëõ¬14,a;"‘‘’":ño=o+1 ª;úaÉm(1)ÆaÉm(2)Ëõ¬7,a;"‘‘’":ño=o+1 ´ õ¬0,a;"‘‘’":ño=o+1 ¾óa È êmain game Òpñp=31:ñq=4:ñr=1:ñg=0:ñe=0:ñf=0:ñt=0:ñs=0:ñy=19:ñx=0 Ü&Ù7:õ¬y,x;"žŸ";¬y-1,x;"œ" á Ù7 âúfÉ1Ëì233é ãPñh=h-1:õ¬21,6;" ";¬21,6;h:úhÉ0Ëì233é ä í8000@ åúi=0Ëì2 æ ì10 é.ú(yÉ19ÆyÉ12 ÆyÉ5)Ëì270 ëúxÉ29Ëì240ð ì!úg=1Ëí7000X:ì10 ðXú¦="z"Æx>0Ëõ¬y,x;" ";¬y-1,x;" ":ñx=x-1:õ¬y,x;"–—";¬y-1,x;"”•" úYú¦="x"Æx<30Ëõ¬y,x;" ";¬y-1,x;" ":ñx=x+1:õ¬y,x;"š›";¬y-1,x;"˜™"  ì3106 ú¦É"o"Ëì290" Iõ¬y,x;Ù4;" ¡":ñy=y-1:õ¬y,x;"žŸ";¬y-1,x;"œ":ì600X "ú¦É"k"Ëì600X ,Qõ¬y-1,x;Ù4;" ¡":ñy=y+1:õ¬y,x;"žŸ";¬y-1,x;"œ":ì600X 6ú¦É"o"Ëì500ô @Dú«(y-2,x)É68DÅ«(y-2,x+1)É68DËì340T JRõ¬y,x;" ";¬y-1,x;" ":ñy=y-2:õ¬y,x;"žŸ";¬y-1,x;"œ":ì225á TŽúx=0Å«(y-5,x-1)É69EÅ«(y-5,x)É69EÅ«(y-5,x+1)É69EÅ«(y-5,x+2)É69EËì225á hëa=1Ì4 rBõ¬y,x;" ":ñy=y-1:õ¬y,x;"žŸ";¬y-1,x;"œ":óa:ò25 |ëa=1Ì4 Búe=1Ëõ¬t,s;Ù5;"‘‘’";¬t+1,s;" ":ñt=t-1 †/õ¬y-1,x-1;Ù6;Ü0;"" õ¬y,x-1;Ù5;" ’" š-õ¬y,x;"œ";¬y+1,x;"žŸ":ñy=y+1:óa ¤Bõ¬y-1,x-1;" œ ";¬y-2,x-1;Ù5;"‘‘’" ®%ñe=1:ñt=y-2:ñs=x-1 ¸=ña=º(y/5):ñb=((x-1)/5)+1:ñb$=q$(a,b) Â4õ¬y-4,x-1;Ù2;Ú6;Ü0;b$ ÌNúb$="trai"Ëñf=1:õ¬y-4,x-1;Ù2;Ú6;Ü0;" £¤ " Öúb$Éa$Ëñg=0:ì600X àñg=1:ì600X ó ì600X ôú¦É"k"Ëì600X þDú«(y+4,x)É68DÅ«(y+4,x+1)É68DËì600X Rõ¬y,x;" ";¬y-1,x;" ":ñy=y+2:õ¬y,x;"žŸ";¬y-1,x;"œ":ì225á Xõ¬q,p;Ù0;" " b2úp=0Ëõ¬q-1,0;" ";¬q,0;" " c6úp=0ÆyÉ5ÆyÉ12 ÆyÉ19Ëì225á d'úp=0Ëñq=y:ñr=0:ñp=31 lúr=1Ëì640€ vCñq=q-1:ñp=p-1:õ¬q,p;Ù2;"“":ñr=1:ì650Š €8ñq=q+1:ñp=p-1:õ¬q,p;Ù2;"“":ñr=0 ŠúxÉpÆx+1ÉpËì225á ”úyÉqÆy-1ÉqËì225á ž í8000@ ¨új=0Ëì2 ² ì10 ‡â ˆ êscreen1 ’Jñh=250ú:ñn(1)=2:ñl(1)=5:ñl(2)=20 œ>ñn(2)=1:ñm(1)=10 :ñm(2)=30 ¦7ña$="1024":ñv$="ONE KILOBYTE =....BYTES":í6000p:þ ºJñh=250ú:ñn(1)=1:ñl(1)=5:ñl(2)=30 Ä=ñn(2)=2:ñm(1)=15:ñm(2)=0 Î6ña$="SICK":ñv$="(ED.) COMMENTS ARE....":í6000p:þ ìKñh=200È:ñn(1)=1:ñl(1)=15:ñl(2)=30 ö>ñn(2)=2:ñm(1)=15:ñm(2)=25 1ña$="WIMP":ñv$="TRAMIEL IS A ....":í6000p:þ Jñh=200È:ñn(1)=2:ñl(1)=5:ñl(2)=15 (>ñn(2)=2:ñm(1)=10 :ñm(2)=20 2:ña$="MEGA":ñv$="THIS PROGRAM IS PRETTY....":í6000p:þ Z=ñn(2)=1:ñm(1)=5:ñm(2)=30 d<ña$="T.P.":ñv$="THE INITIALS OF T.P. ARE....":í6000p:þ ‚Kñh=150–:ñn(1)=2:ñl(1)=10 :ñl(2)=25 Œ=ñn(2)=1:ñm(1)=0:ñm(2)=30 –6ña$="MORE":ñv$="TONY SAMUELS WANTS....":í6000p:þ ´Kñh=100d:ñn(1)=1:ñl(1)=15:ñl(2)=30 ¾=ñn(2)=2:ñm(1)=5:ñm(2)=25 È?ña$="LESS":ñv$="1 IS MORE OR THE LESS....THAN 2":í6000p:þ p êquestions z2å6070¶:ëa=1Ì3:ëb=1Ì6 „ ãq$(a,b) Žób:óa ˜&ëa=1Ì3:ëb=1Ì6 ¢Añc=º(¥*3)+1:ñd=º(¥*6)+1:ñq$(a,b)=q$(c,d) ¬ób:óa ¶ä"HAI!","BYE!","YES?","WHY?","#%!*","HIP!","HAP!","HOP!","FOUL"," NO ","STOP","SHY?","MEAN","WILD","^UP^","DOWN","(ED)","CHAP" Àëk=1Ì4 Ê0ñc=º(¥*3)+1:ñd=º(¥*6)+1 ÔúkÉ4Ëñq$(c,d)="trai":ók Þ1ña=º(c/5):ñb=((d-1)/5)+1 èCúa=3Æ(b=l(1)-1Åb=l(2)-1)Ëì6090Ê òCúa=2Æ(b=m(1)-1Åb=m(2)-1)Ëì6090Ê üñq$(c,d)=a$:ók þ X êgehaald b5õ¬8,10 ;Ù7;Û1;"YOU MADE IT !" l#ñz=z+1:úz=7Ëñz=0 qñi=i+h v&ëa=0Ì30:×.05|LÌÌÌ,a:óa:þ @êdood J1õ¬8,12 ;Ù7;Û1;"OH DEAR !" T ñj=j-1 ^ñi=i+h h-ëa=30Ì10 Í-1:×.1}LÌÌÌ,a:óa r újÉ0Ëþ wû |ëa=1Ì7 †<õ¬7,0;Ùa;" ANOTHER TRY ? "  ú¦="y"Ëþ • ò2 šóa ¤ ì8060| ³