R S! 6X'P:\8JE99|8E99|8M32456e3Y'# ![> 0666$$l ?(>~svn<*~   00`>< >0>880`>gJR|<~>c<>c | (H`||>`|B|00>ccB>|000` >~0>c>oV^|>cB~~c|B>c@@||fBB`|@`|@>c@N|cc~B? ~B|flpH``@@cwZBcsRJ>cBB|~cB|>cBR|~cB|>`<|00ccBB|ccBBl8ccBBlc6lf(00` `  x0DD| x``xD00x l80<00xl0|TT|DDDD|  ``<@8 <0fDDxfD(x0fTTxf(xfDD| x~` 0 x 0<>:[_:[W:[O:[G&.&@xgxowJ % &:[O- :[_:[W:[o:[g~# >_>W Ud& H$$  (((((($$  @@@@    pp pp pp p P0P8X08 933`w`fp~8< v~ 80pcq;x8 800p>`?v~ 80pcq;x7?08f~0<8n~08 Ƈs?x7?08 8 |o8n~08 Ƈs?x@h ^s6-xy/([j]IY~IHX]PTP@??? nZt6-xy/([j]IY~IHX]PTP@??Bf Xr6-xy/([j]IY~IHX]PTP@xa)`zϐw%p} lU=V[I]~M55 ۺ I*`;@@v)0ZϠ.w{%p} lU=V[I]~M55 ۺ I*;;9HB f)@ϰNw%p} lU=V[I]~M55 ۺ I*;1??~~`<4zvf<ZZ//Z/ @Z / Z/߿ZZ//00x| |||x0000 07??88S?88888p888x88886pp H p((pp2>"*""#""""( , >" 80HHx21Q)xcDDDDx0@@ @   @D(x @@DRq25252PP DB?^5210??::P ??8]=?/V/_*/_/W*U(>]=?߿~~~(U+W///_/W*U(_߯\ܮ/V/_**߿~~~_߯\ܮ~>]=?߿~~~/_/W*U(_߯\ܮ, `0PP 1 0`p0 DPP {΀a! `P    ''"'P 0Eb E*FQ#D">ńHLZ% N1xNIHHLG379_'9ЈD#B @h̀ 5:G\<2G\0$"]\!B ^#Vy=%8>y(>=%0>p͝ =()8>w=()0w=(w =w (  w_6b~o^ͱut Lsr7~ < 8w )! F(>ͪ = w 7ê=%Җݾ(- F '~ݖ0=ݾ0~ݖ0=݆0 ) +-*͝Lz SN>==(D0<8=ws~W~_~G~Onf^V ~ G(F~OW>ͬ"!PF~_K~#w# z(6#(JF!PG# FK!:\vPw, ͛$|} o|g~ |Xg~(~( > _## ~w8 w7~w( #  7*NG~_~7Lz{-  # /-0*͍,ҡ!:\Ͳ(0>ʡ#ʹ3͢-PY͸ڡ`oPYOͱ ͸0ͩ0-80AG?a77ɧ(=>BB<DHpHDB@~BfZBBBBbRJFB218W=13 :5000 %W<13 W=218:5050  .Q=7Q=8Q=9 W=218: #Q<6Q=Q+1:504 Q=13 W=218: 0Q10 Q=Q+1:W=13 :504 W=218: 8Q=7Q=8Q=9 Q=10 W=13 : #Q>1Q=Q-1:504 W=13 : UQ=1W>28W<535LLAVE=1Q=7:LLAVE=0:5600 UQ=2W>28W<535LLAVE=2Q=8:LLAVE=0:5600  YQ=4W>113qW<148LLAVE=10 Q=10 :LLAVE=0:5600 WQ=5W>190W<210LLAVE=4Q=9 :LLAVE=0:5600 7Q=7W>28W<535Q=1:504 (7Q=8W>28W<535Q=2:504 29Q=9 W>190W<210Q=5:504 <:Q=10 W>113qW<148Q=4:504 F CB=60000`:TEST 9:(7,8) CB=15520  CA=60000`:TEST 10:(7,8) CA=15700D >CB=1Q=6LLAVE=1:HAB=6:5525 1CB=1Q=7LLAVE=4:5525 1CB=1Q=9 LLAVE=2:5525 2CB=1Q=8LLAVE=10 :5525  60000`:BORRA 9 $60000`:IMPRIME 9:(215,17,0) CB=0: 60000`:BORRA 9  504 DT=152 E60000`:BORRA 10 Ff0;0;19,22;" ";20,22;" ":60000`:IMPRIME 10:(175,20,0) G60000`:BORRA 10 LFT<64@0;2;18,7;" ":T=88X: MFT<72H0;2;18,8;" ":T=96`: NoT<80P0;2;18,9 ;" ";0;4;18,10 ;" ":T=104h: OpT<88X0;2;18,10 ;" ";0;4;18,11 ;" ":T=112p: PHT<96`0;4;18,11 ;" ":T=120x: QIT<104h0;4;18,12 ;" ":T=128: RIT<112p0;4;18,13 ;" ":T=136: SIT<120x0;4;18,14;" ":T=144: TIT<1280;4;18,15;" ":T=152: UHT<1360;4;18,16;" ":T=152: VGT<1440;4;18,17;" ":T=152: pLAR=T:ALT=31 u^LAR,ALT:0,-7:LAR-1,ALT:0,-7:T<5681,30: z$T=T-1:.002xn,30: X60000`:BORRA 7 Z$60000`:IMPRIME 7:(168,98,1) [N=0300,:N: a50:0:1::W=502:N=80P b;1;3;6;2,12 ;"PACO JONES" l5;5,7;"LO HAS CONSEGUIDO!!";7,3;"ERES UN 'MONSTRUO'.";6;2;9 ,10 ;"!!ENHORABUENA!!" m,#0;"Fernando Ruza 'Wanderer'soft'" n82;30,491:2;170,0 o07;17,0;"'pulsa una tecla'" v!60000`:IMPRIME 7:(W,N,0) 60000`:MUEVE 7:(W,N) SW=W+5:.01z# =,-10 :((*7)+1):W>1507060 ""  7040 60000`:BORRA 7 !60000`:IMPRIME 8:(W,N,0) RW=W-5:.01z# =,-10 :((*7)+1):W<5027090 "" 60000`:MUEVE 8:(W,N)  7065 60000`:BORRA 8  7030v ' k""53000,115s:""53200,1008:""54400,4200h:""60000`,1010 ' '"PERICO"9997 ':"rutina2"53000,115s:"grafsprits"53200,1008:"graficos"54400,3800:"sprites"60000`,1010:"":m=14:"":m K[J[ a  "" c"@@) c~>>>>c>R c>>~Wcccccs``R <ccccWBB@BBR|BBN~|WR 8W|||||R ~8||| 00 $>>>`?~ $c`c` c $~@| $8 $8|~ 0 6Y~-xIxn~>   By/(Hn`<|<|<cf~<cf<|<<<<<f[jn|D DD30COL=1:LIN=LIN+5:LIN>15581E ?N E-N=77M:60000`:IMPRIME E:(W,N,0) F0Q=1Q=0O,P,OP,K,L,KL:2500 GQ=23200 H&Q=3O,P,OP,K,L,KL:3000 I&Q=4O,P,OP,K,L,KL:2700 J&Q=5O,P,OP,K,L,KL:3000 KkQ=6O,P,OP,K,L,KL:CX=155:CY=58::AX=195:AY=59;:GT=2500 :1030 LkQ=7O,P,OP,K,L,KL:CX=140:CY=58::AX=200:AY=59;:GT=3200 :1040 MkQ=8O,P,OP,K,L,KL:CX=176:CY=58::AX=215:AY=80P:GT=2700 :1040 NkQ=9 O,P,OP,K,L,KL:CX=25:CY=58::GT=3000 :AX=225:AY=131:1040 VQ=10 3200 W'Q=11 O,P,OP,K,L,KL:2700 XQ=12 3200 Y'Q=13 O,P,OP,K,L,KL:3000 b0J=(DIR/256):M=(J*256):K=DIR-M: v6,13 ,14,18,4,5,9 ,11 ,19,19,19,14,10 ,12 ,2,19,7,19,138,143,5,108l,64@,7 18,6,15,16,15,16,9 ,11 ,4,5,15,16,10 ,12 ,2,19,7,2 4,5,6,13 ,14,18,13 ,0,19,17,19,19,19,2,19,1,3,2,97a,135,2,80P,60<,4 15,16,6,15,18,16,19,17,9 ,11 ,19,17,7,1,10 ,12 ,19,3,95_,64@,3,178,143,5 6,4,5,6,15,16,15,16,0,19,9 ,11 ,19,19,2,19,10 ,12 ,138,135,4,40(,60<,4 13 ,14,18,13 ,14,13 ,19,17,19,6,13 ,14,1,3,19,2,19,13 ,100d,143,5,230,64@,7 6,15,16,18,15,16,9 ,11 ,17,19,0,19,10 ,12 ,3,19,19,2 15,16,18,15,16,6,9 ,11 ,15,16,19,17,10 ,12 ,19,19,3,2,138,64@,2,95_,143,5 15,16,6,15,16,19,15,16,0,19,9 ,11 ,19,2,2,19,10 ,12 ,138,135,4,502,60<,4 О13 ,14,13 ,14,4,5,13 ,14,9 ,11 ,19,19,13 ,19,10 ,12 ,1,3 15,16,6,15,18,16,4,5,19,0,19,17,1,3,2,2,19,19,101e,64@,3,184,143,5 13 ,14,13 ,13 ,14,13 ,13 ,13 ,17,6,13 ,14,13 ,19,1,3,2,14 15,16,15,16,6,18,15,16,17,19,19,8,1,3,3,19,2,3,138,135,4,502,60<,4 HAB=61050 #60000`:IMPRIME 9:(CX,CY,0) $60000`:IMPRIME 10:(AX,AY,0) $GT X=O:Y=P:ST=OP A=K:B=L:AB=KL 360000`:IMPRIME 1:(X,Y,0);IMPRIME 2:(A,B,0) +60000`:MUEVE 1:(X,Y);MUEVE 2:(A,B) Y=Y-ST A=A-AB Y<70F2600( I=60000`:TEST E:(1,2) $I=1T=T-1:6000p  4000  2540 (+60000`:MUEVE 1:(X,Y);MUEVE 2:(A,B) 2Y=Y+ST FA=A+AB GI=60000`:TEST E:(1,2) H$I=1T=T-1:6000p K 4000 PY>1392540 Z 2600( A=K:B=L:AB=KL X=O:Y=P:ST=OP 360000`:IMPRIME 1:(A,B,0);IMPRIME 2:(X,Y,0) +60000`:MUEVE 1:(A,B);MUEVE 2:(X,Y) B=B-AB:B<65A2770 Y=Y+ST I=60000`:TEST E:(1,2) $I=1T=T-1:6000p 4000 2740 !B=B+AB:B>1422740 Y=Y-ST +60000`:MUEVE 1:(A,B);MUEVE 2:(X,Y) I=60000`:TEST E:(1,2) $I=1T=T-1:6000p 4000 2775 X=O:Y=P:ST=OP A=K:B=L:AB=KL !60000`:IMPRIME 2:(X,Y,0) !60000`:IMPRIME 6:(A,B,0) A=A+AB Y=Y-ST:Y<64@3100 +60000`:MUEVE 2:(X,Y);MUEVE 6:(A,B) I=60000`:TEST E:(2,6) $I=1T=T-1:6000p 4000 3030 60000`:BORRA 6 &!60000`:IMPRIME 5:(A,B,0) 0A=A-AB :!Y=Y+ST:Y>1343150N ?+60000`:MUEVE 2:(X,Y);MUEVE 5:(A,B) @I=60000`:TEST E:(2,5) A$I=1T=T-1:6000p C 4000 D 31200 S60000`:BORRA 5 X 3020 4000:3200 ="" "P"Ʀ"Q"Ʀ"O"Ʀ"A" ="Q"5100 9="P"PRINT=7W=W+5:E=7:4060 !="P"PRINT=84051 9="O"PRINT=8W=W-5:E=8:4060 !="O"PRINT=74046 ="A"5500|:CA=0  60000`:BORRA 7 0PRINT=8:60000`:IMPRIME 8:(W,N,0)  60000`:BORRA 8 0PRINT=7:60000`:IMPRIME 7:(W,N,0)  60000`:MUEVE E;(W,N) $Q=13 W>1807000X @ #88 @P!88q8p8p8p8p8p8p8p8p8p8p8p8D'T'|