Gold Rush $$&XGold Rush by M.Rai from Your Spectrum 15 (Jun.85) &0:0:7:1: 8000@:7060 :sc=0:li=3 T:n=031:0,n;7;1;1;"";21,n;"":n u$=" ":t$=u$ 1,12 ;"GOLD RUSH" in=6165:n,0;2;7;1;"":n n=68:n,3;6;7;1;"";n,28;"";n+5,0;"";n+5,31;"";n+10 ,4;"";n+10 ,27;"":n ~18,14;4;"";19,14;" ";20,14;" ";20,15;6;1;"" n=5205 a=(*30)+1 K(n+1,a)=79Oū(n-2,a)=79Oū(n,a)=68D20 ((n,a;1;5;1;"`":n 2"pa=0:o=0:t=0 <x=10 :y=15 @****main loop**** A-x-1,y;7;"";x,y;7;"" F 500 K (x+1,y)=" "4000 P%(x+1,y)=79O2000 Z%(x-2,y)=79O3000 d=""65A n0.002xn,20 xpa=pa+1 x,y;" ";x-1,y;" " *y=y+(="8"y<31)-(="5"y>0) (x,y)=2335000 (o4(x,y)=68D4000 Do=4x=20y=14x=20y=166000p pa=1304000 (x,y)=1987000X 65A moving platforms .001wn,20:u$=u$(2)+u$(1):t$=t$(5)+t$(4):6;11 ,22;u$;11 ,5;u$;16,21;t$;16,6;t$;6,13 ;t$ l0,0;1;7;"SCORE=";sc;0,13 ;"LIVES=";li;0,23;"PACES=";pa  K down ladder ="6"2005  wn=04:500:x,y;" ";x-1,y;" ":x=x+1:.009ztj,n+2:x,y;"";x-1,y;"" /n>1x-2,y;1;7;"" n  3 up ladder ="7"3002  wn=04:500:x,y;" ";x-1,y;" ":x=x-1:.009ztj,n+2:x,y;"";x-1,y;"" /n>1x+1,y;1;7;"" n   fall or die (x+1,y)=""4020 dx,y;" ";x-1,y;" ":500:x=x+1:0.01z# =,x+5:x,y;"";x-1,y;""  4000 px,y;"";x-1,y;"":n=020:0.01z# =,n+5:n:li=li-1:li=-15050 !n=0200:n:6  touch money b=(*9 )+1:n=020:0.002xn,n+3*2:n:x,y;b:sc=sc+502:o=o+1:t=t+b:w=0100d:w   game over n=30-5-1:0.01z# =,n+9 :n:2,20;"GAME OVER";3,20;"P=Again";4,20;"S=Stop" ="p":4  ="s" got all money,buy gold  5060 p19,5;"PRICE=" za ta=to=5:19,5;" ":sc=sc+100d:n=010 :.09}8Q,n+10 :n:80P at4000  complete screen XLx,y;" ":y=15:x=110 :.05|L,x*2:x:y ]Lw=2300,2:.01z# =,w/8:0,6;sc+w:w ^ sc=sc+w b(3,12 ;1;"WELL DONE" l!n=0400:n:6  instructions R0,10 ;" GOLD RUSH";3,0;"7=UP 6=DOWN 5=LEFT 8=RIGHT" =::"Help Specman collect his"::"money and buy the GOLD." z:"He must find out his total "::"sum and pay his price."::"Specman cannot walk too much"::"130 paces is the max." +20,5;"PRESS ANY KEY TO PLAY" =""7085  ?UDGs @ w="a""h"+7:x:w,x:w JK255,66B,36$,24,24,36$,66B,255 TQ129,255,129,129,129,255,129,129 ^24,36$,66B,66B,36$,24,255,189,189,60<,24,36$,36$,66B,66B,195 hM0,127,127,127,0,247,247,247 r24,24,24,24,255,255,24,24,24,24,24,24,60<,126~,255,255 |K18,149,66B,153,60<,60<,60<,24 #( %