iJ?A!6(XD:\!68i12345@T Mpppp33px6e33p3Hpppp6ei, >?<<7???>7?xxxJ*~$BA~<|~|~BBBpbĚ X![!PP!! W K SR P1:1:7: '15,5;"ESPERE UN MOMENTO" 8000@ 0:0:5:score=0:sux=15:state=0:sdc=0:pdc=0:ddc=0:torp=20:tpy=0: (15,5;"Intrucciones(s/n)?" a$=:a$=""16 a$="n"3106  Submarino 2 502 F910 ,11 ;"Submarino";12 ,14;"." P 502 d * nInstrucciones x 11 ;"SUBMARINO" 11 ;" "  "El juego consiste en destruir el barco enemigo evitando las cargas de profundidad de los barcos torpederos lo que significa ";:2:1:" MUERTE ":0:1 "(5)Izquierda - (8)Derecha" "(Space)Fuego":1 "","1000 puntos"  "","250 puntos"  "","250 puntos"  "","500 puntos"  "","50 puntos"  0: "," Pulse cualquier tecla para comenzar" , 0 6 m 1 ra=10 21 /a,0;" " a shx=25 W" ",502," ",250," ",1000," ",500," ",250 a=1(5*)+1 a$,val a !1step=.25~+(((*6)+1)/8) & 0(5:9 ,0;"" Xl0,0;"Tantos:";score:0,16;"Torpedos:";torp:torp<10 0,26;" " #5:9 ,shx+5;"" 1:20,sux;"" p=1:z$= Hsux=sux+(p=1z$="8"sux<30)-(p=2z$="5"sux>0) 1;20,sux;"" 0;9 ,shx;a$ Dp=16z$=" " state=0state=1:torp=torp-1 state=11000 state=0900 torp<03000 sdc=12500 $sdc=0ƥ<.4L2000 shx=shx-step &shx<1torp<13000 shx<1500  600X  post=sux tpy=18   1:tpy+1,post;"" 1;tpy,post;""  tpy>10 1040  tpy=10 state=0  tpy=10 tpy,post;""  tpy=10 ƪ(tpy-1,post)" "score=score+val:1;tpy-1,post;"":502:y=18:.05|L,10 *+20:y:tpy-1,0;" ":500 )tpy=tpy-.5:.08}# =,-10 : +*Soltar cargas profundidad  pdc=shx ddc=10  sdc=1 .1}L,-20  1:ddc-1,pdc;"" 1;ddc,pdc;"" _ddc=201;ddc,pdc;"":25:.25~,-20:ddc,pdc;"":sdc=0 tddc=20ƽ(pdc-sux)<520,sux;"":.25~,-30:25:20,sux;"":4000 ddc=ddc+1    "Fin. Su puntUacion es ";score 5000 2::"BOOOMM" %0:"Su puntuacion era ";score "Otra vez (s/n) ?" a$=:a$=""5010 a$="s"a$="S"10 a$="n"a$="N"  5010 @ 9000(# Ja=144164 Tb=07 ^c h (a)+b,c rb |a   #(I1,3,3,127,255,255,127,0 #2M0,192,192,248,255,255,248,0 #,255,255,255,255,0 #K0,0,192,224,255,255,254,0 #G0,0,3,557,255,127,63?,0 #K4,28,30,254,255,255,255,0 #K0,0,192,230,255,255,254,0 #G0,0,120x,120x,120x,0,0,0 #K137,74J,42*,0,255,255,126~,0 #I24,24,24,24,24,24,36$,66B JTccorutatdddorphha2te@posZAn3 !