pz mm o v1.0  7 "pzs" 18,1 "pz" 18,1 "pzg" pzs @p`   0       0 ` 0|<|~B~B<BBB@bBbB@888x<@88D888x8BBbbbBB@B|RBR@|0@D<0DD@DDDDDBBRRR@|@>|@J~J@@8DB<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<<<88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888899999999999998888888888888888888899999999999999888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888pz XbT<<<<<<pzg Ikl$(40(,20):s$(4,9 ):w$(3,6):a$(3,6):b$(3,6)  0 +h$(2,6):q$(4,28) Hp(4):d(4):c(5):s(4):r(3):t(3) 23562 \,20 3000 23672x\,0 -21,0;0;6;"Input" =" "1600@ #="q"85004! <$(23672x\)<100d30 >21,0;" " A 700 F 25 lst=1600X a=1lst-1 h=s(a):k$=l$(h,9 ) 1ldt=clok-l$(h,10 13 )-(*11 ) ;ldt>25k$="f"l$(h,9 )="a":s$(a,8)="a" ;ldt>64@k$="e"l$(h,9 )="a":s$(a,8)="a" ;ldt>93]k$="r"l$(h,9 )="a":s$(a,8)="a" l$(h,1)"2"520 clok<661520 &l$(h,9 )="s":s$(a,8)="s" a Xldt=(clok/pj) Yldt=clok-(ldt*pj) Zlldt=01+(*10 )<8l$(1,10 13 )="0000":pj=46.+(*10 ) ]/l$(1,1819)"py"610b ^/a=l$(1,10 13 ):a=a+1 _?a<10 l$(1,10 13 )="000"+a:610b a'l$(1,10 13 )="00"+a b'o$="08644 "pk=pk-1:615g c pk=0 g[l$(1,10 13 )<15pk0(py=0py=2)py=py+1 l@l$(1,10 13 )>15py=3py=2 qpy>3py=py-1 vpy=1ds=ds+.1}L $dc=0m$="clear ":646 dc=dc-1 u0u=u-1 a=(clok/18) a=clok-(a*18) 2a0e>0clokn$=" "+o$+" signal to sw":c(5)=7:9250"$ jh$(of)=d$:c(5)=2:l$(x,1819)="sw":n$=u$:w$(sw)=o$:sw=sw+1:9100#  2806 k$"be"1810  #9240$:z=12800  f$d$2800 0h$(of)=d$:f$=o$:l$(x,1819)="be"  2802 k$"bh"1820  9220$ of=29230$ of=19240$  h$(of)=d$ 'of=of-1:of=0of=2  h$(of)=o$ 9099#:2806 k$"b1"1830& fb1=42800  9240$ "z=12800 $Va$(fb1)=h$(of):h$(of)=d$:l$(x,1819)="b1":fb1=fb1+1:2803 &k$"b2"18400 (fb2=42800 * 9240$ ,z=12800 .Vb$(fb2)=h$(of):h$(of)=d$:l$(x,1819)="b2":fb2=fb2+1:2803 0"e=0sh=12800 2m$"clear "2800 4#9230$:z=12800 5#l$(x,9 )"a"ds=ds+15 6Km$="signl ":n$=" "+o$+" signal to ml":c(5)=4:9250"$ 7 h$(of)=d$ 89c(5)=2:l$(x,1819)="ml":n$=u$ 90m$="occup ":e=0:dc=3:2802 :c$"be"1860D <x$"bh"2800 >#92706$:z=12800 @<h$(of)=f$:f$=d$:l$(x,1819)="bh":2803 Dc$"b1"1890b E9052\#:9000(# Fz=02800 Hk$"bh"1872P I#92706$:z=12800 K a$(fb1-1)o$2800 Ll$(x,18)="bh" MIh$(of)=a$(fb1-1):a$(fb1-1)=d$:fb1=fb1-1:2803 Pk$"mr"1878V R1a$(2)o$a$(1)"MRAIL "2800 Ssh=12800 T%a$(2,6)="+":2803 VSfb13o$(5)a$(2,5)a$(2,6)"+"2800 W#9380$:z=12800 Xz=22215 Y#l$(x,9 )"a"ds=ds+15 ZKm$="signl ":n$=" "+o$+" signal to ml":c(5)=4:9250"$ [ds=ds+(clok-1161) \fc(5)=2:l$(x,1819)="ml":n$=u$:fb1=1:a$(1)=d$:a$(2)=d$ ]2m$="occup ":dep=1:dc=3:2802 bc$"b2"1920 c9052\#:9000(# dz=02800 fk$"bh"1902n g#92706$:z=12800 i b$(fb2-1)o$2800 jl$(x,18)="bh" kIh$(of)=b$(fb2-1):b$(fb2-1)=d$:fb2=fb2-1:2803 nk$"mr"1908t p1b$(2)o$b$(1)"MRAIL "2800 qsh=12800 r%b$(2,6)="+":2803 tSfb23o$(5)b$(2,5)b$(2,6)"+"2800 v#9380$:z=12800 xz=22215 y#l$(x,9 )"a"ds=ds+15 zKm$="signl ":n$=" "+o$+" signal to ml":c(5)=4:9250"$ {ds=ds+(clok-1161) |fc(5)=2:l$(x,1819)="ml":n$=u$:fb2=1:b$(1)=d$:b$(2)=d$ }2m$="occup ":dep=1:dc=3:2802 c$"sw"1960 9053]#:9000(# z=02800 k$"bh"1930 #9260,$:z=12800 w$(sw-1)o$2800 l$(x,18)="bh" Eh$(of)=w$(sw-1):w$(sw-1)=d$:sw=sw-1:2803 zz=k$(2) w$(sw-1)o$2800 arv>22800 p(zz)>62800  cha0vra=zz2800 p(zz)>21946 :9280@$:w$(sw-1)=d$:sw=sw-1:2803 'of=0:p(zz)5of=6 .sh=0q$(zz,7+of)="M"2800 .sh=0q$(zz,7+of)="E"2800 #9300T$:z=12800  9310^$ "w$(sw-1)=d$:sw=sw-1  2802 c$"ld"1990 l$(x,9 )"a"2800 x$="pl"1980 x$"el"2800 hs=01972 e$g$2800 <n$=" "+o$+" moving to ECS loop":9320h$:9099# Ce$=o$+d$+d$:l$(x,1819)="el":9100#:2806 e$=g$2800 e$(1)" "2800 <n$=" "+o$+" moving to ECS loop":9320h$:9099# Le$=o$(5)+"+"+e$(7):l$(x,1819)="el":2803 p$"clear "2800 Cn$=" "+o$+" moving to pl":p$="occup ":9320h$:9099# =p$=o$:l$(x,1819)="pl":9100#:2806 c$"el"2070 p$"clear "2058  9054^#:9000(# zz>42040 arv<12002 $arv>2zz<32002  2800 hs=02010 p(zz)02800 e$=g$  1718 p(zz)>22800 'of=1:p(zz)2of=7 *sh=1e$(2)"08"2800 3p$="occup ":q$(zz,817)="ECS signld" -n$=" "+o$+" moving to P"+zz:9099# @q$(zz,ofof+16)=e$(117):e$=g$:p$="clear " ;x$=q$(zz,10 +of13 +of):9340|$:9200# p(zz)=p(zz)+6 /sh=1q$(zz,of+5)=".":2032 Hq$(zz,6+of16+of)=q$(zz,10 +of13 +of)+" deptr."  9210# 9100#:2806 k$"pl"2050 e$(2)="08"2800 Ep$=o$:e$=d$+e$(111 )+" ":l$(x,1819)="pl"  2803 k$"rr"2058  e$(2)="08"2800 -p$="occup ":e$=d$+e$(111 )+" " +n$=" "+o$+" running round":9099# Kp$="clear ":e$="08644+"+e$(717)+" ":9100#:2806  k$"py"2800  e$(2)"08"2800 Rn$=" "+o$+" moving to ponsandane":e$=d$+e$(717)+" ":9099# Jl$(x,1819)="py":l$(x,10 13 )="0001":py=5  2803 c$"py"2140\ 9055_#:9000(# z=02800 k$"py"2090* py32800  ,n$=" "+o$+" being summoned":9099# "$py=2:9100#:2806 *k$"el"2130R +py22800 ,e$g$2112@ .er=6211C2800 0 er-1 2v$ 6e$="ECS signalled" 8*n$=" "+o$+" moving to el":9099# :1l$(x,1819)="el":n$=u$:py=0 <6e$="stk "+v$+"dp."+"+08644":esk=1:9100# > 2806 @e$(1)" "2800 Be$(16)="08644+" D<py=0:l$(1,1819)="el":2803 Rk$"pl"2800 T$py2p$"clear "2800 V7n$=" "+o$+" moving to pl":p$="occup ":9099# XIpy=0:p$=o$:l$(x,1819)="pl":9100#:2806 \c$(1)"p"2450 ^-c$(2)<"1"c$(2)>"4"2800 `9056`#:9000(# bz=02800 dpl=c$(2) fzz>42170z hplzz2800 i)p(pl)=1p(pl)=22155k j 2800 kf=24:t=28 lp(pl)=12162r nf=18:t=22 p%o$(5)q$(pl,ft)2800 r<9280@$:p(zz)=p(zz)-1:q$(pl,ft)=d$:2803 zk$"pl"2190 |#9350$:z=02180 ~z=12800  2214 Fn$=" "+o$+" signal to pl":p$="signl ":c(pl)=7:9250"$ $hs=09370$:2185 &q$(pl)=i$:p(pl)=0:2186 q$(pl,ofof+5)=d$ Gc(pl)=2:l$(x,1819)="pl":n$=u$:p$=o$:9100#  2806 k$"ld"2200 #9350$:z=02194 z=12800  2214 In$=" "+o$+" signal to depot":p$="signl ":c(pl)=7:9250"$ $hs=09370$:2197 &q$(pl)=i$:p(pl)=0:2198 q$(pl,ofof+5)=d$ c(pl)=2:1680 k$"py"2220 #9350$:z=12800 z=22210 Hn$=" "+o$+" signal to yard":p$="signl ":c(pl)=7:9250"$  9370$ 4c(pl)=2:q$(pl,ofof+5)=d$:1694 #q$(pl,of+6)"E"2800 d(pl)>clok2214 Hn$=" "+o$+" signal to yard":p$="signl ":c(pl)=7:9250"$ Nq$(pl,of+6of+16)=" ":p(pl)=p(pl)-6:2206 a=d(pl)-clok 21,0;u$ 321,3;"Train not ready for ";a;" min"  2800 k$"el"2250 #9350$:z=12800 Cz2q$(pl,of+6)="E"q$(pl,of+6)="M"2800 e$g$sh=02800 #u0vra=pla=u:2215 Fn$=" "+o$+" signal to el":p$="signl ":c(pl)=7:9250"$ Tc(pl)=2:v$=q$(pl,ofof+16):q$(pl,ofof+16)=" " 7n$=" "+o$+" moving to el":p$="occup ":9099# :e$=v$:l$(x,1819)="el":p(pl)=p(pl)-6 %p$="clear ":9100#:2806 k$"sw"2280 sw=42800 arv>22800 pl<32800  of=1 p(pl)<9 2270  q$(pl,6)o$2800 9n$=" "+o$+" signal to sw":c(pl)=7:9250"$ Fq$(pl,ofof+5)=d$:c(pl)=2:l$(x,1819)="sw" !n$=u$:w$(sw)=o$:sw=sw+1 9370$:2803 sh=02800 p(pl)8of=7 #q$(pl,of+5)"."2800  2262 k$"ml"2400` 2p(pl)<6m$"clear "sh=12800 hs=02320 d(pl)>clok2214 )x$=q$(pl,13 16):9340|$  z=0 a=13 r(a)=dtz=a a z=02800 pl=4ds=ds+3 !z=t(z):(63000+z),1 Fm$="signl ":n$=" "+o$+" signal to ml":c(pl)=4:9250"$ ds=ds+(clok-dt) Cc(pl)=2:d(pl)=0:l$(x,1819)="ml":n$=u$ 2hs=1q$(pl)=i$:p(pl)=0:2314 +q$(pl,ofof+16)=" " p(pl)=p(pl)-6 2m$="occup ":dep=1:dc=3:2802 p(pl)>82370B d(pl)>clok2214 'of=1:p(pl)<8of=7 /o$(5)q$(pl,ofof+4)2800 of=of+6 (x$=l$(x,1417):9340|$ #(dt+557)>clokds=ds+3 %x$=q$(pl,ofof+3):9340|$  z=0 a=13 r(a)=dtz=a a !z=02800 "of=of-6 &2a=t(z):a+6098:x$:x$=x$(68) ( x$(3)"Pad"23542 *!l$(x,2)="50"23553 +ds=ds+3 ,$l$(x,2)"47"ds=ds+9 . 23553 2V(x$(3)="New"x$(3)="Man"x$(3)="Drb")x<24ds=ds+3 3#l$(x,9 )"a"ds=ds+15 4 2298 B"e=0sh=12800 Dm$"clear "2800 Fp(pl)<9 2800 G q$(pl,6)o$2800 H#l$(x,9 )"a"ds=ds+15 JFm$="signl ":n$=" "+o$+" signal to ml":c(pl)=4:9250"$ L)q$(pl,6)=d$:p(pl)=p(pl)-9 N4c(pl)=2:l$(x,1819)="ml":n$=u$ P0m$="occup ":e=0:dc=3:2802 `sh=02800 b7p$"clear "h$(1)d$h$(2)d$2800 darv02800 fp(pl)>82800 h'of=1:p(pl)<8of=7 i#q$(pl,of+6)"M"2800 j'i=fb1:j=1:k$="b1"2414n li=fb2:j=2 ni12800 oHn$=" "+o$+" signal to b"+j:p$="signl ":c(pl)=7:9250"$ pOp(pl)=p(pl)-6:q$(pl,ofof+16)=" ":c(pl)=2 r9n$=" "+o$+" moving to b"+j:p$="08+MR ":9099# tIn$=" "+o$+" moving to b"+z:h$(2)=p$:p$="clear ":9099# u&l$(1,1819)="b"+j vj=22426z x`h$(2)=d$:a$(1)="MRAIL ":a$(2)="08644":fb1=3:9100#:2806 z`h$(2)=d$:b$(1)="MRAIL ":b$(2)="08644":fb2=3:9100#:2806 arv02800 clok12800 m$="signl " clokar+ad-3m$="occup" 5arv=zz:q$(zz,622)="Arrival signalled" ch=4 dc=ch 9099#:2806 =2:.5,-2:ds=ds+.2~L:23672x\,kep 0 $23672x\<100d2802 'n$=u$:21,0;u$:60< 23672x\,kep 26 : 8000@ $a=15:c(a)=2:a g$=" " cha=0:vra=0 0a=131:(63000+a),0:a #i$=" " :o$="":m$="clear ":e$=" ":d$=" " .u$=" ":n$=u$ nard=6000p:clok=296(:arv=-1:dep=1:pj=46.+(*10 ):ds=0:dc=0 5esk=1:er=62008:ch=0:cha=0 0c4=0:c3=4:c2=5:c1=6 <p(4)=6:lst=4:sw=1:hd=9160# <fb1=2:fb2=2:e=0:lm=0:u=0 7000X %ap=1:bp=16:7900 %ap=17:bp=4:7900 %ap=23:bp=5:7900 &ap=28:bp=11 :7900 a=140( l$(a,9 )="a" $l$(a,10 17)="00000000" l$(a,18)="ml" a l$(1,17)="1":l$(2,17)="1":l$(3,17)="1":l$(18,17)="1":l$(24,17)="1":l$(29,17)="1":l$(30,17)="1":l$(31,17)="1":l$(32 ,17)="1" 8l$(18,9 )="f":l$(32 ,9 )="e" \l$(30,13 )="1":l$(31,13 )="1":l$(32 ,11 13 )="340" l$(1,18)="bh":l$(2,18)="p4":l$(3,18)="b2":l$(18,18)="be":l$(24,18)="b1":l$(29,18)="pl" Da=13:w$(a)=" ":l$(a+29,18)="ld":a p$=l$(29,6) ?s(1)=30:s(2)=31:s(3)=32 a$(1)=l$(24,6):b$(1)=l$(3,6):f$=l$(18,6):h$(2)=l$(1,6) h$(1)=" " a=14:q$(a)=i$:a 3q$(4,711 )=l$(2,6) Dq$(4,12 23)="+0505 deptr.":d(4)=3051 py=0 a=13 %s$(a)=l$(29+a,6)+"(a)" a 2s$(3,8)="e":s$(4)=" " 7:0:0: =0,0;6;"PENZANCE CONTOL SUMMER SATURDAY" 2,0;"DEPARTURES" >6,0;6;"PONSANDANE YARD LONGROCK DEPOT" 78,0;0;5;"MARSHALLED SETS " $11 ,0;"ML: SW:" $12 ,0;"PL: EL:" ,13 ,10 ;6;"STATION AREA" 14,12 ;"B2" 15,12 ;"B1" '16,0;"BH";23;"BE" 17,0;"P4" 18,0;"P3" 19,0;"P2" 20,0;"P1" 1300:1000 %500:1300:1000: cha=0 cha=cha-1 cha0  u=7 p(vra)255100 Sj$(1)="E"j$=l$(ll,6)+"("+j$+") ":d(vra)=clok+7:5030 ;j$=l$(ll,6)+"("+j$(710 )+" departure)" %x$=j$(811 ):9340|$ y=zz zz=vra:9200#:zz=y q$(vra,627)=j$  )fo=4:p(vra)=4fo=10 j$(1)"M"5120 6d(vra)=clok:q$(vra,fofo+13 )=" M'rail stk."  j$(1)"E"5140 :d(vra)=clok+7:q$(vra,fofo+13 )=" "+j$+"."  0q=1d(vra)=d(vra)+18+(*3)  %x$=j$(710 ):9340|$  y=zz:zz=vra:9200#:zz=y =q$(vra,fofo+13 )=" stk "+j$(710 )+"dp."  p("0527",25,"1915dp.exYORK","0646" q&"0544",22," Plym parcels","ez" r%"0625",4,"Overnite mail","ez" s&"0654",19,"Newspaper vns","ez" t%"0710",5," Motorail trn","mr" u%"0748",6,"Night Riviera","ez" v'"0805",7,"2357dp.exPADD","0932" w("0843",27,"2217dp.exMANC","1125" x'"0901",8,"2315dp.exLVPL","1035" y'"1029",9 ,"0825dp.exPLYM","1105" z&"1133",10 ,"LONDON parcls","ez" {("1200",33!,"0630dp.exWORC","1235" |("1243",23,"0751dp.exBRIS","1415" }("1307",34","0745dp.exPADD","1340" ~("1317",11 ,"0621dp.exWOLV","1520" ("1358",35#,"0845dp.exPADD","1448" ("1433",21,"0750dp.exSWAN","1540" ("1456",26,"0717dp.exDRBY","1600" ("1528",12 ,"0940dp.exPADD","1615" ("1548",36$,"1045dp.exPADD","1700" &"1642",37%,"1145dp.exPADD","ed" &"1709",13 ,"0914dp.exBRTN","ep" &"1753",14,"0936dp.exLVPL","ep" &"1804",38&,"1245dp.exPADD","ed" &"1824",20,"0921dp.exLEED","ep" &"1919",15,"1330dp.exPADD","ep" ("1929",40(,"1210dp.exLVPL","2013" &"1946",28,"0922dp.exNEWC","ep" &"2010",16,"1345dp.exPADD","ep" &"2042",17,"1445dp.exPADD","ep" &"2101",39',"1545dp.exPADD","ed" "0505 Plym " "0628 Padd-H" "0646 Newq-e" "0725 Padd-H" "0740 Glas " "0835 Padd-H" "0853 Newc " "0910 Leed " "0932 Padd " "1000 Lvpl " "1020 Padd-H" "1035 Leed " "1050 Brtn " "1105 Padd " "1125 Manc " "1235 Padd-H" "1340 Padd-H" "1350 Bris-p" "1415 Wolv-r" "1436 Padd-r" "1448 Padd-H" "1520 Wolv " "1540 Padd " "1600 Drby " "1615 Padd " "1700 Padd-H" "1815 Plym " "1921 Padd-m" "2013 Plym-H" "2030 Padd-r" "2045 Padd-s" " " " " " " 8"0740" 9"0853" :"0910" ;"1000" <"1050" ="1350" >"1436" ?"1815" @"2030" A"2045" B" " C" " Xexp=1:l$(1,6)="08644":l$(1,78)="PZ":7500L:bor=0 b np,cp,gp cbor:bor=bor+1 gnp=999 lgp=-1gp:7200  qi=0gp-1 vj=13 {+l$(i*3+j+1,10 13 ) j i  kp=0 i=1np .lp=l$(kp*3+2,10 13 ) .mp=l$(kp*3+3,10 13 ) vp=mp-lp+1 rp=1+(*vp) op=cp+lp+rp-1  7300 zp=17075 $l$(xp+1,16)=op Il$(xp+1,78)=l$(kp*3+4,10 13 ) xp=xp+1:kp=kp+1 kp=gpkp=0 i  7010b  i=12*gp %!l$(i+1,10 13 ) *i /i=1np 4rp=1+(*gp) 9)op=cp+l$(rp*2,10 13 ) > 7300 Czp=172204 Hl$(xp+1,6)=op MIl$(xp+1,78)=l$(rp*2+1,10 13 ) Rxp=xp+1 Wi \ 7010b  zp=0 y=1xp -l$(y+1,6)=" "7315 (l$(y+1,6)=opzp=1 y  Vh16,50000P,5,"1","20","LA","21","26","OC","27","29","LA","30","40","OC","41","50","LA" `a4,47000,4,"500","502","OC","507","514","OC","556","560","CF","600","602","CF" j2,47000,-1,10 ,"76","BR","78","BR","79","BR","29","CF","96","CF","123","CF","86","BR","91","BR","159","BR","186","CF" t3,45000ȯ,-1,18,"1026","GD","1052","GD","2406","GD","2451","CD","2459","BS","2534","BS","2421","GD","2435","CD","2474","BS","2522","GD","2104","IM","2537","BS","2588","CD","2273","HA","2599","BS","2608","CD","46","TO","57","TO" y+2,45100,,1,"1","50","TO" ~<11 ,253000w,2,"1","18","WR","28","40","WR" -1,253000w,1,"41","55","WR" 999,0,0 c=110 dp=1+(*bp) ep=1+(*bp) ep=dp7910 y$=l$(ap+dp,6) z$=l$(ap+dp,78) 'l$(ap+dp,6)=l$(ap+ep,6) 5l$(ap+dp,78)=l$(ap+ep,78) l$(ap+ep,6)=y$ l$(ap+ep,78)=z$  c  @.3,8;2;"PENZANCE CONTROL" E65,4;1;"SUMMER SATURDAY 0456 am" J110 ,2;"Prepare to begin your shift" O111 ,2;"as duty traffic controller." T !47:0:7: !>.3,8;2;"PENZANCE CONTROL" !C"5,10 ;"END OF SHIFT" !Hclok<360h8600! !M!ds=ds*60</(clok-296() !Nx$="Excellent" !Pds>2x$="Competent" !Rds>4x$="Satisfactory" !T ds>6x$="Below average" !Vds>8x$="Rather poor" !Xds>10 x$="Disasterous" !\410 ,1;"Regional Control at Paddington" !^411 ,1;"have rated your performance as" !`14,11 ;x$ !%19,0;"Another Shift ?" ! ="y" ! ="n" ! 8602! #(z=0:a #* b=1a #,k$ #.$k$=x$zz=b:z=1:90102# #0b #2k$="py"sh1z=0 #4k$="bh"hs=1z=0 #6 k$="ld"lst=5z=0 #7 #Z,7,"p1","p2","p3","p4","bh","ld","py" #[69 ,"b1","b2","be","sw","pl","ld","py","bh","ml" #\3,"bh","mr","ml" #]3,"bh","p3","p4" #^,7,"p1","p2","p3","p4","pl","rr","py" #_3,"py","el","pl" #`F12 ,"p1","p2","p3","p4","pl","ld","py","el","sw","ml","b1","b2" #a4,"p1","p2","p3","p4" #+0:on=0:21,0;u$ #on=1n$=u$ # 700 #23672x\,kep #$23672x\<100d9112# #kep=0:on=1: #hd:x$ #@q$(zz,627)=o$+"("+x$+" departure)":hd=hd+1 #9340|$: #"0628" #"0725" #"0835" #"1020" #lt=dt-clok+1 #lt>9 lt=dt:9206# #lt=clok+11 # d(zz)=lt: ##l$(x,1819)="p"+zz: $3z=0:of=1:o$h$(1)of=2 $ $ 9220$ $&of=2h$(1)d$z=1 $k$="sw"k$="ml"k$="bh" $p$"clear "z=1 $arv>0z=1 $ $ 9220$ $&of=1h$(2)d$z=1 $ $"21,0;u$ $# 1000 $%23672x\,0 $&#23672x\<5029254&$ $( $, z=0 $.h$(1)d$z=1 $0(of=2:h$(2)d$of=1 $2 $6 z=0 $8h$(2)d$z=1 $:(of=1:h$(1)d$of=2 $< $@ q$(zz,6)=l$(x,6) $B!p(zz)=p(zz)+9 :9210# $D $T z=0 $Vsh=0 $X/q$(zz,7+of)="E"q$(zz,7+of)="M" $Z"(d(zz)-20)2pl<39357$ $ z=1: $p(pl)=259364$ $p(pl)<6z=1: $of=1:p(pl)>8 $p(pl)8of=7 $"q$(pl,of+5)"."z=2 $4q$(pl,of+5)="+"(k$"py"k$"el")z=1 $ $"q$(pl,13 )"E"z=1: $clok8p(pl)=p(pl)-9 : $p(pl)=p(pl)-3: $ z=0 $1clok<1161a=1161-clok:z=2: $8m$"clear "h$(1)d$h$(2)d$z=1: $ y=0 $a=13 $r(a)=1161y=a $a $y=0z=1: $!y=t(y):(63000+y),1 $ %(08644 PZa00020001py 50049 LAa00000001ml 50023 OCa00000001b2 50028 LAf00000359ar 50021 OCa00000000ml 50042 LAa00000000ml 50003 LAa00000000ml 50031 OCa00000000ml 50027 LAa00000000ml 50048 LAa00000000ml 50017 LAa00000000ml 50009 LAa00000000ml 50038 OCa00000000ml 50029 LAa00000000ml 50022 OCa00000000ml 50010 LAa00000000ml 50039 OCa00000000ml 47602 CFf00000001be 47509 OCa00000000ml 47502 OCa00000000ml 47558 CFa00000000ml 47186 CFe00000328p3 47159 BRa00000000ml 47534 BSa00000001b1 45123 TOa00000298p4 45116 TOa00000000ml 47474 BSa00000000ml 46026 GDa00000000ml 253010WRa00000001p1 253014WRa00010001ld 253005WRa00010001ld 253038WRe03400001ld 253039WRa00000000ml 253036WRa00000000ml 253002WRa00000000ml 253031WRa00000000ml 253015WRa00000000ml 253032WRa00000000ml 253001WRa00000000ml 253055WRa00000000ml ) 253014(a)253005(a)253038(e)  47534 50023  u 253010(0628 departure) stk 0740dp. 47186 stk 0646dp.45123 G hrI D U rslore1is:s#bbeu(ov)7w'  F47602  *#t(h d/exzln V08644+stk 0740dp.qE J ECS P'dane.T0625R Overnite mailZezY ECS P'dane.O08644 Cp3Pclear N Mclear X 08644 at work Ke