:59468,12B RAIL COPYRIGHT (C) 1980 CHRIS L TORKILDSON^ CURSOR #19 APRIL 1980 BOX 550, GOLETA, CA. 93017 AS OF 29 APR 80 CONVERTED TO +/4 BY ERICH/UNLIMITED AND THUNDERBIRDS TEAM INTERNATIONAL 2005ZPG$"RAIL":NM$"19": 62000%dG%(13,3),T%(6,11).""X"HOW MANY TRAINS CAN YOU HANDLE? ";w60000::IN$""NT1:300NT((IN$,1))NT1NT6:"ENTER A NUMBER BETWEEN 1 AND 6":210,19000620000@"THE TRAINS ARE ROLLING!J22000T"":II120:: ^Q05h"WHICH GATE? ";JHH1:H255H0eI$:"";:H1" ";|I$""21000:Q05000Q0400XQ0700b"YOU MADE IT! ":MTNTMTNTlI11000::NT5"YOU HAVE REACHED THE TOP":qR$:R$""625Iv"WANT TO TRY THE NEXT LEVEL UP? ";:60000i(IN$,1)"N"NTNT1:300r720"C R A S H ! ! "I1100:(3072Y%),32:(3072Y%),160:R$:R$""715"WANT TO TRY THAT LEVEL AGAIN? ";:60000(IN$,1)"N"300R:"YOU CAN SUCCESSFULLY CONTROL";MT;"TRAINS.":xI11NT:Y%T%(I1,1)D%(T%(I1,2))X%(3072Y%):I3%0I218:X%C%(I2)I3%I2:I28Z%M%(I3%,T%(I1,2)):Z%200I11Q1:I1NT:: Z%0Q1:I1NT::9Y%3072,T%(I1,0):T%(I1,1)3072,T%(I1,3)eT%(I1,1)Y%:T%(I1,2)Z%:T%(I1,3)X%::k'8J:X3072:"":Z1BJY:Y0GJY0ZY:19010LJTX:XXZVJY32ZTX1:Z,Y:`JZ1:19010!J-81,32,85,-35,64,32,64,115,32,93,-34,32,1,93,-3,32,93,-35,32,93aJ-3,32,93,2,-34,32,93,-4,32,-18,64,32,-11,64,32,-4,64,-4,32J93,-17,32,3,93,-10,32,4,93,-3,32,5,93,-3,32,93,-18,32,93J-11,32,93,-4,32,93,-3,32,93,-18,32,93,-11,32,93,-4,32,93,-3,32,93,6-J-17,32,93,-11,32,93,-4,32,93,-4,32,-18,64,75,-11,32,93,-4,32,93sJ-3,32,93,7,-29,32,93,-4,32,93,-4,32,-14,64,73,-15,32,93,-4,32,93K-3,32,93,-14,32,74,64,32,-6,64,32,-6,64,75,-4,32,93,-3,32,93 K-15,32,8,93,-5,32,9,93,-11,32,93,-3,32,93,-16,32,93,-6,32,93;K-11,32,93,-3,32,93,-16,32,93,11,-4,32,12,93,-11,32,93,-3,32,74(K-3,64,32,-12,64,32,-6,64,32,-11,64,75,-7,32,93,10,-38,32,113,0 NI112:J02:G%(I,J):J,I*NI212:G%(I,2)3072,G%(I,((1).5)):4NG%(1,2)3072,G%(1,0)zN*N64,73,117,93,74,241,64,73,260,73,64,272,73,93,277,93,74eN441,93,74,521,64,73,578,73,64,585,64,85,725,64,74,738tN64,75,745RX1%((I$)15):X1%1X1%12 RX2%(G%(X1%,2)3072):X3%G%(X1%,1)RX2%X3%X3%G%(X1%,0)R(G%(X1%,2)3072),X3%: UI08:C%(I):*UI08:J03:M%(I,J):J,I>VI03:D%(I):^VI16:J03:T%(I,J):J,IdJVTV32,85,74,75,73,64,93,115,113^V-1,-1,-1,-1,-1,3,0,-1,-1,2,-1,0,2,-1,-1,1,3,-1,1,-1hV0,1,-1,-1,-1,-1,2,3,-1,-1,-1,-1,-1,-1,-1,-200rV1,-1,-40,40|V209,118,1,64'V214,721,0,749V214,523,0,64KV214,250,0,64]V214,755,0,64nV214,85,1,64`IN$" ":ZTTI:ZC2:ZD$(20)jZ$: Z$""60070tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15~60010Z(Z$):ZL(IN$):(Z127)32" ";:60110AFL(Z127)64(Z127)91Z$((Z128)255)SZL25460010nIN$IN$Z$:Z$;ZD$;Z$;Z13IN$(IN$,2):CR$;:Z20ZL1IN$(IN$,ZL1):"";:60010Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:6000060010(PN060250*260500:"PRESS RETURN TO ";G