:59468,12B RAIL COPYRIGHT (C) 1980 CHRIS L TORKILDSON^ CURSOR #19 APRIL 1980 BOX 550, GOLETA, CA. 93017: AS OF 29 APR 80ZPG$"RAIL":NM$"19": 62000dG%(13,3),T%(6,11)"""HOW MANY TRAINS CAN YOU HANDLE? ";$60000::IN$""NT1:3007NT((IN$,1))oNT1NT6:"ENTER A NUMBER BETWEEN 1 AND 6":210z,19000620000@"THE TRAINS ARE ROLLING!J22000T"":II120::^Q0h"WHICH GATE? ";HH1:H255H0I$:"";:H1" ";)I$""21000:Q035000@Q0400MXQ0700}b"YOU MADE IT! ":MTNTMTNTlI11000::NT5"YOU HAVE REACHED THE TOP":qR$:R$""625v"WANT TO TRY THE NEXT LEVEL UP? ";:60000(IN$,1)"N"NTNT1:300720C"C R A S H ! ! "qI1100:(32768Y%),32:(32768Y%),160:R$:R$""715"WANT TO TRY THAT LEVEL AGAIN? ";:60000(IN$,1)"N"300:"YOU CAN SUCCESSFULLY CONTROL";MT;"TRAINS.":'I11NT:Y%T%(I1,1)D%(T%(I1,2))@X%(32768Y%):I3%0cI218:X%C%(I2)I3%I2:I28iZ%M%(I3%,T%(I1,2)):Z%200I11Q1:I1NT::Z%0Q1:I1NT::Y%32768,T%(I1,0):T%(I1,1)32768,T%(I1,3) T%(I1,1)Y%:T%(I1,2)Z%:T%(I1,3)X%:: '4 8J:X32768:"":Z1B BJY:Y0W GJY0ZY:19010e LJTX:XXZ VJY32ZTX1:Z,Y: `JZ1:19010 J-81,32,85,-35,64,32,64,115,32,93,-34,32,1,93,-3,32,93,-35,32,93 J-3,32,93,2,-34,32,93,-4,32,-18,64,32,-11,64,32,-4,64,-4,32R J93,-17,32,3,93,-10,32,4,93,-3,32,5,93,-3,32,93,-18,32,93 J-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,93& J-3,32,93,7,-29,32,93,-4,32,93,-4,32,-14,64,73,-15,32,93,-4,32,93h K-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,742 (K-3,64,32,-12,64,32,-6,64,32,-11,64,75,-7,32,93,10,-38,32,113,0S NI112:J02:G%(I,J):J,I *NI212:G%(I,2)32768,G%(I,((1).5)): 4NG%(1,2)32768,G%(1,0) zN N64,73,117,93,74,241,64,73,260,73,64,272,73,93,277,93,74 N441,93,74,521,64,73,578,73,64,585,64,85,725,64,74,738) N64,75,745L RX1%((I$)15):X1%1X1%12u RX2%(G%(X1%,2)32768):X3%G%(X1%,1) RX2%X3%X3%G%(X1%,0) R(G%(X1%,2)32768),X3%: UI08:C%(I): UI08:J03:M%(I,J):J,I VI03:D%(I):VI16:J03:T%(I,J):J,IJV=TV32,85,74,75,73,64,93,115,113v^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,64V214,721,0,74V214,523,0,64V214,250,0,64V214,755,0,64%V214,85,1,64F`IN$" ":ZTTI:ZC2:ZD$(20)]jZ$: Z$""60070tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15~60010Z(Z$):ZL(IN$):(Z127)32" ";:60110FL(Z127)64(Z127)91Z$((Z128)255) ZL25460010%IN$IN$Z$:Z$;ZD$;Z$;DZ13IN$(IN$,2):CR$;:pZ20ZL1IN$(IN$,ZL1):"";:60010Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:6000060010(PN060250260500:"PRESS RETURN TO "; 60200:"THERE ARE TWELVE SWITCHES,LABELEDj"A THROUGHL. YOU THROW THE SWITCH BY "TYPING ITS LETTER. THROWING A*"STRAIGHT SWITCH CURVES THE TRACK AROUND4"THE LETTER.H"YOU MUST TRY TO MOVE THE SPECIAL TRAIN"/R"FROM ITS START ON THE UPPER RIGHT HANDZ\"CORNER TO THE SIDING NEAR THE LOWERsf"LEFT HAND CORNER.~60200