ZXTape! 0Created with Ramsoft MakeTZX@bns MM^O v1.0  7 "bnss" 18,1 "bnsg" Jbnss @o`   0       0 ` 0|<|>|B>BB<BBBBfbBBBfb@888x<@88D888x8BBbbbBB@|BZR@~BZR<0@D<0DD@DDDDDBBRRR@|@B|BJNB~BJ8DBB>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<<<88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888889999999999999998888888888888888899999999999999999999999999999988888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888999999999999999999999999999999998888888888888888888888888888888888888888888888888888888888888888-bnsg EArGa(5):p(15):a$(5,30):p$(15,14):b(5):l(15):s(15):l$(5,2):t(5):d(5):r(15) ek(15):m(5):c(5):o(15):n(5):w(130):e(5):f(15) kd$(128,4):q(128):u(128):v(128):x(128):y(128):z(128) Pt()=((65536*23674z\+256*23673y\+23672x\)/502)  9000(# "400::880p:60< (?23674z\,0:23673y\,0:23672x\,0 2k21,0;0;1;1;"accept":=" "100d:sf=1:1490:40( 4="q"71G <t()<4502 F~21,0;" ":1000:23674z\,0:23673y\,0:23672x\,0:h<840H502 G$h<660t=0::88X I)t=240/(h-600X):q=q+1 P@:z=(120x-q/5):z>100dz=100d:84T Rz<5z=5 T=0,0;2;"RAIL TRAFFIC CONTROL BIRMINGHAM" V68,5;1;"Efficiency Rating ";z;"%" X:21,0;0;"Do you wish to play again ?" Y ="y" Z ="n" [ 89Y d<21,0;" ":"INPUT: ";i$:i$=""280 ni$(1)="p"200 x a=-1 "i=15:i$=l$(i)a=i i 6a=-1z$="NOT ALLOWED":q=q+3:250 :a(a)>500z$="NOT ALLOWED":q=q+3:250 Ca(a)>5z$="TOO EARLY TO SET ROUTE":q=q+3:250 F21,0;1;a$(a,214):z=e(a):300, "EXIT: ";e$:e$=""280 e$(1)"p"190 Iq$=e$:9900&:zz=1z$="NOT ALLOWED":q=q+3:250 8p(p)>0z$="NOT ALLOWED":q=q+3:250 1850::250 *q$=i$:9900&:zz=1225 p(p)>1230 *z$="NOT ALLOWED":q=q+3:250 Fp(p)>300,z$="NOT READY FOR DEPARTURE":q=q+3:250 521,0;1;p$(p):z=f(p):300, "EXIT: ";e$:e$=""285 e$(1)"p"246 0q$=e$:kp=p:9900&:zz=1225 p=kp 1850: *21,0;" " z$=""285 521,0;" " ,21,16-z$/2;2;z$ 1.5@,-2 521,0;" " " ,Jz$="500":z>6z$="850":z>9 z$="870":z>17z$="451" .Zz>22z$="450":z>24z$="314":z>27z$="3100":z>34"z$="3040" 0\z>39'z$="862":z>58:z$="1165":z>96`z$="2530":z>102fz$="1205" 2.z>107kz$="475":z>116tz$="474" 3z=120xz$="470" 4z=121yz$="472" 5z>121yz$="460" 6z=124|z$="312" 7z>124|z$="1018" 8z=128z$="3122" :z=129z$="+1014" |"y$=w(z):y$=1y$="0"+y$ ,z$=z$+y$:21,13 ;0;z$: :bo=0:650 Ax$=" ":n$="00000000000000":s$=n$ 9c$="1000":h=599W:u=0:v=0:q=0  470 i=15 !a(i)=501:l$(i):a$(i)=x$ i ib(1)=1:b(2)=25:b(3)=546:b(4)=73I:b(5)=105i "as","cv","dy","wv","gl" i=115:l(i):i 8,9 ,10 ,11 ,12 ,13 ,14,16,17,18,19,20,8,10 ,11 W13 ,0;3;"The traffic department reports:-":j=15:e=0  14,1;x$ t$="in Coventry area" sz$="":x=1+(*20):x=20n(2)=20+(*11 ):z$="Severe disruption ":5600 Rx=19n(2)=10 +(*11 ):z$="Engineering work ":5600 Hx=18n(2)=10 :z$="Operational problems ":5600 &+x<18n(2)=0:600X 0A:j,0;3;z$:j=j+1:j,10 ;t$:e=1 Ns"Eus","Cov","Pad","Bgn","Ple","Pts","Wey","Wal","FOa","BSt","Lch","Bdf","Hul","Lds","New","Yrk","Cle","Dby","Lec" O"Lcn","Not","Cam","Nor","Pet","Yar","Pgn","Pnz","Stb","Kid","Her","Mal","Wor","Wlv","Stf","Shw","Abw","Lld","Hol","Man","Liv","Blk" P["Prs","Car","Gla","Inv","Brg","Lgb","Red","Cdf","Tby","Wst","Plm","Pgn","Nqy","Pnz","CCS" Q1"Brm","Brm","Brm","Brm","Brm","Brm","Brm","Brm" Xtp$(9 )="1V68 Brm-Cdf":p(9 )=303/:k(9 )=480:r(9 )=1002:f(9 )=129 Ytp$(8)="1E72 Brm-Yar":p(8)=321A:k(8)=24:r(8)=1020:f(8)=115s Zp$(12 )="2G11 CCS-Lgb":p(12 )=3073:k(12 )=46.:r(12 )=1006:f(12 )=63?:o(12 )=185 [xp$(14)="2G91 Brm-Stb":p(14)=316<:k(14)=27:r(14)=1015:f(14)=59; l;e=015,7;3;"No problems today" v821,0;0;"Press any key to continue" {=""635{  %f1=1+(*10 ):730 j=113 :x,y,z k=xy:w(k)=k-z:k 8204:j 6w(114r)=86V+4*((*3)+1) 6i=115s129:x,y:w(i)=x+(*y)+1:i 1,502,0,7,46.,6,10 ,44,,9 ,18,67C,17,23,99c,22,25,37%,13 ,28,77M,-18,35#,546,19,40( ۅ97a,36$,59;,122z,58:,97a,111o,568,103g,111o,82R,108l,119w,79O 67C,18,17,11 ,0,31,40(,16,78N,7,84T,7,29,18,24,4,9 ,2,20,7,10 ,4,19,2,21,2,0,4,14,6 Bf1>7w(109m)=42*+5*((*2)+1) $mo=(f1/2):mo=f1-mo*2 8mo=0w(124|)=41)+(*9 )+1 ( 7 * 4'bo=bo+1:bo>7bo=0 9bo >?i=1100d:c=x-1+(1+(*(y-x+1))) H:d=x-1+(1+(*(y-x+1))):c=d840H R1w(130)=w(c):w(c)=w(d):w(d)=w(130) \i f pX0,0;0;"W";1;" BIRMINGHAM NS CONTROL";0;31;"E" z/2:1,8;"EAST END ARRIVALS" 8"AS":"CV":"DY":5,8;"WEST END ARRIVALS"  "WV":"GL" -3:8,0;"";31;"" -3:9 ,0;"2";31;"2" %10 ,0;"";31;"" %11 ,0;"";31;"" %12 ,0;"5";31;"5" %13 ,0;"6";31;"6" %14,0;"7";31;"7" %16,0;"8";31;"8" %17,0;"9";31;"9" %18,0;"";31;"" %19,0;"";31;"" %20,0;"";31;"" 5:1 V8,1;x$(14):8,17;x$(14):9 ,1;x$ 10 ,1;x$(14):10 ,17;x$(14):11 ,1;x$(14):11 ,17;x$(14) X12 ,1;x$:13 ,1;x$:14,1;x$:16,1;x$ X17,1;x$:18,1;x$:19,1;x$:20,1;x$ 0:0   590N j=0x:q$:j  .15~,10 Qh=h+1:mo=(h/60<):mo=h-mo*60<:z$=mo:z$=1z$="0"+z$ .z$=(h/60<)+z$:z$=3z$="0"+z$ c$=z$ +i=114:n$(i)="0"1060$ y=n$(i)-1:n$(i)=y $i .+i=114:s$(i)="0"1090B 8y=s$(i)-1:s$(i)=y Bi Ld=15 V/a(d)=a(d)-1:a(d)5001290  ` a$(d)=x$ jOz$=d$(b(d)):f=q(b(d)):t=u(b(d)):s=v(b(d)):m=x(b(d)):l=y(b(d)):g=z(b(d)) os<900s=s+1000 ~Kb(d)=b(d)+1:e(d)=l:t(d)=t:c(d)=g:t$=s:s<1000t$="0"+t$ y$=" " z$="1V83"z$="1V87"y$="#" Jy$=y$+z$+" ":x=f:960:y$=y$+q$+"-":x=t:960:y$=y$+q$+" " &mo=(s/100d):mo=s-mo*100d 's=60<*((s/100d))+mo:w=s+m $mo=(w/60<):mo=w-mo*60< (w=100d*((w/60<))+mo:d(d)=w ;x=1+(*10 ):x<7b=0:1190 1x=10 b=1+(*20):1190 b=1+(*5) (b=b+n(d):s+b-h<3b=h+3-s z$=" " m21240 .n=2:g>20g<100dn=4 !g>0g<21n=8 m>n+bm=m-b:1240 m=n Bm01+(*10 )<4m=m+1:1260 6m01+(*10 )=1m=m+2 7z$="Due "+t$+" ":b=0q$="on time":1280 &q$=b+" late":b<10 q$=" "+q$ Iz$=z$+q$:a$(d)=y$+z$:m(d)=m:a(d)=s-h+b:m=0a(d)=a(d)+1  d 'i=115:p(i)=p(i)-1 2lp(i)=499(o(i)=0o(i)>20)p(i)=299++s(i):o(i)>20o(i)<100d1370Z <)p(i)=0o(i)>100d1420 F)p(i)=496o(i)>11791 K%p(i)=496p(i)=296(+s(i) P 1390n Z03560 :j=1(o(i)-20):z$,x:j d 960:p$(i)=z$+" Brm-"+q$ ek(i)=x fi81390n gj(f(8)>24f(8)<28)f(8)=124|p(8)=499:o(8)=1 ni x70,26;4;c$:sf=0:1490  ,mo=(r(i)/100d):mo=r(i)-mo*100d !z=60<*(r(i)/100d)+mo )h-z<30w(o(i)-100d)=w(f(i))  8i=15:j=i+1:i>3j=j+1 :a(i)>500a$(i)=a$(i,14)+"Sgnld to station" Xa(i)=501(a(i)=502m(i)0)a$(i)=a$(i,14)+"Running into stn" ;a(i)51770:a$(i)=a$(i,14)+"App."+z$ 8a(i)3a$(i)=a$(i,14)+"Checked on aprch" Ea(i)1a$(i)=a$(i,14)+"Held apprch sigs":q=q+2 9a(i)>15a(i)<500j,2;x$:1570" j,2;4;a$(i) "i ,i=115 6Wi=1i=3i=4i=13 i=14i=15z=2:1600@ 8 z=1 @`p(i)>500z$=p$(i,13 )+"Arrival signalled":z=2z$=z$(5)+"Arr.sgnld" J`p(i)=500z$=p$(i,13 )+"Arrvd in platform":z=2z$=z$(5)+"Arrived " T+p(i)<497p(i)>4991630^ YBo(i)=1z$=p$(i,13 )+"Loco on run round":1630^ [Do(i)>1o(i)<21z$=p$(i,13 )+"Changing Loco " ^&y$=r(i):r(i)<1000y$="0"+y$ hxp(i)>300,p(i)<497z$=p$(i)+"Due depart "+y$+" ":z=2z$=z$(5)+z$(10 12 )+" d"+y$ rhp(i)300,z$=p$(i)+"Ready to depart ":z=2z$=z$(5)+z$(10 12 )+" Ready" |Gp(i)<300,p(i)>2p$(i,1)"5"sf=0q=q+1 ^p(i)=1z$=p$(i,13 )+"Departing station":z=2z$=z$(5)+"Departing" Jp(i)0p$(i)=" ":z$=x$:z=2z$=z$(14) 6j=1:i=1i=3i=4j=17 'l(i),j;0;5;1;z$ i  7 n$00 1,0;"":7 s$00 1,31;""  z$="New Street " i<4z$="Proof Hse Jc"   1799 j=2o(i):k,l:j ,mo=(r(i)/100d):mo=r(i)-mo*100d !z=60<*(r(i)/100d)+mo h-z<30w(k)=w(f(i)) f(i)=l  ,3,10 ,130,40(,130,11 ,15,120x,40(,122z,557,3,579,108l,130,4,122z,112p,130,114r,22,113q,113q,15,4,557,130,568,130,579,130,22 :z$="" ? e$="" Di$"wv"1990 Nt(a)5791890b X+e$="p1b"m$="10002000000000":2960 Z 2950 bt(a)59;1910v l+e$="p3b"m$="10002200000000":2960 n 2950 vt(a)61=1930 +e$="p4b"m$="10002020000000":2960  2950 7e$="p2"t(a)<7m$="10002200000000":2960 *e$="p7"m$="10002020202000":2960 *e$="p8"m$="11000002020000":2960 *e$="p9"m$="11000002020020":2960 4e$="p10"e$="p11"m$="11000002020022":2960  2950 i$"gl"2070 (t(a)<8t(a)>10 2020 *e$="p5"m$="00100002200000":2960  2950 *e$="p7"m$="00100000022000":2960 *e$="p8"m$="00100000020000":2960 *e$="p9"m$="00100000020020":2960 4e$="p10"e$="p11"m$="00100000020022":2960  2950 i$"as"2110>  9e$="p1a"t(a)=568r$="01100020200000":2970 *Ge$="p12"t(a)>44,t(a)<480r$="01010100000002":2970 4 2950 >i$"cv"2220 Ht(a)58:2140\ R+e$="p3a"r$="01100002220000":2970 T 2950 \t(a)60<2160p f+e$="p4a"r$="01100000220000":2970 h 2950 pFe$="p6"t(a)>31t(a)<45-r$="01100000200000":2970 z*e$="p7"r$="01100000200000":2970 2e$="p8"e$="p9"r$="01100000200200":2970 +e$="p10"r$="01100000200220":2970 +e$="p11"r$="01010100000002":2970  2950 i$"dy"2280 =(t(a)=62>e$"p8")(t(a)=63?e$"p9")2950 :e$="p7"e$="p8"e$="p9"r$="00000100002202":2970 +e$="p10"r$="00000100000022":2970 +e$="p11"r$="00000100000002":2970  2950 i$"p1a"2300 *e$="as"r$="20000010000000":2990  2950 i$"p1b"2320 *e$="wv"m$="22001000000000":2980  2950 i$"p2"2340$ *e$="cv"r$="20000010000000":2990  2950 $i$"p3a"23608 .*e$="cv"r$="20000011000000":2990 0 2950 8i$"p3b"2380L B*e$="wv"m$="02000110000000":2980 D 2950 Li$"p4a"2400` V*e$="cv"r$="20000010010000":2990 X 2950 `i$"p4b"2420t j*e$="wv"m$="02000010000000":2980 l 2950 ti$"p5"2440 ~*e$="as"r$="20000010010000":2990 2950 i$"p6"2460 *e$="wv"m$="02000001101000":2980 2950 i$"p7"2520 Re$="wv"k(7)>31k(7)<45-m$="02000001101000":2980 Re$="gl"k(7)>47/k(7)<557m$="00220000011000":2980 =e$="cv"k(7)<7r$="20000010100000":2990 Re$="dy"k(7)>10 k(7)<27s$="00022000001100":2990 2950 i$"p8"2580 Re$="wv"k(8)>31k(8)<45-m$="02000001010000":2980 Re$="gl"k(8)>47/k(8)<557m$="00220000010000":2980 =e$="cv"k(8)<7r$="20000010100100":2990 Re$="dy"k(8)>10 k(8)<27r$="00022000001100":2990 2950 i$"p9"2640P Re$="wv"k(9 )>31k(9 )<45-m$="02000001010110":2980 (Re$="gl"k(9 )>47/k(9 )<557m$="00020000000110":2980 2=e$="cv"k(9 )<7r$="20000010100100":2990 10 k(9 )<27r$="00022000001100":2990 F 2950 Pi$"p10"2700 ZTe$="wv"k(10 )>31k(10 )<45-m$="02000001010101":2980 dTe$="gl"k(10 )>47/k(10 )<557m$="00020000000101":2980 n>e$="cv"k(10 )<7r$="20000010100110":2990 xTe$="dy"k(10 )>10 k(10 )<27r$="00022000001010":2990 2950 i$"p11"2760 Te$="wv"k(11 )>31k(11 )<45-m$="02000001010101":2980 Te$="gl"k(11 )>47/k(11 )<557m$="00020000000101":2980 >e$="cv"k(11 )<7r$="20202000001001":2990 Te$="dy"k(11 )>10 k(11 )<27r$="00022000001001":2990 2950 3i$="p12"e$="gl"m$="00020000000100":2980 !z$="NOT ALLOWED":q=q+3: r=1:3000 r=2:3000 r=5:3000 r=6 3020 "mo=(r/4):mo=r-mo*4 =(mo=1u=1)(mo=2v=1)31200 : 4z$="CONFLICTS WITH OTHER SET ROUTE":q=q+1: Bc=0:u=0:v=0:r=2r=63080 5i=114:n$(i)="0"m$(i)="0"3050 c=1 i c=0u=1 r=1r=5 @c=0:i=114:s$(i)="0"r$(i)="0"3090 c=1 i c=0v=1 & 0r>43260 D/a(a)>2a(a)=a(a)+500:3150N Fa(a)=502 Nr=13200 P*(r=3r=4)a(a)=a(a)-1 XAp(p)=a(a):y=a(a)-502:r=3y=y+3:3170b Zr=4y=y+1 b+i=114:r$(i)="0"3190v lx=y+r$(i):r$(i)=x vi r=23270 Ap(p)=a(a):y=a(a)-502:r=4y=y+3:3220 r=3y=y+1 +i=114:m$(i)="0"3240 x=y+m$(i):m$(i)=x i 3270 p(p)=1 !r=1r=53480 !r=2r=63520 r>4 #y$=" ":a$(a,1)="#"y$="#" |p$(p)=a$(a)(25)+y$+a$(a)(714):f(p)=e(a):r(p)=d(a):s(p)=m(a):k(p)=t(a):o(p)=c(a):3330  i=114 y=n$(i)+m$(i):n$(i)=y i  i=114 y=s$(i)+r$(i):s$(i)=y i  "2G60",7,"2G56",7,"2G58",7,"2G60",7,"2G56",7,"2G58",7,"2G60",7,"2G56",7,"2V06",30 "2G77",32 ,"2G95",28,"2G91",27,"2V07",29,"2K63",33!,"2G93",28,"1P29",41),"2G95",27,"2V08",30,"2G81",32 ,"2G91",28 "2G93",27,"2V09",29,"2G75",32 ,"2G95",28,"2G91",27,"2D68",20,"1E74",22,"2F88",18,"2E04",23 "2D70",20,"1E99",24,"2F90",18,"1E76",22,"2D72",20,"2G46",1,"2A02",0,"2G48",1,"2G40",1 "2A04",0,"2G42",1,"2G44",1,"2A06",0,"2G46",1,"2G48",1,"2A02",0,"2G40",1,"2G42",1 "2G57",7,568,4,8,39',21,"2G13",557,47/,18,3,64@,188,"2G17",557,46.,32 ,4,65A,186 "2G59",7,568,35#,7,38&,22,"2G19",557,46.,480,3,66B,187,"2G21",557,46.,101e,5,67C,189 "2G55",7,568,104h,8,39',23,"2G23",557,47/,118v,3,68D,192,"2G25",557,46.,132,4,69E,190 ="2G57",7,568,135,7,38&,24 "2G27",557,46.,148,3,70F,191,"2G29",557,46.,201,5,71G,193,"2G59",7,568,204,8,39',25 "2G31",557,47/,218,3,72H,196,"2G33",557,46.,232,4,73I,194,"2G55",7,568,235,7,38&,26 "2G35",557,46.,248,3,74J,195,"2G11",557,46.,301-,5,75K,0,"2G57",7,568,3040,8,39',27 ="2G13",557,47/,318>,3,76L,0 "2G15",557,46.,332L,4,77M,0,"2G59",7,568,335O,7,38&,28,"2V31",557,45-,348\,3,78N,0 ="2G19",557,46.,401,5,79O,0 "2G45",1,58:,7,14,128,557,"1G22",0,32 ,20,3,502,146,"2G05",0,60<,24,13 ,31,568 "2G47",1,58:,42*,9 ,30,579,"1M88",4,38&,45-,5,513,0,"1F10",0,39',491,29,524,0 "1P31",0,42*,546,13 ,535,0,"2G49",1,58:,107k,14,29,58:,"1S59",0,44,,110n,3,14,0,"2G01",0,60<,124|,13 ,32 ,59; "1M03",5,38&,130,7,118v,0,"2G41",1,58:,142,9 ,128,60<,"1S39",6,43+,145,16,109m,13 "1J24",0,35#,151,3,546,149,"2G43",1,58:,207,14,30,61=,"1M37",2,39',210,10 ,5,14 "1P62",0,40(,221,8,9 ,0,"2G03",0,60<,224,13 ,33!,62>,"2G45",1,58:,242,9 ,29,63?,"1M50",3,38&,245,14,110n,15 "1M51",4,39',249,16,111o,16,"1G27",0,32 ,252,16,16,0,"2G47",1,58:,3073,14,128,64@ "1J25",0,34",321A,4,17,0,"2G05",0,60<,324D,13 ,34",65A,"2G49",1,58:,337Q,14,30,66B "1E63",4,14,342V,13 ,6,17,"1G29",0,32 ,352`,8,58:,0,"2G41",1,58:,409,12 ,29,67C l"1O13",11 ,6,7,10 ,123{,10 ,"2M36",19,63?,12 ,18,103g,46.,"1V72",17,502,37%,10 ,18,0 m"2M03",21,62>,524,28,25,47/,"1V74",13 ,491,107k,7,24,0,"2G81",18,63?,112p,18,104h,480 n"1V80",11 ,524,145,5,19,0,"1M30",22,62>,152,28,26,491,"1V81",13 ,546,157,5,117u,0 v"2M40",16,63?,212,18,105i,502,"1O15",11 ,6,226,10 ,116t,11 ,"2M66",21,62>,237,43+,124|,513 w"1O19",14,4,241,9 ,20,12 ,"2G77",20,63?,3128,18,106j,524,"1M85",524,38&,321A,4,102f,0 x"1V85",14,546,325E,5,21,0,"1M80",22,62>,337Q,43+,27,535,"1M76",535,38&,352`,12 ,119w,0 @"2G67",20,63?,412,18,107k,546 г"1V71",39',524,3,17,12 ,5,"2M72",29,579,9 ,23,126~,29,"1A28",32 ,0,15,3,41),0 Ѷ"2G82",32 ,61=,29,6,35#,30,"2G92",27,59;,32 ,14,60<,31,"1O15",38&,6,39',3,42*,156 "1A31",34",0,45-,3,43+,0,"1V73",38&,535,557,9 ,44,,6,"2G94",28,59;,102f,14,61=,32 ,"2M74",31,579,109m,23,125},33! ڵ"1A34",32 ,0,115s,3,7,0,"1V76",39',546,119w,11 ,45-,7,"2G78",32 ,61=,129,6,36$,34" ۷"2G96",27,59;,132,14,59;,35#,"1O74",38&,3,139,3,13 ,111o,"1A36",32 ,0,145,3,46.,0 "1V82",43+,502,154,15,47/,8,"1G09",41),61=,157,16,28,36$,"2G90",28,59;,202,14,62>,37%,"2M76",29,579,209,23,127,38& "1V83",38&,25,219,8,100d,0,"2G80",33!,61=,230,5,37%,39',"2G92",27,59;,233,13 ,61=,40( "1A41",36$,0,245,3,8,0,"2G94",28,59;,302.,14,60<,41),"2M80",30,579,3095,23,126~,42* "1V88",39',2,321A,14,480,9 ,"2G82",32 ,61=,329I,6,35#,43+,"2G90",27,59;,332L,14,62>,44,,"1A46",35#,0,345Y,3,491,0 |"1V87",39',26,354b,6,101e,0,"2G92",28,59;,402,14,59;,45- !4"2G36",557,9 ,6,3,80P,170,"1S61",480,43+,13 ,9 ,1,2,"2G12",557,8,21,3,81Q,169 !5"2G14",557,10 ,36$,3,82R,172,"2G16",557,8,513,3,83S,171,"1E30",513,14,568,5,97a,0 !6"2G18",557,9 ,106j,3,84T,174,"2G20",557,8,121y,3,85U,173,"2G24",557,10 ,136,3,86V,176,"2G26",557,8,151,3,87W,175 !>"2G28",557,9 ,206,3,88X,178,"1E73",513,15,211,5,98b,0,"2G30",557,8,221,3,89Y,177,"2G32",557,10 ,236,3,90Z,0 !?"2G34",557,8,251,3,91[,179,"1E55",480,14,259,4,99c,0,"2G36",557,9 ,3062,3,92\,0 !@"2G12",557,8,321A,3,93],0,"2G14",557,10 ,336P,3,94^,0,"1M86",524,39',340T,11 ,23,3 !H"1E39",491,12 ,345Y,5,121y,0,"2G16",557,8,351_,3,95_,0,"1S71",546,43+,357e,9 ,2,4,"2G18",557,9 ,406,3,96`,0 #(:6:1:1 #-#5,9 ;" " #2#6,9 ;" RAIL TRAFFIC " #7#7,9 ;" CONTROL " #<#8,9 ;" " #A,9 ,9 ;2;" BIRMINGHAM " #F$10 ,9 ;" " #U0:7:3 #Z.13 ,4;"Awaiting traffic reports" #_014,3;"from control - Please wait" #`8100:0 #a=i=1128:d$(i),q(i),u(i),v(i),x(i),y(i),z(i):i #b 9950& #d & zz=0 &q$=q$(2) &"zy=q$:zy=0zz=1: &zy=29910& &zy>1zz=1: &q$<"0"q$>"9"zz=1: &$q$="1"q$="3"q$="4"zz=1: & p=q$:p<1zz=1: & &q$="1a"p=1: &q$="3a"p=3: &q$="4a"p=4: &q$="1b"p=13 : &q$="3b"p=14: &q$="4b"p=15: &q$="10"p=10 : &q$="11"p=11 : &q$="12"p=12 : &zz=1: & 9960& &&i=071G:a:("a"+i),a:i &0,70F,73I,73I,79O,73I,73I,0,0,78N,74J,78N,74J,74J,78N,0 &0,230,41),201,47/,41),233,0,0,238,42*,206,42*,42*,238,0 &0,134,137,137,175,233,41),0,0,142,138,142,170,234,46.,0 &0,76L,82R,82R,82R,82R,76L,0,0,68D,68D,68D,68D,68D,68D,0 &G0,76L,82R,68D,72H,80P,94^,0 & '&7:0:0::7  N.2@ 2G19 CCS-Lgb Sgnld to station 2G41 Cov-Brm Due 1409 on time 2G67 Not-Brm Due 1412 2 late 1A46 Abw-Eus Running into stn 1E39 Tby-Hul Running into stn 1A46 Abw-Eus 1G29 Eus-Wlv 1M76 Nqy-Man 1E76 Brm-Nor 1M86 Pgn-Liv 1E39 Tby-Hul 2G19 CCS-Lgb 6Ig~N  N  + ascvdywvgl.:? ~DFN>DG9;x|GF2~4B7N &' 6.  C6NBA*,+1  0(0= 6@/ZUP]":%-<,*<"%4 1) ;3 ;3 3;-/,64+/&%/ZT*UZ* 1 Ok1yN&1"^:wyO~>#2G572G132G172G592G192G212G552G232G252G572G272G292G592G312G332G552G352G112G572G132G152G592V312G192G451G222G052G471M881F101P312G491S592G011M032G411S391J242G431M371P622G032G451M501M511G272G471J252G052G491E631G292G411O132M361V722M031V742G811V801M301V812M601O152M661O192G771M851V851M801M762G671V712M721A282G822G921O151A311V732G942M741A341V762G782G961O741A361V821G092G902M761V832G802G921A412G942M801V882G822G901A461V872G922G361S612G122G142G161E302G182G202G242G262G281E732G302G322G341E552G362G122G141M861E392G161S712G187777777777777777     45' &"& ' & +)&!$' #'7077737777737770777417678/.8..8/.8..8/.8..8/.8-.: <:&'*:,<&:+#:'(<:&' :"<: :?2>1?4>6?>?&6>&?49=;5;96=;2=;9=;;9=;; +       ' +  #0ehv-0>LO\*-16kn|3ADQV` %4kp8AEQ`  '-7fmsw.5AILYb $38jy2APTY_e           + +       '@A&BC'DE&FG'HI&JK'LM&NO2345 vm6 !no":{ghuit|jfwk ~)#<*+,=}-$; ./>d%=<~0#>1e;PQRSaTUVWXbYZ[c\]^y_`789:;< =>?@ABC ./012 3 456 !"#o$%&'()* +,-,a xyzAwcLX N10002200010011S03030300000004hHuvqef1ts9mlygwFbnp rT1345M20003300000000IasEp12Q12R04040400000005C1400Y1335Z