' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"_]` L/浍굺L  !"#$%&'()*+,-./0123456789:;<=>?  1#"""  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-(D 0Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(`F d ֠z# u`z#     Ϡ ԠРҮԠSРҮРMqq(q`$`7-r$`-r%[3q` $"`7-8r r$"qq3,q`$6`7-8r r$,6`-r%[@q[]Ӡ< q8-r-r-rrqq`q8-rrq8-r6-rrq8-r-r-rr_ ]Կ3qqqq8r q(q` $`7-r$qqUVWXq8-rrBq8-r6-rrq8-r-r-rrY`$0qUVWX`-r%-rq-rY `%[2q8-rrq8-r6-rr-"""  @ % % K XQ` d 6 d 6` 0 0 Q` ,-    ( (`d]Рn_(#$`;@r$q8<@rr@[0q88<@rr@r 8<@*rrr@[Dqq  !"#    !  }}}}}-"""-"""-/"-"/-/"-"""-/-"/-/-"""-/-""/-/-"""-"""-"""-"-""/-""-""/-"-"""-"/-/-"/-"""-/-"/"-""-/rde8nr_d$i` d',  `0 `ȱ` 2222222222222dd2dsddddddddddsddddd"#$%%Q-de dKe q.?r.?r;d<ed=ed>e8rd?e8r#dBedCeM6Cqd<ed=ed>e8mrd?e8mr#dBedCeM6*de8n                         U M6cca(ΠɬϬ)(a()$2a(ΠРҮ)U OF MEMORY" ^" IS REQUIRED."E h:"PRICE: $14.95 ON CASSETTE"c r10)"$19.95 ON DISKETTE" |"RUN BATTLESHIP COMMANDER"d010)"$24.95 ON DISKETTE"- "RUN FRACAS"3 , 6:"BATTLESHIP COMMANDER IS WRITTEN IN BASIC AND COMES WITH BOTH AN INTEGER BASIC" @" AND AN APPLESOFT VERSION SO THAT IT" J" WILL RUN ON BOTH AN APPLE II AND" T" ON AN APPLE II PLUS. 32KFRACAS IS WRITTEN IN BASIC AND BOTH AN"V " INTEGER BASIC AND AN APPLESOFT VERSION" " ARE INCLUDED. THEREFORE FRACAS WILL" " RUN ON BOTH AN APPLE II AND AN" " APPLE II PLUS. 32K RAM IS REQUIRED." :"PRICE: $19.95 ON CASSETTE" 5 d^ n:"FASTGAMMON IS A MACHINE LANGUAGE PROGRAM AND REQUIRES 24K OF RAM. IT CAN BE" s" RUN ON EITHER THE APPLE II OR THE APPLE II PLUS" x:"PRICE: $19.95 ON CASSETTE" 10)"$24.95 ON DISKETTE" "BRUN FASTGAMMON" ' :"Z :: "NOMON I,O,C"."LOADING"R"RUN BATTLESHIP COMMANDER.FP"XdHT ONE:"(:13)"(1) FASTGAMMON"2:13)"(2) FRACAS"<:13)"(3) BATTLESHIP"F17)"COMMANDER"P:13):AZA100,200,300,95\A2200 _    /?-rrq-r-rq--rr-rq-r`-r$<q q8r qq\`$qq q\-rq-rq-8r rqqq-r$x/ZqUVWq8-rrY`$xdq-rqxYUVW-rqYq\@[qqq`%[_`$q/?dr_`-r$q_Oq-rrd--rrrq--rrq Y_2UV-rW-r`-r$Y_:q8-rr q-r8r \9`$-8rd-rrq-rqYYPUVW`7ӲrrqY_q-rUVWq`-r$R-rq8-rr -r-8rd-rrq6-r-rqY`7-r$`7-r$nUVWq-rq-r\`$-8-rq-r-r`-r-r%-rq`-r%qyUVW`-r${zq-r{Y~Y]UVW`-r$'q-r`-r%-rq-rV`-r$UVW-8rd8-rr - $`78-r-rr$a()G_ `78r$a()G_ -rqbG_ '`oPa@Gde@M eq.?6@r`$e)gd6?eqdeM#h` $tPa()G_ NtqUVW`%q, oP`-r$ de@MF q.?6@r`$ d6?eqdeM" @p@*#r` $  @p@*r `@9()$`A @p@\q`78@:()r6$a()G_rrq [ ]Ҡ qq  ] UVW`-r%d2e?@ oPa@*8r#rGd2e-rqY0 UVWoPb-rE()F-rY qoPa()G `$ q-rrY [ ] P o* q-r@a@*#rF-r) q-rq-roPH q=>8rr=>8rrde@M `7:$  \# -8-rr -r$ [D q81?rr888/?rrrrq81?rr888/?rrrrN qqX qq\ b `$ l `1?r1?r$X v _  UVWU-rq1?-rrY UVW-rq1?γ  q-rD q8-rr q-r8r -rq6-rb q/?r888/?rrrrqqq`7%q88/?rrr qq\ & `$ 0 `1?r1?-r-rq-r-rq6-rqF qUV-rW-r`78-rr$ qq Yq-r9 `78r$ -rq8-r-rr_   q. q/?r`--rr$q\ [ ]Š' qUVWU-rq1?-rrYN qUVW`--rr8--rr--rrr-r%q-r YO `78-rr$ qqUVW-rq1?-rrY\_? qqr `-r%[  `-8rdr%[J qqqqqq-rq-rq$ \ . qq8 [ ]ˠ q`-r-r%[ qq\ q`%q'q`-r %q -rZq8rd8r q8rd8r q\ []Ϡ `78r$ q[" `  %[6 q8rd8$q-r`%q'q`-r %q -rq6-rq-rRq-rqq-rqq8rd8r 5q8rd8r q \$q-rӠq\_.qUVWX6`7-r%qY[]"l UVWoPbYq `$s \ _v s \ v q \  ]ˠĠ \ _ & qUVWq-rY M6[]Š2qUVWq8-rrY q;qUVWq88-r-rrrY q*qUVW`-r7-r%qY`7$q\d_l \d]Td<ed=ed>e8rd?e8r!^dBe8rdCe hM6m\:rq8rO|d<ed=ed>e8rd?e8rdBedCe`-r-r-r-r%q)Y+Y .`7%[ 8qBM6_@]Š E`%Q Fq!H`78ڶr$I\(ڶq!I`78ڷr$J\(ڷqJq8rO`%ڶqP`%ڷqK_oP a()Gde@MXq.?6@r`$d6?eq@p@*#rdeM`<@r$Pa()G_%qUVW`7-r%q$`$+9'UVWr@p@*#r*_ R]\M6q_p`@9()$ zM6dq<@r` $R'`;@r$R@p@*r\q` $R"`-8r r$R-rq-rq-rq-rq`<@r$`;@r$@B;@rrp@a@G_`<@r$ `@9()$`;@r$@p()_@B;@rrp()a@G_ `<@r$q.?$rq.?%r= q=>r=>rq-rqYoPa() q`%qqoP@p()de@MXq.?6@r`$d6?eq@p@*#rdeM`<@r$p`@9()$n\'s\ (\X\p4\(UVW-rq-r-rq-rYq\@\<([X]ҠE]oPa(ĺ)Gq8r?a@*#rGgqqlUVW,voPbE()-[ p]̠ȠȠӯrUɲVW-ɲrqYɲuUɲVW<q-8-ɲrr -ɲrr`%-rq-r,-8-ɲrr -ɲrrq61?r Yɲ%UɲVW-ɲrq-ɲr-ɲrYɲ[d]Ӡ-8r rq_r@`$T$Jq-8r rq_rT`$h$^q-8r rq_rhq-8r rqrY|Y[[2UVW UVW `-8r r$-8r rq YYص"_,`$&q`-8r r$" \_`$&q`-8r r$" \_&q`-8r r$" \_"Yȱ+,-8r rqUVW`$@$6q$P<` $F_xP`$nZ` $d_xn`$x`-8r r$ \_&qq`-8r r$ \_UȱVW`$&q`-8r r$ \__UVW`7-r$* oPb-rG*Y.4UVW-rq-r-rqY_t ]ԠРҧӠUVWq/? rq/? rq/?r q-r`$2`$(_x2`q\qq`$\-rq-rq-8r rqqq\ q`%[_]à$qUVW`-r%qY-rq-r[]ԠϠ\ q`%[`$!q/?r886r/?rrq7886r/?rr6qq`  $_`$q6q6q_`-8r r$;qqr?a@*#rG((Y2([<(]ԠΠΠA(`$d(F(UVWK(`-r$Z(#L(ٷq-rطq-rMN(q=ط>8ٷrr=ط>8ٷrr`z$P(O(_n(P(Pطoٷa('oDZPa@*8r#rGd2eP`7-r$( 'b-rG(Pb-r-rE()F-rG(Y[ (]ԠΠԠ (`%[(d2e?\(d2e[ (UVW(`-r$((K(o-rP-rq8)GL'd2eoPa()GoPa()GoPa()GoPa()GF'oPa()GoPa()Gd2e 'oP'[&']ǠҧӠ 'DZq'UVW'`7-r%d2e?D)GA'UVAWJo=Pa@*#rE()GY 'oPa(Ҡ)'oPa(Ӡ)G'oPa(٠)G"'oPa(ҧӠ)G4'oPa()GoPa(oP'a()GoPa()GoP'a()GFo'oPa()GoPa()Gd2e p'Poq'[t']ǠРΠ$~'KM6oPa(Π)G''oPa()G''oPa()GY'B'oPa(ҧӠ)G*L'oPa(ǠԠ)G)V'oPa(Ӡ٠)G['oPa(Ҡ)G5`'oPa()GoPa()GLj'd2eoPa()G٠)3&oa(Ġ٠ŠΠӠŠ)'[']ǠРԠ%'KM6oPa(Ԡ)G&$'oPa()G&.'oPa()GA8'UVAWJo=Pa@*#rE(Ӡ)d2e#de`de`de`#\]ԠР#q\@&_&]1&M6oPa(РҠ)&oPa()*&oPa(ˠˠנ)7&o Pa(Ԡé٠#q-rq YY-rq-rY>x#N@"(r@p() #UɲVW-ɲrq-ɲrYɲ#\t' #q#q\@#\'q\@#\*6#oPd2ea(ǠUrD4rq-rq-rq-rq.-rq=-rqL-rqVWj#UVW-rq-rqYUVW-rqYUVWU-rqYLn#UVW-rqq/?-rrUVW UV8r W X-r>sq Z#q"[#O4rqq-rq\#q`.?r$\#"]#q-rq`$\#K_#-rq-rq-rq-rq-rq-rq b#qH  d#UVW-rq/?-rrY}i#O4rD4rD4rD4rqC-rqS-rqP.<#N@"rC@"rC@"rC@"rC@"drdA#@p(ԠҮЮҮŮ̠Ԯ) F#q4U#q<ӳqaӵqxӶqӷqӸqӹqW#q'UVW-rqC3#-rq-rqYUVW(-rq-rq-rqY7#O4drD4rD4r8#O4rD4rO9#UVWd-rqYUVW-rq-rq-rq-rqYH;#O4r-rqA-rqB-`q6qqs0#O4rD4rD4rD4rUVW-rqYUVW-rqYUVW-rq-rq1#Yqq6@p2#O4drD4rD4rD4rD4(rD4(rD4(rC@"rUVWd-rqYYde`q ,#\&f-#qqqqqqqqqqqqqqB.#dede$dede(deHde)de?T/#de de@d ed e(d ehd e$ qUVWq7-rY [6 `78r$ \'\ (UVWY_.( `7$ `8/?rr%q q_ (#])#K5*#dJedKede.?Jrde.?Kr=+#N@"rUVWdeq-rY :q :`7%[":UVWd&e/?rM:Y":UVW`7-r-r%\<:Y:[$`;qUVWq-rY e;q j;`7$;"t;UVWd&e/?rMy;Y%~;UVW`-r-r%\6 $32d2e`%q1?r /2Poq-ra@*#rG 3d2e 3YYS6Poa(Ԡ٠٠ҠŠӠ)Gq.?6@r`$6[:]ҭŠ:`$`;:[#:qUVWa()de`_} 0`$1'0d2ea()Gde`_}%1d2ea()Gde`_}/2]ԠҧӠӠԠĠƠ/2\(Poa(ҧӠР)'2UVW UVW q- r2`r H:/bGP"boPa(̺ͽ)GPbGP"bG:D/oPa(ŠŠ)GPbGP"bG!I/oPa(Խ)G N/d2e&X/oP a(Һ)Gde`/`$ 0"/d2eҠ)GPbGP"bGa/q8rq8ro Pa(̺Խ)GPbGP"bGG/o Pa(٠)oPa(ҠƠӠ)GP50/q88rr q88rB.qqUVWdq8-rrq8-rrY9.M6oPa( ԠԠ̠ŠӠԠԠɠӠԠɠà)G<.oPa(Ҡ)GoPa(Р)G6/oPa(Ҡ)GPbGP"bG>/oPa(ǠƠ)E@*8r#8rr,.UVWY6.\,@._*,|.q8=>r=>rr!.oPdeM.UVWYdeM.[.]Š.\2]ЧӠ.qqX-8r  rqY ,YY ,q,q`$,,`-r$,,_.,]ˠ,UVW-rqY-UVWd-rqY -oPM6F-[ .]P".oPa(̠ e,`$,*g,qq`-r $.9j,UVW8-rr\|.`-r%qt,Y`7$.,-rqO,`$,UVW-r-8r  rqY_,H,UVW8-rr=,:,YY_,$=,`-8r  r$,3B,qUVW`<@*#rr-r%qL,Y`7$:,O,`-r$./Q,qq` -r $g,AV,UVW8-rrX\|.`-r%q`,Yde@M.+q.?6@r`$+deM8+d6?eq` $+Pa()G_++Pa()G+oPM6%+oPa(Ǡ)!$,UVW UVW&X.,qq\|.8,`:$²qf+`± %±qp+_+*+²q²`²$+±q±²q +`±%±q +_+*+±q±`± $+²q²±q+`² %²q+_+*+±q±`±$+²q²±q +`²%²q +_+!+oPa()G+:+d6?eq@p@*#rdeM +q/?rq<@r%+`.$+*+`$\+/+`/$+1+`;$+4+`$+5+` %@p())7+`ABCSP%@p()>+a@G*\+²q²`² $f+±q±Pa()G0+oPa(ŠӠҠԠ) +a(Š§ӠҠ)+a(ŠçӠҠ)+a(ŠӧӠҠ)!+a(ŠЧӠҠ̠)%+o±P²de@M +q.?6@r`$Ѵq \(ѱqѲqѳqѴq'\([*]Ҡ+]ҠϠQ+oPS(ϠՠԠϠŠҠӠҠàǿ)&@7+oPM6`@*#r:()$+q\t'[ +q$ +±q²qo)GZ(Yd([n(PطoٷdeMs(_Z((]Ҡ&(UVѱWѲoPѳa@*ѳ#ѴrGY[([(]ҠԠG(ѱqѲqѳqѴq'\(ѱqѲqѳqѴq'\([(]ҠΠG(ѱqѲq ѳq6RERXMH(SX)ı! @NOGOOD1:3  PROCESS ONER LLROWMH(SP)1:LL1LL1x MLROW:MLMH(SP)11ML11MH(SP) MQKQ(SP):MBHS(SP) MKNH(SP)MB:MCMK:MFMH(SP)1:GOOD0:LL(SP1)100(LL1)10COL1:ML(SP1)100(ML1)10COL1:INC10::RXROW:SXSP:RF(ROW1)10:NOGOOD0H CXCX1:CX11ĭA%(RFCX)1520[ CECX1:CXCOL~ CXCX1:CX0ĭA%(RFCX)1540 CECXMH(SX)ı RXRX1:RX11ĭA%((RX1)10COL)1560 "RERX1:RXROW ,RXRX1:RX0ĭA%((RX1)10COL)1580 LLMLı HDHD(P%(LL)MQ):HCHC(P%(LL)QLP%(LL)KMISS):MIMI(P%(LL)QLP%(LL)KMISSP%(LL)):LLLLINC:KEYKEYINC HDHD(P%(KEY)MQ):HCHC(P%(KEY)QLP%(KEY)KMISS):MIMI(P%(KEY)QLP%(KEY)KMISSP%(KEY)):1010  FIT?$ CXCOLKd BATTLESHIP COMMANDER)n9000HC0:HD0:MI0:KEYLLMFINC:CLLKEYINC:HDHD(P%(C)MQ):HCHC(P%(C)QLP%(C)KMISS):MIMI(P%(C)QLP%(C)KMISSP%(C)):HCMCHDMBMI1020GOOD1:CLLKEYINC:P%(C)0P%(C)KQ(SP)                         kY=_==deӶd eӶM=deӷd eӷM=deӸd eӸM=[v>[}d2eoQ=f q$=UVWX6=ghUVW2YY =q=\==UVW =q=UVWX=de.?rq=Y =M=Y=UVWYK =M6[ =]=L =d6?e=f=UVW/ij'VW-rqY-rqh=_<=_==f=UVW`%f=i(j'k0Y=UV(WX6f=UVW`%f=gh0YY1=UVWX6fUVW`%f=gh0YYghlmn&L=lmnghlmnN=lm n i jk /P=lm nghgh lm n=f ghijkijkijk@=f ghA=deӵd eӵMB=UVWdYD=deӹd eӹMF=f*H=lmnlmnlmn/J=lmngh!h*g!h)g h(gh'g h&g h%g!h$g"h#g"h"92=g"h*g#h)g#h(g$h'g$h&g%h%4=f 36=g!hi#j$ki j#ki#j$k8=f g h8:=f gh'ijk'ijk(ihghijk"=fijk%$=f/&=gh gh ijk!l"m#n3(=ijk l!m#nl!m#ngh#&*=l m#n l m#n g h#,=f0.=g!h+g h*gh)gh(gh'T0=gj'kY=f"=UVW ij k,Y =gh =ijkijk*=ijkij kijk7=ijkij ki j kijk3=ijkij kghijk+ =ghgfg-rh<`$<Y NS0:C185:HA%(C)(HA%(C)): TARGT0:C1HF:NH(FH(C))(NH(FH(C))MH(FH(C)))NH(TARGT)TARGTFH(C) C NH(TARGT)0MXNS:SXSHOTS:C15:NH(C)(NH(C))::8160:4010 SPTARGT:MGMH(SP)NH(SP):MYKQ(SP):NH1:P%(FG)MYı,  A%(FG(TARGT1)1001)ıt  GOOD1:HRROW:HCCOL:ROWRF:COLCF:NSNS1:S%(NS)ROW:S%(NS20)COL~ $ 3300 . ROWHR:COLHC 8 CHECK MOVE GOOD0:RCMH(SP)NH(SP)ı RFROWRM:CFCOLCM:2300 RFROWRM:CFCOLCM:231000# LLCOLMH(SP)1:LL1LL1I MLCOL:MLMH(SP)11ML11MH(SP) LL(SP1)100(ROW1)10LL1:ML(SP1)100(ROW1)10ML1:INC1:1000   DO MOVE  NSSHOTSGOOD1:  RF1RF10CF1CF10ı  FG(TARGT1)100(RF1)10CF<#R(X)((1)X1).+A#M(X)X(X256)256L+C#C(X)X(XMH(C))MH(C)U+F#RN0b+P#MV65068+S#C0108:784C,(LM173C):C+U#SGLM424:S1SG37:S2S114:S3S224:S4S324:S5S46:S6S528:S7S614:S8S710:S9S832+W#GCLRLM25:UNFURLLM64,Z(40)*7#C%(100),H(5),U(5)5*8#SN$(5),ST(5),FH(5)*9#SN$(1)"AIRCRAFT CARRIER..":SN$(2)"BATTLESHIP........":SN$(3)"CRUISER...........":SN$(4)"SUBMARINE.........":SN$(5)"PATROL BOAT......."*;#SQ(5):SQ(1)65:SQ(2)66:SQ(3)67:SQ(4)83:SQ(5)80+0:MC0:MK0:MF0:QL0:MB0q).#768,32:769,74:770,255:771,32:772,44:773,254:774,32:775,63:776,255:777,96)/#KMISS1:GOOD0:QL0)0#P%(500),KQ(5),WRK(5),HS(5):C15:KQ(C)2:)1#VID1024:KY16384*2#A%(100),SUNK(5),MH(6),NH(5),S%(40),T(40)50:I12000:I:12000/( SSĭR(5)4CWXP1>( SS0:8110J((# INIT()#:16298,0:(104)8(116)150ģ((116)256(115)10751):0:0(*#(176)256(175)2050(+#LM(176)256(175)(,#9910)-#C0:HC0:HD0:MQ0:MI0:KEY0:LL0:ML0:INCSUNK(C)CEXVSC'C:+' CONTINUEH'l C1SHOTS:6C:3:C:CV'q E2E1g's E4000,3000p'v NS0z' 3500' CHECK END GAME' 8340:8360' CW0:C15:CWCWSUNK(C):C' PW0:C15:PWPWU(C):C' ( PW5CW5İ10200:102ME CONTROL4&SHOTS0:I15:SHOTSSHOTS(U(I)0):A&MMMOVESt&MOVES0:I15:MOVESMOVES((MH(I)NH(I))0):&RNRN1&D0:C15:NH(C)SUNK(C)D1&C:DE2:6500:8300&6500: PLAYERS MOVE&EX0:8160:8180'VS5:C511:VID256):62,M(VIDVID1):63,((VIDVID1)256)R%^66,M(DEST):67,(DEST256)[%h768f%m15000}%rDESTLM(2SC)VID%|60,M(DEST):61,(DEST256):62,M(DESTVID1):63,((DESTVID1)256)%66,M(VID):67,(VID256)%768% & GAT(D)T(CC)T(D20)T(CC20)CD1)$)CC0$+D;$.CDıE$8CC1V$B(7);:7440k$@ PAGE SWITCHERx$ESCCSĀ$FCSSC$HSC1Z6İ10450:Z61$ISC2Z7İ10480:Z71$JDESTLM(SC1)VID$OSC1Z61$PSC2Z711%T60,M(VID):61,(COL((F$,2))&#COL1COL107250E#C%((ROW1)10COL)07250^#T(C)ROW:T(C20)COLh#7060~#MOVES1TT:TS4#".";#IN$#IN$(13)7450#TS4:" ";:7060#CD0:D1MOVES:T(D)CD1#$DMOVES7467!$'CCD1MOVES:7160"F$"":7170*"F$(F$,(F$)1):"IN$;:7070O" IN$(21)7070e"XX(36):YY(37)" IN$(XX,2YY)16XX,2YY1)128)"*7100"R ERROR"\(7);:CC1:7060"pF$""7060"z868"ROW(F$)64"ROW1ROW107250#MOVES1TT:TS:"DONE"!C0/!CMOVESC0K!CC1:CTT:TS3:F$""T!IN$h!IN$(13)7280z!IN$"."7400!T(C)0:T(C20)0!(IN$)327120!(F$)37070!F$F$IN$:IN$;:7070!IN$(8)7180!F$""7070"(F$)10 7000 6000H 10260:C1MOVES:Z(C)T(C):Z(C20)T(C20):CW SC1:8000b 10300h z X PLAYER MOVE ]14:29:"ROUND: ";:((RN1)(RN27)2663); gTT6:TS29 lC1MOVES vCTT:TS:C;" ":T(C)0:T(C20)0 C!::&p FILL H WITH # HITS/SHIP<rI215:H(I2)0:LuI21MOVESXXC%((T(I2)1)10T(I220)):XX0H(XX)H(XX)1C%((T(I2)1)10T(I220))(XX)10I2I215:U(I2)U(I2)H(I2):d PLAYERS MOVEn10200 s1025G:E15440-6CC1:C%((C1)10D)F:5490<@E25460]JDD1:C%((C1)10D)F:5490lTE35480^CC1:C%((C1)10D)F:5490hDD1:C%((C1)10D)Fr|:X110:Y110:C%((X1)10Y)F5540C%((X1)10Y)0J)053105520:5040$5410.5420=E25360^JJ1:C%((I1)10J)05410n5520:5040}E35390II1:C%((I1)10J)054105520:5040JJ1:C%((I1)10J)054105520:5040" ,C%((C1)10D)F:K2G15050(5240 2E252001<DG105050;F5240IPE35230ZZCG105050dd5240tnDG15050xC%((C1)10D)052605520:5040IC:JD:C%((I1)10J)052805520:5040H11G:E15330 II1:C%((I1)1018000;Q,GOOD1:RXROW:COL210MH(SP)1011367o;V,CXCOL2COL(MH(SP)1)22:11900:CRSQ(SP)128GOOD0w;`,CX;e,GOOD11400;g,CXCOL:GOOD1:RX3MH(SP)1011800;j,RXROW1ROW(MH(SP)1):11900:CRSQ(SP)128GOOD0;t,RX:GOOD11800IN$(13)Ė25:" ";:11030.:+21:" ";?:+19:1:958b:+20:1:"CHECKING POSITIONING"}:$,ROW312:COL20382:.,RXROW:CXCOL:11900:8,CR18611490:=,C%((RX3)10CX29)11490:B,SP0:C15:CRSQ(C)128SPC:L,C;O,NH(SP)1+B2B21:B210B1B11:B21,9f+B110B1179p+11030W9+B2B21:B21B1B11:B210g9+B11B110r9+110309+B1B11:B110B2B21:B119+B210B219+110309+B1B11:B11B2B21:B1109+B21B2109+11030:+14:25:".";:IN$:+"USE 3 'S'S FOR SUBMARINE"?8+"USE 2 'P'S FOR PATROL BOAT"V8+B13:B2219:L$i8 +X(1):X(L$)y8%+X46112008*+X21111008/+X471118081+X591119084+X81115085+X32L$":"87+X65X66X67X83X80L$":"8>+L$;9\ WANT TO PLACE YOUR SHIPS FOR AUTOMATIC CHECKING? ";IN$h7+20:1:958:(IN$,1)"N"AC0:10100:q7+AC17 +B11:B21:14:21:"DONE";7+19:1:"USE 5 'A'S FOR AIRCRAFT CARRIER"7+"USE 4 'B'S FOR BATTLESHIP"7+"USE 3 'C'S FOR CRUISER"8";:::6(&6( CLEAR TARGET GRIDh6(Q16:Q224:Q329:Q439:10400:Q118:Q224:Q31:Q439:10400:6( CLEAR OCEAN GRID6(Q16:Q212:Q31:Q412:10400:Q118:Q224:Q31:Q439:10400:6* ENTER SHIPS6+ ENTER "." TO END;7+20:1:"DO YOU5L(Y7S%(I)3:X7S%(I20)219_5N(XYX71,2(Y71))16X71,2(Y71)1):XY122XY17010320j5O(10350|5P(X7:Y7:"*";5Z(5d(5n(X7:Y7::(X71,2(Y71))16X71,2(Y71)1));::103305( CLEAR SQUARE6(IQ1Q2:I:Q3:J1Q4Q3:" H(I)U(I);"/";MH(I);4(:94 ( PRINT * ON TARGET GRIDE4(MM0ıV4(:10260::b4(I1MMt4(Z(I)0102804(Z(I)3:Z(I20)22:(RN((RN1)27)2663);4((42(4<( PRINT * ON OCEAN GRID4A(MM0103404F(I154K(S%(I)0103302:1:" ";:2:14:" ";:3:1:" ";:3:14:" ";i3'1:1:" ";:4:1:" ";:t3'23:1z3'3' PRINTING COMPUTER'S CASUALTIES3'G1183'I153'U(I)Ğ3'G1I:1:SN$(I);::19:H(I)102403'H(I);4(25:M21:"- - - - - - - - - --";:T2'I6574:I61:18:(I)") : : : : : : : : : :";:s2'15:18:"YOUR CASUALTIES"2'16:29:"THIS PAST";2'17:28:"VOLLEY TOTALS";2'5:1:"COMPUTER'S SHOTS";2'2:3:"BATTLESHIP";:3:3:"COMMANDER";13':3:28:"COMMANDER";:N1j':2:26:" ";:2:39:" ";:3:26:" ";:3:39:" ";1o'1:26:" ";:4:26:" ";:1p'1:231q'1t' SETTING UP OCEAN GRID1~'::1:26:"OCEAN GRID";1'2:21:"1 2 3 4 5 6 7 8 9 10";:2'3:.'3:4:"- - - - - - - - - --";V08'I6574:I61:1:(I)") : : : : : : : : : :";:{0B'15:5:"COMPUTER'S CASUALTIES";0L'16:4:"REMAINING LAST HIT";0V'17:6:"SHIPS VOLLEY TOTAL";0['5:28:"YOUR SHOTS";1`'2:28:"BATTLESHIP";::19:"BY"1/&8:8:"ERIK KILK & MATTHEW JEW"f/&11:2:"COPYRIGHT (C) 1980 BY QUALITY SOFTWARE"/&22:"[STAND BY WHILE OCEAN GRIDS ARE FORMED]"/'/' SETTING UP TARGET GRID/'::1:8:"TARGET GRID";/$'2:4:"1 2 3 4 5 6 7 8 9 10"; 0S5.#SC2:8000(.#10000:SC1:8000_.#202,(78):203,(79):X(1):204,(78):205,(79)j.#11000.#20:5::" POSITIONING SHIPS ":.#5000: SET UP BOARD.#SC2:8000.&8100.& TITLES.&:3:8:"** BATTLESHIP COMMANDER **" /&6CN(5),CS%(170),HA%(85),AN(6):LL0:AN(1)1:AN(2)26:AN(3)46:AN(4)61:AN(5)76:AN(6)86-n#C15:CO(C)LL:MLR(MH(C))1:ROW09:COLC(MLROW)9MH(C):LLLL1:CS%(LL)ROW10COL:COL:ROW:CN(C)LLCO(C):C-#I215:U(I2)MH(I2):-#10100.#SHOT,Z#HF02,[#SB(56),SE%(56),PI(6):C0:D1:PI(D)1V,\#CC1:SB(C),SE%(C):SB(C)9052t,]#DD1:PI(D)C1:D69052,_#MH(1)5:MH(2)4:MH(3)3:MH(4)3:MH(5)2:MH(6)1,a#FL%(160),B%(26),b#C1160:FL%(C):,d#C15:ST(C)R(MH(C))1:CV-i#CO(5),51K=PX,C:D1100:D:C&K=F01K=15854>K=PY132GK=CPY\K=D14431955128pK=FF1:D,FL%(F)vK=K=UNFURLK=PYK=:C14000:C:K=:K= INITK=K=16302,0K=7K=C047:0,39C:K=15802 L=8,M(S6):9,11+JT=7,1124:25,267:25,269:25,26116Jh=15602AJ=15844NJ=1:PY48bJ=C120:C8Ġ5wJ=40C,3948C:CJ=PX40201:1J=C120:C8Ġ5J=PXC,PYC:C:PXJ=D19151:1:C1D:C8Ġ5J=DC,PYC::J=9:PX36K=C27S5):9,S5256:SG!IB=C1100:C=ID=8,M(S9):9,S9256:SGEIF=15aIH=2,314:3,515:2,316IJ=2,518:19,2:19,5:2,520IL=2,522:23,5:2,524IN=7,1112:13,1411IP=7,1116:17,7:17,11:7,1118JR=20,227:20,8:20,229:22,10:20,2232,37:33,36:34,35:34,34HH2=34,42:35,41:35,40:36,39:36,38:37,37PH4=13yH6=33,19:35,3619:32,3520:35,3621H8=9:32,19H:=13:20,39:22,2339:19,2240:22,2341H<=9:19,39H>=13:7,18:4,518:8,519:4,520H@=9:8,18IA=8,M(27:18,2127-G =0,26:8,26:18,26:20,2126=G"=1:0,1637EG$=15fG&=2,32:4,32:2,433:34,353G(=6,832:33,356:33,358:7,35G*=32,3510:32,3512:11,35G,=4G.=33,43:32,42:31,41:31,40:30,39H0=33,42:33,41:32,40:31,39:32,38:,0F=8,2:9,47F=GCLR)F =B%(26)193F =CF13BF= SCENERY]F=8:C4447:0,39C:CdF=5F=C112:0,9C44C:CF=24,32F=0,2331:0,2530F=0,329:6,1229:16,2329F=0,128:6,928:11,1228:16,2228 G=0,227:8,927:16,C)(SB(C))):E<E<15616/E< MOVEMENTrE.13000: COMP'S SHIPS;>.MOMO(PW5):SHSH(CW5)v>.PS0:CS0:C1100:PSPS(C%(C)0):CSCS(A%(C)0):C>.:1:4:"B A T T L E S T A T I S T I C S"; ?.5:24:"PLAYER COMPUTER";:6:6:"SHIP POINTS";:7:3:"NUMBER REMAINING";:27:M-C1100:C%(C)0:C&= -19:1:958,=F-8=. ERRORq=".20:1:"ILLEGAL POSITIONING OF ";(SN$(SP),17)=,.Q12000:Q=6.11500=@.11000=|.CRCX,2RX)16CX,2RX1)=.:RX1:CX1:(CR);=.:RX1:CX1:(CR);=.>. GAME OV <,NH(SP)1P<,RXROWāRXROWROWMH(SP)1:C%((RX3)10CX29)1:RX:11490<,CXCOLCOL(MH(SP)1)22:C%((RX3)10CX29)1:CX<,COL:ROW<,SP0<,SPSP1:SP511500<,NH(SP)11496<,11800<, CHECK OVER<,C15:NH(C)0:C= @ % % K XQ` d 6 d 6` 0 0 Q` ,-    ( (`$i` d',  `@|AND MATTHEW JEW(R29 FEBRUARY 1976;:23:1:0 `ȱ`22l2XZJ2XdJzl^PB4& dd2z222222222222dd2dsddddddddddsddddd2,255,47,210!QC45,34,34,34,210.Q}:23:1FQ }"PLAY AGAIN? ";IN$^Q}(IN$,1)"Y"Ĭ9002dQ}~Q@BATTLESHIP COMMANDERQJWRITTEN BY ERIK KILKQTAND MATTHEW JEWQ^COMPLETED 1 APRIL '80QhADAPTED FROMQmBATTLESHIPSQrBY ERIK KILKR,210PC45,34,242,34,210/PC45,34,34,47,210FP&C45,242,255,34,210[P0C45,34,34,34,210qP:C45,242,34,47,210PDC45,242,255,47,210PNC45,242,34,47,210PXC45,34,34,34,210PbC45,242,255,47,210PlC45,34,47,34,210PvC45,34,242,34,210 QC45,2410OB45,242,255,47,210/OB45,242,34,47,210FOB45,242,255,47,210[OB45,34,34,34,210rOB45,242,255,47,210OB45,34,34,47,210OB45,242,255,47,210OB45,34,34,34,210OB45,34,34,34,210,45,34,34,34,210OB45,242,255,34,210PC45,34,34,4731,11,30N?17,19,17,19,17,17(N?0,05N? PATROLFN?17,23,16,24YN?18.1,20,22,23dN?19,19mN?0,0NhB125,125,125,125,125,45,34,34,34,210NrB45,34,34,34,210N|B45,242,47,34,210NB45,34,255,47,210NB45,242,47,34,210OB45,34,34,34,2.1,13,16.1,25,27,29.M>10.1,14,18.1,25,27,28AM>20.1,24,27,27LM?21,24iM ?21,23,22,23,22,22,22,22rM?0,0M ? CRUISERM*?11,30,10,31,9,32M4?8,33M>?16.1,23,25,27MH?18.1,22,25,27MR?18.1,21,25,25M\?20,21Mf?0,0Mp? SUBNz?10,S6256:SG&L=8,M(S7):9,S7256:SGBL=8,M(S8):9,S8256:SGHL=NLv>]L> AIRCRAFTqL>6,34,5,35,4,36L>3,37,3,37L>18,24,18,24L>18.1,18,21,23,21,23L>22,22,22,22L>0,0L> BATTLESHIPL>9,31,8,32,7,33L>6,34,5,35M>12