ZXTape! 0Created with Ramsoft MakeTZXgw 8 =>: #i=07:r:""+i,r:i J80P,32 ,224,32 ,62>,63?,34",34" #i=07:r:""+i,r:i H0,0,32 ,224,62>,63?,34",34" #i=07:r:""+i,r:i L0,127,63?,63?,63?,255,102f,102f (#i=07:r:""+i,r:i *K24,36$,68D,134,104h,16,16,16 2#i=07:r:""+i,r:i 4I16,568,84T,568,84T,16,16,16 d"STOP TAPE NOW!" f i]"THIS SHORT PROGRAM HAS ALREADY LOADED THE GRAPHICS FOR THE MAIN""GREAT WESTERN"" PROGRAM" n x@"BREAK OUT OF PROGRAM BY PRESSING""CAPS SHIFT"" AND ""BREAK""" } O"LIST PROGRAM IF YOU WISH.IF NOT PLEASE TYPE ""NEW"" AND PRESS ""ENTER"""  P"THEN LOAD ""GW"",PRESS ""ENTER"",RESTART TAPE AND PRESS ""ENTER"" AGAIN."  -"DO NOT SWITCH OFF OR DISCONNECT THE POWER" 1,30 150 2r gw j݉di1::5,5;"SHOOT THE MOOSE";7,5;"LEFT=5.RIGHT=8.FIRE=0":2,0 s-:A=0:B=0:G=0:M=G:C=M |A,B;" ":1,0:A=(*10 ):B=(*27)+2:A,B;"":F=0:M=M+1:M=11 2000 20,C;" * " F=F+1 F=70F124| ="0"152 *C=C+(="8"C<31)-(="5"C>1) 138 'am=am-1:am=02000 AE=180-1:E,C+1;"^":E,C+1;" " A=EB=C+1170 ="5"Ŧ="8"148 E  71,30:ff=ff+10 :A,A;" ":124| g$="": 6:7:9 <0,0;"USE CURSOR KEYS.","BEWARE OF HARD ROCK!" TM=500 $A(12 ,14):GOLD=0 YN=140(:A=(*10 )+2:B=(*12 )+2:A(A,B)=1:N A=12 :B=17 8a(1,1)=0:a(1,2)=0 A,B;"*":G=A:H=B 4E=(*10 )+10 :F=(*12 )+17 ,A(E-7,F-16)=1232 *J=(A-E)+(B-F):9 ,14;J;" " 9TM=TM-1:TM02,-20:390 j8262 A,B;"*" 244+2*J 300, !g$="STRIKE! ":262 !g$="RICH PICKINGS ":262 !g$="TRACER ":262 !g$="NOTHING ":262  G=A:H=B  *A=A+(="6"A<19)-(="7"A>8)  +B=B+(="8"B<29)-(="5"B>17)  #.1}L,(1000-TM)/502  1gold=4(a=17b=18)350^  10 ,3;g$ 5A(A-7,B-16)=1A,B;"":A=G:B=H G,H;" ":A,B;"*":236 , 9100# 6*GOLD=GOLD+1:1,GOLD*10 @ 228 ^"tm0ť<.1}L390 DTD=TD+(GOLD*100d+(*100d)):2,0:2000 #"You fell down an old Mine shaft" 1MEN=MEN-1:FF=FF-10 :WW=WW-10 2,-10 :2000 ind=1:2 <.3800  *5,10 ;"INDIAN ATTACK!" *7,0;"PRESS 6 7AIM,0FIRE" =""505  #W=1:SC=0:AR=3 A=1163  {A,0;2;"!!!!!!!!!!!!!!!!!!!!";A+1,0;"00000000000000000000";A-1,26;0;"::" A #19,26;0;"::"  N=3 & Q=0 + S=9 0N=2162 :A=16 ?B=(*6)*3 DC=N26 I!.06|u\,C:B,C;0;"->" NQ0655 S="0"645 XS,23;" " ]>S=S+((="6"S15)*3)-((="7"S2)*3) g$B,C;" ";S,23;0;"-=" jB=SC=23C=C+1 lC n#.5,-10 :AR=AR-1 qAR=0730 vA {N  .03{u\,10 :Q=24 &am=am-1:am=0595S S1=S  S1,Q;" "  Q=Q-1 Q=N720 #(Q=CQ+1=C)S1=B685 S1,Q;0;"."  600X  Q=0  S1,C;" " SC=SC+1 T21,0;2;9 ;"ATTACK WAVE ";(N/2);" HITS ";SC  630v   P=1  730  Q=0  600X  PEN=64@-SC O"YOU HAVE BEATEN THEM OFF,BUT YOULOST ";(pen/2)+2;" PASSENGERS." PEN=0750 %"YOU ALSO LOST ";PEN;" LBS OF FOOD"  "AND ";PEN;" GALLONS OF WATER" 6WW=WW-PEN:FF=FF-PEN:MEN=MEN-(PEN/2)+2 ;21,0;"ANY KEY TO CONTINUE":2,20 =""750  2000  FRIENDLY INDIANS ! 2: " B$="FOOD" $>.5B$="WATER" &r"FRIENDLY INDIANS WISH TO TRADE. THEY OFFER ";B$;" FOR TRADE ","GOODS OR AMMUNITION.HOW MUCH",b$;" DO YOU WANT?" ( N$:n=n$ )CS=((*3)+1)*N$ *:"THAT WILL COST YOU ";CS;,"ROUNDS OF AMMUNITION,AGREED?" ,n$ .6n$(1)="y"n$(1)="Y"AM=AM-CS:850R 0#n$(1)="n"n$="N"8204 2 812, 44"TIGHTWAD.HOW ABOUT $";CS;,"WORTH OF TRADE GOODS?" 6n$ 86n$(1)="Y"n$(1)="y"TD=TD-CS:850R :#n$(1)="N"n$="n"830> < 8226 >>"PALEFACE IS A REAL MEAN GUY!":2,10 :2000 R."CHEAP AT HALF THE PRICE!":2,20 \ b$="FOOD"ff=ff+n:2000 fww=ww+n:2000 FORT NEWSOFT  3: 47,0;" $ FORT NEWSOFT"  " " " TRADING POST" " PRICE LIST" " 1 LB FOOD $10" " 1 GAL WATER $10" " ### 1 ROUND AMMO $1"  " ###" #18,0;"YOU HAVE $";TD +19,0;"HOW MUCH FOOD? " n$ n=n$ kTD<10 *n1,-20:19,0;"CANT AFFORD THAT MUCH":1,-20:912 TD=TD-n*10  FF=FF+n (18,0;"YOU HAVE $";TD;" " +19,0;"HOW MUCH WATER? " N$ N=N$ kTD<10 *N1,-20:19,0;"CANT AFFORD THAT MUCH":1,-20:920 TD=TD-N*10  WW=WW+N (18,0;"YOU HAVE $";TD;" " +19,0;"HOW MUCH AMMUNITION? " N$ N=N$ bTD.73333ind110 ,10 ;1;"INDIANS":9100#::500  ind=0:1500 #([:"WITH NO PASSENGERS THERE IS NO POINT IN CONTINUING YOUR TRIP,IS THERE?":9100#: #2j=110 :i=07:i:i:j: %3"CONGRATULATIONS! YOU MADE IT TO THE WEST COAST." nisedddaboun NyB