ZXTape! 0Created by SpectaculatorH'S ALLEY nq 'nqKpqPALLEY'S GUN por Fco. J. Camara Melosa, para la revista MICROHOBBY 9fl=2:10 ,6;"P A R A J U G A R" ~1;10 ,3;ݼfl;"P UPLASREA U N A JTUEGCALRA"::30:=""fl=fl-1+3*(fl=0):6 ':1:g$(6,3,4):i$="tyughj":l$(6,6):j$(8,6):9000(#:a=16:b=13:k$:g$(a,b)=16+k$:b:a:a=18:j$(a):a:d$(5,6):h$(16,96`):a=116:h$(a):a<6d$(a) Aa:r$(5,9 ):a=15:r$(a)="FJC000000":a #9994 ':3000 :700 +0:9994 ':7:1;s$ #b=0:1;18,4;"PULSE 1 O 2";1;7,7;"pl pl pl on on on pkkl pkkl pkkl mmmm mmmm mmmm mmmm mmmm mmmm mm mm mm mm mm mm" b=(b+1b<8)+(1b=8):a=130:a:b;1;15,6;"1 JUG";15,18;"2 JUG";18,4;"PULSE 1 O 2":k$=:k$"1"k$"2"13 q15,6+12 *(k$="2");1;1;k$;"JUG":.05|L,k$*15:a=1100d:a Xnj=k$:r(nj):p(nj):v(nj):a=1nj:r(a)=1:p(a)=0:v(a)=3:a &ju=1:t$="000000":c$="000000" s$:1500 Cnj=11,17;" ";20,22;" " 1;4;20,12 ;" ":a=0nj-1:1,9 +16*a;0;20,4+a*21;"j j j":a $ 850R (6r(ju)=r(ju):c$="000000":p(ju)=-1173 -"3000 :6:0:s$ 232 ,72H:191,0:a=56824-4:32 ,a:191,0:a:a=02:13 ,6+a*8;"m m";3;13 ,7+a*8;" ";5;14,6+a*8;"okkn":a <32 ,72H:20,15:151,0:20,-15:a=64@19264@:a,568:-24*(128-a),-32 :a Adi=(r(ju)/10 ) C.di*4>25di=di-1:67C Fc1=1:3,4;"kkkkkkkkkl pkkkkkkkkk";4,13 ;"okkkkn";3,16-((20-di*4/20))/2;(20-di*4)/20 K1;4;1;3,14;" ":32 ,143:20,-15:0,-40(:223,143:-20,-15:0,-40(:524,128:151,0 Pc=1c1:c11a=03:.001wn,30:f=01:b=7238:1;9 ,a+b;"";10 ,a+b;"";11 ,a+b;"";12 ,a+b;"":b:f:a Sa=03:.001wn,30:f=01:b=4208:1;9 ,a+b;"";10 ,a+b;"";11 ,a+b;"";12 ,a+b;"":b:f:a Uc:a=46 ZKc$(a)=((*6)+1):b=4a-1:c$(b)=c$(a)90Z db:a ns1=0:co=4:t=0:b$="000":x=9 :b=7238:y=b:a=3+(b-7)/8+1:500:b x#a=1:k$=:k$""600X aa1b$(a-3)="0"b$(a-3)="1":b=03:9 +b,7+8*(a-4);1;1;" ":b:c$(a)>"3"11 ,7+8*(a-4);(26-di*4-(t-di*4))*15:p(ju)=p(ju)+(26-di*4-(t-di*4))*15:0;7;1,9 +16*(ju-1);p(ju) /t=t+1:t<25-di*4120x b=01:a=02:9 ,7+a*8;" ";10 ,7+a*8;" ";11 ,7+a*8;" ":.001wn,557:a:1:b:0:9993 ':12 ,7;"__________________" 9994 ':b=0:co=1:a=13:b$(a)="1"c$(a+3)"3"1;3;13 ,7+(a-1)*8;7;"|}":b=b+1*(b"3"1;3;13 ,7+(a-1)*8;7;"|}":b=b+1*(b0173 Tv(ju)=0900:(173v(ju)-99c)+(1100Lv(ju)=-99c) Tr(ju)=r(ju)+1:(r(ju)-1)/5=((r(ju)-1)/5)173 4;0;20,18;r(ju);(" "r(ju)<10 ):a=02:524,87W:151,0:c1=3:80P ;870f:f=1:(aa0)+(177a=0) f=0:c$="000000":n2=0:n$="00":s1=0:n1=0:x$="0":n=0:np=r(ju):di=(r(ju)/10 ):di=(di-(di>2)*(di+2)):r(ju)/10 =(r(ju)/10 )di=di-1 &np=np-5:np>5175 y$=(di*(di<3)+2*(di>2)):(r(ju)-1)/10 =((r(ju)-1)/10 )r(ju)1870f:f=1:(r(ju)-1)/10 ɺ((r(ju)-1)/10 )r(ju)=1a 8f2000:870f:f=1:a*a+177*a Bf=0:fl99cf=-15-8*(np=4)0 $b=116:s$(4+(b-1)*274+(b-1)*27+23)=h$(b,(np-1)*16+1+8*(np>3)+f(np-1)*16+24+8*(np>3)+f):b:s$;4;0;20,18;r(ju);(" "r(ju)<10 ):fl99cf "fl=0:n2240 ;c=(*6)+1:c$(c)"0"d$(np,c)="0"180 s1d$(np,c)="2"185 4c$(c)=((*6)+1):c$(c)=x$187 s1=0d$(np,c)="2"s1=c:s3=2+(c-((c-1)/3)*3-1)*8:s2=7+(((c-1)/3))*8 gn=n+1:n$(n)=c:x$=c$(c):t$(c)="4":s1ca=c:d=1:300,:y=y+b-1:500 f=1n:k$=:k$""b=0:600X:b=1b=2(174v(ju)-99c)+(1100Lv(ju)=-99c) c=99c:n$(f)"0"c=n$(f):t$(c)=(t$(c)-1):t$(c)=y$d=2:n1=n1+1:a=c:s1c300,:n$(f)="0":m$=c$(c):c$(c)="0":m$>"3"655:(1100Lv(ju)=-99c)+(av(ju)-99c) os1=cx=s2:y=s3+(6-t$(s1)):a=s1:x,y;" ";x+1,y;" ";x+2,y;" ";x+3,y;" ":y=y+1:.0001sQX,60<:500:t$(s1)=y$x,y;" ";x+1,y;" ";x+2,y;" ";x+3,y;" ":n$(1+(s1=n$(2)))="0":m$=c$(s1):c$(s1)="0":s1=0:m$>"3"655:(1100Lv(ju)=-99c)+(av(ju)-99c) f n1=2n1=0:n2=n2+1:a=1502:a:c$="000000":n=0:n2=4r(ju)=r(ju)+1:174  180 ,x=6+(((a-1)/3))*8+(s1=a):y=5+(a-((a-1)/3)*3-1)*8:d=2x+3,y+d+(2-t$(a))*(s1=a);1;"" 6b=d-(d=2)d+1:x,y+b;" ";x+1,y+b;" ";x+2,y+b;" ";1;x+3,y+b;"":.0001sQX,60<:x,y+b;" ";x+1,y+b;" ";x+2,y+b;" ";1;x+3,y+b;"":b: Vt=02:x+t,y;g$(c$(a),t+1):t:1-(s1=a);x+3,y;""  pf=07:b=110 :b:f;18,4;"PULSE UNA TECLA";27:=""f:520 '18,4;" ": XCa=co6:k$=i$(a).03{u\,-30:c$(a)"0"620l ba:a=1: l)4:b=110 :b:1 qco=4 vfl=(c$(a)"3"):m$=c$(a) x=6+(((a-1)/3))*8:y=7-(a-((a-1)/3)*3-1)*8:s1=ay=y-6+(8-t$(s1))-1*(s1=f):x=x+1 *b=xx+2:b,y;fl;1;"":b fl660 c$(a)=m$:y=y+3*(d$(np,a)="1"m$>"3"):500:c$(a)="0":x+3,y;1;"|}":b=1:880p:v(ju)=0b=2:870f @v(ju)=0b=1900:p(ju)-99c870f  >.1}L,-20:b=xx+2:b,y;fl;1;"":b n1=n1+1:x+2,y;t$(a)*123{:p(ju)=p(ju)+t$(a)*123{:1,9 +16*(ju-1);0;7;p(ju):f=1+(n$(2)=a):n$(f)="0":c$(a)="0":d=2:300, ,s1=ax+2,y+5;" ":s1=0  Cx,y;:a=1̱k$:1;k$(a);:b=120:b:a: 0:3::1:"m m pkkl pkkl pkkl pl m pn pkklm m m m m m m mm m m m mkkm m m m kl mkkm molm okklm m m m m m m m m mm mm m okkn okkn m m m on okkn" Y5,20;"m";6,20;"m";7,20;"m";8,20;"m" a=0:835C 0,115s:a=-188:8,0:7,a+19;"q":a>0835C:7,a+20;"m";6,a+19;"kl";8,a-1;" ";8,a+20;"m" $a=16,a+19;"o" 0b=120:b:7,a+19;" " a:7,27;"q" 9993 ':x=14:y=7:5:1:k$="Por":695:7:y=13 :k$="F.Javier":695:128,557:82400 x,y:x=99c757 x,y:755 x=15:y=15:k$="Camara":695:160,47/:-1,-5:164,47/:-1,-5:170,34",2 15,25;6;;"86-87":0:9994 ':f=0:8120:a=1:0:''" plmpl pkpk mmplmpl klkpkpkm pl mnmmm olok mmmmmmm m okm m mm m onokknok onmonmm m okokoknm" ^b=02:19+b,0;a+b;1,,:b:a=a+1:a=6a=1 (x,y:x=99c8120:771 2.01z# =*f+x*(1-f),y-4:f=1-f =""770  21:7::0:1500:1 t=0:x$=" ":9993 ':a=7:s$:6,13 ;"MENU";7,13 ;"====";9 ,8;"1)INSTRUCCIONES";11 ,8;"2)DEFINIR TECLAS";13 ,8;"3)JUGAR";16,8;"ELIJA OPCION-" R1;a;s$;16,21;1;x$:a=a-1:a=0a=7 Mk$=:k$""Ưk$13 .05|L,10 :x$=k$:16,21;" " Tk$=13 .05|L,10 :16,21;" ":x$>"0"x$<"4"800  ?t=t+1:t=502s$:1000:300,:785  790  =s$:(803#x$="1")+(8259x$="2")+(10 x$="3") #?a=16:i$()=13 i$(a)="#":xx=a:805% $a:xx=0 %4,4;" Dispare a los gangs-";5,4;"ters y deje pasar a los";6,4;"honrados ciudadanos de";7,4;"Gun City,pacificando asi";8,4;"la ciudad." &s1=0:c$="123456":9994 ':0:7:0:a=16:x=9 +5*(a>3):y=7+4*(a-3*(a>3)):500:a:7:1:0:11 ,4;"BUENOS-";3;16,4;"MALOS--":9993 ':520 'a=9 18:a,4;27:a:12 ,19;("(#:Enter)"xx);10 ,4;"TECLAS: ";i$(1);" ";i$(2);" ";i$(3);12 ,13 ;i$(4);" ";i$(5);" ";i$(6) *5:14,4;1;"ROUNDS 1-5";16,5;0;I$(4);"-Izda,";i$(5);"-Centro,";i$(6);"-Dcha":520 /114,11 ;1;"6-10";0;16,5;27:127,64@:42*,0:0,-26:-42*,0:0,26:14,16;i$(1);" ";i$(2);" ";i$(3);16,16;i$(4);" ";i$(5);" ";i$(6):520 41;14,4;"BONUS";0;27;;13 ,4;27;15,4;i$(1);"-Arr. ";i$(2);"-Izda. ";i$(3);"-Dcha.";16,4;27;17,4;i$(4);"-Abajo ";i$(5);"/";i$(6);"-Fuego":520 7(7:0:xxi$(xx)=13 8 785 9s$:4,4;"La pantalla esta dividi-";5,4;"da en 6 sectores,cada";6,4;"uno de ellos asignado a";7,4;"una tecla.":111o,104h:42*,0:0,-26:-42*,0:0,26 :18,4;"Pulse la nueva tecla":a=16:1;9 +2*(a>3),12 +2*(a-3*(a>3));(i$(a)i$(a)13 )+("#"i$(a)=13 ):i$(a)=13 10 ,4;"(#=Enter)" ;k$=:k$=""827; b:f:17,4;1;"EL CARACTER ";K$;" NO VALE":f=120:.02{# =,557:f:17,4;27:827; Bi$(a)=k$:9 +2*(a>3),12 +2*(a-3*(a>3));(i$(a)i$(a)13 )+("#"i$(a)=13 );10 ,4;("(#:Enter)"i$(a)=13 ):a:520:785 C8,a;"pkkl m m pkkk m m m m m m m m m mkkm m m mkk okkm m m m m m m m m okkk okkk okkk okkn" H R`fl=99c:0;s$:10 ,10 ;0;3;1;"JUGADOR ";ju;11 ,11 ;"ROUND ";r(ju);4;0;20,18;r(ju);(" "r(ju)<10 );7;1;1;1,6+16*(ju-1);" ";20,1+(ju-1)*21;" ":r(ju)<10 0;11 ,18;" " \8000@: fa=0:b=ju:ju=2-(b=2nj=1):0;7;1;1,6+(16*(b-1));" ";20,1+(b-1)*21;" ":v(ju)>0((r(ju)-1)/10 ɺ((r(ju)-1)/10 r(ju)=1))850R:a=r(ju) hv(ju)=0870f k%a>10 a=a-10 :875k nEa=(174a>5a10 )+(40(a>0a5): pa=1b:20,3+(ju-1)*21+v(ju)*2-1;0;" ":v(ju)=(v(ju)-1)v(ju)>0:a:8130 ux:y:x=99c zx+.05|L,y:885u }0;s$;10 ,11 ;0;3;1;"JUGADOR ";ju;12 ,11 ;5;"GAME OVER":8130 x,y:x=0905 x=99c901 x+.05|L,y:901 Hv(2-ju+1-(nj=1))=0nj=1v(ju)=-99c p(ju)ǰr$(5,4)  a=1 "p(ju)>r$(a,4)940 #a=a+1:a<6920 b=4a-1:r$(b+1)=r$(b):b:r$(a,10 -p(ju))=p(ju):b=49 -p(ju):r$(a,b)="0":b:r$(a,3)=" ":p(ju)=-1:1000:b=1:1;0;7;17,5;"INTRODUZCA NOMBRE" 9993 ':0:1:18,5;7;"(<:";i$(1);",>:";i$(3);",";i$(5);",del:CAPS+0)":(8-a):1;4+a*2,9 ;"A";0;4+a*2,5;1;">":fl=65A Tk$=:k$=""(k$i$(3)k$i$(1)k$i$(5)k$12 )950 k$=12 4+a*2,8+b;" ":fl=65A:b=b-1*(b>1):4+a*2,8+b;1;"A":950 k$=i$(3)fl<127f=08:236066\,f:1;4+a*2,8+b;fl:f:fl=fl+1:236066\,0 k$=i$(1)fl>32 236077\,59;:f=255248-1:236066\,f:4+a*2,8+b;1;fl:f:fl=fl-1:236077\,60<:236066\,0 k$i$(5)950 .05|L,fl/2:r$(a,b)=fl:4+a*2,8+b;fl:b=b+1:b<41;4+a*2,8+b;fl:950 ʸ9994 ':4+a*2,5;" ":0:7:0:23658j\,0:0;18,5;27;17,5;27:a=1200:a: 3,10 ;3;"-LOS MEJORES-":b=15:0;(6-b+2);1;4+b*2,6;b;"..";r$(b,3);"........";r$(b,4):b: LI3000 :0:7:s$:8190:10 ,12 ;"GAME" V)1;10 ,12 ;"GAME OVER" `x,y:x=99c:700 jx,y:1110V 5f=318:f,3;"m";28;"m":f v19,0;"pkkkkkkkkklpkkkkkkkklpkkkkkkkkklm1J: mmROUND: mm2J: mokkkkkkkkknokkkkkkkknokkkkkkkkkn" u0,0;"pkkkkkkkkkkkkkklpkkkkkkkkkkkkkklmPTOS 1J: mmPTOS 2J: mokkkkkkkkkkkkkknokkkkkkkkkkkkkkn"  d8210 :1;1,6+(16*(ju-1));1;" ";20,1+(ju-1)*21;" ":r(ju)=r(ju)+.5:c$="0000":w(4):o(4):s1=0:n1=12 :3000 :0:2:s$:10 ,10 ;3;1;"JUGADOR ";ju;11 ,12 ;2;"BONUS";20,12 ;" BONUS " x,y:x=99c2010 'x,y:a=12:a:2005 ڱs$(10 21)="qqqqqqqqqqqq":x=10 :y=15:a=6165:s$((a-1)*27+4(a-1)*27+8)="vv~":s$((a-2)*27+4(a-2)*27+8)="":s$((a-3)*27+4(a-3)*27+9 )=(1000+500*((a-6)/5)):a:s$(336P338R)="":s$(282284)="100":s$(363k366n)="vv~" .t=0:n$=" ":np=1:n2=0 4n2<4t=t+1:t=4t=0:n2=n2+1:o(n2)=27+27*((*7)+9 ):w(n2)=6:s$(o(n2))>"i"s$(o(n2))=(100d+np+n2-5) >'np=np+1:np=5np=1 \a=1n2:fl=645688:x1=x:y1=y:x=x+(64597U=1x<18)-(64594R=1x>3):y=y+(64596T=1y<27)-(64595S=1y>4) a3x1xy1y1;x1,y1;"+":1;x,y;"+" o(a)2300 xs$(o(a))=n$(a):o(a)=o(a)-(27+w(a))*w(a):o(a)>432o(a)<4o(a)=0:s1=s1+1:2300 qn$(a)=s$(o(a)):w(a)=w(a)-1:s$(o(a))=(100d+np+a):s$(o(a))>"i"s$(o(a))=(100d+np+a-4)  n$(a)"i"n$(a)"f"n$(a)=" " Sn$(a)=""ůn$(a)<32 2510 :s$(o(a))=n$(a):o(a)=0:2300 n$(a)>"i".008zn,502:w(a)=3*-w(a):x$=n$(a):fl=o(a)-(27+w(a))*w(a)-27*w(a):n$(a)=s$(fl):s$(fl)=s$(o(a)):s$(o(a))=x$:o(a)=fl =a:s$;1;x,y;"+":s1=4s1=5:2020 @fl=645688:64598V+64599W=02400` n1=02400` s$(n1+9 )=" ":n1=n1-1:7:.05|L,5:1:k$=s$((x-3)*27+y):k$>"i"k$<"f"2400` Hx,y;7;1;"":b=k$-100d-np:b<1b=b+4 w(b)=(*4)+2 ` 21004 jQs$:9993 ':7:s1=0:10 ,16;"TOTAL=0";1;10 ,16;"_____":a=24:.1}L,0:w(a)=2500 -500*(a-1):21-(a-1)*5,8;"x";c$(a);"=";:w(a)=w(a)*c$(a):w(a):s1=s1+w(a):.1}L,10 :10 ,22;s1:b=1502:b:a t13 ,15;"x";c$(1);"=";100d*c$(1):s1=s1+100d*c$(1):.1}L,10 :10 ,22;s1 ~a=n11-1:b=110 :b:3,9 +a;" ":.05|L,30:s1=s1+100d:10 ,22;s1:a a=1200:a:a=s1-100d0-100d:p(ju)=p(ju)+100d:1,9 +16*(ju-1);p(ju):10 ,22;a;" ":.007ye`A,502:a:10 ,24;" " X3000 :9994 ':a=1200:a:4;20,12 ;"ROUND:": Gn$(a)<32 s$(o(a))=4:o(a)=o(a)+1:n$(a)=s$(o(a)) ӛs$(o(a))="f":s$:s1=s1+1:b=15:.02{# =,30+b*5:b:o(a)>335Oo(a)<339Sc$(1)=(c$(1)+1): Tfl=0:fl=2+(o(a)<270)+(o(a)<13 ):c$(fl)=(c$(fl)+1)  `s$="":a=116:s$=s$+22+(a+2)+4+" ":a  @a=1:k$="0055007400" J8100:a>k$ T(x:x=99ca=a+1:8010J Y"" ^2x=9 .02{# =,25+k$(a):8020T h7.08}# =,x+k$(a):.005y# =,40(-x:8020T I0,0,4,4,9 ,8,8,7,8  99c .03{u\,4,.03{u\,2,.03{u\,4,.03{u\,0,.03{u\,4,.03{u\,3,.03{u\,4,.03{u\,0,.03{u\,4,.03{u\,2,.03{u\,4,.03{u\,6,.06|u\,8,.03{u\,6,.03{u\,6,.03{u\,4,.03{u\,4,.03{u\,6,.06|u\,8,.03{u\,6,.06|u\,8,.03{u\,4,.03{u\,4,.03{u\,2,.03{u\,0,.03{u\,2,.03{u\,2,.03{u\,0,.03{u\,-2,99c,0 [.03{u\,0,.03{u\,3,.03{u\,6,.03{u\,6,.03{u\,6 [.03{u\,0,.03{u\,3,.03{u\,6,.03{u\,6,.03{u\,6 ִ.03{u\,0,.03{u\,3,.03{u\,6,.03{u\,6,.03{u\,6,.03{u\,3,.03{u\,6,.1}L,10 ,.03{u\,8,99c,0 [.03{u\,6,.03{u\,3,.03{u\,0,.03{u\,0,.03{u\,0 [.03{u\,6,.03{u\,3,.03{u\,0,.03{u\,0,.03{u\,0 .03{u\,6,.03{u\,3,.03{u\,0,.03{u\,0,.03{u\,0,.03{u\,2,.03{u\,1,.06|u\,3,0,0 W.15~,8,.1}L,6,.1}L,4,.1}L,6,.1}L,8,.1}L,7,.1}L,8,.1}L,4,.2~L,6,.1}L,4,.1}L,2,.1}L,4,.3,6,.1}L,6,.1}L,4,.1}L,2,.1}L,4,.1}L,6,.1}L,4,.1}L,6,.1}L,4,.2~L,5,.2~L,6,.2~L,8,.1}L,6,.1}L,7,.1}L,8,0,0,0,0,.2~L,15,.06|u\,13 ,.2~L,15,.06|u\,13 ,0,0,0,0 H.2~L,8,.06|u\,6,.1}L,8,.2~L,15,.06|u\,13 ,.2~L,15,.06|u\,13 ,.2~L,8,.06|u\,6,.1}L,4,.06|u\,8,0,0,.06|u\,8,.06|u\,6,0,0,.06|u\,6,.06|u\,6,.06|u\,5,.06|u\,6,.06|u\,7,.06|u\,4,.06|u\,1,.06|u\,6,.06|u\,7,.06|u\,8,0,0,.06|u\,6,0,0,.06|u\,6,.06|u\,4,.06|u\,6,.06|u\,8,99c,0 y.1}L,6,.1}L,6,.1}L,6,.1}L,6,.1}L,6,.1}L,8,.1}L,10 y.1}L,6,.1}L,6,.1}L,6,.1}L,6,.1}L,6,.1}L,8,.1}L,10 &.1}L,6,.1}L,6,.1}L,6,.1}L,6,.1}L,6,.1}L,8,0,0,.1}L,10 ,0,0,.1}L,11 ,0,0,.1}L,10 ,.1}L,9 ,.1}L,10 ,.1}L,6,99c,0 01,0,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,1,0,1,0,1,-1,1,-1,0,-1,1,-1,0,-1,1,-1,0,-1,0,-1,0,-1,-1,-1,0,-1,-1,-1,-1,0,-1,0,-1,0,-1,1,-1,0,-1,1,-1,0,-1,1,-1,0,-1,1,-1,0,-1,1,-1,1,-1,0,-1,1,-1,1,-1,0,-1,1,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,-1,-1,-1,0,-1,-1,-1,0,-1,0,-1,0,-1,0,-1,0,-1,0,-1,-1,-1,0,-1,0,-1,0,-1,1,-1,0,-1,0,-1,1,-1,0,-1,1,0,1,1,1,30,1,30,0,99c,0 #(3+"",3+"r",3+"st",2+"u[",2+"\]",2+"^_",1+"`a",1+"bc",1+"de",1+"",1+"",1+"",2+"",2+"",2+"",0+"",0+"",0+"" #2U"0 zxcv","7 mnb","1asdfg","6"+13 +"lkjh","2qwert","5poiuy","312345","409876" #d"vvvvvvvvvvv~ ~vvvvvv~ ~vvvvvvvvvvvvvvvvvvvvvvv" #m"100102","wwwww~ ~~ ~wwwww" #m"011212","v vvvv~ ~ ~ ~ vv vv v" #m"011202","w wwww~ ~ ~ ~ ww ww w" #m"001021","v vvvv~ ~ ~ ~ vv vv v" #m"111111","w wwww~ ~ ~ ~ ww ww w" #d"vvvvv~ ~~ ~vvvvv" #d"wwwwwwwwwww~ ~wGUN w~  ~wwwwwwwwwwwwwwwwwwwwwww" #d"vvvvvvvvvvv~ ~vSHOPv~ yxxxxxxz yxxxxxxz ~vvvvvvvvvvvvvvvvvvvvvvv" #D"wwwww~ ~~ {{{{{{{{ {{{{{{{{" #d"v vvvv~ ~ ~ {{{{{{{{ {{{{{{{{ ~ vv vv v" #d"w wwww~ ~ ~ {{{{{{{{ {{KEEP{{ ~ ww ww w" $d"v vvvv~ ~ ~ {{{{{{{{ {{OUT!{{ ~ vv vv v" $d"w wwww~ ~ ~ {{{{{{{{ {{{{{{{{ ~ ww ww w" $d"vvvvv~ ~ ~ {{{{{{{{ {{{{{{{{ ~vvvvv" $"d"wwwwwwwwwww~ ~kkkkkk~ {{{{{{{{ {{{{{{{{ ~wwwwwwwwwwwwwwwwwwwwwww" ' *********************** * SUBRUTINAS UTILES * *********************** ' '.9993 ':"Pantalla?(1-5)";a:9994 ':1500:b=116-17*(a>5a<1):1;2+b,4;h$(b,(a-1)*16+1+8*(a>3)(a-1)*16+24+8*(a>3)):b:9993 ':: ***IMPRIME ROUNDS 6-10*** ' \236066\,0:236077\,60<:: ***GRAFICOS NORMALES*** ' Z236066\,88X:236077\,251:: ***GRAFICOS JUEGO*** ' f=3:fl=0:a=64568864593Q:fl,f;a;":";a;" ":fl=fl+1:f=f+10 *(fl=22):fl=fl*(fl22):a:: ***IMPRIME RUTINA C/M*** ' 64555+:""650720:""64556,::1;10 ,6;"ESPERE POR FAVOR":a=0471:64600X+a,(15616=+a):a: ':"H'S ALLEY"9997 ':"H.ALLEY"650720,464:"H.ALLEY1"64556,,38&:"":"H.ALLEY":"H.ALLEY1": ***GRABA TODO EN CINTA*** H.ALLEY 0nt"*"CGL#pd dМ!၁||?~~?AGb@@$#Do~B~~BB~(Lq"YYYY"qL(A'?U Q ɑ R𐈐E@00@J𬢡 &Ua"a!? @\ B$@ 镕ݕ"%%%%%%<~~<? ~1~AG  z ǺoU~۾xXƕ;~z⡠J-'C Ūt?!y q'G  podBD &L) ya/R@Ь*En EH.ALLEY1 &,n(!,R~#N#> >