ZXTape! 0Created with Ramsoft MakeTZX pp ssu  64999  7 "ses" 18,1 "se" 18,1 "se" ses @RZ`   0       0 ` 0<<<|<>@~B||~<<@|BBB>B<@BBBB@@$BB@@@888x<@88D888x8BBbbbB<@BBB@|BB|<<0@D<0DD@DDDDDBBRRR@@B|~@@||@8D~~B@B~<<8x 8<<8D~<<< <@<BB<8@<Bx~~D<<<~B<D@@HBD@D@@f@B||pB(<(<|Z<B@@>H~@BD@@DBBB@BBBx~~BB<<~B<<88888888888888888888888888888888888888888888888888888888888888888888888888<<<88<<<<<<<88888888888888888888<8888<<8888<88888888888888888888<8888<<8888<88888888888888888888<8888<<8888<88888888888888888888<8888<<8888<88888888888888888888<<<<<<<88<<<88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888899999999999998888888888888888889999999999999999998888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888se 3"!@!X!@!X P P P P P 3/MMXXL8Wq !v ><<<<<<<<<<<< "$(!B se ={Dqd?{ p(3) s(42*):g(42*) k$(4,6) 'w(31):t(31):l(31) $f(5):i(5):j(5) q(11 ):k(11 )  h(10 ) a(10 ):b(11 ) 9900& 4200h kx  2400` s>99c24  m4=(s) m5=(47.25=-s):28 )m4=(s-100d):m5=(147.25@-s) 6,25;m4;"M " 7,25;m5;"M "  200 & v=0900:42* ( 600X *out=15000 2 200 < 15 $="p"con<5con=con+1 ="h"0 ="h"210 $="o"con>0con=con-1 ="x"b<5b=b+1 ="z"b>0b=b-1 clox=clox+2 ,v<30slow>0clox=clox-1 ,%fm=0f$=" " 61fm=0con=0f$="ENGINE IDLING " 7fm>0fm=fm-1 ;%og=1f$="MAX OUTPUT CURRENT" @v>20335O E+con>cont-1f$="HIGH GEN CURRENT " JKcon>contf$="GEN OVERLOAD TRIP ":con=0:fm=1:up=up+1 O<nf=1fm=0f$="GEN FIELD CHANGE ":fm=1 P3b=5f$="EMERGENCY BRAKE ":rp=rp+1 Q?eb=6b=5:f$="AWS BRAKE APPLIED ":rp=rp+3 T,con=0locote<0locote=0 U5con=0b=0bh=0:o$=c$:350^ V&con>1b>1bh=bh+1 W5bh>10 o$="BRAKES OVERHEATING":rp=rp+1 X/v>locos+1.5@v>ls+3rp=rp+1 ^s=s+si `v=v+vi bc1=c1+2 d(v<30slow>0c1=c1-1 lc1<10 380| m4c1=10 c1=11 c2=c2+1:c1=0 oc2<6380| pc3=c3+1:c2=0 qc3<10 380| sc3=0:c4=c4+1 tc4<6380| uc5=c5+1:c4=0 vc5<10 380| wc6=c6+1:c5=0 z/c6=2c5=4c6=0:c5=0 |,0,0;c6;c5;":";c4;c3;":";c2;c1 }slow22000 ~0,28;sig;s$; s>99c385 )pp1=((s*10 ))/10 :386 +pp1=(10 *(147.25@-s))/10 !1,0;"MP ";pp1;" "  17,7;v;" MPH " 17,31;con 18,31;b 20,14;f$ 21,14;o$  #v<59;jp=3:499 #v<71Gjp=4:499  jp=5 kpjpcon>0nf=1 z=v v<10 z=10  eth=ethc/z locote=ri-eth  Xs>sn8000@ `ss(dvg)650 brl=rl+rol:rol=0 cdvg=dvg+1 d g=g(dvg) e1,23;" " f2g=01,23;" LEVEL":650 h6g>01,23;"1/";g;" UP":650 j!1,23;"1/";g;" DN" st(dvls)700 dvls=dvls+1  ls=l(dvls)  8880" $bl=18810j":bl=0 sel=18830~":el=0:qq=qq+1:900 \rt=q(qq)-clox f:rtm=(((rt)+30)/60<):rtm0874j hA10 ,0;" RUNNING ON TIME ":890z j 10 ,23;" " kLrt>010 ,0;" RUNNING ";rtm;" MIN EARLY":890z p410 ,0;" RUNNING ";rtm;" MIN LATE" zk(qq)=k(qq)+.5 { el=1 s7969 )mtt=mtt*3+12 :sjp=962 v>01000 mt=mt+1 @mt=212 ,0;"SIGNAL RED-TELEPHONING CONTROL" mt100d1015 K10 ,4;"WAVERLEY APPROACH SIGNALS":rex=1020:1200 @10 ,4;"QUEEN ST. APPROACH SIGNALS":rex=1020 'sh=.5:sj=.25~:1200  mtt=0 sj(dtd)+.18~8Q1041  v=01039  D12 ,0;z$:bf=011 ,0;z$:1200 <11 ,3;"WARNING: TERMINUS PLATFORM":1200 <11 ,3;" STOPPED TO SHORT ! ":ap=1 =12 ,2;"MOVE CLOSER TO PLATFORM END":1200 v01200 ap=1bp=bp+1  ap=0 8ab=ab+1:sjp=907:slow=0:pl=1 %8809i":8851":mox=0 %dtd=2dtd=51100L -12 ,4;"STARTING SIGNAL NOT SET" * 11 ,6;"PASSENGERS BOARDING"  Odtd=111 ,17;"ALIGHTING":10 ,0;j$:1059# !210 ,0;" DUE TO DEPART ";k$(dtd) #rex=1061% %%v>.2~Lps=5:7000X &mox=mox+1 'mox<10 1200 ,3dtd=dtd+1:rna=q(qq)+wat:dly=(*30) -el=0:qq=qq+1 .dly>8dly=0 0 dly=dly+rna 2kx=8203 4"rex=1005:rw=(*10 ) 6dtd21085= 7sh=.4L:sj=.15~ 8 1200 =dtd41200 >sh=.73333:sj=.73333 K 1200 L$rex=1120`:clox=clox-10 QCdtd=210 ,5;"ARRIVED AT EDINBURGH":1110V T)10 ,5;"ARRIVED AT GLASGOW " V+ 11 ,5;"PASSENGERS ALIGHTING" [,12 ,4;"PREPARING TO LEAVE CAB" `%v>.2~Lps=5:7000X e+mox=mox+1:mox<10 1200 jout=1: 1v<.1}Lv-.1}Lres=0:1220 v<-.1}Lres=-res %g=0grad=0:1240  grad=a1/g ffce=locote-res-grad  ac=ffce*a2  br=0 (v<502br=.016{n*(502-v) br=(br+1.25 )*1.1  fb=-(br*b/5) v<0fb=-fb  oss=(v-ls) oss>9 6997U v>-11310 rol=rol+1 &rol=10 ps=2:7000X  fa=ac+fb "slow>01320( #Ev30si=(v+2*fa)/1800:vi=2*fa:13357 (si=(v+fa)/3600:vi=fa 7z=v+2*vi 8z.1}L <.z<0ƽ(fb)>(ac)v=0:vi=0 F#z0ƽ(fb)>(ac)si=0 P;z<0.1}Lz>-.1}Lfa=0v=0:vi=0 d slx=(1760*(sln-s)) :slx>013 ,22;slx;" yds ":2015 13 ,0;z$ sc=02015 sc=sc-1 sc>02015 12 ,0;z$  sc=0 2slow=3slx<0ps=1:7000X aws=1eb=eb+1 >=" "aws=2:eb=0:21,4;" " eb>2vp=vp+1  382~ `z=(v/10 ) t(2430~ +2*z) |8ri=300,:res1=0:cont=1.5@:2490 ~kz=10 -v:ri=77M+8.8 *z:cont=1.75`+.25~*v:res1=.5-.05|L*z:2490 z=20-v:ri=24+5.3)*z:cont=1.75`+.25~*v:res1=1.2-.07}\(*z:v>15ri=ri+(v-15)*2.83333:cont=10 2490 Pz=30-v:ri=26.6T+1.14*z:res1=2-.08}# =*z:2490 Rz=40(-v:ri=20.8&fff+0.58zG*z:res1=3.1Ffff-.11}aG*z:2490 Pz=502-v:ri=16.8fff+.4L*z:res1=4.3 -.12}u[*z:2490 Pz=60<-v:ri=14+0.28\(*z:res1=5.76fff-.14~\(*z:2490 Qz=70F-v:ri=12.3D+.17~.z*z:res1=7.3i-.16~# =*z:2490 Oz=80P-v:ri=10.7+333+.16~# =*z:res1=9 -.17~.z*z:2490 Qz=90Z-v:ri=9.1+.16~# =*z:res1=10.9.fff-.19~B\)*z:2490 Rz=100d-v:ri=7.5p+.16~# =*z:res1=14.3d-.34.z*z:2490 mz=110n-v:ri=5.9<+.16~# =*z:res1=19-.47p *z:v>108l8840":res=15.7{333 4ri=ri*ef*con/5:res=res2+res1*taw*.001wn kp=jp:nf=0 #v<36$jp=0:495 #v<61=jp=1:495 jp=2:496 h irna=1+(*10 ):rnb=1+(*10 ):rnc=1+(*10 ):rne=1+(*10 ):rnf=1+(*10 ) jb$="ex-works":ef=1.05fff k$rnb<8b$="good":ef=1 l*rnb<5b$="well-run":ef=.95s333 m*rnb=1b$="run-down":ef=.87^Q n8pws1=0:pws2=0:pad=1:pwt=802" p(rne>7pws1=35#+rna*5 qdtd=1:out=0 r(rnf>7pws2=25+rnb*5 spws104215w tpad=2:pwt=811+ wdly=-2 |rnc<5dly=dly+rna $rnc>6dly=dly+(*75K) d$="GLASGOW-EDINBURGH" e$="(push-pull shuttle)" i$="class 47/7 +6 coaches"  v$="1500" "j$=" 15.00 GLASGOW-EDINBURGH" c$=" " nc=6:cw=210  lp=0  s=.15~  9500%  8000@ lwp=0:up=0:sp=0:vp=0:rp=0:c6=1:c5=4:c4=5:c3=8 con=0:b=2:c1=0:c2=0:v=0:g=0:ls=502:sn=.17~.z:slow=1:fm=0:nf=0:si=0:vi=0:jp=0 !g$="LEVEL":s$="":sig=2 "l$=" GLASGOW QUEEN ST. STATION" 'z$=" " dvg=1:dvls=1 kx=8200 %ps=5:aws=0:so=3 &m$=" ADVANCE WARNING " n$="REDUCTION OF LINE SPEED-"  aw=4 cad=700 clox=-120x  ap=0  qq=1  el=0 ab=1:sjp=907  eb=0  rol=0  bl=0  rl=0  sc=0  bf=0 (sgs=.4L:sh=.73333:sj=.73333 rex=1005 wat=30 bp=0:rw=0 re2=1.7Y:re3=1.88p  og=0  tw=engwt+cw  tacw=cw-1.5@*(nc-1) taw=engwt+tacw 0res2=(4.5*engwt+3.1Ffff*cw)*.001wn ethc=12.06@*(nc-1) a1=tw*2.24\( a2=9.7403D/tw  9000(# /  9645% d$="EDINBURGH-GLASGOW" "j$=" 16.00 EDINBURGH-GLASGOW" )rnc=1+(*10 ):dly=-2 rnc<5dly=dly+rna $rnc>6dly=dly+(*75K) s1=wp lwp=0:up=0:sp=0:vp=0:rp=0:c6=1:c5=5:c4=5:c3=8 v$="1600":bp=0 zcon=0:c1=0:c2=0:v=0:g=0:ls=35#:slow=1:fm=0:si=0:vi=0 Drna=1+(*10 ):rnc=1+(*10 ):dly=-2 rnc<5dly=dly+rna $rnc>6dly=dly+(*75K) hLclox=-120x:kx=8200 :rex=1005:bf=0:s=100.09H.{ jm4=0:m5=47/ k(dtd=3:sh=.4L:sj=.15~ ll$=" EDINBURGH WAVERLEY" n421,0;"Press the space bar to restart" =""5250 " "5250  9000(#  out=0  18 p65000 u7:0:7: z95,7;2;1;"OFFICIAL REPRIMAND" 79 ,1;"LINE SPEED EXCEEDED BY ";oss;" MPH" 312 ,0;"AN OFFICIAL REPRIMAND WILL BE" 213 ,0;"ENTERED ON YOUR DISCIPLINARY" 14,0;"RECORD." 219,0;"The Simulation will continue" 420,0;"shortly-with your speed re-set" $21,0;"to line speed." y=11000:y sp=sp+1 v=ls 0:7:0: 65050  1306 Uoss>256999W V 6000p W ps=3 X0:7:7: ]ps57008` ^>9 ,0;" STARTING WITHOUT PERMISSION":7015g `ps17011c abf=17013e b@9 ,0;"OVER-RUNNING A SIGNAL AT DANGER":7015g c@ps=29 ,5;"EXCESSIVE ROLL-BACK":7015g dC9 ,1;"LINE SPEED EXCEEDED BY ";oss;" MPH":7015g e;9 ,2;"CRASHING INTO BUFFER STOPS":7015g gB5,2;2;1;"MAJOR BREACH OF REGULATIONS" l312 ,0;"YOU HAVE BEEN RELEIVED OF THE" m413 ,0;"CONTROLS BY YOUR CO-DRIVER,AND" n514,0;"ARE SUSPENDED FROM DUTY PENDING" o615,0;"AN APPEARANCE BEFORE AN OFFICIAL" p,16,0;"DISCIPLINARY TRIBUNAL." q319,0;"Would you like to try again ?" r ="y" s="n"7099 t 7026r 65367W: @[l$:sn:4,0;z$:ka=l$:ka=(32 -ka)/2:4,ka;5;l$: A'"LEAVING QUEEN ST. STATION",.19~B\) B"QUEEN ST. TUNNEL",.75@ D"COWLAIRS INCLINE",1.5@ E"COWLAIRS",1.9s333 F"EASTFIELD",2.25 G!"BISHOPBRIGGS CURVES",3.1Ffff H"BISHOPBRIGGS",4.3 I"CADDER",5.50 K"LENZIE",6.9\ L"WATERSIDE",8.5 M"BAIRDS",10 N"GARTSHORE",11 O"CROY CURVES",11.69 P"CROY",12 Q"DULLATOR",13.2S333 R"ANTONINE WALL",15 S"CASTLECARY",16.7 U"GREENHILL",17.6 V"BONNYBRIDGE",18.8fff W"ROUGH CASTLE",19.8fff X"GREENBANK",20.35" Y#"APPROACHING FALKIRK",21.35* Z"FALKIRK CURVES",21.7- ["FALKIRK HIGH",21.9/333 \"FALKIRK TUNNEL",22.43333 ]"LEAVING FALKIRK",23.4;333 _"REDDING",24.75F `"POLMONT",25.3Jfff a+"BETWEEN FALKIRK AND LINLITHGOW",27 b"BO'NESS JUNCTION",27.4[333 c"MANUEL",28 d%"APPROACHING LINLITHGOW",29.2i e "LINLITHGOW CURVES",29.4k333 f"LINLITHGOW",30 g!"LEAVING LINLITHGOW",32.2 i"PHILIPSTOUN",33.5 j%"APPROACHING WINCHBURGH",34.5 k""WINCHBURGH JUNCTION",34.7 l"WINCHBURGH",35.4 m "WINCHBURGH TUNNEL",35.6fff n!"LEAVING WINCHBURGH",36.5 o,"APPROACHING NEWBRIDGE VIADUCT",37.5 p"NEWBRIDGE VIADUCT",38& q!"NEWBRIDGE JUNCTION",38.8333 s"RATHO",39.2 t"NORTON",40.5" u"GOGAR",42.3)333 v"SIGHTHILL",43+ w"SAUGHTON JUNCTION",44, x"MURRAYFIELD",44.52 y."APP.HAYMARKET(35MPH LMT MP45.9)",45.97 z "HAYMARKET STATION",46.18fff { "HAYMARKET TUNNELS",46.7: },"PRINCESS GDNS(20MPH LMT MP47.1)",47/ ~."MOUND TUNNELS(20MPH LMT MP47.1)",47.1dly12 ,2;"RIGHT AWAY.DEPART WHEN READY.":slow=0:kx=8230& :20 ! 82455 &v<120 +"dtd=1dtd=3i1=clox 010 ,0;j$ 1#8810j":kx=20:20 5v>07000X : 20 !a=110 " a(a)=0 "a "ea(4)=2:a(5)=2:a(6)=2:a(8)=2:a(10 )=2 " a=13 "!b=(*10 ) ""b>18745)" "#a(a)=1+(*3) ")a ".a=79 2 "0b=(*10 ) "2b>187586" "4a(a)=1+(*3) "6a "8 "`612 ,0;"LET TRAIN PASS SPEED RESTRICTION" "a*13 ,6;"BEFORE ACCELERATING." "b "i11 ,0;z$ "j.12 ,0;z$:13 ,0;z$: "tN12 ,0;"PWS WORKS.MEN BY SIDE OF TRACK. ":13 ,0;z$: "~10 ,0;j$: "Of$="HIGH SPEED TRIP":fm=2:rimte=0:con=0:up=up+1: "18,7;"CLEAR " "721,4;" ":eb=0:aws=2: "M18,7;"WARNING":21,4;1;6;"": "(13 ,3;"DISTANCE TO SIGNAL" " 1000 " 2,11 ;ls;" MPH ": " 8920" "a=111 "q(a) "a "w450,1230,1800,2190,2400` ,180,630v,1200,1380d,21004,2580 " 8940" "a=14 "k$(a) "a ""0","0","16.03","16.23" " 8970 # "a=111 "k(a) "a # # 6.25H,25,38.75,46.0658B\,47.215<(,101.315JG,108.5Y,122.25t,125.515{,141,147.2157 = #( 0 #) 0 #- 4 #2 #7a=031 #<14,a;"*" #Aa #B 7 #F!0,17;"NEXT SIGNAL" #K31,0;"MP 0.1";17;"GRAD. LEVEL" #N&2,0;"LINE SPEED 50 MPH" #P@s>10 2,11 ;"35":1,0;"MP 47.1" #Q4,0;5;l$ #R*6,0;"DISTANCE:FROM GLASGOW" #S#7,9 ;"TO EDINBURGH" #Ts<99c9049Y# #U,6,0;"DISTANCE:FROM EDINBURGH" #V#7,9 ;"TO GLASGOW " #Y9 ,12 ;"COMMENTS" #Z815,5;6;locon;" MAX SPEED ";locos #[s<99c9055_# #\@15,1;6;"DBSO(";locon;") MAX SPEED ";locos #_517,0;"SPEED : CONT : " #d418,0;"AWS :WARNING BRAKES:" #n$20,0;"STATUS INDICS:" % % %!0,6;d$ %"1,5;e$ %%*3,6;"Locomotives Available" %& 5 %'05,3;" 47701 Saint Andrew " %(06,3;" 47702 Saint Cuthbert " %)07,3;" 47703 Saint Mungo " %*08,3;" 47704 Dunedin " %+09 ,3;" 47705 Lothian " %,110 ,3;" 47706 Strathclyde " %-111 ,3;" 47707 Holyrood " %.112 ,3;" 47708 Waverley " %/113 ,3;" 47709 The Lord Provost " %0114,3;" 47710 Sir Walter Scott " %1115,3;" 47711 Greyfriars Bobby " %2116,3;" 47712 Lady Diana Spencer " %3 7 %="Number ? ";a$ %>a$59533=% %a=a$ % b=1a %!a$(b)<"0"a$(b)>"9"9533=% %b % locon=a$ %1locon47701Ulocon47712`9634% % 9533=% %"locos=100d:engwt=121y %$8950":8700!:8900" %7:7:0: %s<59653% %s>110n9649% %>0,1;"Walking to other end of train":9650% %&0,7;"END OF SIMULATION" %B2,4;1;"FIRST INSPECTORS REPORT":9654% %=s>110n2,4;1;"SECOND":9654% %,2,9 ;1;"ROSTER NOTICES" %5,4;"1500 ";d$ %*s>110n5,4;"1600 ";d$ %6,5;e$ %#7,0;"SCHEDULED: ";i$ %+8,0;"ALLOCATED: ";locon %%8,22;"+";nc;" coaches" %s>10 9730& %110 ,2;"The Motive Power Department" %311 ,0;"report ";locon;" to be in ";b$ %12 ,0;"condition" %314,7;2;"SPECIAL RESTRICTIONS" %Ipws1>015,0;"PWS MP 17.3 UP (SPEED ";pws1;" MPH)" %Ipws2>016,0;"PWS MP 39.4 DOWN (SPEED ";pws2;" MPH)" %Cpws1=0pws2=015,8;"No PWS works today" %D21,0;"Press ";1;"any key";0;" to start" %V19,0;"The simulation begins with two minutes to go to departure time." % 0 % &s>110n9738 & &#10 ,0;"DEP. GLASGOW " &%11 ,0;"ARR. EDINBURGH " & 9740 & & %10 ,0;"DEP. EDINBURGH " & #11 ,0;"ARR. GLASGOW " & "rtm=(((i1)+30)/60<) &7rtm=010 ,18;"ON TIME":9746& &$10 ,18;rtm;" MIN LATE" &rt=2400` -clox &!s>110nrt=2580 -clox &"rtm=(((rt)+30)/60<) &7rtm=011 ,18;"ON TIME":9755& &=rt>011 ,18;rtm;" MIN EARLY":9755& &$11 ,18;rtm;" MIN LATE" &015,0;"NUMBER OF REPRIMANDS : ";sp &rt=rt/60< &rt>09764$& &)ef<1rt=rt+(1-ef)*20 &pws10rt=rt+1.5@ & pws20rt=rt+1.5@ &" lp>0rt=rt+lp*1.5@ &#rt>0rt=0 &$rt>2rt=2-rt &%rt0rt=1 &) vp=vp+rl &+Gwp=(93]+7*rt-up*10 -(sp+bp)*30-vp-rp/10 ) &/wp>100dwp=100d &4wp<0wp=0 &>816,0;"DRIVERS PERFORMANCE RATED ";wp;" %" &@s<110n5010 &Cwp=((s1+wp)/2) &HC18,0;2;"COMBINED PERFORMANCE RATING ";wp;" %" &t*20,0;"Like another ride ? " &v ="y" &x="n"7099 &z 9844t& & 9910& &2:2: &a=142* & g(a):s(a) &a &r0,.17~.z,150,.19~B\),46.,.5,41),1.3&fff,210,1.5@,0,1.9s333 &y809),3.1Ffff,0,6.9\,900,12 ,0,22.43333,-882r,24.75F,600X,25.3Jfff &|-882r,28,0,28.4c333,882r,33.5,-960,45.14fff,0,46.18fff,-500,46.7: &0,47/,300,,47.1(KGZu|  =5 5 : ffgL͆"8Q놆< Jćs\){\):G 7#nn nn nBex-worksfffwsFwsaw+tulE(push-pull shuttle)Iclass 47/7 +6 coachesC s;|A47712%oco`ocodngwy+ ovgloGLEVELiZ v*vlwM ADVANCE WARNING NREDUCTION OF LINE SPEED-alo  jogL̳~e`aeYep KacJa!es$ݥthq3339\({qPz on`ese$ݫt@ocot/prafcQ놦/sၭ/@􀙙tt l@lldo DEDINBURGH-GLASGOWJ 16.00 EDINBURGH-GLASGOWV1600SLGLASGOW QUEEN STREETFENGINE IDLING O