000000: 5A 58 54 61 70 65 21 1A 01 0A 20 B8 0B 11 8A 04 ZXTape!... .....
000010: 45 02 45 02 45 02 8A 04 00 10 08 0A 00 07 01 00 E.E.E...........
000020: 2C 42 41 54 54 4C 45 53 48 49 50 53 00 00 00 00 ,BATTLESHIPS....
000030: 00 01 00 00 00 08 70 01 FF 51 1D 00 00 00 00 00 ......p..Q......
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 E3 20 FF FF FF FF 11 8A 04 45 02 45 02 45 02 .. .......E.E.E.
000130: 8A 04 00 10 08 C4 09 15 08 00 16 3A 00 0A 00 C5 ...........:....
000140: 20 2A 2A 20 42 61 74 74 6C 65 73 68 69 70 73 2E ** Battleships.
000150: 2E 2E 2E 61 20 67 61 6D 65 20 66 6F 72 20 74 68 ...a game for th
000160: 65 20 41 4D 53 54 52 41 44 20 43 50 43 20 34 36 e AMSTRAD CPC 46
000170: 34 20 2A 2A 00 1F 00 14 00 C5 20 2A 2A 20 3C 43 4 **...... ** <C
000180: 3E 20 53 74 65 76 65 20 57 2E 20 4C 75 63 61 73 > Steve W. Lucas
000190: 20 2A 2A 00 22 00 1E 00 C5 20 2A 2A 20 76 65 72 **.".... ** ver
0001A0: 73 69 6F 6E 20 31 2E 41 20 4A 75 6C 79 20 31 39 sion 1.A July 19
0001B0: 38 34 20 2A 2A 00 26 00 28 00 AD 20 0F 01 20 A2 84 **.&.(.. .. .
0001C0: 20 0E 2C 0E 01 20 A2 20 0F 2C 19 18 01 20 A2 20 .,.. . .,... .
0001D0: 10 2C 19 14 01 20 A2 20 11 2C 14 00 09 00 32 00 .,... . .,....2.
0001E0: 82 20 19 0A 00 0A 00 3C 00 9F 20 1E EA 01 00 22 . .....<.. ...."
0001F0: 00 46 00 93 20 03 00 00 E1 28 17 2C 17 29 2C 03 .F.. ....(.,.),.
000200: 00 00 E2 28 17 2C 17 29 2C 03 00 00 E3 28 14 29 ...(.,.),....(.)
000210: 00 12 00 50 00 9E 20 0D 00 00 F8 EF 20 0F 20 EC ...P.. ..... . .
000220: 20 14 00 11 00 5A 00 C3 20 03 00 00 E3 28 0D 00 ....Z.. ....(..
000230: 00 F8 29 00 0B 00 64 00 B0 20 0D CA B3 00 00 F8 ..)...d.. ......
000240: 00 08 00 6E 00 8C 20 22 00 19 00 78 00 8C 20 22 ...n.. "...x.. "
000250: 44 65 73 74 72 6F 79 65 72 20 20 20 20 20 20 20 Destroyer
000260: 22 00 19 00 82 00 8C 20 22 53 75 62 6D 61 72 69 "...... "Submari
000270: 6E 65 20 20 20 20 20 20 20 22 00 19 00 8C 00 8C ne "......
000280: 20 22 43 72 75 69 73 65 72 20 20 20 20 20 20 20 "Cruiser
000290: 20 20 22 00 19 00 96 00 8C 20 22 42 61 74 74 6C "...... "Battl
0002A0: 65 73 68 69 70 20 20 20 20 20 20 22 00 19 00 A0 eship "....
0002B0: 00 8C 20 22 41 69 72 63 72 61 66 74 20 43 61 72 .. "Aircraft Car
0002C0: 72 69 65 72 22 00 0A 00 AA 00 8A 01 BB 20 0F 00 rier"........ ..
0002D0: 24 00 B4 00 C5 20 2A 2A 20 50 6C 6F 74 20 6E 75 $.... ** Plot nu
0002E0: 6D 62 65 72 73 20 61 63 72 6F 73 73 20 74 6F 70 mbers across top
0002F0: 20 2A 2A 00 11 00 BE 00 9E 20 0D 00 00 F8 EF 0F **...... ......
000300: 20 EC 20 17 00 1F 00 C8 00 A9 20 0D 00 00 F8 F6 . ....... .....
000310: 10 F4 0F 2C 0F 01 BF 20 FF 03 28 19 30 F4 0D 00 ...,... ..(.0...
000320: 00 F8 29 00 20 00 D2 00 A9 20 0D 00 00 F8 F6 10 ..). .... ......
000330: F4 19 13 2C 0F 01 BF 20 FF 03 28 19 30 B6 F0 F4 ...,... ..(.0...
000340: 0D 00 00 F8 29 00 06 00 DC 00 B0 00 27 00 E6 00 ....).......'...
000350: C5 20 2A 2A 20 70 72 69 6E 74 20 63 65 6E 74 72 . ** print centr
000360: 65 20 6C 69 6E 65 20 64 6F 77 6E 20 73 63 72 65 e line down scre
000370: 65 6E 00 12 00 F0 00 9E 20 0D 00 00 F8 EF 10 20 en...... ......
000380: EC 20 19 14 00 18 00 FA 00 A9 20 19 14 2C 0D 00 . ........ ..,..
000390: 00 F8 01 20 BF 20 FF 03 28 19 95 29 00 06 00 04 ... . ..(..)....
0003A0: 01 B0 00 2D 00 0E 01 C5 20 2A 2A 20 50 6C 6F 74 ...-.... ** Plot
0003B0: 20 6C 65 74 74 65 72 73 20 64 6F 77 6E 20 73 69 letters down si
0003C0: 64 65 20 6F 66 20 73 63 72 65 65 6E 20 2A 2A 00 de of screen **.
0003D0: 11 00 18 01 9E 20 0D 00 00 F8 EF 0F 20 EC 20 17 ..... ...... . .
0003E0: 00 20 00 22 01 A9 20 0F 2C 0D 00 00 F8 F6 10 F4 . .".. .,.......
0003F0: 0F 01 20 BF 20 FF 03 28 19 40 F4 0D 00 00 F8 29 .. . ..(.@.....)
000400: 00 06 00 2C 01 B0 00 0B 00 36 01 A9 20 0F 2C 19 ...,.....6.. .,.
000410: 14 00 15 00 40 01 BF 20 FF 7B 20 28 19 28 2C FF ....@.. .{ (.(,.
000420: 03 28 19 9A 29 29 00 0A 00 4A 01 9F 20 1E 76 02 .(..))...J.. .v.
000430: 00 0A 00 54 01 9F 20 1E 74 04 00 31 00 5E 01 E1 ...T.. .t..1.^..
000440: 3F C5 20 2A 2A 20 79 63 3D 20 79 6F 75 72 20 73 ?. ** yc= your s
000450: 63 6F 72 65 3A 20 63 63 3D 20 63 6F 6D 70 75 74 core: cc= comput
000460: 65 72 27 73 20 73 63 6F 72 65 20 2A 2A 00 0A 00 er's score **...
000470: 68 01 9F 20 1E FE 06 00 0A 00 72 01 9F 20 1E BC h.. ......r.. ..
000480: 07 00 20 00 7C 01 A1 20 0D 00 00 63 E3 EF 19 14 .. .|.. ...c....
000490: 20 FC 20 0D 00 00 79 E3 EF 19 14 20 EB 20 1E 90 . ...y.... . ..
0004A0: 01 00 0A 00 86 01 A0 20 1E 68 01 00 34 00 90 01 ....... .h..4...
0004B0: A1 20 0D 00 00 63 E3 EF 19 14 20 EB 20 03 00 00 . ...c.... . ...
0004C0: E1 EF 22 49 20 77 69 6E 22 20 01 97 20 03 00 00 .."I win" .. ...
0004D0: E1 EF 22 59 6F 75 20 77 69 6E 21 21 21 21 22 00 .."You win!!!!".
0004E0: 1B 00 9A 01 8A 01 A9 20 19 10 2C 19 0A 01 20 BB ....... ..,... .
0004F0: 20 0F 01 20 BF 20 03 00 00 E1 00 36 00 A4 01 A9 .. . .....6....
000500: 20 13 2C 19 14 01 20 BB 20 10 01 20 BF 22 44 6F .,... . .. ."Do
000510: 20 79 6F 75 20 77 61 6E 74 20 74 6F 20 70 6C 61 you want to pla
000520: 79 20 61 67 61 69 6E 20 3C 59 2F 4E 3E 20 3F 22 y again <Y/N> ?"
000530: 00 1D 00 AE 01 03 00 00 E1 EF FF 43 01 20 A1 20 ...........C. .
000540: 03 DB 5B 00 00 E1 EF 22 22 20 EB 20 1E AE 01 00 ..[...."" . ....
000550: 12 00 B8 01 03 00 00 E1 EF FF 1C 28 03 00 00 E1 ...........(....
000560: 29 00 13 00 C2 01 A1 20 03 00 00 E1 EF 22 59 22 )...... ....."Y"
000570: 20 EB 20 CA 00 21 00 CC 01 8A 01 20 A9 20 19 10 . ..!..... . ..
000580: 2C 19 0A 01 BB 20 11 01 20 BF 22 47 6F 6F 64 62 ,.... .. ."Goodb
000590: 79 65 20 21 22 00 06 00 D6 01 98 00 06 00 E0 01 ye !"...........
0005A0: 98 00 23 00 EA 01 8A 01 20 A9 20 19 0F 2C 13 01 ..#..... . ..,..
0005B0: 20 BB 20 0F 01 20 BF 22 42 61 74 74 6C 65 73 68 . .. ."Battlesh
0005C0: 69 70 73 22 00 2C 00 F4 01 BB 20 10 01 20 A9 20 ips".,.... .. .
0005D0: 15 2C 15 01 BF 22 3C 43 3E 20 53 74 65 76 65 20 .,..."<C> Steve
0005E0: 4C 75 63 61 73 20 4A 75 6C 79 20 31 39 38 34 22 Lucas July 1984"
0005F0: 00 4D 00 FE 01 BB 20 11 01 20 A9 20 0F 2C 19 0A .M.... .. . .,..
000600: 01 BF 22 20 20 54 68 69 73 20 69 73 20 61 20 63 .." This is a c
000610: 6F 6D 70 75 74 65 72 69 73 65 64 20 76 65 72 73 omputerised vers
000620: 69 6F 6E 20 6F 66 20 74 68 65 20 74 72 61 64 69 ion of the tradi
000630: 74 69 6F 6E 61 6C 20 67 61 6D 65 2E 22 00 78 00 tional game.".x.
000640: 08 02 BF A0 72 01 BF 01 BB 20 0F 01 20 BF 22 54 ....r.... .. ."T
000650: 68 65 20 67 61 6D 65 20 69 73 20 70 6C 61 79 65 he game is playe
000660: 64 20 6F 6E 20 61 20 39 20 78 20 39 20 67 72 69 d on a 9 x 9 gri
000670: 64 2E 20 20 20 20 20 45 61 63 68 20 70 6F 69 6E d. Each poin
000680: 74 20 6F 6E 20 74 68 65 20 67 72 69 64 20 69 73 t on the grid is
000690: 20 69 64 65 6E 74 69 66 69 65 64 20 62 79 20 61 identified by a
0006A0: 20 63 6F 6F 72 64 69 6E 61 74 65 20 73 75 63 68 coordinate such
0006B0: 20 61 73 20 41 34 22 00 7D 00 12 02 BF 22 49 6E as A4".}...."In
0006C0: 20 74 68 69 73 20 76 65 72 73 69 6F 6E 2C 20 79 this version, y
0006D0: 6F 75 72 20 6F 70 70 6F 6E 65 6E 74 20 69 73 20 our opponent is
0006E0: 74 68 65 20 20 20 63 6F 6D 70 75 74 65 72 2E 20 the computer.
0006F0: 54 68 65 20 63 6F 6D 70 75 74 65 72 20 77 69 6C The computer wil
000700: 6C 20 68 69 64 65 20 35 20 73 68 69 70 73 6F 6E l hide 5 shipson
000710: 20 74 68 65 20 67 72 69 64 20 61 6E 64 20 79 6F the grid and yo
000720: 75 20 6D 75 73 74 20 64 6F 20 74 68 65 20 73 61 u must do the sa
000730: 6D 65 2E 22 00 34 00 1C 02 BF 01 BF 01 BB 20 10 me.".4........ .
000740: 01 20 BF 22 50 48 A6 72 65 73 73 20 74 68 65 20 . ."PH.ress the
000750: 3C 53 70 61 63 65 20 42 61 72 3E 20 74 6F 20 63 <Space Bar> to c
000760: 6F 6E 74 69 6E 75 65 2E 2E 22 00 1F 00 26 02 03 ontinue.."...&..
000770: 00 00 61 E1 EF FF 43 01 A1 20 03 00 00 61 E1 F2 ..a...C.. ...a..
000780: 22 20 22 20 EB 20 1E 26 02 00 60 00 30 02 8A 01 " " . .&..`.0...
000790: BF 22 59 6F 75 20 77 69 6C 6C 20 74 61 6B 65 20 ."You will take
0007A0: 74 75 72 6E 73 20 77 69 74 68 20 74 68 65 20 63 turns with the c
0007B0: 6F 6D 70 75 74 65 72 20 74 6F 67 75 65 73 73 20 omputer toguess
0007C0: 74 68 65 20 6C 6F 63 61 74 69 6F 6E 20 6F 66 20 the location of
0007D0: 79 6F 75 72 20 6F 70 70 6F 6E 65 6E 74 73 20 20 your opponents
0007E0: 20 20 73 68 69 70 73 2E 22 00 4D 00 3A 02 BF 22 ships.".M.:.."
0007F0: 54 68 65 20 77 69 6E 6E 65 72 20 69 73 20 74 68 The winner is th
000800: 65 20 6F 6E 65 20 77 68 6F 20 6C 6F 63 61 74 65 e one who locate
000810: 73 20 61 6C 6C 20 20 20 74 68 65 69 72 20 6F 70 s all their op
000820: 70 6F 6E 65 6E 74 73 20 73 68 69 70 73 20 66 69 ponents ships fi
000830: 72 73 74 20 21 22 00 38 00 44 02 A9 20 10 2C 19 rst !".8.D.. .,.
000840: 16 01 20 BB 20 0F 01 B3 39 20 BF 22 50 72 65 73 .. . ...9 ."Pres
000850: 73 20 74 68 65 20 3C 53 70 61 63 65 20 42 61 72 s the <Space Bar
000860: 3E 20 74 6F 20 73 74 61 72 74 20 67 61 6D 65 22 > to start game"
000870: 00 20 00 4E 02 03 00 00 61 E1 EF FF 43 01 20 A1 . .N....a...C. .
000880: 20 03 00 00 61 E1 F2 22 20 22 20 EB 20 1E 4E 02 ...a.." " . .N.
000890: 00 06 00 58 02 C9 00 06 00 62 02 98 00 34 00 6C ...X.....b...4.l
0008A0: 02 C5 20 2A 2A 73 75 62 72 6F 75 74 69 6E 65 20 .. **subroutine
0008B0: 74 6F 20 63 68 6F 6F 73 65 20 63 6F 6D 70 75 74 to choose comput
0008C0: 65 72 27 73 20 70 6F 73 69 74 69 6F 6E 73 2A 2A er's positions**
0008D0: 00 18 00 76 02 A5 20 0D 00 00 E4 EF FF 0C 28 FF ...v.. .......(.
0008E0: 45 28 0F 29 F6 19 51 29 00 32 00 80 02 C5 20 2A E(.)..Q).2.... *
0008F0: 2A 20 61 72 72 61 79 20 61 24 28 78 2C 79 29 20 * array a$(x,y)
000900: 68 6F 6C 64 73 20 70 6F 73 69 74 69 6F 6E 20 6F holds position o
000910: 66 20 73 68 69 70 73 20 2A 2A 00 17 00 8A 02 A5 f ships **......
000920: 20 0D 00 00 E1 EF FF 0C 28 FF 45 28 0F 29 F6 10 .......(.E(.)..
000930: 29 00 4A 00 94 02 C5 20 2A 2A 20 69 66 20 61 3D ).J.... ** if a=
000940: 30 20 74 68 65 6E 20 73 68 E1 67 FF FF FF FF 11 0 then sh.g.....
000950: 8A 04 45 02 45 02 45 02 8A 04 00 10 08 0A 00 07 ..E.E.E.........
000960: 01 00 2C 42 41 54 54 4C 45 53 48 49 50 53 00 00 ..,BATTLESHIPS..
000970: 00 00 00 02 00 00 00 08 70 09 00 51 1D 00 00 00 ........p..Q....
000980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A60: 00 00 00 43 93 FF FF FF FF 11 8A 04 45 02 45 02 ...C........E.E.
000A70: 45 02 8A 04 00 10 08 C4 09 15 08 00 16 69 70 20 E............ip
000A80: 69 73 20 68 6F 72 69 7A 6F 6E 74 61 6C 20 6F 74 is horizontal ot
000A90: 68 65 72 77 69 73 65 20 74 68 65 20 73 68 69 70 herwise the ship
000AA0: 20 69 73 20 76 65 72 74 69 63 61 6C 20 2A 2A 00 is vertical **.
000AB0: 30 00 9E 02 A5 20 0D 00 00 F8 EF 14 20 01 20 C5 0.... ...... . .
000AC0: 20 2A 2A 20 73 69 7A 65 20 6F 66 20 61 69 72 63 ** size of airc
000AD0: 72 61 66 74 20 63 61 72 72 69 65 72 20 2A 2A 00 raft carrier **.
000AE0: 51 00 A8 02 0D 00 00 EB EF FF 0C 28 FF 45 28 0F Q..........(.E(.
000AF0: 29 F6 11 29 F4 0F 01 20 0D 00 00 EC EF FF 0C 28 )..)... .......(
000B00: FF 45 28 0F 29 F6 11 29 F4 0F 01 20 C5 20 72 61 .E(.)..)... . ra
000B10: 6E 64 6F 6D 20 78 20 61 6E 64 20 79 20 63 6F 6F ndom x and y coo
000B20: 72 64 69 6E 61 74 65 73 20 6F 66 20 73 68 69 70 rdinates of ship
000B30: 00 0A 00 B2 02 9F 20 1E FC 03 00 44 00 BC 02 A1 ...... ....D....
000B40: 20 0D 00 00 61 E1 EF 0F 20 EB 20 1E 9E 02 01 20 ...a... . ....
000B50: C5 20 2A 2A 20 69 66 20 6C 6F 63 61 74 69 6F 6E . ** if location
000B60: 20 61 6C 72 65 61 64 79 20 68 61 73 20 73 68 69 already has shi
000B70: 70 2E 2E 2E 20 74 72 79 20 61 67 61 69 7F 79 6E p... try agai.yn
000B80: 00 0D 00 C6 02 03 00 00 FA EF 22 41 22 00 20 00 .........."A". .
000B90: D0 02 C5 20 2A 2A 20 70 75 74 20 73 68 69 70 20 ... ** put ship
000BA0: 69 6E 74 6F 20 61 72 72 61 79 20 2A 2A 00 0A 00 into array **...
000BB0: DA 02 9F 20 1E 38 04 00 37 00 E4 02 0D 00 00 E1 ... .8..7.......
000BC0: EF FF 0C 28 FF 45 28 0F 29 F6 10 29 01 20 C5 20 ...(.E(.)..). .
000BD0: 2A 2A 20 73 68 69 70 20 68 6F 72 69 7A 6F 6E 74 ** ship horizont
000BE0: 61 6C 20 6F 72 20 76 65 72 74 69 63 61 6C 00 21 al or vertical.!
000BF0: 00 EE 02 0D 00 00 F8 EF 13 01 20 C5 20 2A 2A 20 .......... . **
000C00: 73 69 7A 65 20 6F 66 20 73 68 69 70 20 2A 2A 00 size of ship **.
000C10: 50 00 F8 02 A5 20 0D 00 00 EB EF FF 0C 28 FF 45 P.... .......(.E
000C20: 28 0F 29 F6 12 29 F4 0F 01 20 A5 20 0D 00 00 EC (.)..)... . ....
000C30: EF FF 0C 28 FF 45 28 0F 29 F6 12 29 F4 0F 01 20 ...(.E(.)..)...
000C40: C5 20 2A 2A 20 72 61 6E 64 6F 6D 20 63 6F 6F 72 . ** random coor
000C50: 64 69 6E 61 74 65 73 20 6F 66 20 73 68 69 70 00 dinates of ship.
000C60: 0A 00 02 03 9F 20 1E FC 03 00 14 00 0C 03 A1 20 ..... .........
000C70: 0D 00 00 61 E1 EF 0F 20 EB 20 1E F8 02 00 0D 13 ...a... . ......
000C80: E7 00 16 03 03 00 00 FA EF 22 42 22 00 0A 00 20 ........."B"...
000C90: 03 9F 20 1E 38 04 00 15 00 2A 03 0D 00 00 E1 EF .. .8....*......
000CA0: FF 0C 28 FF 45 28 0F 29 F6 10 29 00 1E 00 34 03 ..(.E(.)..)...4.
000CB0: 0D 00 00 F8 EF 12 01 20 C5 20 2A 2A 20 73 68 69 ....... . ** shi
000CC0: 70 20 73 69 7A 65 20 2A 2A 00 49 00 3E 03 0D 00 p size **.I.>...
000CD0: 00 EB EF FF 0C 28 FF 45 28 0F 29 F6 13 29 F4 0F .....(.E(.)..)..
000CE0: 01 20 0D 00 00 EC EF FF 0C 28 FF 45 28 0F 29 F6 . .......(.E(.).
000CF0: 13 29 F4 0F 01 20 C5 20 72 61 6E 64 6F 6D 20 63 .)... . random c
000D00: 6F 6F 72 64 69 6E 61 74 65 73 20 6F 66 20 73 68 oordinates of sh
000D10: 69 70 00 0A 00 48 03 9F 20 1E FC 03 00 14 00 52 ip...H.. ......R
000D20: 03 A1 20 0D 00 00 61 E1 EF 0F 20 EB 20 1E 3E 03 .. ...a... . .>.
000D30: 00 0D 00 5C 03 03 00 00 FA EF 22 43 22 00 0A 00 ...\......"C"...
000D40: 66 03 9F 20 1E 38 04 00 15 00 70 03 0D 00 00 E1 f.. .8....p.....
000D50: EF FF 0C 28 FF 45 28 0F 29 F6 10 29 00 0B 00 7A ...(.E(.)..)...z
000D60: 03 0D 00 00 F8 EF 11 00 2B 00 84 03 0D 00 00 EB ........+.......
000D70: EF FF 0C 28 FF 45 28 0F 29 F6 14 29 F4 0F 01 20 ...(.E(.)..)...
000D80: 0D 58 1D 00 00 EC EF FF 0C 28 FF 45 28 0F 29 F6 .X.......(.E(.).
000D90: 14 29 F4 0F 00 0A 00 8E 03 9F 20 1E FC 03 00 14 .)........ .....
000DA0: 00 98 03 A1 20 0D 00 00 61 E1 EF 0F 20 EB 20 1E .... ...a... . .
000DB0: 84 03 00 14 00 A2 03 03 00 00 FA EF 22 53 22 01 ............"S".
000DC0: 20 9F 20 1E 38 04 00 15 00 AC 03 0D 00 00 E1 EF . .8...........
000DD0: FF 0C 28 FF 45 28 0F 29 F6 10 29 00 0B 00 B6 03 ..(.E(.)..).....
000DE0: 0D 00 00 F8 EF 10 00 2A 00 C0 03 0D 00 00 EB EF .......*........
000DF0: FF 0C 28 FF 45 28 0F 29 F6 15 29 F4 0F 01 0D 00 ..(.E(.)..).....
000E00: 00 EC EF FF 0C 28 FF 45 28 0F 29 F6 15 29 F4 0F .....(.E(.)..)..
000E10: 00 1B 00 CA 03 9F 20 1E FC 03 01 20 A1 20 0D 00 ...... .... . ..
000E20: 00 61 E1 EF 0F 20 EB 20 1E C0 03 00 0D 00 D4 03 .a... . ........
000E30: 03 00 00 FA EF 22 44 22 00 0A 00 DE 03 9F 20 1E ....."D"...... .
000E40: 38 04 00 06 00 E8 03 C9 00 2C 00 F2 03 C5 20 2A 8........,.... *
000E50: 2A 20 63 68 65 63 6B 20 69 66 20 61 72 72 61 79 * check if array
000E60: 20 65 6C 65 6D 65 6E 74 20 69 73 20 65 6D 70 74 element is empt
000E70: 79 20 2A 2A 00 0C 00 FC 03 0D 00 00 61 E1 EF 0E y **........a...
000E80: 00 14 00 8D 35 06 04 9E 20 0D 00 00 F0 EF 0E 20 ....5... ......
000E90: EC 20 0D 00 00 F8 00 33 00 10 04 A1 20 0D 00 00 . .....3.... ...
000EA0: E1 EF 0E 20 EB 20 A1 20 03 00 00 E1 28 0D 00 00 ... . . ....(...
000EB0: EB F4 0D 00 00 F0 2C 0D 00 00 EC 29 F2 22 22 20 ......,....).""
000EC0: EB 20 0D 00 00 61 E1 EF 0F 00 33 00 1A 04 A1 20 . ...a....3....
000ED0: 0D 00 00 E1 EF 0F 20 EB 20 A1 20 03 00 00 E1 28 ...... . . ....(
000EE0: 0D 00 00 EB 2C 0D 00 00 EC F4 0D 00 00 F0 29 F2 ....,.........).
000EF0: 22 22 20 EB 20 0D 00 00 61 E1 EF 0F 00 06 00 24 "" . ...a......$
000F00: 04 B0 00 06 00 2E 04 C9 00 14 00 38 04 9E 20 0D ...........8.. .
000F10: 00 00 F0 EF 0F 20 EC 20 0D 00 00 F8 00 29 00 42 ..... . .....).B
000F20: 04 A1 20 0D 00 00 E1 EF 0E 20 EB 20 03 00 00 E1 .. ...... . ....
000F30: 28 0D 00 00 EB F4 0D 00 00 F0 2C 0D 00 00 EC 29 (.........,....)
000F40: EF 03 00 00 FA 00 29 00 4C 04 A1 20 0D 00 00 E1 ......).L.. ....
000F50: EF 0F 20 EB 20 03 00 00 E1 28 0D 00 00 EB 2C 0D .. . ....(....,.
000F60: 00 00 EC F4 0D 00 00 F0 29 EF 03 00 00 FA 00 06 ........).......
000F70: 00 56 04 B0 00 06 00 60 04 C9 00 1E 00 6A 04 C5 .V.....`.....j..
000F80: 20 2A 2A 20 53 89 C4 65 74 20 75 70 20 79 6F 75 ** S..et up you
000F90: 72 20 62 6F 61 72 64 20 2A 2A 00 16 00 74 04 9E r board **...t..
000FA0: 20 0D 00 00 F0 EF 14 20 EC 20 10 20 E6 20 F5 0F ...... . . . ..
000FB0: 00 20 00 7E 04 03 00 00 EB EF 22 53 68 69 70 20 . .~......"Ship
000FC0: 53 69 7A 65 20 3D 22 F4 FF 19 28 0D 00 00 F0 29 Size ="...(....)
000FD0: 00 18 00 88 04 A9 20 0F 2C 19 15 01 20 BB 20 0F ...... .,... . .
000FE0: 01 20 BF 20 03 00 00 EB 00 0C 00 92 04 0D 00 00 . . ............
000FF0: 61 E2 EF 0E 00 30 00 9C 04 A9 20 0F 2C 19 17 01 a....0.... .,...
001000: 20 BF 22 45 6E 74 65 72 20 74 68 65 20 62 6F 77 ."Enter the bow
001010: 20 70 6F 73 69 74 69 6F 6E 20 6F 66 20 79 6F 75 position of you
001020: 72 20 20 22 00 2D 00 A6 04 A9 20 0F 2C 19 18 01 r ".-.... .,...
001030: 20 BF 20 03 00 00 E3 28 0D 00 00 F0 29 01 20 9E . ....(....). .
001040: 20 0D 00 00 70 EC EF 0F 20 EC 20 1A 4A 01 01 20 ...p... . .J..
001050: B0 00 36 00 B0 04 A9 20 0F 2C 19 16 01 BF 22 20 ..6.... .,...."
001060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001080: 20 20 20 20 20 20 20 60 6F 00 17 00 BA 04 A9 20 `o......
001090: 19 19 2C 19 18 01 20 BF 22 20 20 20 20 20 20 22 ..,... ." "
0010A0: 00 0C 00 C4 04 0D 00 00 E5 EF 19 19 00 11 00 CE ................
0010B0: 04 9E 20 0D 00 00 E1 EF 0F 20 EC 20 10 00 29 00 .. ...... . ..).
0010C0: D8 04 03 00 00 E4 28 0D 00 00 E1 29 EF FF 43 01 ......(....)..C.
0010D0: 20 A1 20 03 00 00 E4 28 0D 00 00 E1 29 EF 22 22 . ....(....).""
0010E0: 20 EB 20 1E D8 04 00 20 00 E2 04 A9 20 0D 00 00 . .... .... ...
0010F0: E5 2C 19 18 01 20 BF 20 FF 1C 28 03 00 00 E4 28 .,... . ..(....(
001100: 0D 00 00 E1 29 29 00 2C 00 EC 04 0D 00 00 E5 EF ....)).,........
001110: 0D 00 00 E5 F4 10 20 01 20 03 00 00 E4 28 0D 00 ...... . ....(..
001120: 00 E1 29 EF FF 11 28 03 00 00 E4 28 0D 00 00 E1 ..)...(....(....
001130: 29 29 00 06 00 F6 04 B0 00 16 00 00 05 A9 20 19 ))............ .
001140: 19 2C 19 18 01 20 BF 22 20 20 20 20 20 22 00 40 .,... ." ".@
001150: 00 0A 05 9F 20 1E A0 05 01 20 0D 00 00 79 B1 EF .... .... ...y..
001160: 0D 00 00 F9 01 0D 00 00 78 B1 EF 0D 00 00 F8 20 ........x......
001170: 01 20 C5 20 2A 2A 20 63 68 65 63 6B 20 69 66 20 . . ** check if
001180: 70 6F 69 6E 74 20 6F 6E 20 93 0A 62 6F 61 72 64 point on ..board
001190: 00 14 00 14 05 A1 20 0D 00 00 61 E2 F2 0E 20 EB ...... ...a... .
0011A0: 20 1E 7E 04 00 31 00 1E 05 A9 20 0F 2C 19 17 01 .~..1.... .,...
0011B0: BF 22 45 6E 74 65 72 20 74 68 65 20 73 74 65 72 ."Enter the ster
0011C0: 6E 20 70 6F 73 69 74 69 6F 6E 20 6F 66 20 79 6F n position of yo
0011D0: 75 72 20 20 22 00 21 00 28 05 A9 20 0F 2C 19 18 ur ".!.(.. .,..
0011E0: 01 20 BF 20 03 00 00 E3 28 0D 00 00 F0 29 01 0D . . ....(....)..
0011F0: 00 00 E5 EF 19 19 00 11 00 32 05 9E 20 0D 00 00 .........2.. ...
001200: E1 EF 0F 20 EC 20 10 00 28 00 3C 05 03 00 00 E4 ... . ..(.<.....
001210: 28 0D 00 00 E1 29 EF FF 43 01 A1 20 03 00 00 E4 (....)..C.. ....
001220: 28 0D 00 00 E1 29 EF 22 22 20 EB 20 1E 3C 05 00 (....)."" . .<..
001230: 47 00 46 05 A9 20 0D 00 00 E5 2C 19 18 01 BF 20 G.F.. ....,....
001240: FF 1C 28 03 00 00 E4 28 0D 00 00 E1 29 29 01 0D ..(....(....))..
001250: 00 00 E5 EF 0D 00 00 E5 F4 10 20 01 20 03 00 00 .......... . ...
001260: E4 28 0D 00 00 E1 29 EF FF 11 28 03 00 00 E4 28 .(....)...(....(
001270: 0D 00 00 E1 29 29 00 1A 00 50 05 B0 01 20 9E 20 ....))...P... .
001280: 0D 00 00 70 F0 EF 0F 20 EC 20 1A 7D 7C FF FF FF ...p... . .}|...
001290: FF 11 8A 04 45 02 45 02 45 02 8A 04 00 10 08 0A ....E.E.E.......
0012A0: 00 07 01 00 2C 42 41 54 54 4C 45 53 48 49 50 53 ....,BATTLESHIPS
0012B0: 00 00 00 00 00 03 00 00 00 08 70 11 00 51 1D 00 ..........p..Q..
0012C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0012D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0012E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0012F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001300: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001310: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001320: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001330: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001340: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001350: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0013A0: 00 00 00 00 00 12 0C FF FF FF FF 11 8A 04 45 02 ..............E.
0013B0: 45 02 45 02 8A 04 00 10 08 C4 09 15 08 00 16 4A E.E............J
0013C0: 01 01 20 B0 00 36 00 5A 05 A9 20 0F 2C 19 16 01 .. ..6.Z.. .,...
0013D0: BF 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ."
0013E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0013F0: 20 20 20 20 20 20 20 20 20 20 00 40 00 64 05 9F .@.d..
001400: 20 1E A0 05 01 20 0D 00 00 79 B2 EF 0D 00 00 F9 .... ...y......
001410: 01 20 0D 00 00 78 B2 EF 0D 00 00 F8 01 20 C5 20 . ...x....... .
001420: 2A 2A 20 63 68 65 63 6B 20 76 61 6C 69 64 69 74 ** check validit
001430: 79 20 6F 66 20 70 6F 69 6E 74 00 21 00 6E 05 A1 y of point.!.n..
001440: 20 0D 00 00 79 B1 EF 0D 00 00 79 B2 20 EB 20 9F ...y.....y. . .
001450: 20 1E E6 05 01 20 A0 20 1E 8C 05 00 21 00 78 05 .... . ....!.x.
001460: A1 20 0D 00 00 78 B1 EF 0D 00 00 78 B2 20 EB 20 . ...x.....x. .
001470: 9F 20 1E 72 06 01 20 A0 20 1E 8C 05 00 38 00 82 . .r.. . ....8..
001480: 05 A9 20 0F 2C 19 16 01 20 BF 22 59 6F 75 20 68 .. .,... ."You h
001490: 61 76 65 20 6D 61 64 65 20 61 20 6D 69 73 74 61 ave made a mista
0014A0: 6B 65 20 21 22 01 20 0D 00 00 61 E2 EF 0F 01 A0 ke !". ...a.....
0014B0: 20 1E 9C 04 00 06 00 8C 05 B0 00 06 00 96 05 61 ..............a
0014C0: E6 C9 00 18 00 A0 05 0D 00 00 F9 EF FF 01 28 03 ..............(.
0014D0: 00 00 E4 28 0F 29 29 F5 19 60 00 1E 00 AA 05 A1 ...(.))..`......
0014E0: 20 0D 00 00 F9 F1 0F 20 FC 20 0D 00 00 F9 EE 17 ...... . ......
0014F0: 20 EB 20 9F 20 1E D2 05 00 15 00 B4 05 0D 00 00 . . ...........
001500: F8 EF FF 1D 28 03 00 00 E4 28 10 29 29 00 35 00 ....(....(.)).5.
001510: BE 05 A1 20 0D 00 00 F8 F1 0F 20 FC 20 0D 00 00 ... ...... . ...
001520: F8 EE 17 20 EB 20 9F 20 1E D2 05 01 20 C5 20 2A ... . . .... . *
001530: 2A 20 64 69 73 70 6C 61 79 20 65 72 72 6F 72 20 * display error
001540: 2A 2A 00 06 00 C8 05 C9 00 3A 00 D2 05 A9 20 0F **.......:.... .
001550: 2C 19 16 01 20 BF 22 49 6E 63 6F 72 72 65 63 74 ,... ."Incorrect
001560: 20 63 6F 2D 6F 72 64 69 6E 61 74 65 73 3A 2D 20 co-ordinates:-
001570: 74 72 79 20 61 67 61 69 6E 22 01 0D 00 00 61 E2 try again"....a.
001580: EF 0F 00 06 00 DC 05 C9 00 34 00 E6 05 0D 00 00 .........4......
001590: EC EF 0D 00 00 78 B1 F5 0D 00 00 78 B2 01 20 A1 .....x.....x.. .
0015A0: 20 0D 00 00 EC F1 0F 20 EB 20 0D 00 00 EC 20 EF ...... . .... .
0015B0: 20 0D 00 00 78 B2 F5 0D 00 00 78 B1 00 10 00 F0 ...x.....x.....
0015C0: 05 7F 09 0D 00 00 EC EF 0D 00 00 EC F4 0F 00 28 ...............(
0015D0: 00 FA 05 A1 20 0D 00 00 EC F2 0D 00 00 F0 20 EB .... ......... .
0015E0: 20 9F 20 1E D2 05 01 20 0D 00 00 F0 EF 0D 00 00 . .... ........
0015F0: F0 F4 0F 01 20 C9 00 79 00 04 06 A1 20 0D 00 00 .... ..y.... ...
001600: EC EF 14 20 EB 20 03 00 00 7A FA EF 22 41 22 20 ... . ...z.."A"
001610: 01 97 20 A1 20 0D 00 00 EC EF 13 20 EB 20 03 00 .. . ...... . ..
001620: 00 7A FA EF 22 42 22 20 01 97 20 A1 20 0D 00 00 .z.."B" .. . ...
001630: EC EF 12 20 EB 20 03 00 00 7A FA EF 22 43 22 20 ... . ...z.."C"
001640: 01 97 20 A1 20 0D 00 00 EC EF 11 20 EB 20 03 00 .. . ...... . ..
001650: 00 7A FA EF 22 53 22 20 01 97 20 A1 20 0D 00 00 .z.."S" .. . ...
001660: EC EF 10 20 EB 20 03 00 00 7A FA EF 22 44 22 00 ... . ...z.."D".
001670: 29 00 0E 06 C5 20 2A 2A 20 63 68 65 63 6B 20 69 ).... ** check i
001680: 66 20 6C 6F 63 61 74 69 6F 6E 20 6F 63 63 75 70 f location occup
001690: 69 65 64 20 21 20 2A 2A 00 66 00 18 06 A1 20 0D ied ! **.f.... .
0016A0: 00 00 78 B1 EE 0D 00 00 78 B2 20 EB 20 0D 00 00 ..x.....x. . ...
0016B0: 6B EB EF 0D 00 00 78 B1 01 0D 00 00 78 B1 EF 0D k.....x.....x...
0016C0: 00 00 78 11 8A B2 01 0D 00 00 78 B2 EF 0D 00 00 ..x.......x.....
0016D0: 6B EB 20 01 C5 20 2A 2A 20 73 77 61 70 20 63 6F k. .. ** swap co
0016E0: 6F 72 69 6E 64 61 74 65 73 20 61 72 6F 75 6E 64 orindates around
0016F0: 20 69 66 20 77 72 6F 6E 67 20 77 61 79 20 2A 2A if wrong way **
001700: 00 45 00 22 06 9E 20 0D 00 00 F3 EF 0D 00 00 78 .E.".. ........x
001710: B1 20 EC 20 0D 00 00 78 B2 01 A1 20 03 00 00 E2 . . ...x... ....
001720: 28 0D 00 00 F3 2C 0D 00 00 79 B1 29 F2 22 22 20 (....,...y.).""
001730: EB 20 9F 20 1E D2 05 01 0D 00 00 F0 EF 0D 00 00 . . ............
001740: F0 F4 0F 01 C9 00 0B 00 2C 06 B0 20 0D 00 00 F3 ........,.. ....
001750: 00 34 00 36 06 9E 20 0D 00 00 F3 EF 0D 00 00 78 .4.6.. ........x
001760: B1 20 EC 20 0D 00 00 78 B2 01 20 03 00 00 E2 28 . . ...x.. ....(
001770: 0D 00 00 F3 2C 0D 00 00 79 B1 29 EF 03 00 00 7A ....,...y.)....z
001780: FA 01 20 B0 00 19 00 40 06 9E 20 0D 00 00 F3 EF .. ....@.. .....
001790: 0D 00 00 78 B1 20 EC 20 0D 00 00 78 B2 00 15 00 ...x. . ...x....
0017A0: 4A 06 C5 20 64 69 73 70 6C 61 79 20 63 68 6F 69 J.. display choi
0017B0: 63 65 00 21 00 54 06 A9 20 0D 00 00 F3 F6 10 F4 ce.!.T.. .......
0017C0: 0F 2C 0D 00 00 E8 2C 79 B1 F6 10 F4 0F 01 BF 20 .,....,y.......
0017D0: 03 00 00 7A FA 00 0B 00 5E 06 B0 20 0D 00 00 F3 ...z....^.. ....
0017E0: 00 06 00 68 06 C9 00 32 00 72 06 0D 00 00 EC EF ...h...2.r......
0017F0: 0D 00 00 79 B1 F5 0D 00 00 79 B2 01 20 A1 20 0D ...y.....y.. . .
001800: 00 00 EC F1 0F 20 EB 20 0D 00 00 EC EF 0D 00 00 ..... . ........
001810: 79 B2 F5 0D 00 00 79 B1 00 10 00 7C 06 0D 00 00 y.....y....|....
001820: EC EF 0D 00 00 EC F4 0F 00 26 00 86 06 A1 20 0D .........&.... .
001830: 00 00 EC F2 0D 00 00 F0 20 EB 20 9F 20 1E D2 05 ........ . . ...
001840: 01 0D 00 00 F0 EF 0D 00 00 F0 F4 0F 01 C9 00 79 ...............y
001850: 00 90 06 A1 20 0D 00 00 EC EF 14 20 EB 20 03 00 .... ...... . ..
001860: 00 7A FA EF 22 41 22 20 01 97 20 A1 20 0D 00 00 .z.."A" .. . ...
001870: EC EF 13 20 EB 20 03 00 00 7A FA EF 22 42 22 20 ... . ...z.."B"
001880: 01 97 20 A1 20 0D 00 00 EC EF 12 20 EB 20 03 00 .. . ...... . ..
001890: 00 7A FA EF 22 43 22 20 01 97 20 A1 20 0D 00 00 .z.."C" .. . ...
0018A0: EC EF 11 20 EB 20 03 00 00 7A FA EF 22 53 22 20 ... . ...z.."S"
0018B0: 01 97 20 A1 20 0D 00 00 EC EF 10 20 EB 20 03 00 .. . ...... . ..
0018C0: 00 7A FA EF 22 44 22 68 EB 00 2C 00 9A 06 C5 20 .z.."D"h..,....
0018D0: 2A 2A 20 63 68 65 63 6B 20 69 66 20 6C 6F 63 61 ** check if loca
0018E0: 74 69 6F 6E 20 61 6C 72 65 61 64 79 20 6F 63 63 tion already occ
0018F0: 75 70 69 65 64 00 54 00 A4 06 A1 20 0D 00 00 79 upied.T.... ...y
001900: B1 EE 0D 00 00 79 B2 20 EB 20 0D 00 00 6B EB EF .....y. . ...k..
001910: 0D 00 00 79 B1 01 0D 00 00 79 B1 EF 0D 00 00 79 ...y.....y.....y
001920: B2 01 0D 00 00 79 B2 EF 0D 00 00 6B EB 01 20 C5 .....y.....k.. .
001930: 20 73 77 61 6D 70 20 63 6F 6F 72 64 69 6E 61 74 swamp coordinat
001940: 65 73 20 61 72 6F 75 6E 64 00 47 00 AE 06 9E 20 es around.G....
001950: 0D 00 00 F3 EF 20 0D 00 00 79 B1 20 EC 20 0D 00 ..... ...y. . ..
001960: 00 79 B2 01 20 A1 20 03 00 00 E2 28 0D 00 00 78 .y.. . ....(...x
001970: B1 2C 0D 00 00 F3 29 F2 22 22 20 EB 20 9F 20 1E .,....)."" . . .
001980: D2 05 01 0D 00 00 F0 EF 0D 00 00 F0 F4 0F 01 C9 ................
001990: 00 0B 00 B8 06 B0 20 0D 00 00 F3 00 33 00 C2 06 ...... .....3...
0019A0: 9E 20 0D 00 00 F3 EF 0D 00 00 79 B1 20 EC 20 0D . ........y. . .
0019B0: 00 00 79 B2 01 20 03 00 00 E2 28 0D 00 00 78 B1 ..y.. ....(...x.
0019C0: 2C 0D 00 00 F3 29 EF 03 00 C9 42 00 7A FA 01 B0 ,....)....B.z...
0019D0: 00 19 00 CC 06 9E 20 0D 00 00 F3 EF 0D 00 00 79 ...... ........y
0019E0: B1 20 EC 20 0D 00 00 79 B2 00 23 00 D6 06 C5 20 . . ...y..#....
0019F0: 2A 2A 20 64 69 73 70 6C 61 79 20 63 68 6F 69 63 ** display choic
001A00: 65 20 6F 66 20 73 68 69 70 20 2A 2A 00 21 00 E0 e of ship **.!..
001A10: 06 A9 20 0D 00 00 78 B1 F6 10 F4 0F 2C 0D 00 00 .. ...x.....,...
001A20: F3 F6 10 F4 0F 01 BF 20 03 00 00 7A FA 00 06 00 ....... ...z....
001A30: EA 06 B0 00 06 00 F4 06 C9 00 34 00 FE 06 A9 20 ..........4....
001A40: 0F 2C 19 15 01 20 BF 22 45 6E 74 65 72 20 79 6F .,... ."Enter yo
001A50: 75 72 20 6D 69 73 73 69 6C 65 20 63 6F 6F 72 64 ur missile coord
001A60: 69 6E 61 74 65 73 20 6E 6F 77 3A 2D 22 00 37 00 inates now:-".7.
001A70: 08 07 A9 20 0F 2C 19 16 01 20 BF 22 20 20 20 20 ... .,... ."
001A80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001A90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001AA0: 20 20 20 22 00 0C 00 12 07 0D 00 00 E5 EF 19 19 "............
001AB0: 00 37 00 1C 07 A9 20 0F 2C 19 17 01 20 BF 22 20 .7.... .,... ."
001AC0: 20 20 20 20 20 20 20 20 20 20 20 C4 3A 20 20 20 .:
001AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001AE0: 20 20 20 20 20 20 20 20 22 00 37 00 26 07 A9 20 ".7.&..
001AF0: 0F 2C 19 18 01 20 BF 22 20 20 20 20 20 20 20 20 .,... ."
001B00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001B10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 "
001B20: 00 37 00 30 07 A9 20 0F 2C 19 19 01 20 BF 22 20 .7.0.. .,... ."
001B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001B40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001B50: 20 20 20 20 20 20 22 00 0C 00 3A 07 0D 00 00 61 "...:....a
001B60: E2 EF 0E 00 11 00 44 07 9E 20 0D 00 00 E1 EF 0F ......D.. ......
001B70: 20 EC 20 10 00 29 00 4E 07 03 00 00 E4 28 0D 00 . ..).N.....(..
001B80: 00 E1 29 EF FF 43 01 20 A1 20 03 00 00 E4 28 0D ..)..C. . ....(.
001B90: 00 00 E1 29 EF 22 22 20 EB 20 1E 4E 07 00 4A 00 ...)."" . .N..J.
001BA0: 58 07 03 00 00 E4 28 0D 00 00 E1 29 EF FF 11 28 X.....(....)...(
001BB0: 03 00 00 E4 28 0D 00 00 E1 29 29 01 A9 20 0D 00 ....(....)).. ..
001BC0: 00 E5 2C 19 18 01 20 BF 20 FF 1C 28 03 A4 EB FF ..,... . ..(....
001BD0: FF FF FF 11 8A 04 45 02 45 02 45 02 8A 04 00 10 ......E.E.E.....
001BE0: 08 0A 00 07 01 00 2C 42 41 54 54 4C 45 53 48 49 ......,BATTLESHI
001BF0: 50 53 00 00 00 00 00 04 FF 00 51 05 70 19 00 51 PS........Q.p..Q
001C00: 1D 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CE0: 00 00 00 00 00 00 00 76 F7 FF FF FF FF 11 8A 04 .......v........
001CF0: 45 02 45 02 45 02 8A 04 00 10 08 C4 09 11 06 00 E.E.E...........
001D00: 16 00 00 E4 28 0D 00 00 E1 29 29 01 20 0D 00 00 ....(....)). ...
001D10: E5 EF 0D 00 00 E5 F4 10 01 20 B0 00 28 00 62 07 ......... ..(.b.
001D20: 9F 20 1E A0 05 01 20 C5 20 2A 2A 20 63 68 65 63 . .... . ** chec
001D30: 6B 20 69 66 20 70 6F 69 6E 74 20 69 73 20 76 61 k if point is va
001D40: 6C 69 64 00 27 00 6C 07 A1 20 0D 00 00 61 E2 EF lid.'.l.. ...a..
001D50: 0F 20 EB 20 9E 20 0D 00 00 E8 EF 0F 20 EC 20 1A . . . ...... . .
001D60: 4A 01 01 B0 01 A0 20 1E FE 06 00 37 00 76 07 C5 J..... ....7.v..
001D70: 20 2A 2A 20 63 68 65 63 6B 20 69 66 20 79 6F 75 ** check if you
001D80: 20 68 61 76 65 20 61 6C 72 65 61 64 79 20 67 75 have already gu
001D90: 65 73 73 65 64 20 6C 6F 63 61 74 69 6F 6E 20 2A essed location *
001DA0: 2A 00 4F 00 80 07 A1 20 03 00 00 E1 28 0D 00 00 *.O.... ....(...
001DB0: F8 2C 0D 00 00 F9 29 EF 22 2B 22 20 EB 20 A9 20 .,....)."+" . .
001DC0: 0F 2C 19 16 01 20 BF 22 41 6C 72 65 61 64 79 20 .,... ."Already
001DD0: 74 72 69 65 64 20 21 22 01 9E 20 0D 00 00 E8 EF tried !".. .....
001DE0: 0F 20 EC 20 1A 4A 01 01 20 B0 01 A0 20 1E FE 06 . . .J.. ... ...
001DF0: 00 2D 00 8A 07 C5 20 2A 2A 20 63 68 65 63 6B 20 .-.... ** check
001E00: 69 8D B0 66 20 63 6F 6D 70 75 74 65 72 20 68 61 i..f computer ha
001E10: 73 20 73 68 69 70 20 74 68 65 72 65 20 2A 2A 00 s ship there **.
001E20: 61 00 94 07 A1 20 03 00 00 E1 28 0D 00 00 F8 2C a.... ....(....,
001E30: 0D 00 00 F9 29 EF 22 22 20 EB 20 03 00 00 E1 28 ....)."" . ....(
001E40: 0D 00 00 F8 2C 0D 00 00 F9 29 EF 22 2B 22 01 20 ....,....)."+".
001E50: A9 20 0D 00 00 F8 F6 10 F4 19 13 2C 0D 00 00 F9 . .........,....
001E60: F6 10 F4 0F 01 BF 22 2B 22 01 20 CC 20 0F 2C 10 ......"+". . .,.
001E70: 2C 19 0A 2C 15 2C 0E 2C 0E 2C 19 0A 20 01 20 C9 ,..,.,.,.,.. . .
001E80: 00 21 00 9E 07 C5 20 2A 2A 20 6E 6F 77 20 64 69 .!.... ** now di
001E90: 73 70 6C 61 79 20 6C 6F 63 61 74 69 6F 6E 20 2A splay location *
001EA0: 2A 00 61 00 A8 07 A9 20 0D 00 00 F8 F6 10 F4 19 *.a.... ........
001EB0: 13 2C 0D 00 00 F9 F6 10 F4 0F 01 BF 20 03 00 00 .,.......... ...
001EC0: E1 28 0D 00 00 F8 2C 0D 00 00 F9 29 01 03 00 00 .(....,....)....
001ED0: E1 28 0D 00 00 F8 2C 0D 00 00 F9 29 EF 22 2B 22 .(....,....)."+"
001EE0: 01 20 0D 00 00 79 E3 EF 0D 00 00 79 E3 F4 0F 01 . ...y.....y....
001EF0: CC 20 0F 2C 19 C8 2C 19 14 2C 14 2C 0E 2C 0E 2C . .,..,..,.,.,.,
001F00: 19 1E 00 90 29 06 00 B2 07 C9 00 23 00 BC 07 A1 ....)......#....
001F10: 20 0D 00 00 61 FA EF 0E 20 EB 20 0D 00 00 F8 EF ...a... . .....
001F20: FF 0C 28 FF 45 28 0F 29 F6 17 29 F4 0F 00 2F 00 ..(.E(.)..).../.
001F30: C6 07 A9 20 0F 2C 19 15 01 BF 22 48 6F 6C 64 20 ... .,...."Hold
001F40: 6F 6E 20 77 68 69 6C 65 20 49 20 74 68 69 6E 6B on while I think
001F50: 20 6F 75 74 20 6D 79 20 6D 6F 76 65 00 36 00 D0 out my move.6..
001F60: 07 A9 20 0F 2C 19 16 01 BF 22 20 20 20 20 20 20 .. .,...."
001F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001F90: 20 20 00 36 00 DA 07 A9 20 0F 2C 19 17 01 BF 22 .6.... .,...."
001FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001FB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
001FC0: 20 20 20 20 20 20 20 20 00 23 00 E4 07 A1 20 0D .#.... .
001FD0: 00 00 61 FA EF 0E 20 EB 20 0D 00 00 F9 EF FF 0C ..a... . .......
001FE0: 28 FF 45 28 0F 29 F6 17 29 F4 0F 00 17 00 EE 07 (.E(.)..).......
001FF0: 9E 20 0D 00 00 4C D0 EF 0F 20 EC 20 1A 4A 01 01 . ...L... . .J..
002000: 20 B0 00 2E 00 10 F5 F8 07 C5 20 2A 2A 20 61 7A ......... ** az
002010: 20 63 68 65 63 6B 73 20 69 66 20 70 72 65 76 69 checks if previ
002020: 6F 75 73 20 67 75 65 73 73 20 61 20 68 69 74 20 ous guess a hit
002030: 2A 2A 00 2A 00 02 08 A1 20 0D 00 00 61 FA EF 0E **.*.... ...a...
002040: 20 FA 20 03 00 00 E2 28 0D 00 00 F8 2C 0D 00 00 . ....(....,...
002050: F9 29 EF 22 2B 22 20 EB 20 1E BC 07 00 47 00 0C .)."+" . ....G..
002060: 08 A1 20 03 00 00 E2 28 0D 00 00 F8 2C 0D 00 00 .. ....(....,...
002070: F9 29 F2 22 22 20 FA 20 03 00 00 E2 28 0D 00 00 .)."" . ....(...
002080: F8 2C 0D 00 00 F9 29 F2 22 2B 22 20 EB 20 03 00 .,....)."+" . ..
002090: 00 4C CC EF 03 00 00 E2 28 0D 00 00 F8 2C 0D 00 .L......(....,..
0020A0: 00 F9 29 00 56 00 16 08 A1 20 0D 00 00 61 FA EF ..).V.... ...a..
0020B0: 0E 20 FA 20 03 00 00 E2 28 0D 00 00 F8 2C 0D 00 . . ....(....,..
0020C0: 00 F9 29 F2 22 22 20 EB 20 03 00 00 4C CC EF 03 ..)."" . ...L...
0020D0: 00 00 E2 28 0D 00 00 F8 2C 0D 00 00 F9 29 01 03 ...(....,....)..
0020E0: 00 00 E2 28 0D 00 00 F8 2C 0D 00 00 F9 29 EF 22 ...(....,....)."
0020F0: 2B 22 01 20 A0 20 1E 66 08 00 6B 00 20 08 A1 20 +". . .f..k. ..
002100: 0D 00 00 61 FA EF 0E 62 E0 20 FA 20 03 00 00 E2 ...a...b. . ....
002110: 28 0D 00 00 F8 2C 0D 00 00 F9 29 EF 22 22 20 EB (....,....)."" .
002120: 20 03 00 00 E2 28 0D 00 00 F8 2C 0D 00 00 F9 29 ....(....,....)
002130: EF 22 2B 22 01 20 A9 20 0D 00 00 F8 F6 10 F4 0F ."+". . ........
002140: 2C 0D 00 00 F9 F6 10 F4 0F 01 BF 22 2B 22 01 20 ,.........."+".
002150: CC 20 0F 2C 19 14 2C 19 14 2C 15 2C 0E 2C 0E 2C . .,..,..,.,.,.,
002160: 19 0A 20 01 20 C9 00 1E 00 2A 08 9E 20 0D 00 00 .. . ....*.. ...
002170: F0 EF 0F 20 EC 20 17 01 9E 20 0D 00 00 F1 EF 0F ... . ... ......
002180: 20 EC 20 17 00 49 00 34 08 A1 20 03 00 00 E2 28 . ..I.4.. ....(
002190: 0D 00 00 F0 2C 0D 00 00 F1 29 EF 03 00 00 4C CC ....,....)....L.
0021A0: 20 EB 20 0D 00 00 F8 EF 0D 00 00 F0 01 0D 00 00 . .............
0021B0: F9 EF 0D 00 00 F1 01 0D 00 00 F0 EF 19 0B 01 0D ................
0021C0: 00 00 F1 EF 19 0B 01 20 A0 20 1E 48 08 00 10 00 ....... . .H....
0021D0: 3E 08 B0 20 0D 00 00 F1 2C 0D 00 00 F0 00 1F 00 >.. ....,.......
0021E0: 48 08 A1 20 0D 00 00 F0 EF 19 0B 20 EB 20 0D 00 H.. ....... . ..
0021F0: 00 61 FA EF 0E 01 20 A0 20 1E 02 08 00 13 00 52 .a.... . ......R
002200: 08 0D 00 00 61 FA EF 0E 01 4F 50 20 A0 20 1E E4 ....a....OP . ..
002210: 07 00 06 00 5C 08 C9 00 42 00 66 08 A9 20 0D 00 ....\...B.f.. ..
002220: 00 F8 F6 10 F4 0F 2C 0D 00 00 F9 F6 10 F4 0F 01 ......,.........
002230: BF 22 2B 22 01 0D 00 00 63 E3 EF 0D 00 00 63 E3 ."+"....c.....c.
002240: F4 0F 01 CC 20 0F 2C 19 14 2C 19 14 2C 15 2C 0E .... .,..,..,.,.
002250: 2C 0E 2C 19 0A 20 01 20 C9 00 00 00 00 00 00 00 ,.,.. . ........
002260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0022A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0022B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0022C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0022D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0022E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0022F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002300: 00 00 00 00 00 00 00 00 00 00 00 18 C6 FF FF FF ................
002310: FF .
RESULT OF SEARCH :
PRO=0 CHEA=0 COD=0 MUSI=0 COP=0 GRA=0 WRIT=0 198=2 199=0 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
EEE ,BATTLESHIPSpQ EEE ** Battleships....a game for the AMSTRAD CPC 464 ** **
C Steve W. Lucas **" ** version 1.A July 1984 **&( , , , ,2 "F (,),(,),
()P Z ( )d n "x "Destroyer " "Submarine " "Cruiser " "B
attleship " "Aircraft Carrier" $ ** Plot numbers across top ** , (0 )
, (0 )' ** print centre line down screen , ()- ** Plot letters down sid
e of screen ** " , ( ),6 , ((,()) J v T t1 ** yc your score cc computer's
score ** h r c y h4 c "I win" "You win!!!!" , 6 , "Do you wan
t to play again Y/N "C "" () "Y" ! , "Goodbye !"# , "Battleships", ,"
C Steve Lucas July 1984"M , " This is a computerised version of the tradition
al game."xr "The game is played on a 9 x 9 grid. Each point on the grid is
identified by a coordinate such as A4""In this version, your opponent is the c
omputer. The computer will hide 5 shipson the grid and you must do the same."4
"PHress the Space Bar to continue.."&aC a" " &0"You will take turns with the co
mputer toguess the location of your opponents ships."M"The winner is the one
who locates all their opponents ships first !"8D , 9 "Press the Space Bar to
start game" NaC a" " NXb4l **subroutine to choose computer's positions**v (E(
)Q)2 ** array a$(x,y) holds position of ships ** (E())J ** if a0 then shgEEE ,B
ATTLESHIPSpQCEEEip is horizontal otherwise the ship is vertical **0 ** size
of aircraft carrier **Q (E()) (E()) random x and y coordinates of ship D a
** if location already has ship... try agaiyn "A" ** put ship into array **
87 (E()) ** ship horizontal or vertical! ** size of ship **P (E()) (E())
** random coordinates of ship a "B" 8* (E())4 ** ship size **I (E()) (
E()) random coordinates of ship H R a "C" f 8p (E())z + (E()) X(E()) a
"S" 8 (E()) * (E()) (E()) a "D" 8, ** check if array element is empty **
a5 3 ( , )"" a3 ( , )"" a$.8 )B ( , ))L ( , )Vj **
Set up your board **t "Ship Size "( ) , a0 , "Enter the bow position
of your "- , ( ) p J 6 ," o , "
" )( )C ( )"" , (( )), ( )(( )) , " " y x ** check if p
oint on board a 1 ,"Enter the stern position of your "!( , ( ) 2 (( )C (
)"" GF , (( )) ( )(( ))P p EEE ,BATTLESHIPSpQEEEJ 6Z ,"
d y x ** check validity of point!n y y !x x
x r 8 , "You have made a mistake !" a a (()) (())5 ** displ
ay error ** , "Incorrect co-ordinates- try again" a4 x x x x (
y z"A" z"B" z"C" z"S" z"D") ** check if location occupi
ed ! **f x x k x x x x k ** swap coorindates around if wrong way **E" x
x ( , y)"" , 46 x x ( , y)z x xJ display choice!T , ,y z h2r y
y y y & y z"A" z"B" z"C" z"S" z"D"h, ** che
ck if location already occupiedT y y k y y y y k swamp coordinates aroundG
y y ( x, )"" 3 y y ( x, )Bz y y# ** display choice of ship **
! x, z4 , "Enter your missile coordinates now-"7 , "
" 7 , " "7& , "
"70 , " " aD )
N( )C ( )"" NJX( )(( )) , (EEE ,BATTLESHIPSQpQvEEE( )) (b ** check if p
oint is valid'l a J 7v ** check if you have already guessed location **O (
, )"+" , "Already tried !" J - ** check if computer has ship there **a (
, )"" ( , )"+" , "+" ,, ,,,, ! ** now display location **a , ( , )( , )"
+" y y ,,,,,,)# a (E())/ ,"Hold on while I think out my move6 ,"
6 ," # a (
E()) L J . ** az checks if previous guess a hit *** a ( , )"+" G ( , )"" (
, )"+" L( , )V a ( , )"" L( , )( , )"+" fk ab ( , )"" ( , )"+" , "+"
,,,,,, * I4 ( , )L H , H a R aOP Bf , "+" c c ,,,,,,