TL?(!6A:\[>0;"Mgegyszer ? i/n" ="i"60<  ="n"  2000 itt llitjuk t szp betkre / 236077\,241: 236066\,480  "anyahajo"40( 7"betukod"620000,768:"udg""a",168  a haj a mlybe sllyed *i=161-.2~L 4.002xn,i/2 >?21-i,c;1;"";21-i,c;1;"" Hi Rc>15c=10 \01;7;21,c;"hajroncs" fi=2815-1 p a$=" " z"1;7;20,i;a$ .02{# =,-i i /1;0;15,20;a$ -1;6;17,25;a$ /1;0;18,28;a$ -1;7;19,21;a$ -1;5;21,23;a$  z=018 I1;7;1,10 -z;2;":anyahaj= " .002xn,z z  z=018 I1;7;1,10 -z;2;":anyahaj= " .002xn,z $z . 8z=018 BI1;7;1,10 -z;2;":anyahaj= " L.002xn,z Vz ` succonajombaombagdffffengle  r~wmmB C Z"helikop":0:40( kop @(helikop Dž/j ffA>(> >ff333f    >> > 6ccc6 < ?>cs 1F c>6`~cc>0~cc>F >cc>cc>>cc? 8 >>>cs 0110>00p3`oc3cccccc? ?Ff<cflxlfcp````acwkccccs{ogcc6ccc6nscc~``6cck6nscc~fc>c`>c>Ys3cccc>s3ccf<v3cckk6wc66cwwc6C 1@ pp8T"x ~=gcg;``nscsn>c`c>8 >gcc>>c`?6;00|00`>c`g>``nscfo  L8``flxlgVkcfnscfo>ccc>nscsn`;gcg;nsc~c0G> ~002{3cg;v3cf<vck>w66wv3L8F 90p p(v>zv|~>ccc>(||R4,J?'Cm~!>ccc>$$1$;>>""'o+U)c`  8wP@)c` wp?Ǔ)c>f>n~>n~>n>>n==~~zn>v=>zuP''')c lcs0cs0csccsgg00 sc3gg0FupEEE)c xcc0c0c`ccc00 ccccc uHmmm)c` lcs2`~2`fg`~gg22 ~cfgcG9u|~~~~$$$$)c?g>n?c?o>?c;;Lvc><;>v>uR!!!$$$$/`8j` `````8` `>``6``` `` 8`` ``  `` C7`````` ``c``7;````` ` ` ````Cc=nv=n=>V>>=~z=>nnn=n=n=V|v|>n>Vn=>>>nz=<n=n=s>nnn=cV>0>n>Vn>nn=nn>V>n>~{n>Vnz~>>>nn==nv=n=>>=fnzn>V~=z=~>~f=nn=~CcFgs3gsg ccFcg00g csssgsgsg30c scsgcgcs0g sgsg csssgc c0cscscssgssccsc03 scs0cgcss gFgs3gsg cc0glssc0gg0c0lgssg0C ccccc ckc `c0c c>cccc>k` cckcccc>cc cccc ck `|ckcckc0c cckc0cccc c ccccc c`cxccck0cc0c0xcccc0C39gfgfg ccc9gg2Gg css~g sg~g cGg sccsg`ccsGg sg~g 1 css~g3c g0`f`c~cssgf f`c`f`2g sccs2`ccsf g9gfgfg ccGglf~cc2gg2c2lgsfg2 B{;oL;o;L>f>>;v>;L>nnc; n;c; f~L>~>n>fn;?>>nv>;?n;c; L>nnc;{f>0?o?fc>nn;o o?f?o?;Ln>fnv?>>no ;;oL;o;L>>>;govc>f;v;>g;no; G888 88 `  888``` ``o` l````x` l|=ff>n=z~|fn=fv|>>inv>V>>v>>Vn>~ l0gllcsg 0lsgl3ccis3c cc3ccsc0 lcxxccc 0xccxc`icck ``ckcc0 lGgllc~g 2lfglfg`hfcc `ggccsc2n~>;gg>c;Lv~go;g<~>?hoL>fL?>L>>fn> x8 k888p( )`(*c(+)(@ # 0@NN ބ\\\\ŅӅم\3f"X![!@@P!!(( W K SR Preplgphordoz-anyahaj anyahaj Nyitrai 98' 80-s sor POKE PEEK 23635+256*PEEK 23636+1,0 (1610J:1870N 2csucs=0 <c=a haj vizszintes pontja FHc=14:pont=0:hajo=0:bomba1=0:bomba2=0 P 5: Zez itt a vizfelszin d64,0;"__" n 2 x*ez itt a tengerviz mlysge n=521 8n,0;1;" " n c=14222 d=.9ffff pont=0 eredmnytblzat p0,0;1;6;2;"pont=0 :csucs=0:anyahaj=3:::" tenga=0 elet=3 j2;7;1;0,28+(csucs<1000)+(csucs<100d)+(csucs<10 );csucs 239 z$=¾23556\ #g=15:b$=" ":c$=" " i=g0-1 ?z$="1"5;1;3,i;b$;3,0;" " ?z$="2"5;1;3,i;c$;3,0;" " .01z# =,-i i  "" 41;1;#1;" tengerfenk" z$=¾23556\ hajmozgs balra 4z$="5"c>0c=c-1:4,c;" " hajmozgats jobbra "=z$="8"c<27c=c+1:4,c-1;" " ,bomba1=1470 6bomba2=1750 ;z$="1"222 @-z$="1"bomba1=0c>0420 Ez$="2"222 J.z$="2"bomba2=0c<28700 T6hajo=0ƥ>dhajo=1:980:370r ^hajo=11090B ha szerzett pontszmok ro2;7;1;;0,7+(pont<1000)+(pont<100d)+(pont<10 );2;pont |7hajo=1tenga=0ƥ>d1200:400 tenga=11250 elet=01940 4:250 bomba balrl =i=03:254,7:254,23:i bomba1=1  l1=5 c1=c-1 bomba hullik lefel l1=l1+1 (l1,c1)" "540 l1=21640 1ledobtuk a baloldali mlysgi bombt :l1-1,c1;1;" ";1;l1,c1;7;""  bomba robban-tallat &hajo=0 0bomba1=0 :Cl1-1,c1;1;" ";l1,c1;2;6;1;"" Da robbans hangja N&i=3060<:.001wn,i:i Xsl,sc;1;" " bpont=pont+(10 *sl) l%d=d-.05|L=.05|L*(d=0) v 2ha nem tallt, robbans a fenken Cl1-1,c1;1;" ";l1,c1;2;6;1;"" =i=03:254,7:254,23:i l1,c1;1;" " bomba1=0  mlysgi bomba2 =i=03:254,7:254,23:i bomba2=1  l2=5 c2=c+4 bomba hullik lefel l2=l2+1 (l2,c2)" "8204  l2=21920 2ledobtuk a jobboldali mlysgi bombt  :l2-1,c2;1;" ";1;l2,c2;7;"" * 4*jobboldali bomba robbans >hajo=0 Hbomba2=0 RCl2-1,c2;1;" ";l2,c2;2;6;1;"" \&i=3060<:.001wn,i:i fsl,sc;1;" " p5tallat esetn pontszmot szerznk zpont=pont+(10 *sl) %d=d-.05|L=.05|L*(d=0)  7hibztunk,nem tallt a bomba,robbans a fenken Cl2-1,c2;1;" ";l2,c2;2;6;1;"" =i=03:254,7:254,23:i l2,c2;1;" " bomba2=0  -a tengeralattjr megjelenits Ta tengeralattjr - sl s sc -vizszintes/ fggleges pozicija sl=6+(*16) r= r>.5sd=-1 6maximlt rtk,hogy ne menjen ki a kpernyrl r.5sd=1 sd=-1sc=28 $sd=1sc=0 .sl7sl=8 8hajo=1 B)tengeralattjr mozgatsa L?(sc=1sd=-1)(sc=27sd=1)1160 V sc=sc+sd `3-sd balra megy +sd jobbra mozog j6sd=1sl,sc-1;1;6;" " t/sd=-1sl,sc;1;6;" " ~ tengalattjr trlse hajo=0 sl,sc;1;" "  torped kilvs Pi=02:254,7:254,23:254,6:i sml=sl-1 smc=sc+1 tenga=1 sml=sml-1 '(sml,smc)=""sml=41360P sml=41310 a torped halad felfel  5sml+1,smc;1;" ";6;sml,smc;""  (torped nyomvonal trlse (Pi=02:254,7:254,23:254,6:i 2sml+1,smc;1;" " <tenga=0 F P*haj felrobban a tallat utn Zi=13 d1sml+1,smc;1;1;6;"" n:254,7:254,23:254,6 s 222 x&4,c;5;2;"" 1sml+1,smc;1;1;2;"" i sml+1,smc;1;" " +i=010 :.1}L,-40(:i elvsz egy let elet=elet-1 6;4,c;""  5 +i=010 :.1}L,-40(:i 2;4,c;""  5 +i=010 :.1}L,-40(:i  5 0;4,c;"" elet=12310 elet=22260 "elet=023608 ,37;1;1,29;2;elet 6tenga=0 @ Jgrafikai UDG-k O TM1;1;2;5,1;" sajt kszits grafikk: " ^1;10 ,7;"anyahaj ";6;12 ,3;"tengeralattjr ";2;14,3;"robbans , torped ";0;16,1;"mlysgi bomba ,cpa ";3;18,3;"kezetes betk:" h 0: rI1650r:n=022:a$:m=07:z:a$+m,z:m:n |P"",8,16,122z,206,198,206,118v,0 P"",8,16,124|,198,254,192,126~,0 K"",20,0,62>,99c,99c,99c,62>,0 "a",10,20,62,99,99,99,62,0 O"",255,2,31,39',67C,109m,126~,33! J"",4,8,62>,99c,99c,99c,62>,0 K"",20,0,34",99c,99c,99c,62>,0 I"",1,3,7,255,255,1,0,0 J"",1,3,15,59;,255,3,62>,0 Q"",130,194,254,255,255,224,0,0 M"",40(,16,16,124|,124|,16,0,0 I"",0,0,0,0,0,491,255,36$ M"",254,0,1,255,193,128,0,0 O"",145,82R,524,7,224,44,,74J,137 O"",1,26,127,18,255,127,63?,31 Q"",1,26,127,18,255,255,255,255 M"",1,1,3,3,255,255,255,255 U"",128,128,192,192,255,254,252,248 L"",0,24,24,24,24,24,36$,36$ &M"",0,0,0,0,254,255,255,254 0M"",0,0,0,0,127,255,255,127 :N"",0,0,62>,8,255,255,255,255 DR"",34",34",39',111o,255,255,255,255 N informci X b.1;2,5;" Anyahaj " l2;6,0;"Az anyahaj mozgatsa jobbra->, balra<-,,mlysgi bomba ledo- bsa 1 balra, 2 jobbra.Amig fel nem robban,nem lehet uj bombt ledobni,az anyahaj csak hrom tallatot kaphat, s akkor a jtknak vge." v+:: :3;" nyomj egy gombot !"  0   rtkels /1;1;2;4,c;""  502 4,c;" "  2080  Ɛ10 ,4;1;1;7;"Az anyahaj elsllyedt !";0;2;12 ,0;"a tbbirl a cpk gondoskodnak!" pont>csucs csucs=pont J14,8;1;1;1;6