a: DUX E~EċE l:63999:pnt=35#:nv=3:pant=0:0:7:pc=0:0::9000(# 0:ti=100d:di=-1:1;21,6;6;"";11 ,6;"":i=17:m=21 Jn=12 20:1;n,6;6;"";n,23;"":n :4900$:5000+pant (+n=1dim:y(n),x(n);6;"":n 20,0;:4700\:11 ,0;2;"VIDAS:";13 ,0;0;1;" "(nv*2):9 ,0;"Pantalla:";pant+1 <qq=(*r$)+1:9 ,25;"Letra";10 ,25;"Clave";:11 ,25;6;" ";0;r$(qq);" " dnn=1dim:(i+1,m)=7ū(i+1,m)=5i,m;" ":64000:i=i+1:110n e=" "ƫ(i-1,m+di)23ƫ(i-1,m+di)6ƫ(i-1,m+di)70F64000:i,m;" ":i=i-1:m=m+di: ff="o"64000:di=-1:i,m;" ":m=m-1:(i,m)=6ū(i,m)=23m=m+1 he="p"64000:di=1:i,m;" ":m=m+1:(i,m)=6ū(i,m)=23m=m-1 n(i,m)=585004! oi,m;1;"" pB(y(n)+1,x(n))=7y(n),x(n);" ":y(n)=y(n)+1: rp=(y(n),x(n)-1):p>64@y(n),x(n);" ":x(n)=x(n)+1:p=(y(n),x(n)):p7p5x(n)=x(n)-1 tup=(y(n),x(n)+1):p>64@y(n),x(n);" ":x(n)=x(n)-1:p=(y(n),x(n)):p7x(n)=x(n)+1 v6;y(n),x(n);"" x;(yep+1,xep)=7yep,xep;" ":yep=yep+1 z!(yep,xep)=71G6000p |yep,xep;4;"" ~a$(1)="1"3000 a$(2)="1"3100 a$(3)="1"3200 V9 ,12 ;"TIEMPO:";ti;" ":ti=ti-1:ti<085004! n:100d '(yb-1,xb)=71G85004! zyb,xb;" ":yb=yb+(dbƫ(yb+db,xb)6ƫ(yb+db,xb)70Fƫ(yb+db,xb)23):yb=tabyb=tarrbdb=-db:yb=yb+db yb,xb;5;"": Tyc,xc;" ":xc=xc+dc:(yc,xc)7ū(yc,xc+1)7dc=-dc:xc=xc+dc A(yc,xc-1)=71Gū(yc,xc+2)=71G85004! yc,xc;5;"": A(ym+1,xm)=7ym,xm;" ":ym=ym+1:3202 Mym,xm;" ":xm=xm+dm:(ym,xm)7ƫ(ym,xm)71Gdm=-dm:xm=xm+dm: ym=ixm=m85004! [64001,144:64000:64001,88X:ym,xm;5;1;"": \"     "' "     "' "     "' "      " ^ "      "' "     "' "    "' "  " `17,26;" EP"  $z20,7;2;" ":n=1916-1:2;n,27-n;" ";n,n+2;" " %n: 2;15,27-15;" ";0;" ";2;" ":dim=4:yep=15:xep=14:a$="000":x(dim):y(dim):n=1dim:x(n)=xep:y(n)=yep+n:n: 2;15,27-15;" ";0;" ";2;" ":dim=6:yep=13 :xep=14:a$="000":x(dim):y(dim):n=1dim:x(n)=xep:y(n)=yep+n:n: qe=13 :20,12 ;" ":2;15,27-15;" ";0;" ";2;" ":dim=4:yep=19:xep=11 :a$="100":xb=12 :yb=20:db=-1:tab=20:tarrb=18:x(dim):y(dim):x(1)=27-14:x(2)=x(1):y(1)=13 :y(2)=13 :y(3)=qe:y(4)=qe:x(3)=27-15+3:x(4)=x(3): qe=13 :20,12 ;" ":2;15,27-15;" ";0;" ";2;" ":dim=4:yep=19:xep=11 :a$="100":xb=12 :yb=20:db=-1:tab=20:tarrb=18:x(dim):y(dim):x(1)=27-14:x(2)=x(1):y(1)=13 :y(2)=13 :y(3)=qe:y(4)=qe:x(3)=27-15+3:x(4)=x(3):  2;15,27-15;" ";0;" ";2;" ";0;" ";2;" ";5;0;19,27-13 ;"":dim=3:yep=13 :xep=13 :a$="000":x(dim):y(dim):n=1dim:x(n)=xep+3:y(n)=11 +n:n: Pyb=12 :xb=13 :tab=19:tarrb=12 :db=1:2;15,27-15;" ";0;" ";2;" ";0;" ";2;" ";5;0;19,27-13 ;"":dim=3:yep=17:xep=13 :a$="100":x(dim):y(dim):n=1dim:x(n)=xep+3:y(n)=11 +n:n: Pyb=16:xb=15:tab=18:tarrb=12 :db=1:2;15,27-15;" ";0;" ";2;" ";0;" ";2;" ";5;0;19,27-13 ;"":dim=3:yep=17:xep=13 :a$="100":x(dim):y(dim):n=1dim:x(n)=xep+3:y(n)=11 +n:n: {qe=13 ::2;15,27-15;" ";0;" ";2;" ":dim=4:yep=19:xep=9 :a$="010":xc=12 :yc=19:dc=-1::x(dim):y(dim):x(1)=27-14:x(2)=x(1):y(1)=13 :y(2)=13 :y(3)=qe:y(4)=qe:x(3)=27-15+3:x(4)=x(3): xb=14:qe=13 ::2;15,27-14;" ";0;" ";2;" ":dim=4:yep=19:xep=9 :a$="110":xc=12 :yc=19:dc=-1::x(dim):y(dim):x(1)=27-14:x(2)=x(1):y(1)=13 :y(2)=13 :y(3)=qe:y(4)=qe:x(3)=27-15+3:x(4)=x(3): yep=14:xep=13 :dim=6:x(dim):17,xep;2;" ":y(dim):n=1dim:y(n)=15:x(n)=27-16+n:n:a$="000":19,27-18;5;"";7;2;19,xep;" ";18,xep;" ": yep=14:xep=13 :n=1917-1:n,xep;2;" ":n:dim=6:x(dim):y(dim):n=1dim:y(n)=15:x(n)=27-16+n:n:a$="010": 2;17,27-15;" ";0;" ";2;" ":dim=6:yep=19:xep=9 :a$="000":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: db=1:xb=15:tab=19:tarrb=12 :2;17,27-15;" ";0;" ";2;" ":dim=6:yep=19:xep=9 :a$="100":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: dc=1:xc=19::2;17,27-15;" ";0;" ";2;" ":dim=6:yep=19:xep=9 :a$="010":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: dm=-1:xm=19:ym=19:2;17,27-15;" ";0;" ";2;" ":dim=6:yep=13 :xep=14:a$="001":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: dm=1:xm=11 :ym=14:2;17,27-15;" ";0;" ";2;" ":dim=6:yep=13 :xep=14:a$="001":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: dm=1:xm=11 :ym=14:2;17,27-15;" ";0;" ";2;" ":dim=6:yep=19:xep=9 :a$="011":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: xb=15:dm=1:xm=11 :ym=14:2;17,27-15;" ";0;" ";2;" ":dim=6:yep=19:xep=9 :a$="111":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: xb=14:qe=13 ::2;15,27-14;" ";0;" ";2;" ":dim=4:yep=19:xep=9 :a$="110":xc=12 :yc=19:dc=-1::x(dim):y(dim):x(1)=27-14:x(2)=x(1):y(1)=13 :y(2)=13 :y(3)=qe:y(4)=qe:x(3)=27-15+3:x(4)=x(3): 2;15,27-15;" ";0;" ";2;" ":dim=6:yep=13 :xep=14:a$="000":x(dim):y(dim):n=1dim:x(n)=xep:y(n)=yep+n:n: :xm=16:ym=19:dm=-1:16,17;2;" ":20,9 ;5;"":dim=3:x(dim):y(dim):x(3)=17:y(3)=19:y(1)=14:y(2)=15:x(1)=17:x(2)=x(1):yep=18:xep=x(3):a$="001": xm=9 :dm=1:2;15,27-15;" ";0;" ";2;" ":dim=7:yep=12 :xep=14:a$="001":x(dim):y(dim):n=1dim:x(n)=xep:y(n)=yep+n:n: db=1:xb=15:tab=19:tarrb=12 :2;17,27-15;" ";0;" ";2;" ":dim=6:yep=19:xep=9 :a$="100":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: yep=14:xep=13 :dim=6:x(dim):17,xep;2;" ":y(dim):n=1dim:y(n)=15:x(n)=27-16+n:n:a$="000":19,27-18;5;"";7;2;19,xep;" ";18,xep;" ": .xm=17:ym=14:dm=-1:yep=14:xep=13 :dim=6:x(dim):17,xep;2;" ":y(dim):n=1dim:y(n)=15:x(n)=27-16+n:n:a$="001":19,27-18;5;"";7;2;19,xep;" ";18,xep;" ": 16,27-15;2;" ":dim=1:x(dim):y(dim):x(1)=27-15:y(1)=15:xep=x(1):yep=y(1)-1:a$="000": qe=13 :20,12 ;" ":2;15,27-15;" ";0;" ";2;" ":dim=4:yep=19:xep=11 :a$="100":xb=12 :yb=20:db=-1:tab=20:tarrb=18:x(dim):y(dim):x(1)=27-14:x(2)=x(1):y(1)=13 :y(2)=13 :y(3)=qe:y(4)=qe:x(3)=27-15+3:x(4)=x(3): xc=15:dm=1:xm=11 :ym=14:2;17,27-15;" ";0;" ";2;" ":dim=6:yep=19:xep=9 :a$="011":x(dim):y(dim):n=1dim:x(n)=14:y(n)=13 +n:n: dm=1:xm=11 :ym=14:2;17,27-15;" ";0;" ";2;" ":dim=8:yep=19:xep=9 :a$="000":x(dim):y(dim):n=1dim:x(n)=14:y(n)=11 +n:n: ym=19:xm=10 :dm=1:xc=16:dc=-1:qe=13 ::2;15,27-14;" ";0;" ";2;" ":dim=4:yep=19:xep=9 :a$="011"::yc=19:dc=-1::x(dim):y(dim):x(1)=27-14:x(2)=x(1):y(1)=13 :y(2)=13 :y(3)=qe:y(4)=qe:x(3)=27-15+3:x(4)=x(3): 16,27-15;2;" ":dim=1:x(dim):y(dim):x(1)=27-15:y(1)=15:xep=x(1):yep=y(1)-1:a$="001":xm=9 :ym=19:dm=1: 16,27-15;2;" ":dim=1:x(dim):y(dim):x(1)=27-15:y(1)=15:xep=x(1):yep=y(1)-1:a$="010":xc=9 :yc=19:dc=1: Pyb=12 :xb=13 :tab=19:tarrb=12 :db=1:2;15,27-15;" ";0;" ";2;" ";0;" ";2;" ";5;0;19,27-13 ;"":dim=3:yep=14:xep=13 :a$="100":x(dim):y(dim):n=1dim:x(n)=xep+3:y(n)=11 +n:n: xm=9 :dm=1:2;15,27-15;" ";0;" ";2;" ":dim=7:yep=12 :xep=14:a$="001":x(dim):y(dim):n=1dim:x(n)=xep:y(n)=yep+n:n: xb=17:xc=14:xm=14:dim=1:x(1)=9 :y(1)=17:yep=12 :xep=15:a$="111": p"6000p:n=640502640502+22:a:n,a:n:33!,0,88X,17,1,88X,1,255,0,524,203,182,237,176,126~,230,8+16+32 ,15,15,15,211,254,201 q'n=1100d::640502:n r3pant=pant+1::pc=pc+ti:pant.:8,0;:4700\:goto=10 :yt=0:xt=8:a$="JUEGO TERMINADO":c$=(pc/pnt)+(" "ƺ(pc/pnt)<9 ):6;0;18,7;"HAS CONSEGUIDO UN ";19,7;c$;"% DE LA AVENTURA":21,3;"PULSA UNA TECLA PARA JUGAR":8900":0: "ib$(a$):yt,xt;1;1;b$::xx=xt:n=1̱a$:x=(*31):y=(*8):q$=(y,x) "Тy,x;8;8;8;q$:x=x+(xx>x)-(xxyt)+(y,8,6,8,203,30,203,17,16,250,113q,35#,61=,32 ,243,201 &,n="a""h"+7:a:n,a:n:9990' &t11000,100100$,111100<,1111110~,10111101,100100$,100110&,1100000` &)255,129,a,a,a,a,a,255 &w0,1111110~,10010001,10110101,10010001,10110111,10010111,1111110~ &Q111100<,1011110^,10111111,a,a,a,1011110^,111100< &501000100D,a,a,a,11101110,a,a,255 &f1111,11001,111111?,1000011C,10011001,10111101,a,11000 &p11110000,10011000,11111100,11000010,10011001,10111101,a,11000 &v1111110~,10111101,10011001,255,10000001,1111110~,100110&,1100000` 'goto=20:a$="POR ANGEL ORTEGA":yt=0:xt=8:21,8;"Pulsa una tecla":8,0;:4700\:8900":#0;6;0;;" 'i' para instrucciones ":0:"i": ':13 ;"DUX":yt=21:xt=10 :a$="Pulsa una tecla":''" EL COMPUTADOR DE LA BASE DE SI-RIO HA ENLOQUECIDO.UNA MANIA ME-GALOMANA SE HA APODERADO DE EL YHA SOMETIDO A TODOS LOS EMPLEA- DOS DE LA BASE." ' " TU ERES UN COMPETENTE AGENTE DELOS SISTEMAS DE SEGURIDAD.TE A- DENTRARAS EN LA BASE DE SIRIO Y TRAS AVERIGUAR LA PALABRA CLA- VE DESACTIVARAS AL COMPUTADOR AUTODENOMINADO DUX."'"SUERTE." ' " Para atravesar las sucesivas pantallas que apareceran deberascoger las celulas Electro Proto-nicas ayudandote de los objetos moviles.":8900":0:: '+g$=8+8+"a: DUX":g$1 Ga: DUXx