…†¶õ' (WE¤THEY¤INLINE¤OUTLINE¤GRID¨BLANK¤SHIP¤N°N±N´STRIKÅHITÓCOÎCOÌRO×HOÍÉÄKEÙTIMEÓNOSQRÓCHAÒDIÒANÓFIRÅFLAÇAZÍELÅREÓSTAÔDUÒICÒV±V²V³ÁLOOÐA¤(ÿ'ÿA&(æ&(@ @ @ B2y A !"#$€% .*************************› .* COMPUTER BATTLESHIP *› .* BY *›( .* JOHN BABSON *›2 .* AND *›< .* BILL CLEIS *›F .* OF THE *›P .* PITTSBURGH ATARI *›Z .* COMPUTER ENTHUSIASTS *›d* FOR FREE DISTRIBUTION*›n*************************›xOO€;@ ,;@ ,‚;AU,ƒ;AU,„9@9<@,…;@@,‚@†;@ ,6‡-(6ˆ-@46‰-@@6Š-ŒH6‹-@6Œ-B2yH6….& – AP ***** SEND *****›ª‰@‡R1:´@@‰‡‡R1:¾ (‰ƒÈ(‰>:AU,Ò‰Ü$æ***** RECEIVE *****›ðeePOSITION 0,20:? "INPUT FROM OPPONENT?":INPUT INLINE$:POS.0,21:?BLANK$:POS.0,22:?BLANK$:GOTO 190›ú‰@‡R1:@@‰‡‡R1: ‰‚‚7ˆ<ˆ,4Ap"(‰,‰6$@!!******* GET SHOT AT *******›J6ƒ. YOUR TURN A`T7-@@7( WAITING FOR 'S MOVE^ A0OPPONENTS MOVE›hG6-@:‚7ˆ<ˆ,,+6Ž-@:‚7@<@,,96-&@`G6Ž-Ž&@Br A€6-+„8<Ž,,t6ƒ7ˆ<ˆ,.>:,v -Žx(>:&A(,| B A`†8"A` A&P# A08***** SPLASH *****›E-ˆ@%‘-@2@d1A‘=A‘A ‘E š% A%A‡%A‡¤A6Š-Š%@Š"@' A(A***** LOOSE ROUTINE ***›®$CHANGE OF TURN›¸***** COVER SCREEN *****›Âˆ‰‡K:Ì@‚‡Ö5 +@-@@5(@computeràA‡ê--@@-(@ battleshipô.(.(# Do you need instructions (Y/N)þAdAU F:Ad,AUAP@-AD@ˆ6ˆ&A<2‡@@@  A & )ˆ’2‡‡‡‡0’"@x A`:.+‡.(" This is a Battleship game to beD,,($played by two players with computersN**("over modems. Select the positionsX,,($of your ships and enter a letter forb,,($the column and a number for the row.l--(% At the prompt type H if you wantv++(#the ship to run horizontally or a V€''(for the ship to run vertically.Š(”..(& After you have set up the board,ž..(&you will enter into the terminal mode.¨//(' Set up the modems so that you are²&&(communicating with each other.¼..(&One of you will decide to go first andÆ,,($the other will move next. When you Ð,,($both are ready each presses START atÚ..(&about the same time to start the game.ä2( (+(PRESS RETURN TO CONTINUE GAME2)ˆ’î ***** SHIP PLACEMENT *****›ø+‡(}þ WHAT IS YOUR NAME? €€4Ap )B:€,!@)6€.€7@<@,*+‡4&&( ONE MOMENT PLEASE > AH #APR[[AIRCRAFT CARRIER,5,193,BATTLESHIP,4,194,DESTROYER,3,196,SUBMARINE,3,211,PT BOAT,2,208›\“-ˆ@"†”•f1-@@1(THE SHIP TO SET UP IS Ap; A0;(† AND NEEDS ” SQUARES z A  “„-@@(…Ž A0˜@-@@@(&GIVE SHIP STARTING POSITION A to J ¢I )ˆ !@t) @e-(>:AS,;‘-ˆA? ‘I A ¬Q A0C(OK [>:%A(,] GIVE STARTING ROW 0 to 9 Q6-&@`¶* )ˆŽ Ž @H)Ž!@W* A PÀ6Ž-Ž&@BÊ3 A03(!HORIZONTAL OR VERTICAL (H- or V|)Ô )ˆ––"@r A`Þ(…è–"@† A ò,(>:AS,‘-ˆA" ‘, A pü:Ž%”!@(>:AS,,‘-ˆA0 ‘: A L -‡”&ˆ „8<Ž%,A`-(>:AS,;‘-ˆA? ‘B'L @  7 -‡”&ˆ6„8<Ž%,-•"-Ž%)(>:•,- 7 A$(….:%”!@(>:AS,,‘-ˆA0 ‘: A 8L -‡”&ˆ „8%<Ž,A`-(>:AS,;‘-ˆA? ‘B'L @’B L- -‡”&ˆ6„8%<Ž,-•"-%Ž)(>:•,- V-‡@"(…`$j%-@@!-‡!(…% t>-@@>($IS THIS THE SETUP YOU WANT? (Y or N)~ )ˆ——"@‰ Apˆ—@‰ A’X-@@@(& OK HERE WE GO N0@‡‡X A€œ***** SET UP SCREEN *****›¦5ARA#-‰@05INITIALIZE GRID›°Ž-@@º6„8<Ž,-@2%A(Ä  Ž ΛØ'-@@'SPACE BETWEEN›âŽ-@@ì6„8<Ž,-@2ö  Ž ##TO ROW OF LETTERS - FIRST BOX› 6Ž-@-@@&&6„8<Ž,-A(%@e%&@( 2$$TO ROW OF LETTERS - SECOND BOX›<6Ž-@F-@!@0P&&6„8<Ž,-A(%@e%&@!Z d&&TO COLUMN OF NUMBERS - FIRST BOX›n 6-‰xŽ-@@‚&&6„8<Ž,-A(%@H%Ž&@Œ Ž–› ''TO COLUMN OF NUMBERS - SECOND BOX›ª6-@ ´Ž-@@¾&&6„8<Ž,-A(%@H%Ž&@È ŽÒ6.OPPONENTÜ (}DRAW THE SCREEN›æARAð- -‡‡-( ATARI COMPUTER BATTLESHIPú7-‰@B:€,!@-(€7ˆ<@,7 AP-‰@(€=-@ @$B:,!@3(7ˆ<@,= Ap-@ @(""-@2@"(POSSIBLE,!-@2@!(HITS=176-@2@ (HITS@!-@2@!(LEFT=‹J -@2@ (ROUNDST"-@2@"(FIRED=˜^'Ž-@@'POSITION OF Y›h!-‰@0!POSITION OF X›r -Ž(>:„8<Ž,,|  Ž$†$' A P A™"ˆ' A š""***** TAKE TURNS ROUTINE ***›¤›®‘-ˆA ‘ Ap¸ A0 A̛֛à***** TAKE A SHOT *****›êM‘-ˆA ‘!-‡@M(' GIVE FIRING AZIMUTH A TO J ô )ˆš6ƒ7ˆ<ˆ,.>:š,þ^š!@t)š @eB($}NOT A VALID ENTRY A TO J FIRST P‘-ˆAT ‘^ Ap4(>:š,6š-š&@D4( ++(# GIVE FIRING ELEVATION 0 TO 9 $ )ˆ›$6ƒ7@<@,.>:›,&#› @H)›!@W# A 00(>:›,6›-›&@B0( :`6œ-„8š<›,œA`?( } POSITION ALREADY SHOT AT M‘-ˆAQ ‘V(` ApD8-‡@8($ IS THIS THE SHOT YOU WANT? N1 )ˆ——"@‰'6„8š<›,-@21 AX —"@x(… Apb A`lY-‡@;(' FIRE FIRE FIRE FIRE FIRE FIRE C6˜-˜%ˆU-@8@Y(˜vv-@‡6?P02‡@€@@2ˆ@€‰\2@A@r2@A‰v € -š›(>:@2,Š%-@@!-‡!(…% ” A`***SEND SHOT***›ž% A0%***GET SHOT RESULT***›¨WHISTLE SOUND SUBROUTINE›²-@A@P¼k2‡@‰+2ˆ@%@‰I2@@%@‰g2@@%@‰k Æ-‡@2‡‡‡ Ð6œ-@:‚7ˆ<ˆ,,ÕMAœA“*œA”*œA–*œA*œA*œA`M6œ-A`Ú=œ"A` A&P# A @=***** MISS SPLASH *****›ä] -š›(>:œ,6‹-‹&ˆ*-@7@1( C-@7@G(‹Q A%]** HIT **›î‹" A'0ø$ ***** TERMINAL SETUP *****›  @8‰@2‡R1: @4‰A’‡R1: 00NO TRANSLATION - NO PARITY - NO LINE FEEDS›*!!(} DIAL SYSTEM 4(>(Set up the modem.H$($(You are in terminal mode.R)( ()(The players will decide who\!!(will make the first move.f+(+( Smart modems require a CONTROL Mp(instead of a .z0( (0(" PRESS START AFTER MODEM IS SET UP„&&( AND YOU ARE READY TO BEGIN.Ž%( (%( PRESS OPTION TO ABORT.˜‰@‡R1:¢@@‰‡‡R1:¬..CHECK IF THERE IS ANYTHING IN THE BUFFER›¶# ‰F:AG,"‡# A"PÀ# )‰’’!6ˆ(>:’,# A"0ÊF:Œ,"@‰Ô"F:Œ,"@(}" A#Þ F:Ad,"AUA"0è )ˆ’*‰’ A"0ò›ü› ‰ ,( (,( WILL YOU MOVE FIRST? '( ('( YES OR NO$ ‚. ‚7ˆ<ˆ,4N6™-ˆ A$08 &&( ONE MOMENT PLEASE B .‘-ˆA ‘.DELAY FOR FIRST PLAYER›L 6ƒ.€V  A`SEND YOUR NAME›` & A0&RECEIVE OPPONENTS NAME›j 6.‚t $~ ›ƒ &&( ONE MOMENT PLEASE ˆ & A0&RECEIVE OPPONENTS NAME›’ 6.‚œ ›¦ 6ƒ.€°  A`SEND YOUR NAME›º $Ä ***** EXPLOSION *****›Î 6ž-@Ø %%2@@u@@â 6Ÿ-?y%ž'Aì '6 -@6¡-@'6¢-@ö 2‡@ A  !!2ˆ@ %A@¡ ''2@@ %@P@¢ 6 - $Ÿ 6¡-¡$+Ÿ%?,( 6¢-¢$+Ÿ%?,2 ¢!ˆA%P< 2‡‡‡‡F  2ˆ‡‡‡2@‡‡‡P $Z ***** SPLASH *****›d ‘-@‡6@Pn 2ˆ@@‘x 2‡@@‘‚ -ˆ@ Œ  ‘–  2‡‡‡‡2ˆ‡‡‡  $ª 0 +@-@@0(@you´ A¾ &-@@&(@winÈ $($(PRESS START TO PLAY AGAINÒ L -AD@ˆ6@,AH2@@L Ü F:B2y,"@%æ A'pð 5 +@-@@5(@you haveú A '-@@'(@lost $($(PRESS START TO PLAY AGAIN R -AD@ˆ6@,AN2AP@@R " F:B2y,"@%, A(@¸ =¤-@@ )-@@6(>:AV,: ¤=$€D:BATLSHIP.MDM