ZXTape! 0Created with Ramsoft MakeTZXdriver11 ppO$r 0:0:0  0,0;" " "fas" #0,0;" " ("d11" vfas @ V*B<<|<<<<<B<BB>@~@<<B~|@<$B>~~~<<~B>>~3600sy2=3580 :3045 a803000 asp=42:10 ,23;"";0;9 ,23;"O";8,23;"O";7,23;"O":0:(a8=0a14=1)rd=14:8,23;"":0:10 ,23;"O" asp=4180,124|:15,0:0,-40(:-15,0:0,40(:185,84T:0,-25:5,0:0,25 73,14;":";3,17;":":83S &17,2;0;"AWS" I14,91[:-1,0:0,4:-8,0:0,-32 :8,0:0,12 :1,0:rd=0rd=1(grad=0(grad=-1500))14,91[:16,0:0,-16:-16,0:16,88X:0,-8:5,0 1 2000 2"uv=(63000+(mp*10 )) 3#uv1=(63001+(mp*10 )) 4uv2=(mp*10 ) 5(mp=0((m=ms-1s=0)(s=0ms=0stops<3)))a3=1((63010"+uv2)>10 ƾ(63010"+uv2)<251ƾ(63011#+uv2)=0ƾ(63009!+uv2)=0)9000(# 6ma5=1((63009!+uv2)=0ƾ(63010"+uv2)=5ƾ(63011#+uv2)=0)9100# 7(mp=0(m=ms-1s=0))((uv>9 uv<195)((uv1>0uv1<10 )(uv1>0uv1=194)))(uv=10 uv1>0)4000 8uv2=195uv2=220uv2=222uv2=254uv2=256uv2=275uv2=315;uv2=400uv2=445uv2=460uv2=574>3500 9((62999+uv2)=0((63000+uv2)>0ƾ(63000+uv2)<5)ƾ(63001+uv2)=0)a8=(63000+uv2):a7=mp :?mp=0(uv>194uv<251)a8>03000 <pws=0((630240+uv2)=0ƾ(630251+uv2)=5ƾ(630262+uv2)=0)pws=(5*((*10 )+1))+10 :z$="PWS ("+pws+"mph) AT MP "+(2.5 +(uv2/10 )):1,16-(z$)/2;z$ Aruv2=11 hs=0hs=65002:ms=65003:hss=hs:mss=ms:awsb=1:a8=1:a7=.1}L Bsuv2=1hs=0hs=65000:ms=65001:hss=hs:mss=ms:awsb=1:a8=1:a7=-1.1 Fgasp6250asp=(63000+uv2)-250:asp6=mp*10 :2500 K3mph<017,13 ;mph:79O L,mph<10 17,13 ;" ";mph M9(mph10 ƺmph<100d)17,13 ;mph O1s60<s=s-60<:m=m+1:83S P%10 >s3,18;"0";s Q!s10 3,18;s R 89Y S'm60<m=m-60<:h=h+1 T%m<10 3,15;"0";m U!m10 3,15;m V!h10 3,12 ;h W%h<10 3,12 ;"0";h X Y s=s+2 Z]mph>ls+5mphls+10 c$="EXCEEDED LINE SPEED BY "+(mph-ls)+" MPH":8000@ ]Nmph>max+515,6;"EXCEEDING MAXIMUM SPEED ":a21=2 ^gmphmax+10 c$="EXCEEDED MAXIMUM SPEED BY "+(ls-max)+" MPH":8000@ jL(((m=ms-1s=2)mp=0)rd=1)7045:7545y k0rd=15,16-(a$/2);a$ lrd=1rd=0 yth=5-thr zbr=5-brf {grad=0grad=1500 }fa50=1mph>515,6;" ":1,0;s$(xstops) ~\a50=1mph>151,0;" ":a50=0 *mph=mph+(th/((5-(cls/100d)))) 3mph=mph-(2*((br+1)))-(70F/grad) &mph<0brf<5mph=0 Fgrad=1500grad=0:grad=0mph<0mph=0 =mph>20ph=mph/270:grad<0ph=ph/2 'ph.2~Lgrad=0ph=.2~L mph>20mph=mph-ph 9mph<-2c$="ROLLING BACK EXCESSIVELY":8000@ 380|+ds:a$:g GgǺ(mp*10 )5,0;" " EgǺ(mp*10 )5,16-(a$/2);a$:ds=ds+1 ,$="k"thr=thr-1:7545y 6$="o"thr=thr+1:7545y @$="a"brf=brf+1:7045 J$="q"brf=brf-1:7045 O="h"0 P="h"335O Smp=0360h Tawsb=0sy2>0sy4>0sy4-sy2<300,.1}L,9 :.1}L,9 :.1}L,9 :17,2;6;0;1;"AWS";0;0;7 UTsy4-sy2<300,sy4-sy2>0Ʀ="p"awsb=1:17,2;"AWS" _a8>0brf>0a70=1a70=0:awsb=1:15,3;" ";17,2;"AWS" `(((sy2>2400` sy2<2700 )(asp=1asp=3)awsb=0asp2>0)((sy4-sy2>900sy4-sy2<1200)(asp=2asp=4)awsb=0asp2>1))a70=019,1;" ";20,0;" ";21,0;" ":brf=0:0,8:16,16:0,0:35#,0:5,5:a70=1:15,6;" EMERGENCY BRAKE ":7040:2600( c3sy4-sy2<600Xsy4-sy2>300,awsb=0 hbrf<5th>0brf3=brf3+10 -(th+brf):brf3>100d15,6;" BRAKES OVERHEATING ":a71=1 jda71=1brf=5a71=0:brf3=0:15,6;" " l3brf3>200c$="BRAKES BURNT OUT":8000@ { 491 |"CHARING CROSS",0 }"HUNGERFORD BRIDGE",2 ~%"CROSSING THE RIVER THAMES",2 "HUNGERFORD BRIDGE",4 "SOUTH BANK",6 !"WATERLOO EAST STATION",8 ""LEAVING WATERLOO EAST",10 "NORTH SOUTHWARK",12 ""LONDON BRIDGE STATION",20 ""LEAVING LONDON BRIDGE",22 "BERMONDSEY",25 "SOUTHWARK",35# "NEW CROSS",480 "TUNNEL",535 "ST JOHN'S",58: "PARK'S BRIDGE JC",64@ "HITHER GREEN",74J #"CLIMBING TO GROVE PARK",84T "GROVE PARK",90Z  "CHISLEHURST TUNNEL",100d "ELMSTEAD WOODS",105i "CHISLEHURST",110n $"ST MARY CRAY SPUR LINE",115s "ST MARY CRAY JC",123{ "ST MARY CRAY",135 !"APPROACHING SWANLEY",150 "SWANLEY",161 "SWANLEY JC",168 ""APPROACHING EYNSFORD",173 "EYNSFORD TUNNEL",178 "LULLINGSTONE",183 "EYNSFORD",195 +"BETWEEN EYNSFORD AND SHOREHAM",195 "SHOREHAM",216 "OTFORD",231 "OTFORD ""A"" JC",237 !"CLIMBING TO KEMSING",241 "KEMSING",260 "FOLLOWING THE M26",270 "WROTHAM",286 !"DROPPING TO MALLING",301- S$(XSTOPS),316< !"APPROACHING MALLING",331K "MALLING",336P "EAST MALLING",349] "",360h ""PRESTON HALL TUNNELS",360h "BARMING",365m #"APPROACHING MAIDSTONE",380| "MAIDSTONE",383 $"MAIDSTONE EAST STATION",390 "LEAVING MAIDSTONE",392 "",400 #"CLIMBING TO BEARSTEAD",400 "BEARSTEAD",416 %"CLIMBING TOWARDS LENHAM",431 "HOLLINGBOURNE",440 %"CLIMBING TOWARDS LENHAM",460 "HARRIETSHAM",466 %"CLIMBING TOWARDS LENHAM",471 "LENHAM",489 !"DROPPING TO CHARING",499 !"APPROACHING CHARING",504 "CHARING",516 "LEAVING CHARING",526 &"DROPPING TOWARDS ASHFORD",536 "",554* S$(XSTOPS),554* "ASHFORD",5655 $"JC WITH TONBRIDGE LINE",579C )"APPROACHING ASHFORD STATION",581E "ASHFORD STATION",583G "END OF THE LINE",1000 B18,23;"MAX ";max;" ";17,20;"4-CEP ";ln (1000+cls) x=1100d  j:k:l 5j1000j-1000,k-1000:1150~  +l>0l2000j,k,l:1150~ j,k l=20001160 N1000,1008,0,16,16,0,0,23,0,23,0,0,0,-23,0,6,20,0,0,3,0,0,-3,0,83S,0,0,0,-20,0,0,23,0,24,0,0,0,-45-,0 1016,1024,0,112p,0,0,61=,34",11 ,86V,34",11 ,111o,34",11 1000,1000,0,32 ,0,0,12 ,8,0,480,0,0,-4,-8,0,40(,0,0,8,24,0,-16,0,0 0,0,2000 ~x 70:62>,23:22,0:0 t1:32 ,23:85U,0:480,45-:78N,0:0:rd=110  1999 (x=6300065900:x;" ";x:x :1550  9350$ 0:6 0mp=mp+(mph/1850:):10 ,29;mp /11 ,29;".";((mp-(mp))*10 ) 0:7:2400` ` ı11 ,20;" ";10 ,20;" ";9 ,20;" ";8,20;" ";7,20;" ";6,20;" ":(2500 +asp) Ū187,108l,7:185,100d:0,-42*:190,101e:0,-43+:-5,0:8,23;4;"";0: 180,124|:15,0:0,-24:-15,0:0,24:185,100d:0,-41):5,0:0,41):8,23;"O";7,23;4;"": 180,124|:15,0:0,-32 :-15,0:0,32 :185,92\:0,-33!:5,0:0,33!:9 ,23;"O";7,23;4;"";0;8,23;"O": ȩ180,124|:15,0:0,-40(:-15,0:0,40(:185,84T:0,-25:5,0:0,25 n8,23;4;"";0;9 ,23;"O";10 ,23;"O";7,23;"O": ( lhs=0uv>195uv<251hs=uv-195:ms=uv1-195:hss=hs:mss=ms:a7=mp:a8=1 Ja8=4cls91[sy2=(1760*(mp-a7))+1200:3021 %a8=3a16=1:3020 a8=43020 1uv=0a8=0sy2=-1:3042 Lrd=1asp43046 :a14=1asp2=-1:3046 $rd=0sy2=1760*(mp-a7) e(3600-sy2303600-sy20mph=0)a101=1a101=1:3200 (a8=4ƥ>.9ffffsy2>21004)(a8=4sy2>3200 )3401I :17,2;"AWS":awsb=0:2500 :sy2=-1:a8=0:asp2=-1:sy4=0:3045 ,ex 3038:rd=10:12,25;"in";14,25;"yds" Vsy2-3600>0c$="OVER RUN LIGHTS":awsb=1:asp2=2:8000@ ;sy2>0asp2=(sy2/1200)rd=03071 1sy2>0asp2=(sy2/1200):3045 Td$(4,1):asp=2(asp22asp2=-1)d$(4,3) z(3044 +(asp*4)+asp2):sy4:p1:c1:d$(1):p2:c2:d$(2):p3:c3:d$(3):p4:c4:d$(4) a0,6,7," ",7,2,"",8,2,"",9 ,7," " W0,0,7,"",7,4,"",8,0,"O",0,7,"" Z2400` ,0,7,"",0,7,"",7,0,"O",8,6,"" d3600,6,7," ",7,7," ",9 ,7," ",8,2,"" X0,7,4,"",8,0,"O",9 ,0,"O",0,7,"" X0,7,4,"",8,0,"O",9 ,0,"O",0,7,"" [2400` ,7,0,"O",8,6,"",9 ,0,"O",0,7,"" [3600,7,0,"O",8,0,"O",9 ,2,"",0,7,"" Z0,7,0,"O",8,4,"",9 ,0,"O",10 ,0,"O" ]1200,7,6,"",8,0,"O",9 ,6,"",10 ,0,"O" ]2400` ,7,0,"O",8,0,"O",9 ,6,"",10 ,0,"O" ]3600,7,0,"O",8,0,"O",9 ,0,"O",10 ,2,"" Osy4>0sy4-sy2>012 ,25;"in";14,25;"yds" (asp2(asp2-1asp2<2))p1,23;c1;d$(1);p2,23;c2;d$(2);p3,23;c3;d$(3);p4,23;c4;d$(4):0 ((asp=2(asp2>1asp2=-1))asp2asp5)((asp=2(asp2>1asp2=-1))rd=1)asp5=asp2:p1,20;c1;d$(1);p2,20;c2;d$(2);p3,20;c3;d$(3);p4,20;c4;d$(4);6,23;" ";7,23;" ";8,23;" ";9 ,23;" ";10 ,23;" ":0:185,85U:0,36$:5,0:0,-36$ *m9>20m9=0:asp2=-1: @sy4>0sy4-sy2>013 ,25;(sy4-sy2);" " w3600-sy2>30mph=0mp015,6;0;" ADVANCE TO SIGNAL! ":a100=1 fa100=1mph>50:15,0;" ":a100=0 c(h>hs(hhsmms-1))mss=m+1:hss=h:mss60<mss=mss-60<:hss=hss+1 0:0: a16=13600-sy230mph=0m9=m9+1:m9>20sy4=0:asp2=-1:15,6;" ROAD AHEAD CLEAR ":3401I :sy2=-1:awsb=0:a50=1:a101=0:a8=0:a16=0:3045 la16=13600-sy230mph=015,0;" AWS AWAITING CLEAR ": 'mp>58.3i333mph08000@ Uhs>0ms<10 a14=015,6;" AWAITING CLEAR " Xhs>0ms<10 1,5;"DUE TO DEPART ";hs;":0";ms;":00":3216 |hs>01,5;"DUE TO DEPART ";hs;":";ms;":00":a14=015,6;" AWAITING CLEAR " Na101=1ƺmph>2c$="MOVING WHILE PASSENGERS BOARDING":8000@ *mss60<mss=0:hss=h+1 i a14=0(hhssmmss)0:awsb=0:a14=1:3401I :asp2=-1:3045 Ba14=115,6;0;"AWAITING GUARDS SIGNAL" a14=1ƥ>.9ffff15,6;0;"GUARDS BELL-DEPART. ":sy4=0:asp2=-1:.25~,9 :.25~,9 :.25~,9 :a8=0:sy2=-1:a14=0:hs=0:a50=1:a101=0:xstops=xstops+1 G 0 H IR12 ,25;" ";13 ,25;" ";14,25;" ": u195,93],220,95_,222,-92\,254,77M,256,95_,275,-85U ;315;,-85U,400,60<,445,80P (460,80P,574>,-86V A3500 :x=111 :f:g:uv2=fgrad=g:4010 x (uv=10 uv1=1grad=0 5grad1=uv:grad2=uv1:grad2=194grad2=0 ^(grad110 grad1<100d)(grad20grad2<10 )grad=(grad1*10 )+grad2 7grad1=10 grad2=1grad=0:1:32 ,72H:0,5:32 ,94^:0,-5:0:10 ,2;" ";11 ,1;" L ";12 ,2;" ":14,91[:18,0:0,-2:0,-14:-17,0:4500 8grad1>100dgrad=(100d-grad1)*10 -grad2 grad>010 ,2;"";12 ,2;"":32 ,94^:0,-16:1:32 ,72H:0,5:0 grad<04100 Egrad<100dgrad>011 ,1;grad;" ":4500 &grad>011 ,1;grad  4500 grad<010 ,2;"";12 ,2;"":32 ,88X:0,-16:1:32 ,94^:0,-5:0 Ggrad0grad>-100d11 ,1;-grad;" ":4500 'grad011 ,1;-grad a20=0: 7:0:0: 31,1;" LOCODRIVER 11 1989 A.GREENUP" A3,4;"PLEASE SELECT YOUR TRAIN";8,1;"1. 1O:3O ";t$(1)(626);10 ,1;"2. 12:3O ";t$(2)(626);12 ,1;"3. 14:3O ";t$(3)(626);14,1;"4. 16:3O ";t$(4)(626);19,8;"THEN PRESS ENTER" <stops:502::stops>4stops<16001q a112=16075 v4,4;"PLEASE SELECT THE NUMBER";6,8;"OF YOUR TRACTION";18,8;"THEN PRESS ENTER"  12 ,12 ;"1500-1621" Iln:cls=25:MAX=90Z:ln>1621Uln<15006065 0:7:7: (6350+stops) s$(19,32 ) x=58 p M$ Wx=565000,m$(12):65001,m$(45)+1 Wx=665002,m$(12):65003,m$(45)+1 s$(x)=t$(p+4)+m$ A1,"10:33",2,"10:37",3,"11:29",4,"11:55" A1,"12:33",2,"12:37",3,"13:29",4,"13:55" A1,"14:33",2,"14:37",3,"15:29",4,"15:55" A1,"16:33",2,"16:37",3,"16:29",4,"16:55" x =(6389+stops):h:m:hs=h:hss=h:ms=m+1:mss=ms 10 ,29 12 ,29 14,29 16,29 1000 brf0brf=0 brf5brf=5 Sbrf<51:16,20:17,(-3*brf)-3:0 Sbrf>01:16,20:17,(-3*brf)+3:0 *16,20:17,-3*brf  ythr0thr=0 ~thr5thr=5 _thr51:119w,19:-17,(-3*(5-thr))-3:0 _thr01:119w,19:-17,(-3*(5-thr))+3:0 6119w,19:-17,-3*(5-thr)  J87:0:0::mp<58.3i3338019S Kmp58.3i333(mph0sy2>3600)2,8;" ASHFORD ";6,5;"DUE TO ARRIVE AT ";hs;":";8,6;"ACTUALY ARRIVED ";h;":" L)h<10 8,22;"0";h;":" M+hs<10 6,22;"0";hs;":" N%m<10 8,25;"0";m O!m10 8,25;m P"ms>9 6,25;ms QPms9 6,25;"0";2:ms<06,25;"00 " R;16,0;" Press N to end game":8030^ SG8,9 ;"YOU ARE FIRED!";14,16-(c$)/2;c$ TR20,5;"Type Y for another try";21,8;"or N to end game." Y ^ ="n" c="y"rd=1:8045m h 8025Y m77:0:7::a112=1:1000 #)Bmp0a3=0lsn=(63010"+uv2):a3=1:a4=mp #3a3=1yds=1760-((mp-a4)*1760):11 ,12 ;lsn;13 ,12 ;yds;" ";12 ,12 ;"in";14,12 ;"yds" #5yds<100dyds010 ,12 ;" ";11 ,12 ;" ";12 ,12 ;" ";13 ,12 ;" ";14,12 ;" ":ls=lsn:a3=0 #7]yds<100dyds0a33+a3429 ,9 ;" ";10 ,9 ;" " #<=yds<100dyds0pws=0a34=a33:a33=0 #?pws>09026B# #Blsf=(ls/10 ) #D>ls0lss=ls/10 -(ls/10 ):lss=lss*10 #F(ls100d(yds<100drd=1)lss=0a34=0)81Q,103g:6,0:0,-15:-6,0:0,15:9040P# #H(lss=5(yds<100drd=1)a34=0)81Q,103g:6,0:-6,0:0,-7:6,0:0,-8:-6,0 #P4mp=0(yds<100dyds0)9042R# #Q #R9050Z#+lsf #Sx=1502 #T ls1:ls2 #Uls1=99c #V;ls1>10001000-ls1,1000-ls2:9048X# #W ls1,ls2 #Xx #[210764,1103O,0,-15,99c #\s10720,1103O,7,0,0,-7,-7,0,0,-8,7,0,99c #]10720,1103O,7,0,0,-7,-7,0,7,0,0,-8,-7,0,99c #^10720,1103O,0,-7,3,0,0,3,0,-3,4,0,-4,0,0,-8,99c #_10720,1103O,7,0,-7,0,0,-7,7,0,0,-8,-7,0,99c #`10720,1103O,7,0,-7,0,0,-7,7,0,0,-8,-7,0,0,8,99c #aB10720,1103O,7,0,0,-15,99c #b10720,1103O,7,0,0,-15,-7,0,0,7,7,0,-7,0,0,8,99c #c10720,1103O,7,0,0,-7,-7,0,0,7,0,-7,7,0,0,-8,99c #i #ga5=0a4=mp:a5=1:ls3=ls:a9=0:1,0;" " #yds=1760-((mp-a4)*1760):yds>100d10 ,12 ;"PWS";11 ,12 ;pws;13 ,12 ;yds;" ";12 ,12 ;"in";14,12 ;"yds" #yds<-1760a5=0:a9=0:ls=ls3:pws=0:sy2=-1:11 ,8;" ":2:79O,96`,14:79O,96`,15:0 #D(a9=0a5=0)(yds<-1760(yds<100dyds0))a9=1:10 ,12 ;" ";11 ,12 ;" ";12 ,12 ;" ";13 ,12 ;" ";14,12 ;" ";9 ,9 ;" ";10 ,9 ;" ":yds<-1760a34=112 ,7;" ":4600 #yds<-17609026B# #yds<100da5=111 ,9 ;5;"PWS ":7:10 ,8;" ";10 ,11 ;" ";9 ,8;" ";9 ,11 ;" ";8,8;" " #/yds<100dyds>0ls=pws:9020<# # $T 6000p &(stops+9939&) &x=12 & s1:s2:s3 &/s2=0(63001-20+s1),0 &;s2=0(63000-20+s1),0:9939& &((63000+s1-20),195+s2 &((63001+s1-20),195+s3 &x &9390,11 ,30,583G,11 ,502 &9390,13 ,30,583G,13 ,502 &9390,15,30,583G,15,502 &9390,17,30,583G,17,502 & 2 nhr11toplaZ2S#phm%ss&jklʳy)l3plral111033dfe1ss1742Fiwss0s102hdw5r4rf74s2stopvvscradnradgocrpxf> _=sFsps spyspG2  aUsp1O:3OCHARING CROSS-ASHFORD12:3OCHARING CROSS-ASHFORD14:3OCHARING CROSS-ASHFORD16:3OCHARING CROSS-ASHFORDDUE WATERLOO EAST AT DUE LONDON BRIDGE AT DUE MAIDSTONE (MP39) AT DUE ASHFORD (MP 58) AT DUE DALMENY (MP 9.6) AT DUE INVERKEITHING(MP13)AT DUE ABERDOUR (MP 17.3) AT DUE BURNTISLAND (MP2O) AT DUE KINGHORN AT(MP 22) AT DUE KIRKCALDY (MP25.7) AT DUE MARKINCH (MP33.2) AT DUE LADYBANK (MP 39) AT DUE CUPAR (MP 44.5) AT DUE LEUCHARS (MP 5O.7) AT DUE DUNDEE (MP 59.3) AT !s ZPWS (25mph) AT MP 53.8e DUE WATERLOO EAST AT 14:33 DUE LONDON BRIDGE AT 14:37 DUE MAIDSTONE (MP39) AT 15:29 DUE ASHFORD (MP 58) AT 15:55 M15:55COVER RUN LIGHTS OOOA