ARTILLERY
FILE INFORMATION
FILENAME(S): ARTILLERY
FILE TYPE(S): PRG
FILE SIZE: 10.5K
FIRST SEEN: 2025-11-02 22:11:37
APPEARS ON: 5 disk(s)
FILE HASH
e1b9267199b5fc390507f4c993249d71916a29d15d1a9bc26d093b049bee27a9
FOUND ON DISKS (5 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ZOC PD SERVICE | ARTILLERY | PRG | Treasure Chest - ToGuMi | 12 | 1 | DOWNLOAD FILE |
| S PIELE | ARTILLERY | PRG | Treasure Chest - Wolfgang Rauprich | 16 | 0 | DOWNLOAD FILE |
| SPIELE | ARTILLERY | PRG | Treasure Chest - Wolfgang Rauprich | 16 | 0 | DOWNLOAD FILE |
| PUBLIC DOMAIN | ARTILLERY | PRG | Treasure Chest - Wolfgang Rauprich | 10 | 0 | DOWNLOAD FILE |
| FREESOFYT DISK N | ARTILLERY | PRG | Treasure Chest - Wolfgang Rauprich | 24 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 85 90 EA A9 04 85 91 EA 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 9B 4C 58 E4 78 A9 55 85 90 EA A9 E4 |.....LX.x.U.....|
00000050: 85 91 EA 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A 00 CE 08 0F 00 3A 00 D4 |UTINE **.....:..|
000000D0: 08 1E 00 3A 00 F0 08 23 00 8F 20 2B 2B 2B 20 49 |...:...#.. +++ I|
000000E0: 4E 50 55 54 20 53 45 43 54 49 4F 4E 20 2B 2B 2B |NPUT SECTION +++|
000000F0: 00 08 09 28 00 97 55 4F 2C 30 3A 55 52 24 B2 22 |...(..UO,0:UR$."|
00000100: 22 3A 55 49 24 B2 22 22 00 18 09 2A 00 8B 55 4C |":UI$.""...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 22 09 2D 00 97 55 43 |.0.UL.80.".-..UC|
00000120: 2C 30 00 36 09 32 00 A1 55 49 24 3A 8B 55 49 24 |,0.6.2..UI$:.UI$|
00000130: B2 22 22 A7 35 30 00 60 09 37 00 8B 55 49 24 B2 |."".50.`.7..UI$.|
00000140: C7 28 31 33 29 AF C3 28 55 52 24 29 B1 B2 31 A7 |.(13)..(UR$)..1.|
00000150: 97 55 43 2C 31 3A 99 22 20 9D 22 3B 3A 89 38 35 |.UC,1:." .";:.85|
00000160: 00 73 09 3C 00 8B 55 49 24 B2 C7 28 32 30 29 A7 |.s.<..UI$..(20).|
00000170: 31 30 35 00 87 09 3E 00 8B 20 C3 28 55 52 24 29 |105...>.. .(UR$)|
00000180: B2 B1 55 4C A7 35 30 00 AC 09 41 00 8D 31 32 30 |..UL.50...A..120|
00000190: 3A 8F 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C |:. CHECK FOR VAL|
000001A0: 49 44 20 43 48 41 52 41 43 54 45 52 00 BC 09 46 |ID CHARACTER...F|
000001B0: 00 55 52 24 B2 55 52 24 AA 55 49 24 00 C6 09 4B |.UR$.UR$.UI$...K|
000001C0: 00 99 55 49 24 3B 00 CE 09 50 00 89 35 30 00 F3 |..UI$;...P..50..|
000001D0: 09 55 00 8F 20 2B 2B 2B 20 43 48 45 43 4B 20 46 |.U.. +++ CHECK F|
000001E0: 4F 52 20 48 45 4C 50 20 52 45 51 55 45 53 54 20 |OR HELP REQUEST |
000001F0: 2B 2B 2B 00 1B 0A 5A 00 8B 55 52 24 B2 55 58 24 |+++...Z..UR$.UX$|
00000200: A7 31 39 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 |.195:. EXIT TO H|
00000210: 45 4C 50 20 52 4F 55 54 49 4E 45 00 2A 0A 5F 00 |ELP ROUTINE.*._.|
00000220: 8B 55 46 B2 31 A7 8D 32 34 30 00 37 0A 64 00 55 |.UF.1..240.7.d.U|
00000230: 46 B2 30 3A 99 3A 8E 00 50 0A 66 00 8F 20 2B 2B |F.0:.:..P.f.. ++|
00000240: 20 43 48 45 43 4B 20 44 45 4C 45 54 45 20 2B 2B | CHECK DELETE ++|
00000250: 00 61 0A 69 00 8B C3 28 55 52 24 29 B3 31 A7 35 |.a.i...(UR$).1.5|
00000260: 30 00 79 0A 6E 00 55 52 24 B2 C8 28 55 52 24 2C |0.y.n.UR$..(UR$,|
00000270: C3 28 55 52 24 29 AB 31 29 00 8B 0A 73 00 99 22 |.(UR$).1)...s.."|
00000280: 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 B2 0A 78 00 |. ..";:.50...x.|
00000290: 8F 20 2B 2B 20 43 48 45 43 4B 20 46 4F 52 20 56 |. ++ CHECK FOR V|
000002A0: 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 53 20 |ALID CHARACTERS |
000002B0: 2B 2B 00 C4 0A 7D 00 8B C3 28 55 53 24 29 B2 30 |++...}...(US$).0|
000002C0: A7 31 35 30 00 D5 0A 82 00 81 55 53 B2 31 A4 C3 |.150......US.1..|
000002D0: 28 55 53 24 29 00 EC 0A 87 00 8B 55 49 24 B2 CA |(US$)......UI$..|
000002E0: 28 55 53 24 2C 55 53 2C 31 29 A7 8E 00 F2 0A 8C |(US$,US,1)......|
000002F0: 00 82 00 FF 0A 91 00 55 49 24 B2 22 22 3A 8E 00 |.......UI$."":..|
00000300: 1A 0B 96 00 8F 20 2A 2A 20 53 54 41 4E 44 41 52 |..... ** STANDAR|
00000310: 44 20 49 4E 50 55 54 20 2A 2A 00 2B 0B 98 00 8B |D INPUT **.+....|
00000320: C6 28 55 49 24 29 B2 34 36 A7 8E 00 3C 0B 9B 00 |.(UI$).46...<...|
00000330: 8B 55 49 24 B2 C7 28 33 32 29 A7 8E 00 59 0B A0 |.UI$..(32)...Y..|
00000340: 00 8B C6 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 |...(UI$).48..(UI|
00000350: 24 29 B1 35 37 A7 31 37 30 00 5F 0B A5 00 8E 00 |$).57.170._.....|
00000360: 7C 0B AA 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 ||.....(UI$).65..|
00000370: 28 55 49 24 29 B1 39 30 A7 31 38 30 00 82 0B AF |(UI$).90.180....|
00000380: 00 8E 00 A6 0B B4 00 8B C6 28 55 49 24 29 B3 31 |.........(UI$).1|
00000390: 39 33 B0 C6 28 55 49 24 29 B1 32 31 38 A7 55 49 |93..(UI$).218.UI|
000003A0: 24 B2 22 22 3A 8E 00 C9 0B B9 00 8B C2 28 55 54 |$."":........(UT|
000003B0: 29 B2 55 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 |).UU%.UI$..(.(UI|
000003C0: 24 29 AB 31 32 38 29 3A 8E 00 CF 0B BB 00 8E 00 |$).128):........|
000003D0: DC 0B BE 00 55 49 24 B2 22 22 3A 8E 00 01 0C C3 |....UI$."":.....|
000003E0: 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 |.UF.1:. +++ HELP|
000003F0: 20 52 4F 55 54 49 4E 45 20 45 58 49 54 20 2B 2B | ROUTINE EXIT ++|
00000400: 2B 00 0A 0C C5 00 8D 32 35 30 00 13 0C C8 00 8D |+......250......|
00000410: 32 34 35 00 27 0C CD 00 81 55 51 B2 55 42 A4 28 |245.'....UQ.UB.(|
00000420: 55 42 AA 39 38 37 29 00 43 0C D2 00 55 51 25 28 |UB.987).C...UQ%(|
00000430: 55 51 AB 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 |UQ.UB)..(UQ):.:.|
00000440: 22 93 22 00 56 0C D7 00 55 5A B2 31 3A 55 56 25 |".".V...UZ.1:UV%|
00000450: B2 C2 28 55 54 29 00 5F 0C D8 00 89 33 30 30 00 |..(UT)._....300.|
00000460: A2 0C D9 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 |....UZ.0:US$.UJ$|
00000470: 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 55 4A 3A 55 |:UG$.UK$:UP.UJ:U|
00000480: 4C B2 55 4B 3A 8B C2 28 35 30 30 30 33 29 B2 30 |L.UK:..(50003).0|
00000490: A7 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 |..53281,6:.53280|
000004A0: 2C 36 00 CC 0C DC 00 55 54 24 B2 55 4C 24 3A 99 |,6.....UT$.UL$:.|
000004B0: 22 93 22 3B 3A 97 55 54 2C 55 56 25 3A 81 55 51 |".";:.UT,UV%:.UQ|
000004C0: B2 55 42 A4 28 55 42 AA 39 38 37 29 00 E1 0C E1 |.UB.(UB.987)....|
000004D0: 00 97 55 51 2C 55 51 25 28 55 51 AB 55 42 29 3A |..UQ,UQ%(UQ.UB):|
000004E0: 82 00 ED 0C E6 00 97 55 31 2C 55 31 25 00 F9 0C |.......U1,U1%...|
000004F0: E8 00 97 55 32 2C 55 32 25 00 05 0D E9 00 97 55 |...U2,U2%......U|
00000500: 34 2C 55 34 25 00 13 0D EA 00 97 55 33 2C 55 33 |4,U4%......U3,U3|
00000510: 25 AB 31 00 1B 0D EB 00 89 33 35 00 4D 0D F0 00 |%.1......35.M...|
00000520: 55 44 25 B2 28 28 55 32 25 AC 32 35 36 AA 55 31 |UD%.((U2%.256.U1|
00000530: 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 3A 99 C8 |%.U3%).UB).40:..|
00000540: 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E 00 74 0D |(UD$,UD%.1):..t.|
00000550: F5 00 99 C8 28 55 44 24 2C 32 34 29 3B A3 36 38 |....(UD$,24);.68|
00000560: 29 3B 22 12 48 45 4C 50 20 43 4F 4D 49 4E 47 92 |);".HELP COMING.|
00000570: 22 3B 3A 8E 00 A0 0D FA 00 55 31 25 B2 C2 28 55 |";:......U1%..(U|
00000580: 31 29 3A 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 |1):U2%..(U2):U3%|
00000590: B2 C2 28 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 |..(U3):U4%..(U4)|
000005A0: 00 C8 0D FB 00 55 4A 24 B2 55 53 24 3A 55 4B 24 |.....UJ$.US$:UK$|
000005B0: B2 55 47 24 3A 55 4C 24 B2 55 54 24 3A 55 4A B2 |.UG$:UL$.UT$:UJ.|
000005C0: 55 50 3A 55 4B B2 55 4C 00 CE 0D FF 00 8E 00 DF |UP:UK.UL........|
000005D0: 0D 2C 01 8F 20 2A 2A 20 4D 45 4E 55 20 2A 2A 00 |.,.. ** MENU **.|
000005E0: E5 0D 2D 01 3A 00 14 0E 2E 01 99 22 93 22 3A 97 |..-.:......".":.|
000005F0: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)|
00000600: B2 30 A7 97 35 33 32 38 31 2C 39 3A 97 35 33 32 |.0..53281,9:.532|
00000610: 38 30 2C 38 00 1A 0E 2F 01 3A 00 37 0E 31 01 99 |80,8.../.:.7.1..|
00000620: 22 13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00000630: 20 20 4D 45 4E 55 22 00 66 0E 36 01 99 22 20 2D | MENU".f.6.." -|
00000640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000650: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000660: 2D 2D 2D 2D 2D 22 00 8A 0E 3B 01 99 22 11 11 20 |-----"...;..".. |
00000670: 20 20 20 20 20 20 31 2E 20 20 20 42 45 47 49 4E | 1. BEGIN|
00000680: 20 41 52 54 49 4C 4C 45 52 59 00 B4 0E 40 01 99 | ARTILLERY...@..|
00000690: 22 11 11 20 20 20 20 20 20 20 32 2E 20 20 20 53 |".. 2. S|
000006A0: 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 |TUDENT INSTRUCTI|
000006B0: 4F 4E 53 22 00 DE 0E 45 01 99 22 11 11 20 20 20 |ONS"...E..".. |
000006C0: 20 20 20 20 33 2E 20 20 20 54 45 41 43 48 45 52 | 3. TEACHER|
000006D0: 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 FA | INSTRUCTIONS"..|
000006E0: 0E 4F 01 99 22 11 11 20 20 20 20 20 20 20 34 2E |.O..".. 4.|
000006F0: 20 20 20 51 55 49 54 11 11 22 00 29 0F 54 01 99 | QUIT..".).T..|
00000700: 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |" --------------|
00000710: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000720: 2D 2D 2D 2D 2D 2D 2D 2D 22 00 54 0F 59 01 99 22 |--------".T.Y.."|
00000730: 11 11 20 20 20 20 20 20 20 50 52 45 53 53 20 41 |.. PRESS A|
00000740: 20 4E 55 4D 42 45 52 20 4B 45 59 20 28 31 2D 34 | NUMBER KEY (1-4|
00000750: 29 20 22 3B 00 7C 0F 5E 01 55 4C B2 31 3A 55 53 |) ";.|.^.UL.1:US|
00000760: 24 B2 22 31 32 33 34 22 3A 8D 33 35 3A 8F 20 49 |$."1234":.35:. I|
00000770: 4E 50 55 54 20 52 4F 55 54 49 4E 45 00 87 0F 60 |NPUT ROUTINE...`|
00000780: 01 55 53 24 B2 22 22 00 A4 0F 63 01 91 C5 28 55 |.US$.""...c...(U|
00000790: 52 24 29 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 |R$).1000,400,500|
000007A0: 2C 33 39 36 00 AD 0F 68 01 89 33 30 30 00 D4 0F |,396...h..300...|
000007B0: 8B 01 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 |... ** RE-ENABLE|
000007C0: 20 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E | STOP KEY AND EN|
000007D0: 44 20 2A 2A 00 03 10 8C 01 8B C2 28 35 30 30 30 |D **.......(5000|
000007E0: 33 29 B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 |3)..1..(50003)..|
000007F0: 31 36 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 |160..(50003)..0.|
00000800: 33 39 39 00 2D 10 8D 01 9E 55 55 AA 37 31 3A 8B |399.-....UU.71:.|
00000810: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000820: 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 39 10 |1,6:.53280,14.9.|
00000830: 8E 01 99 22 9A 93 22 3A 80 00 44 10 8F 01 8D 38 |..."..":..D....8|
00000840: 37 35 3A 8E 00 65 10 90 01 8F 20 2A 2A 20 53 54 |75:..e.... ** ST|
00000850: 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F |UDENT INSTRUCTIO|
00000860: 4E 53 20 2A 2A 00 94 10 95 01 99 22 93 22 3A 97 |NS **......".":.|
00000870: 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UL%:..(50003)|
00000880: B2 30 A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 |.0..53281,0:.532|
00000890: 38 30 2C 30 00 B5 10 9A 01 55 50 B2 30 3A 55 47 |80,0.....UP.0:UG|
000008A0: 24 B2 22 D3 54 55 44 45 4E 54 20 C9 4E 53 54 22 |$.".TUDENT .NST"|
000008B0: 3A 8D 38 35 30 00 E8 10 9C 01 99 22 11 11 20 D4 |:.850......".. .|
000008C0: 48 49 53 20 49 53 20 41 20 47 41 4D 45 20 49 4E |HIS IS A GAME IN|
000008D0: 20 57 48 49 43 48 20 32 20 50 4C 41 59 45 52 53 | WHICH 2 PLAYERS|
000008E0: 20 53 48 4F 4F 54 22 3B 00 12 11 9D 01 99 22 11 | SHOOT";......".|
000008F0: 20 41 54 20 45 41 43 48 20 4F 54 48 45 52 20 41 | AT EACH OTHER A|
00000900: 43 52 4F 53 53 20 41 20 4D 4F 55 4E 54 41 49 4E |CROSS A MOUNTAIN|
00000910: 2E 22 00 40 11 9E 01 99 22 11 20 C1 54 20 45 41 |.".@....". .T EA|
00000920: 43 48 20 54 55 52 4E 2C 20 54 48 45 20 50 4C 41 |CH TURN, THE PLA|
00000930: 59 45 52 20 45 4E 54 45 52 53 20 54 48 45 20 22 |YER ENTERS THE "|
00000940: 00 7C 11 9F 01 99 22 11 20 41 4E 47 4C 45 20 54 |.|....". ANGLE T|
00000950: 4F 20 46 49 52 45 20 28 31 2D 39 30 29 20 41 4E |O FIRE (1-90) AN|
00000960: 44 20 54 48 45 A0 4E 55 4D 42 45 52 20 4F 46 20 |D THE.NUMBER OF |
00000970: 20 11 42 41 47 53 20 4F 46 20 22 3B 00 9A 11 A0 | .BAGS OF ";....|
00000980: 01 99 22 20 50 4F 57 44 45 52 20 28 31 20 54 4F |.." POWDER (1 TO|
00000990: 20 31 35 20 C2 C1 C7 D3 29 2E 00 A8 11 A2 01 99 | 15 ....).......|
000009A0: 22 11 20 CE CF D4 C5 3A 00 D4 11 DB 01 99 22 11 |". ....:......".|
000009B0: 20 C9 46 20 59 4F 55 20 57 49 53 48 20 C8 C5 CC | .F YOU WISH ...|
000009C0: D0 20 50 52 45 53 53 20 27 48 27 20 D2 C5 D4 D5 |. PRESS 'H' ....|
000009D0: D2 CE 2E 22 00 DD 11 E5 01 8D 38 33 35 00 F1 11 |..."......835...|
000009E0: EA 01 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 |...UZ.1..UP%:.21|
000009F0: 37 00 F7 11 F3 01 8E 00 18 12 F4 01 8F 20 2A 2A |7............ **|
00000A00: 20 54 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 | TEACHER INSTRUC|
00000A10: 54 49 4F 4E 53 20 2A 2A 00 48 12 F5 01 99 22 93 |TIONS **.H....".|
00000A20: 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 |":.UT,UL%:..(500|
00000A30: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 32 3A 97 |03).0..53281,2:.|
00000A40: 35 33 32 38 30 2C 31 30 00 69 12 F6 01 55 50 B2 |53280,10.i...UP.|
00000A50: 30 3A 55 47 24 B2 22 D4 45 41 43 48 45 52 20 C9 |0:UG$.".EACHER .|
00000A60: 4E 53 54 22 3A 8D 38 35 30 00 97 12 F7 01 99 22 |NST":.850......"|
00000A70: 11 11 20 20 20 20 20 20 D4 4F 20 54 48 45 20 42 |.. .O THE B|
00000A80: 45 53 54 20 4F 46 20 4F 55 52 20 4B 4E 4F 57 4C |EST OF OUR KNOWL|
00000A90: 45 44 47 45 2C 11 22 00 C0 12 F8 01 99 22 20 20 |EDGE,."......" |
00000AA0: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 | THIS PROGRAM IS|
00000AB0: 20 49 4E 20 54 48 45 20 50 55 42 4C 49 43 11 22 | IN THE PUBLIC."|
00000AC0: 00 EC 12 F9 01 99 22 20 20 20 44 4F 4D 41 49 4E |......" DOMAIN|
00000AD0: 2E 20 20 C9 46 20 54 48 49 53 20 49 53 20 4E 4F |. .F THIS IS NO|
00000AE0: 54 20 54 48 45 20 43 41 53 45 11 22 00 09 13 FA |T THE CASE."....|
00000AF0: 01 99 22 20 20 20 50 4C 45 41 53 45 20 43 4F 4E |.." PLEASE CON|
00000B00: 54 41 43 54 3A 11 11 11 22 00 33 13 FB 01 99 22 |TACT:...".3...."|
00000B10: 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 45 20 | .OMMODORE |
00000B20: C2 55 53 49 4E 45 53 53 20 CD 41 43 48 49 4E 45 |.USINESS .ACHINE|
00000B30: 53 11 22 00 56 13 FC 01 99 22 20 20 20 20 20 20 |S.".V...." |
00000B40: 20 20 20 20 33 33 37 30 20 D0 48 41 52 4D 41 43 | 3370 .HARMAC|
00000B50: 59 20 C1 56 45 2E 00 7A 13 FD 01 99 22 20 20 20 |Y .VE..z...." |
00000B60: 20 20 20 20 20 20 20 C1 47 49 4E 43 4F 55 52 54 | .GINCOURT|
00000B70: 2C 20 CF 4E 54 41 52 49 4F 22 00 9C 13 FE 01 99 |, .NTARIO"......|
00000B80: 22 20 20 20 20 20 20 20 20 20 20 C3 41 4E 41 44 |" .ANAD|
00000B90: 41 20 20 20 CD 31 D7 20 32 CB 34 22 00 BC 13 FF |A .1. 2.4"....|
00000BA0: 01 99 22 20 20 20 20 20 20 20 20 20 20 28 34 31 |.." (41|
00000BB0: 36 29 20 34 39 39 2D 34 32 39 32 22 00 D2 13 00 |6) 499-4292"....|
00000BC0: 02 55 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 38 35 |.UP.1:. 835:. 85|
00000BD0: 30 3A 00 FC 13 01 02 99 22 20 20 20 20 20 11 11 |0:......" ..|
00000BE0: D0 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 C1 52 |.ROGRAM .AME: .R|
00000BF0: 54 49 4C 4C 45 52 59 20 20 20 20 11 00 1E 14 02 |TILLERY .....|
00000C00: 02 99 22 20 20 20 20 20 D7 52 49 54 54 45 4E 20 |.." .RITTEN |
00000C10: C2 59 20 20 3A 20 D5 4E 4B 4E 4F 57 4E 11 00 42 |.Y : .NKNOWN..B|
00000C20: 14 03 02 99 22 20 20 20 20 20 D5 50 47 52 41 44 |...." .PGRAD|
00000C30: 45 44 20 C2 59 20 3A 20 20 20 20 20 20 20 20 20 |ED .Y : |
00000C40: 20 11 00 6D 14 04 02 99 22 20 20 20 20 20 11 D4 | ..m...." ..|
00000C50: 48 49 53 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C |HIS PROGRAM WILL|
00000C60: 20 52 55 4E 20 4F 4E 20 41 4E 59 11 11 00 94 14 | RUN ON ANY.....|
00000C70: 05 02 99 22 20 20 20 20 20 20 20 20 20 C2 C1 D3 |..." ...|
00000C80: C9 C3 A0 32 2E 30 20 D0 C5 D4 20 C3 CF CD D0 D5 |...2.0 ... .....|
00000C90: D4 C5 D2 11 00 BB 14 06 02 99 22 20 20 20 20 20 |.........." |
00000CA0: 20 20 20 20 C2 C1 D3 C9 C3 20 34 2E 30 20 D0 C5 | ..... 4.0 ..|
00000CB0: D4 A0 C3 CF CD D0 D5 D4 C5 D2 11 00 DD 14 07 02 |................|
00000CC0: 99 22 20 20 20 20 20 20 20 20 20 38 30 33 32 20 |." 8032 |
00000CD0: C3 C2 CD 20 C3 CF CD D0 D5 D4 C5 D2 11 00 02 15 |... ............|
00000CE0: 08 02 99 22 20 20 20 20 20 20 20 20 20 C3 CF CD |..." ...|
00000CF0: CD CF C4 CF D2 C5 20 36 34 20 C3 CF CD D0 D5 D4 |...... 64 ......|
00000D00: C5 D2 00 0B 15 09 02 8D 38 33 35 00 1F 15 4E 02 |........835...N.|
00000D10: 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 |.UZ.1..UP%:.217.|
00000D20: 25 15 57 02 8E 00 4B 15 58 02 8F 20 2A 2A 20 50 |%.W...K.X.. ** P|
00000D30: 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 43 41 54 |ROGRAM MODIFICAT|
00000D40: 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 5C 15 59 02 |ION INST **.\.Y.|
00000D50: 99 22 93 22 3A 97 55 54 2C 55 4C 25 00 7C 15 5D |.".":.UT,UL%.|.]|
00000D60: 02 55 50 B2 30 3A 55 47 24 B2 22 D0 52 4F 47 52 |.UP.0:UG$.".ROGR|
00000D70: 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 85 15 94 |AM .OD":.850....|
00000D80: 02 8D 38 33 35 00 99 15 B2 02 8B 55 5A B2 31 A7 |..835......UZ.1.|
00000D90: 9E 55 50 25 3A 89 32 31 37 00 9F 15 BB 02 8E 00 |.UP%:.217.......|
00000DA0: C4 15 BC 02 8F 20 2A 2A 20 54 4F 20 55 53 45 20 |..... ** TO USE |
00000DB0: 38 30 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 33 |8032 LOAD CBM403|
00000DC0: 32 20 2A 2A 00 FA 15 C6 02 99 22 93 11 11 11 05 |2 **......".....|
00000DD0: 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E 47 20 54 |BEFORE RUNNING T|
00000DE0: 48 49 53 20 50 52 4F 47 52 41 4D 20 4F 4E 20 41 |HIS PROGRAM ON A|
00000DF0: 4E 20 38 30 33 32 20 20 11 11 00 30 16 D0 02 99 |N 8032 ...0....|
00000E00: 22 20 20 20 20 20 20 4C 4F 41 44 20 54 48 45 20 |" LOAD THE |
00000E10: 27 43 42 4D 20 34 30 33 32 27 20 50 52 4F 47 52 |'CBM 4032' PROGR|
00000E20: 41 4D 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |AM............."|
00000E30: 00 3B 16 DA 02 9E 55 55 AA 37 31 00 41 16 E4 02 |.;....UU.71.A...|
00000E40: 80 00 61 16 20 03 8F 20 2A 2A 20 54 20 49 20 54 |..a. .. ** T I T|
00000E50: 20 4C 20 45 20 20 20 50 20 41 20 47 20 45 20 2A | L E P A G E *|
00000E60: 2A 00 95 16 22 03 99 22 93 11 1D 05 22 3B 3A 97 |*...".."....";:.|
00000E70: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)|
00000E80: B2 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 |.0..53280,14:.53|
00000E90: 32 38 31 2C 36 00 AB 16 24 03 81 49 B2 31 A4 33 |281,6...$..I.1.3|
00000EA0: 38 3A 99 22 12 A6 92 22 3B 3A 82 00 C3 16 26 03 |8:."...";:....&.|
00000EB0: 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 |.I.1.22:."....."|
00000EC0: 3B 3A 82 00 DB 16 28 03 81 49 B2 31 A4 33 37 3A |;:....(..I.1.37:|
00000ED0: 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 F3 16 2A 03 |.".....";:....*.|
00000EE0: 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 |.I.1.22:."....."|
00000EF0: 3B 3A 82 00 18 17 2C 03 99 22 13 11 11 11 11 11 |;:....,.."......|
00000F00: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000F10: 1D 1D 1D 12 A9 20 20 92 00 3A 17 2E 03 99 22 1D |..... ..:....".|
00000F20: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000F30: 1D 12 20 92 20 20 12 20 92 A9 00 5B 17 30 03 99 |.. . . ...[.0..|
00000F40: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000F50: 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 79 17 32 03 |.... . ....y.2.|
00000F60: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00000F70: 1D 1D 1D 1D DF 12 20 20 92 00 A1 17 34 03 99 22 |...... ....4.."|
00000F80: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 |..............C |
00000F90: 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 |O M M O D O R E.|
00000FA0: 11 00 C4 17 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |....6.."........|
00000FB0: 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E |.......EDUCATION|
00000FC0: 41 4C 11 11 00 E3 17 38 03 99 22 1D 1D 1D 1D 1D |AL.....8..".....|
00000FD0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 |...........SOFTW|
00000FE0: 41 52 45 00 FE 17 3A 03 8F 20 2A 2A 20 43 4F 4D |ARE...:.. ** COM|
00000FF0: 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 36 |MODORE LOGO **.6|
00001000: 18 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D |.;...(UD$,24);".|
00001010: 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 |.........PRESS S|
00001020: 50 41 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 |PACE BAR OR WAIT|
00001030: 92 22 3A 49 B2 30 00 58 18 3C 03 A1 41 24 3A 8B |.":I.0.X.<..A$:.|
00001040: 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 |A$.." ".I.I.1:.I|
00001050: B3 32 35 30 A7 38 32 38 00 7C 18 3E 03 54 31 24 |.250.828.|.>.T1$|
00001060: B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 |."":T2$."":T3$."|
00001070: 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 85 18 40 |":T4$."":I.0...@|
00001080: 03 89 33 30 30 00 A1 18 43 03 8F 20 2A 2A 20 53 |..300...C.. ** S|
00001090: 50 41 43 45 20 42 41 52 20 50 52 45 53 53 20 2A |PACE BAR PRESS *|
000010A0: 2A 00 DC 18 48 03 97 55 4F 2C 30 3A 99 C8 28 55 |*...H..UO,0:..(U|
000010B0: 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 |D$,24);".......P|
000010C0: 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 |RESS SPACE BAR T|
000010D0: 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 F3 18 4C |O CONTINUE."...L|
000010E0: 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 |..UI$:.UI$.." ".|
000010F0: 38 34 34 00 F9 18 4E 03 8E 00 19 19 52 03 8F 20 |844...N.....R.. |
00001100: 2A 2A 20 50 41 47 45 20 44 45 53 49 47 4E 20 52 |** PAGE DESIGN R|
00001110: 4F 55 54 49 4E 45 20 2A 2A 00 25 19 54 03 55 50 |OUTINE **.%.T.UP|
00001120: B2 55 50 AA 31 00 4F 19 57 03 99 22 93 22 C8 28 |.UP.1.O.W..".".(|
00001130: 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 55 50 |UT$.UP$,21);.(UP|
00001140: 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 38 29 00 |$.UG$..(UP),18).|
00001150: 7E 19 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |~.\.." ---------|
00001160: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001170: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 8D |-------------"..|
00001180: 19 60 03 8B 55 48 B3 B1 30 A7 38 37 30 00 C1 19 |.`..UH..0.870...|
00001190: 61 03 99 C8 28 55 44 24 2C 32 34 29 3B C8 28 55 |a...(UD$,24);.(U|
000011A0: 50 24 2C 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 |P$,7);"HELP - PR|
000011B0: 45 53 53 20 20 20 48 20 3C 52 45 54 55 52 4E 3E |ESS H <RETURN>|
000011C0: 22 00 D2 19 66 03 55 48 B2 30 3A 99 22 13 11 22 |"...f.UH.0:.".."|
000011D0: 3A 8E 00 F1 19 6B 03 8F 20 2A 2A 20 50 4C 45 41 |:....k.. ** PLEA|
000011E0: 53 45 20 57 41 49 54 20 52 45 4D 41 52 4B 20 2A |SE WAIT REMARK *|
000011F0: 2A 00 27 1A 70 03 99 C8 28 55 44 24 2C 32 34 29 |*.'.p...(UD$,24)|
00001200: 3B 22 20 20 20 20 20 20 20 20 20 20 20 4F 4E 45 |;" ONE|
00001210: 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E | MOMENT PLEASE..|
00001220: 2E 20 20 20 20 20 22 00 2D 1A 75 03 8E 00 4A 1A |. ".-.u...J.|
00001230: 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 20 56 41 |... ** SET UP VA|
00001240: 52 49 41 42 4C 45 53 20 2A 2A 00 95 1A 85 03 55 |RIABLES **.....U|
00001250: 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 30 30 |X$."H":.UQ%(1000|
00001260: 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 |):UB.32768:U1.19|
00001270: 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A |6:U2.197:U3.198:|
00001280: 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 |U4.216:UC.167:UU|
00001290: B2 31 30 32 34 00 D3 1A 86 03 55 54 B2 35 39 34 |.1024.....UT.594|
000012A0: 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 |68:UU%.12:UL%.14|
000012B0: 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 32 37 |:UP%.1146:UM.327|
000012C0: 36 38 3A 55 4F B2 31 35 38 3A 97 20 35 30 30 30 |68:UO.158:. 5000|
000012D0: 33 2C 30 00 16 1B 87 03 8B C2 28 35 30 30 30 33 |3,0.......(50003|
000012E0: 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 |).0.UB.1024:U1.2|
000012F0: 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 |09:U2.210:U3.211|
00001300: 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 |:U4.214:UC.204:U|
00001310: 55 B2 32 30 34 38 00 55 1B 88 03 8B C2 28 35 30 |U.2048.U.....(50|
00001320: 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A |003).0.UT.53272:|
00001330: 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 |UU%.21:UL%.23:UP|
00001340: 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 34 3A 55 |%.2139:UM.1024:U|
00001350: 4F B2 31 39 38 00 79 1B 89 03 55 44 24 B2 22 13 |O.198.y...UD$.".|
00001360: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001370: 11 11 11 11 11 11 11 11 22 00 AB 1B 8A 03 55 50 |........".....UP|
00001380: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00001390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000013A0: 20 20 20 20 20 20 20 20 20 20 22 00 F8 1B 8B 03 | ".....|
000013B0: 55 54 24 B2 22 20 C1 52 54 49 4C 4C 45 52 59 20 |UT$." .RTILLERY |
000013C0: 20 20 A0 A0 A0 A0 A0 22 3A 8F 20 50 4C 41 43 45 | .....":. PLACE|
000013D0: 20 50 52 4F 47 52 41 4D 20 54 49 54 4C 45 20 48 | PROGRAM TITLE H|
000013E0: 45 52 45 20 21 21 21 21 21 21 21 21 21 21 21 21 |ERE !!!!!!!!!!!!|
000013F0: 21 21 21 21 21 2A 2A 2A 00 2E 1C 8C 03 86 41 28 |!!!!!***......A(|
00001400: 31 30 30 29 2C 42 28 31 30 30 29 2C 48 28 33 39 |100),B(100),H(39|
00001410: 29 2C 41 31 28 32 29 2C 42 31 28 32 29 2C 41 32 |),A1(2),B1(2),A2|
00001420: 28 32 29 2C 42 32 28 32 29 2C 4C 28 32 29 00 34 |(2),B2(2),L(2).4|
00001430: 1C 8D 03 8E 00 4E 1C 8E 03 8F 20 2A 2A 20 53 45 |.....N.... ** SE|
00001440: 54 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 57 |T VARIABLES **.W|
00001450: 1C 93 03 8D 39 30 30 00 72 1C 98 03 8F 20 2A 2A |....900.r.... **|
00001460: 20 43 48 45 43 4B 20 46 4F 52 20 38 30 33 32 20 | CHECK FOR 8032 |
00001470: 2A 2A 00 90 1C 9D 03 99 22 93 22 3A 99 22 A0 22 |**......".":."."|
00001480: 3A 8F 20 53 48 49 46 54 45 44 20 53 50 41 43 45 |:. SHIFTED SPACE|
00001490: 00 A7 1C A2 03 8B C2 28 55 42 AA 34 30 29 B3 B1 |.......(UB.40)..|
000014A0: 39 36 A7 8D 37 30 30 00 C0 1C A3 03 8F 20 2A 2A |96..700...... **|
000014B0: 20 4D 45 4D 4F 52 59 20 43 48 45 43 4B 20 2A 2A | MEMORY CHECK **|
000014C0: 00 D4 1C A4 03 8B 20 B8 28 30 29 B1 32 30 30 30 |...... .(0).2000|
000014D0: A7 39 33 37 00 02 1D A5 03 99 22 93 11 11 05 54 |.937......"....T|
000014E0: 48 49 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 53 |HIS MACHINE DOES|
000014F0: 20 4E 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 48 | NOT HAVE ENOUGH|
00001500: 11 22 00 26 1D A6 03 99 22 4D 45 4D 4F 52 59 20 |.".&...."MEMORY |
00001510: 54 4F 20 52 55 4E 20 54 48 49 53 20 50 52 4F 47 |TO RUN THIS PROG|
00001520: 52 41 4D 20 21 22 00 31 1D A7 03 9E 55 55 AA 37 |RAM !".1....UU.7|
00001530: 31 00 37 1D A8 03 80 00 51 1D A9 03 99 22 93 05 |1.7.....Q...."..|
00001540: 22 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 39 36 |":..(50003).0.96|
00001550: 32 00 80 1D AC 03 8F 20 2A 2A 20 42 41 53 49 43 |2...... ** BASIC|
00001560: 20 32 2E 30 20 20 4F 52 20 20 34 2E 30 20 20 4F | 2.0 OR 4.0 O|
00001570: 52 20 20 43 2D 36 34 20 53 45 54 55 50 20 2A 2A |R C-64 SETUP **|
00001580: 00 BE 1D AD 03 97 31 30 37 35 2C 31 33 33 3A 97 |......1075,133:.|
00001590: 31 30 37 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 |1076,144:.1077,2|
000015A0: 33 34 3A 97 31 30 37 39 2C 34 3A 97 31 30 38 30 |34:.1079,4:.1080|
000015B0: 2C 31 33 33 3A 97 31 30 38 31 2C 31 34 35 00 F4 |,133:.1081,145..|
000015C0: 1D AE 03 97 31 30 39 31 2C 31 35 35 3A 97 31 30 |....1091,155:.10|
000015D0: 39 38 2C 31 33 33 3A 97 31 30 39 39 2C 31 34 34 |98,133:.1099,144|
000015E0: 3A 97 31 31 30 30 2C 32 33 34 3A 97 31 31 30 33 |:.1100,234:.1103|
000015F0: 2C 31 33 33 00 16 1E AF 03 97 31 31 30 34 2C 31 |,133......1104,1|
00001600: 34 35 3A 97 31 31 30 35 2C 32 33 34 3A 97 31 30 |45:.1105,234:.10|
00001610: 38 32 2C 32 33 34 00 2D 1E B1 03 8B C2 28 35 30 |82,234.-.....(50|
00001620: 30 30 33 29 B3 B1 31 36 30 A7 39 35 35 00 5C 1E |003)..160.955.\.|
00001630: B6 03 97 31 30 39 33 2C 38 38 3A 97 31 30 39 34 |...1093,88:.1094|
00001640: 2C 32 32 38 3A 97 31 30 39 37 2C 38 35 3A 97 31 |,228:.1097,85:.1|
00001650: 31 30 32 2C 32 32 38 3A 89 39 36 35 00 71 1E BB |102,228:.965.q..|
00001660: 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 A7 39 39 |...(50003)..1.99|
00001670: 30 00 A0 1E C0 03 97 31 30 39 33 2C 34 39 3A 97 |0......1093,49:.|
00001680: 31 30 39 34 2C 32 33 30 3A 97 31 30 39 37 2C 34 |1094,230:.1097,4|
00001690: 36 3A 97 31 31 30 32 2C 32 33 30 3A 89 39 36 35 |6:.1102,230:.965|
000016A0: 00 DA 1E C2 03 97 32 30 39 39 2C 31 34 31 3A 97 |......2099,141:.|
000016B0: 32 31 30 30 2C 32 30 3A 97 32 31 30 31 2C 33 3A |2100,20:.2101,3:|
000016C0: 97 32 31 30 33 2C 38 3A 97 32 31 30 34 2C 31 34 |.2103,8:.2104,14|
000016D0: 31 3A 97 32 31 30 35 2C 32 31 00 16 1F C3 03 97 |1:.2105,21......|
000016E0: 32 31 30 36 2C 33 3A 97 32 31 31 35 2C 31 34 35 |2106,3:.2115,145|
000016F0: 3A 97 32 31 31 37 2C 35 32 3A 97 32 31 31 38 2C |:.2117,52:.2118,|
00001700: 32 33 34 3A 97 32 31 32 31 2C 34 39 3A 97 32 31 |234:.2121,49:.21|
00001710: 32 32 2C 31 34 31 00 50 1F C4 03 97 32 31 32 33 |22,141.P....2123|
00001720: 2C 32 30 3A 97 32 31 32 34 2C 33 3A 97 32 31 32 |,20:.2124,3:.212|
00001730: 36 2C 32 33 34 3A 97 32 31 32 37 2C 31 34 31 3A |6,234:.2127,141:|
00001740: 97 32 31 32 38 2C 32 31 3A 97 32 31 32 39 2C 33 |.2128,21:.2129,3|
00001750: 00 6E 1F C5 03 9E 55 55 AA 34 38 3A 8F 20 44 49 |.n....UU.48:. DI|
00001760: 53 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 00 7F |SABLE STOP KEY..|
00001770: 1F CA 03 8D 38 30 30 3A 8F 20 54 49 54 4C 45 00 |....800:. TITLE.|
00001780: 8F 1F D4 03 89 33 30 30 3A 8F 20 4D 45 4E 55 00 |.....300:. MENU.|
00001790: C0 1F DE 03 99 22 93 54 48 45 20 50 47 4D 20 57 |.....".THE PGM W|
000017A0: 49 4C 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 |ILL NOT WORK ON |
000017B0: 54 48 49 53 20 4D 41 43 48 49 4E 45 21 22 3A 80 |THIS MACHINE!":.|
000017C0: 00 F5 1F E8 03 8B 55 5A B2 31 A7 9E 55 50 25 3A |......UZ.1..UP%:|
000017D0: 9E 55 50 25 3A 55 5A B2 30 3A 8F 20 2A 2A 20 50 |.UP%:UZ.0:. ** P|
000017E0: 52 4F 47 52 41 4D 20 53 54 41 52 54 53 20 48 45 |ROGRAM STARTS HE|
000017F0: 52 45 20 2A 2A 00 20 20 E9 03 99 22 93 05 22 3B |RE **. ..."..";|
00001800: 3A 8C 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |:.:..(50003).0..|
00001810: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 36 |53281,6:.53280,6|
00001820: 00 2C 20 6F 04 97 55 54 2C 55 4C 25 00 3D 20 74 |., o..UT,UL%.= t|
00001830: 04 8F 20 47 4F 53 55 42 20 32 38 39 30 00 48 20 |.. GOSUB 2890.H |
00001840: 78 04 9C 3A 8D 39 30 30 00 6E 20 F6 04 99 22 93 |x..:.900.n ...".|
00001850: 22 3A 97 20 55 54 2C 55 55 25 3A 8F 20 52 45 53 |":. UT,UU%:. RES|
00001860: 45 54 20 54 4F 20 47 52 41 50 48 49 43 53 00 92 |ET TO GRAPHICS..|
00001870: 20 00 05 5A 24 B2 22 12 20 91 9D 22 3A 81 20 58 | ..Z$.". ..":. X|
00001880: B2 31 20 A4 20 35 3A 5A 24 B2 5A 24 AA 5A 24 3A |.1 . 5:Z$.Z$.Z$:|
00001890: 82 58 00 D0 20 0A 05 41 24 B2 22 1D 22 3A 81 20 |.X.. ..A$.".":. |
000018A0: 58 B2 31 20 A4 20 36 3A 41 24 B2 41 24 AA 41 24 |X.1 . 6:A$.A$.A$|
000018B0: 3A 82 58 3A 42 24 B2 22 11 22 3A 81 20 58 B2 31 |:.X:B$.".":. X.1|
000018C0: 20 A4 20 35 3A 42 24 B2 42 24 AA 42 24 3A 82 58 | . 5:B$.B$.B$:.X|
000018D0: 00 D8 20 14 05 4E B2 32 00 F3 20 1E 05 8F 20 20 |.. ..N.2.. ... |
000018E0: 20 43 4F 4E 53 54 52 55 43 54 20 4D 4F 55 4E 54 | CONSTRUCT MOUNT|
000018F0: 41 49 4E 00 1D 21 23 05 99 22 93 22 3B C8 28 55 |AIN..!#..".";.(U|
00001900: 44 24 2C 32 33 29 3B 22 42 55 49 4C 44 49 4E 47 |D$,23);"BUILDING|
00001910: 20 4D 4F 55 4E 54 41 49 4E 2E 2E 2E 22 00 30 21 | MOUNTAIN...".0!|
00001920: 28 05 58 31 B2 B5 28 36 AA BB 28 31 29 AC 38 29 |(.X1..(6..(1).8)|
00001930: 00 44 21 32 05 58 32 B2 B5 28 32 35 AA BB 28 31 |.D!2.X2..(25..(1|
00001940: 29 AC 38 29 00 5E 21 3C 05 4C 28 31 29 B2 B5 28 |).8).^!<.L(1)..(|
00001950: 33 AA 28 58 31 AB 33 29 AC BB 28 31 29 29 00 7C |3.(X1.3)..(1)).||
00001960: 21 46 05 4C 28 32 29 B2 B5 28 58 32 AA 31 AA 28 |!F.L(2)..(X2.1.(|
00001970: 33 36 AB 58 32 29 AC BB 28 31 29 29 00 8D 21 50 |36.X2)..(1))..!P|
00001980: 05 48 39 B2 BB 28 31 29 AC 31 31 AA 31 00 A7 21 |.H9..(1).11.1..!|
00001990: 5A 05 81 20 49 B2 31 20 A4 20 58 31 3A 48 28 49 |Z.. I.1 . X1:H(I|
000019A0: 29 B2 48 39 3A 82 49 00 B8 21 64 05 48 39 B2 BB |).H9:.I..!d.H9..|
000019B0: 28 31 29 AC 31 31 AA 31 00 D3 21 6E 05 81 20 49 |(1).11.1..!n.. I|
000019C0: B2 58 32 20 A4 20 33 39 3A 48 28 49 29 B2 48 39 |.X2 . 39:H(I).H9|
000019D0: 3A 82 49 00 F2 21 78 05 8B 20 B6 28 48 28 31 29 |:.I..!x.. .(H(1)|
000019E0: AB 48 28 33 39 29 29 B3 34 20 A7 20 89 20 31 33 |.H(39)).4 . . 13|
000019F0: 36 30 00 10 22 82 05 58 33 B2 58 31 AA B5 28 BB |60.."..X3.X1..(.|
00001A00: 28 31 29 AC 28 58 32 AB 58 31 AB 36 29 29 AA 33 |(1).(X2.X1.6)).3|
00001A10: 00 24 22 8C 05 48 28 58 33 29 B2 BB 28 31 29 AC |.$"..H(X3)..(1).|
00001A20: 31 31 AA 39 00 3A 22 96 05 44 31 B2 28 48 28 58 |11.9.:"..D1.(H(X|
00001A30: 33 29 AB 48 28 31 29 29 AD 32 00 51 22 A0 05 44 |3).H(1)).2.Q"..D|
00001A40: 32 B2 28 48 28 58 33 29 AB 48 28 33 39 29 29 AD |2.(H(X3).H(39)).|
00001A50: 32 00 69 22 AA 05 8B 20 44 31 AC 44 32 B3 B2 30 |2.i"... D1.D2..0|
00001A60: 20 A7 20 89 20 31 36 31 30 00 74 22 B4 05 4A B2 | . . 1610.t"..J.|
00001A70: AB 31 38 30 00 88 22 BE 05 4B B2 31 38 30 AD 28 |.180.."..K.180.(|
00001A80: 58 33 AB 58 31 AA 31 29 00 97 22 C8 05 48 39 B2 |X3.X1.1).."..H9.|
00001A90: 48 28 31 29 AA 44 31 00 AB 22 D2 05 81 20 49 B2 |H(1).D1.."... I.|
00001AA0: 58 31 AA 31 20 A4 20 58 33 AB 31 00 B5 22 DC 05 |X1.1 . X3.1.."..|
00001AB0: 4A B2 4A AA 4B 00 CF 22 E6 05 48 28 49 29 B2 48 |J.J.K.."..H(I).H|
00001AC0: 39 AA BE 28 4A AC FF AD 31 38 30 29 AC 44 31 00 |9..(J...180).D1.|
00001AD0: D6 22 F0 05 82 49 00 DE 22 FA 05 4A B2 30 00 F2 |."...I.."..J.0..|
00001AE0: 22 04 06 4B B2 31 38 30 AD 28 58 32 AB 58 33 AA |"..K.180.(X2.X3.|
00001AF0: 31 29 00 02 23 0E 06 48 39 B2 48 28 33 39 29 AA |1)..#..H9.H(39).|
00001B00: 44 32 00 16 23 18 06 81 20 49 B2 58 33 AA 31 20 |D2..#... I.X3.1 |
00001B10: A4 20 58 32 AB 31 00 20 23 22 06 4A B2 4A AA 4B |. X2.1. #".J.J.K|
00001B20: 00 3A 23 2C 06 48 28 49 29 B2 48 39 AA BE 28 4A |.:#,.H(I).H9..(J|
00001B30: AC FF AD 31 38 30 29 AC 44 32 00 41 23 36 06 82 |...180).D2.A#6..|
00001B40: 49 00 4C 23 40 06 89 20 31 36 39 30 00 61 23 4A |I.L#@.. 1690.a#J|
00001B50: 06 44 B2 28 48 28 31 29 AB 48 28 33 39 29 29 AD |.D.(H(1).H(39)).|
00001B60: 32 00 69 23 54 06 4A B2 30 00 7D 23 5E 06 4B B2 |2.i#T.J.0.}#^.K.|
00001B70: 31 38 30 AD 28 58 32 AB 58 31 AA 31 29 00 8C 23 |180.(X2.X1.1)..#|
00001B80: 68 06 48 39 B2 48 28 33 39 29 AA 44 00 A0 23 72 |h.H9.H(39).D..#r|
00001B90: 06 81 20 49 B2 58 31 AA 31 20 A4 20 58 32 AB 31 |.. I.X1.1 . X2.1|
00001BA0: 00 AA 23 7C 06 4A B2 4A AA 4B 00 C3 23 86 06 48 |..#|.J.J.K..#..H|
00001BB0: 28 49 29 B2 48 39 AA BE 28 4A AC FF AD 31 38 30 |(I).H9..(J...180|
00001BC0: 29 AC 44 00 CB 23 90 06 82 20 49 00 D5 23 9A 06 |).D..#... I..#..|
00001BD0: 99 22 13 22 3B 00 EC 23 A4 06 57 B2 B5 28 31 30 |.".";..#..W..(10|
00001BE0: 30 AC 28 BB 28 31 29 AB 2E 35 29 29 00 FB 23 AE |0.(.(1)..5))..#.|
00001BF0: 06 99 C8 28 42 24 2C 32 32 29 3B 00 1D 24 B8 06 |...(B$,22);..$..|
00001C00: 81 20 49 B2 31 20 A4 20 33 39 3A 48 28 49 29 B2 |. I.1 . 39:H(I).|
00001C10: B5 28 48 28 49 29 AA 2E 35 29 3A 82 49 00 3A 24 |.(H(I)..5):.I.:$|
00001C20: C2 06 81 20 58 B2 31 20 A4 20 33 39 3A 8B 58 B2 |... X.1 . 39:.X.|
00001C30: 31 20 A7 20 89 20 31 37 35 30 00 44 24 CC 06 99 |1 . . 1750.D$...|
00001C40: 22 1D 22 3B 00 59 24 D6 06 99 CA 28 5A 24 2C 31 |".";.Y$....(Z$,1|
00001C50: 2C 48 28 58 29 AC 34 29 3B 00 73 24 E0 06 81 20 |,H(X).4);.s$... |
00001C60: 5A B2 31 20 A4 20 48 28 58 29 3A 99 22 11 22 3B |Z.1 . H(X):.".";|
00001C70: 3A 82 5A 00 80 24 EA 06 82 20 58 3A 99 22 92 22 |:.Z..$... X:."."|
00001C80: 00 8A 24 F4 06 99 22 13 22 3B 00 B2 24 FE 06 99 |..$...".";..$...|
00001C90: CA 28 42 24 2C 31 2C 32 32 AB 48 28 31 29 29 3B |.(B$,1,22.H(1));|
00001CA0: 3A 8B 20 4C 28 31 29 B2 31 20 A7 20 89 20 31 38 |:. L(1).1 . . 18|
00001CB0: 31 30 00 C7 24 08 07 99 CA 28 41 24 2C 31 2C 4C |10..$....(A$,1,L|
00001CC0: 28 31 29 AB 31 29 3B 00 D1 24 12 07 99 22 5E 22 |(1).1);..$..."^"|
00001CD0: 3B 00 DB 24 1C 07 99 22 13 22 3B 00 F2 24 26 07 |;..$...".";..$&.|
00001CE0: 99 CA 28 42 24 2C 31 2C 32 32 AB 48 28 33 39 29 |..(B$,1,22.H(39)|
00001CF0: 29 3B 00 07 25 30 07 99 CA 28 41 24 2C 31 2C 4C |);..%0...(A$,1,L|
00001D00: 28 32 29 AB 31 29 3B 00 11 25 3A 07 99 22 5E 22 |(2).1);..%:.."^"|
00001D10: 3B 00 4A 25 3F 07 99 C8 28 55 44 24 2C 32 33 29 |;.J%?...(UD$,23)|
00001D20: 22 1D 1D 1D 12 50 4C 41 59 45 52 20 31 92 1D 1D |"....PLAYER 1...|
00001D30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................|
00001D40: 50 4C 41 59 45 52 20 32 92 22 00 54 25 44 07 99 |PLAYER 2.".T%D..|
00001D50: 22 13 22 3B 00 65 25 4E 07 99 CA 28 42 24 2C 31 |".";.e%N...(B$,1|
00001D60: 2C 32 34 29 3B 00 75 25 58 07 99 22 20 20 20 20 |,24);.u%X.." |
00001D70: 20 20 20 22 3B 00 7D 25 62 07 4B B2 31 00 90 25 | ";.}%b.K.1..%|
00001D80: 6C 07 8B 57 B1 B2 30 20 A7 20 89 20 31 39 33 30 |l..W..0 . . 1930|
00001D90: 00 AE 25 76 07 99 AB 57 3B 22 20 4D 50 48 20 57 |..%v...W;" MPH W|
00001DA0: 49 4E 44 20 3C 2D 2D 2D 2D 2D 20 20 22 3B 00 B9 |IND <----- ";..|
00001DB0: 25 80 07 89 20 31 39 35 30 00 D7 25 8A 07 99 57 |%... 1950..%...W|
00001DC0: 3B 22 20 4D 50 48 20 57 49 4E 44 20 2D 2D 2D 2D |;" MPH WIND ----|
00001DD0: 2D 2D 3E 20 20 22 3B 00 E1 25 94 07 99 22 13 22 |--> ";..%..."."|
00001DE0: 3B 00 00 26 9E 07 99 22 13 22 3B 3A 4E B2 33 AB |;..&...".";:N.3.|
00001DF0: 4E 3A 8B 20 4E B2 31 20 A7 20 89 20 32 30 31 30 |N:. N.1 . . 2010|
00001E00: 00 38 26 A8 07 99 C8 28 55 44 24 2C 32 33 29 22 |.8&....(UD$,23)"|
00001E10: 1D 1D 12 20 50 4C 41 59 45 52 20 31 20 92 1D 1D |... PLAYER 1 ...|
00001E20: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A 50 4C |.............*PL|
00001E30: 41 59 45 52 20 32 2A 22 00 64 26 AD 07 99 22 13 |AYER 2*".d&...".|
00001E40: 22 3B C8 28 41 24 2C 32 33 29 3B 22 41 4E 47 4C |";.(A$,23);"ANGL|
00001E50: 45 20 28 31 2D 39 30 29 20 BF 20 9D 9D 22 3B 3A |E (1-90) . ..";:|
00001E60: 55 4C B2 32 00 A2 26 B2 07 55 53 24 B2 22 30 31 |UL.2..&..US$."01|
00001E70: 32 33 34 35 36 37 38 39 48 22 3A 8D 33 35 3A 45 |23456789H":.35:E|
00001E80: B2 C5 28 55 52 24 29 3A 8B 20 45 B1 39 30 20 A7 |..(UR$):. E.90 .|
00001E90: 20 99 22 9D 9D BF 20 9D 9D 22 3B 3A 89 20 31 39 | ."... ..";:. 19|
00001EA0: 37 30 00 BA 26 B7 07 99 22 13 22 3B 3A 8B 45 B2 |70..&...".";:.E.|
00001EB0: 30 20 A7 20 89 20 31 39 36 35 00 FD 26 BC 07 99 |0 . . 1965..&...|
00001EC0: C8 28 42 24 2C 31 29 3B C8 28 41 24 2C 32 33 29 |.(B$,1);.(A$,23)|
00001ED0: 3B 22 11 50 4F 57 44 45 52 28 31 2D 31 35 29 20 |;".POWDER(1-15) |
00001EE0: 20 20 9D 9D BF 9D 22 3B 3A 55 4C B2 32 3A 55 53 | ....";:UL.2:US|
00001EF0: 24 B2 22 30 31 32 33 34 35 36 37 38 39 00 31 27 |$."0123456789.1'|
00001F00: C6 07 55 53 24 B2 55 53 24 AA 22 48 22 3A 8D 33 |..US$.US$."H":.3|
00001F10: 35 3A 56 B2 C5 28 55 52 24 29 3A 8B 20 56 B1 31 |5:V..(UR$):. V.1|
00001F20: 35 20 B0 20 56 B3 B2 30 20 A7 20 89 20 31 39 37 |5 . V..0 . . 197|
00001F30: 35 00 3C 27 D0 07 89 20 32 30 34 30 00 83 27 DA |5.<'... 2040..'.|
00001F40: 07 99 22 13 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00001F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F60: 20 20 20 20 20 20 20 20 20 20 20 22 3B 22 20 20 | ";" |
00001F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F80: 20 22 3B 00 CE 27 DF 07 99 22 20 20 20 20 20 20 | ";..'..." |
00001F90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001FB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001FC0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 06 | ";..|
00001FD0: 28 E4 07 99 C8 28 55 44 24 2C 32 33 29 22 1D 1D |(....(UD$,23)"..|
00001FE0: 2A 50 4C 41 59 45 52 20 31 2A 1D 1D 1D 1D 1D 1D |*PLAYER 1*......|
00001FF0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 50 4C 41 59 45 |.......... PLAYE|
00002000: 52 20 32 20 92 22 00 51 28 E9 07 99 22 20 20 20 |R 2 .".Q(..." |
00002010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002030: 20 20 20 20 20 22 3B 22 13 41 4E 47 4C 45 20 28 | ";".ANGLE (|
00002040: 31 2D 39 30 29 20 BF 20 9D 9D 22 3B 3A 55 4C B2 |1-90) . ..";:UL.|
00002050: 32 00 8A 28 EE 07 55 53 24 B2 22 30 31 32 33 34 |2..(..US$."01234|
00002060: 35 36 37 38 39 48 22 3A 8D 33 35 3A 45 B2 C5 28 |56789H":.35:E..(|
00002070: 55 52 24 29 3A 8B 20 45 B1 39 30 20 B0 20 45 B2 |UR$):. E.90 . E.|
00002080: 30 20 A7 20 89 20 32 30 32 35 00 B0 28 F0 07 99 |0 . . 2025..(...|
00002090: 22 13 11 11 50 4F 57 44 45 52 20 28 31 2D 31 35 |"...POWDER (1-15|
000020A0: 29 20 20 20 20 9D 9D 9D BF 9D 22 3B 3A 8D 33 35 |) .....";:.35|
000020B0: 00 D3 28 F3 07 56 B2 C5 28 55 52 24 29 3A 8B 56 |..(..V..(UR$):.V|
000020C0: B1 31 35 20 B0 20 56 B3 B2 30 20 A7 20 89 20 32 |.15 . V..0 . . 2|
000020D0: 30 33 32 00 EC 28 F8 07 4B B2 4B AA 31 3A 8B 20 |032..(..K.K.1:. |
000020E0: 45 B2 30 20 A7 20 89 20 31 33 31 30 00 01 29 02 |E.0 . . 1310..).|
000020F0: 08 41 32 28 4E 29 B2 41 32 28 4E 29 AB 32 2E 38 |.A2(N).A2(N).2.8|
00002100: 36 00 0C 29 0C 08 45 B2 39 30 AB 45 00 1F 29 16 |6..)..E.90.E..).|
00002110: 08 8B 20 4E B2 31 20 A7 20 89 20 32 30 39 30 00 |.. N.1 . . 2090.|
00002120: 28 29 20 08 45 B2 AB 45 00 34 29 2A 08 58 31 B2 |() .E..E.4)*.X1.|
00002130: 4C 28 4E 29 00 45 29 34 08 59 31 B2 48 28 4C 28 |L(N).E)4.Y1.H(L(|
00002140: 4E 29 29 AA 31 00 51 29 3E 08 54 B2 30 3A 4D B2 |N)).1.Q)>.T.0:M.|
00002150: 30 00 65 29 48 08 56 31 B2 BF 28 45 AC FF AD 31 |0.e)H.V1..(E...1|
00002160: 38 30 29 AC 56 00 7C 29 52 08 56 32 B2 BE 28 45 |80).V.|)R.V2..(E|
00002170: AC FF AD 31 38 30 29 AC 56 AC 2E 37 00 8D 29 5C |...180).V..7..)\|
00002180: 08 54 B2 54 AA 2E 35 3A 4D B2 4D AA 31 00 A6 29 |.T.T..5:M.M.1..)|
00002190: 66 08 56 31 B2 56 31 AA 28 56 31 AA 57 AC 2E 35 |f.V1.V1.(V1.W..5|
000021A0: 29 AD 31 35 30 30 00 BE 29 70 08 58 B2 58 31 AA |).1500..)p.X.X1.|
000021B0: 28 56 31 AA 57 AC 2E 35 AD 35 30 29 AC 54 00 CC |(V1.W..5.50).T..|
000021C0: 29 7A 08 58 B2 B5 28 58 AA 2E 35 29 00 E0 29 84 |)z.X..(X..5)..).|
000021D0: 08 59 B2 59 31 AA 28 56 32 AB 54 AD 33 29 AC 54 |.Y.Y1.(V2.T.3).T|
000021E0: 00 EE 29 8E 08 59 B2 B5 28 59 AA 2E 35 29 00 FF |..)..Y..(Y..5)..|
000021F0: 29 98 08 5A B2 32 33 AB 59 3A 99 22 13 22 3B 00 |)..Z.23.Y:.".";.|
00002200: 27 2A A2 08 41 28 4D 29 B2 5A 3A 42 28 4D 29 B2 |'*..A(M).Z:B(M).|
00002210: 58 3A 8B 20 58 B1 33 39 20 B0 20 58 B3 31 20 A7 |X:. X.39 . X.1 .|
00002220: 20 89 20 32 35 33 30 00 3F 2A AC 08 8B 59 AB 48 | . 2530.?*...Y.H|
00002230: 28 58 29 B3 B2 30 20 A7 20 89 20 32 35 32 30 00 |(X)..0 . . 2520.|
00002240: 52 2A B6 08 8B 20 5A B3 30 20 A7 20 89 20 32 32 |R*... Z.0 . . 22|
00002250: 39 30 00 65 2A C0 08 8B 20 5A B2 30 20 A7 20 89 |90.e*... Z.0 . .|
00002260: 20 32 32 36 30 00 73 2A CA 08 99 C8 28 42 24 2C | 2260.s*....(B$,|
00002270: 5A 29 3B 00 86 2A D4 08 8B 20 58 B2 31 20 A7 20 |Z);..*... X.1 . |
00002280: 89 20 32 32 38 30 00 96 2A DE 08 99 C8 28 41 24 |. 2280..*....(A$|
00002290: 2C 58 AB 31 29 3B 00 9F 2A E8 08 99 22 D1 22 00 |,X.1);..*...".".|
000022A0: A9 2A F2 08 99 22 13 22 3B 00 BE 2A FC 08 8B 20 |.*...".";..*... |
000022B0: 4D AB 34 B3 31 20 A7 20 89 20 32 31 34 30 00 D6 |M.4.1 . . 2140..|
000022C0: 2A 06 09 8B 20 41 28 4D AB 34 29 B2 30 20 A7 20 |*... A(M.4).0 . |
000022D0: 89 20 32 33 34 30 00 FA 2A 10 09 8B 20 41 28 4D |. 2340..*... A(M|
000022E0: AB 34 29 B3 30 20 B0 20 42 28 4D AB 34 29 B3 B2 |.4).0 . B(M.4)..|
000022F0: 30 20 A7 20 89 20 32 31 34 30 00 0D 2B 1A 09 99 |0 . . 2140..+...|
00002300: C8 28 42 24 2C 41 28 4D AB 34 29 29 3B 00 22 2B |.(B$,A(M.4));."+|
00002310: 24 09 99 C8 28 41 24 2C 42 28 4D AB 34 29 AB 31 |$...(A$,B(M.4).1|
00002320: 29 3B 00 2C 2B 2E 09 99 22 20 22 3B 00 36 2B 38 |);.,+..." ";.6+8|
00002330: 09 99 22 13 22 3B 00 41 2B 42 09 89 20 32 31 34 |..".";.A+B.. 214|
00002340: 30 00 54 2B 4C 09 8B 20 4D B2 31 20 A7 20 89 20 |0.T+L.. M.1 . . |
00002350: 32 31 34 30 00 74 2B 56 09 8B 20 42 28 4D 29 B3 |2140.t+V.. B(M).|
00002360: 31 20 B0 20 42 28 4D 29 B1 33 39 20 A7 20 89 20 |1 . B(M).39 . . |
00002370: 31 39 35 30 00 C0 2B 60 09 8F 20 4C 49 4E 45 53 |1950..+`.. LINES|
00002380: 20 32 34 31 30 20 41 4E 44 20 32 34 34 30 20 44 | 2410 AND 2440 D|
00002390: 45 54 45 52 4D 49 4E 45 20 48 49 54 2E 20 43 48 |ETERMINE HIT. CH|
000023A0: 41 4E 47 45 20 27 31 2E 35 27 20 54 4F 20 43 48 |ANGE '1.5' TO CH|
000023B0: 41 4E 47 45 20 44 49 46 46 49 43 55 4C 54 59 2E |ANGE DIFFICULTY.|
000023C0: 00 E2 2B 6A 09 8B 20 B6 28 42 28 4D AB 31 29 AB |..+j.. .(B(M.1).|
000023D0: 4C 28 4E 29 29 B3 31 2E 35 20 A7 20 89 20 32 34 |L(N)).1.5 . . 24|
000023E0: 33 30 00 ED 2B 74 09 89 20 32 34 34 30 00 00 2C |30..+t.. 2440..,|
000023F0: 7E 09 8B 20 54 B1 31 20 A7 20 89 20 32 37 31 30 |~.. T.1 . . 2710|
00002400: 00 24 2C 88 09 8B 20 B6 28 42 28 4D AB 31 29 AB |.$,... .(B(M.1).|
00002410: 4C 28 33 AB 4E 29 29 B3 31 2E 35 20 A7 20 89 20 |L(3.N)).1.5 . . |
00002420: 32 37 39 30 00 37 2C 92 09 8B 20 54 B3 31 20 A7 |2790.7,... T.1 .|
00002430: 20 89 20 32 31 34 30 00 42 2C 9C 09 89 20 32 36 | . 2140.B,... 26|
00002440: 35 30 00 4C 2C A6 09 99 22 13 91 22 00 77 2C B0 |50.L,..."..".w,.|
00002450: 09 99 22 13 11 11 11 11 20 20 20 20 20 20 41 4E |.."..... AN|
00002460: 4F 54 48 45 52 20 47 41 4D 45 20 3F 20 28 59 2F |OTHER GAME ? (Y/|
00002470: 4E 29 20 BF 9D 22 3B 00 8E 2C BA 09 55 4C B2 31 |N) ..";..,..UL.1|
00002480: 3A 55 53 24 B2 22 59 4E 48 22 3A 8D 33 35 00 A3 |:US$."YNH":.35..|
00002490: 2C C4 09 8B 20 55 52 24 B2 22 59 22 20 A7 20 31 |,... UR$."Y" . 1|
000024A0: 30 30 30 00 AC 2C CE 09 89 33 30 30 00 B6 2C D8 |000..,...300..,.|
000024B0: 09 99 22 13 22 3B 00 C9 2C E2 09 81 20 4A B2 34 |..".";..,... J.4|
000024C0: 20 A4 20 31 20 A9 20 AB 31 00 DF 2C EC 09 8B 20 | . 1 . .1..,... |
000024D0: 4D AB 4A B3 B2 30 20 A7 20 89 20 32 36 32 30 00 |M.J..0 . . 2620.|
000024E0: F7 2C F6 09 8B 20 41 28 4D AB 4A 29 B2 30 20 A7 |.,... A(M.J).0 .|
000024F0: 20 89 20 32 35 38 30 00 1B 2D 00 0A 8B 20 41 28 | . 2580..-... A(|
00002500: 4D AB 4A 29 B3 30 20 B0 20 42 28 4D AB 4A 29 B3 |M.J).0 . B(M.J).|
00002510: B2 30 20 A7 20 89 20 32 36 32 30 00 2F 2D 0A 0A |.0 . . 2620./-..|
00002520: 99 20 C8 28 42 24 2C 41 28 4D AB 4A 29 29 3B 00 |. .(B$,A(M.J));.|
00002530: 47 2D 14 0A 8B 20 42 28 4D AB 4A 29 B2 31 20 A7 |G-... B(M.J).1 .|
00002540: 20 89 20 32 36 30 30 00 5C 2D 1E 0A 99 C8 28 41 | . 2600.\-....(A|
00002550: 24 2C 42 28 4D AB 4A 29 AB 31 29 3B 00 66 2D 28 |$,B(M.J).1);.f-(|
00002560: 0A 99 22 20 22 3B 00 70 2D 32 0A 99 22 13 22 3B |.." ";.p-2..".";|
00002570: 00 87 2D 3C 0A 82 20 4A 3A 8B 20 4D B2 31 20 A7 |..-<.. J:. M.1 .|
00002580: 20 89 20 32 38 33 30 00 A7 2D 46 0A 8B 20 42 28 | . 2830..-F.. B(|
00002590: 4D 29 B3 31 20 B0 20 42 28 4D 29 B1 33 39 20 A7 |M).1 . B(M).39 .|
000025A0: 20 89 20 32 38 34 30 00 B2 2D 50 0A 89 20 32 33 | . 2840..-P.. 23|
000025B0: 38 30 00 CA 2D 5A 0A 8B 20 42 28 4D AB 31 29 B2 |80..-Z.. B(M.1).|
000025C0: 31 20 A7 20 89 20 32 36 37 30 00 DF 2D 64 0A 99 |1 . . 2670..-d..|
000025D0: C8 28 41 24 2C 42 28 4D AB 31 29 AB 31 29 3B 00 |.(A$,B(M.1).1);.|
000025E0: F8 2D 6E 0A 99 C8 28 42 24 2C 32 33 AB 48 28 42 |.-n...(B$,23.H(B|
000025F0: 28 4D AB 31 29 29 29 3B 00 25 2E 78 0A 81 20 5A |(M.1)));.%.x.. Z|
00002600: B2 31 20 A4 20 33 3A 20 99 22 91 9D CD D7 CE 91 |.1 . 3: ."......|
00002610: 9D 9D 9D CD 21 CE 22 3B 3A 81 20 58 B2 31 20 A4 |....!.";:. X.1 .|
00002620: 20 35 3A 82 58 00 58 2E 82 0A 99 22 9D 9D 9D 11 | 5:.X.X...."....|
00002630: 20 20 20 91 9D 9D 9D 20 20 20 9D 9D 11 11 22 3B | .... ....";|
00002640: 3A 81 20 58 B2 31 20 A4 20 35 3A 82 20 58 3A 82 |:. X.1 . 5:. X:.|
00002650: 20 5A 3A 99 22 B9 22 3B 00 63 2E 8C 0A 89 20 32 | Z:.".";.c.... 2|
00002660: 38 33 30 00 6D 2E 96 0A 99 22 13 22 3B 00 80 2E |830.m....".";...|
00002670: A0 0A 99 C8 28 41 24 2C 4C 28 4E 29 AB 31 29 3B |....(A$,L(N).1);|
00002680: 00 97 2E AA 0A 99 C8 28 42 24 2C 32 34 AB 48 28 |.......(B$,24.H(|
00002690: 4C 28 4E 29 29 29 3B 00 D0 2E B4 0A 81 20 5A B2 |L(N)));...... Z.|
000026A0: 31 20 A4 31 30 3A 99 22 91 9D 12 DF D1 A9 92 91 |1 .10:."........|
000026B0: 9D 9D 9D 9D CD BF 21 12 BF 92 CE 9D 9D 9D 9D 9D |......!.........|
000026C0: 91 CD CD 21 CE CE 9D 9D 11 11 22 3B 22 9D 22 3B |...!......";".";|
000026D0: 00 F6 2E BE 0A 99 22 20 9D 9D 9D 91 20 20 20 20 |......" .... |
000026E0: 20 9D 9D 9D 9D 9D 91 20 20 20 20 20 9D 9D 9D 91 | ...... ....|
000026F0: 11 11 11 11 22 3B 00 0C 2F C8 0A 81 20 58 B2 31 |....";../... X.1|
00002700: 20 A4 20 32 3A 82 20 58 3A 82 20 5A 00 1D 2F D2 | . 2:. X:. Z../.|
00002710: 0A 81 58 B2 31 20 A4 35 30 3A 82 20 58 00 28 2F |..X.1 .50:. X.(/|
00002720: DC 0A 89 20 32 34 37 30 00 32 2F E6 0A 99 22 13 |... 2470.2/...".|
00002730: 22 3B 00 47 2F F0 0A 99 C8 28 41 24 2C 4C 28 33 |";.G/....(A$,L(3|
00002740: AB 4E 29 AB 31 29 3B 00 62 2F FA 0A 99 C8 28 42 |.N).1);.b/....(B|
00002750: 24 2C 32 34 AB 48 28 4C 28 33 AB 4E 29 AB 31 29 |$,24.H(L(3.N).1)|
00002760: 29 3B 00 6D 2F 04 0B 89 20 32 37 34 30 00 73 2F |);.m/... 2740.s/|
00002770: 0E 0B 8F 00 8B 2F 18 0B 57 B2 57 AA B5 28 31 30 |...../..W.W..(10|
00002780: AC 28 BB 28 31 29 AB 2E 35 29 29 00 A9 2F 22 0B |.(.(1)..5))../".|
00002790: 99 22 13 22 3B C8 28 42 24 2C 32 34 29 3B 22 20 |.".";.(B$,24);" |
000027A0: 20 20 20 20 20 20 20 22 3B 00 E1 2F 2C 0B 8B 20 | ";../,.. |
000027B0: 57 B1 B2 30 20 A7 20 99 22 20 20 20 9D 9D 9D 22 |W..0 . ." ..."|
000027C0: 3B 57 3B 22 20 4D 50 48 20 57 49 4E 44 20 2D 2D |;W;" MPH WIND --|
000027D0: 2D 2D 2D 3E 20 20 20 20 22 3B 3A 89 20 31 39 35 |---> ";:. 195|
000027E0: 30 00 11 30 36 0B 99 22 20 20 20 9D 9D 9D 22 3B |0..06.." ...";|
000027F0: AB 57 3B 22 20 4D 50 48 20 57 49 4E 44 20 3C 2D |.W;" MPH WIND <-|
00002800: 2D 2D 2D 2D 20 20 20 20 22 3B 3A 89 20 31 39 35 |---- ";:. 195|
00002810: 30 00 17 30 40 0B 8E 00 1D 30 4A 0B 8F 00 47 30 |0..0@....0J...G0|
00002820: 54 0B 99 20 22 93 11 11 11 11 11 11 11 11 11 11 |T.. "...........|
00002830: 22 3B A3 31 35 29 3B 22 12 C1 52 54 49 4C 4C 45 |";.15);"..RTILLE|
00002840: 52 59 22 3A 99 3A 99 00 67 30 5E 0B 99 20 A3 31 |RY":.:..g0^.. .1|
00002850: 31 29 3B 22 C3 52 45 41 54 49 56 45 20 C3 4F 4D |1);".REATIVE .OM|
00002860: 50 55 54 49 4E 47 22 00 83 30 68 0B 99 20 A3 31 |PUTING"..0h.. .1|
00002870: 33 29 3B 22 D0 2E CF 2E 20 42 4F 58 20 37 38 39 |3);".... BOX 789|
00002880: 2D 4D 22 00 AC 30 72 0B 99 20 A3 36 29 3B 22 CD |-M"..0r.. .6);".|
00002890: 4F 52 52 49 53 54 4F 57 4E 2C 20 CE 45 57 20 CA |ORRISTOWN, .EW .|
000028A0: 45 52 53 45 59 20 30 37 39 36 30 22 00 DB 30 73 |ERSEY 07960"..0s|
000028B0: 0B 99 22 11 11 11 11 1D 1D 1D 1D 1D 1D 12 CE CF |..".............|
000028C0: D4 C5 3A D0 52 45 53 53 20 3C 20 D2 C5 D4 D5 D2 |..:.RESS < .....|
000028D0: CE 20 3E 20 41 46 54 45 52 92 22 00 09 31 74 0B |. > AFTER."..1t.|
000028E0: 99 22 11 1D 1D 1D 1D 12 C5 41 43 48 20 52 45 53 |.".......ACH RES|
000028F0: 50 4F 4E 53 45 20 46 52 4F 4D 20 54 48 45 20 4B |PONSE FROM THE K|
00002900: 45 59 42 4F 41 52 44 92 22 00 16 31 76 0B 81 42 |EYBOARD."..1v..B|
00002910: 31 B2 31 A4 31 30 00 4E 31 78 0B 99 C8 28 55 44 |1.1.10.N1x...(UD|
00002920: 24 2C 32 31 29 3B 22 1D 1D 1D 1D 1D 1D 12 CE CF |$,21);".........|
00002930: D4 C5 3A D0 D2 C5 D3 D3 20 92 3C 20 D2 C5 D4 D5 |..:..... .< ....|
00002940: D2 CE 20 3E 12 20 41 46 54 45 52 20 92 22 00 63 |.. >. AFTER .".c|
00002950: 31 79 0B 81 42 32 B2 31 A4 33 30 30 3A 82 3A 42 |1y..B2.1.300:.:B|
00002960: 32 B2 30 00 99 31 7A 0B 99 C8 28 55 44 24 2C 32 |2.0..1z...(UD$,2|
00002970: 31 29 3B 22 1D 1D 1D 1D 1D 1D 12 CE CF D4 C5 3A |1);"...........:|
00002980: D0 D2 C5 D3 D3 20 3C 20 D2 C5 D4 D5 D2 CE 20 3E |..... < ...... >|
00002990: 20 41 46 54 45 52 20 92 22 00 AE 31 7B 0B 81 42 | AFTER ."..1{..B|
000029A0: 32 B2 31 A4 33 30 30 3A 82 3A 42 32 B2 30 00 B4 |2.1.300:.:B2.0..|
000029B0: 31 7C 0B 82 00 C9 31 81 0B 81 20 42 31 B2 31 A4 |1|....1... B1.1.|
000029C0: 32 30 30 30 3A 82 20 42 31 00 D2 31 86 0B 42 31 |2000:. B1..1..B1|
000029D0: B2 30 00 D8 31 9A 0B 8E 00 BE 00 59 20 |.0..1......Y |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......LX.X.U.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(..UO,0:UR$."":UI$.""...*..UL.0.UL.80
.".-..UC,0.6.2..UI$:.UI$."".50.`.7..UI$.
G(13).C(UR$)..1..UC,1:." .";:.85.S.<..UI
$.G(20).105...>.. C(UR$)..UL.50...A..120
:. CHECK FOR VALID CHARACTER...F.UR$.UR$
.UI$.F.K..UI$;.N.P..50...U.. +++ CHECK F
OR HELP REQUEST +++...Z..UR$.UX$.195:. E
XIT TO HELP ROUTINE.*._..UF.1..240.7.D.U
F.0:.:..P.F.. ++ CHECK DELETE ++.A.I..C(
UR$).1.50.Y.N.UR$.H(UR$,C(UR$).1)...S.."
. ..";:.50...X.. ++ CHECK FOR VALID CHA
RACTERS ++.D.}..C(US$).0.150.U....US.1.C
(US$)......UI$.J(US$,US,1).............U
I$."":....... ** STANDARD INPUT **.+....
F(UI$).46...<....UI$.G(32)...Y. ..F(UI$)
.48.F(UI$).57.170._.....|....F(UI$).65.F
(UI$).90.180............F(UI$).193.F(UI$
).218.UI$."":..I....B(UT).UU%.UI$.G(F(UI
$).128):..O.........UI$."":....C.UF.1:.
+++ HELP ROUTINE EXIT +++...E..250...H..
245.'.M..UQ.UB.(UB.987).C.R.UQ%(UQ.UB).B
(UQ):.:.".".V.W.UZ.1:UV%.B(UT)._.X..300.
..Y.UZ.0:US$.UJ$:UG$.UK$:UP.UJ:UL.UK:.B(
50003).0..53281,6:.53280,6.L...UT$.UL$:.
".";:.UT,UV%:.UQ.UB.(UB.987)......UQ,UQ%
(UQ.UB):.......U1,U1%......U2,U2%......U
4,U4%......U3,U3%.1......35.M...UD%.((U2
%.256.U1%.U3%).UB).40:.H(UD$,UD%.1):..T.
...H(UD$,24);.68);".HELP COMING.";:.. ..
.U1%.B(U1):U2%.B(U2):U3%.B(U3):U4%.B(U4)
.H...UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL
.N.......,.. ** MENU **...-.:......".":.
UT,UU%:.B(50003).0..53281,9:.53280,8.../
.:.7.1..". MENU".F.6.." -
-------------------------------------"..
.;..".. 1. BEGIN ARTILLERY...@..
".. 2. STUDENT INSTRUCTIONS"...E
..".. 3. TEACHER INSTRUCTIONS"..
.O..".. 4. QUIT..".).T.." ------
--------------------------------".T.Y.."
.. PRESS A NUMBER KEY (1-4) ";.|.^
.UL.1:US$."1234":.35:. INPUT ROUTINE...`
.US$.""...C..E(UR$).1000,400,500,396...H
..300.T.... ** RE-ENABLE STOP KEY AND EN
D **......B(50003)..1.B(50003)..160.B(50
003)..0.399.-....UU.71:.B(50003).0..5328
1,6:.53280,14.9...."..":..D....875:..E..
.. ** STUDENT INSTRUCTIONS **......".":.
UT,UL%:.B(50003).0..53281,0:.53280,0....
.UP.0:UG$."STUDENT INST":.850......".. T
HIS IS A GAME IN WHICH 2 PLAYERS SHOOT";
......". AT EACH OTHER ACROSS A MOUNTAIN
.".@....". AT EACH TURN, THE PLAYER ENTE
RS THE ".|....". ANGLE TO FIRE (1-90) AN
D THE NUMBER OF .BAGS OF ";... .." POWD
ER (1 TO 15 BAGS).......". NOTE:.T....".
IF YOU WISH HELP PRESS 'H' RETURN."....
..835......UZ.1..UP%:.217............ **
TEACHER INSTRUCTIONS **.H....".":.UT,UL
%:.B(50003).0..53281,2:.53280,10.I...UP.
0:UG$."TEACHER INST":.850......"..
TO THE BEST OF OUR KNOWLEDGE,."......"
THIS PROGRAM IS IN THE PUBLIC."......"
DOMAIN. IF THIS IS NOT THE CASE."....
.." PLEASE CONTACT:...".3...." CO
MMODORE BUSINESS MACHINES.".V...."
3370 PHARMACY AVE..Z...." A
GINCOURT, ONTARIO"......" CANAD
A M1W 2K4"......" (416) 499-4
292".R...UP.1:. 835:. 850:......" ..
PROGRAM NAME: ARTILLERY ......."
WRITTEN BY : UNKNOWN..B...." UPGRAD
ED BY : ..M...." .THIS PROG
RAM WILL RUN ON ANY........" BAS
IC 2.0 PET COMPUTER......." BASI
C 4.0 PET COMPUTER......." 8032
CBM COMPUTER......." COMMODORE 6
4 COMPUTER......835...N..UZ.1..UP%:.217.
%.W...K.X.. ** PROGRAM MODIFICATION INST
**.\.Y..".":.UT,UL%.|.].UP.0:UG$."PROGR
AM MOD":.850......835......UZ.1..UP%:.21
7.......D.... ** TO USE 8032 LOAD CBM403
2 **...F..".....BEFORE RUNNING THIS PROG
RAM ON AN 8032 ...0.P.." LOAD THE
'CBM 4032' PROGRAM.............".;.Z..UU
.71.A.....A. .. ** T I T L E P A G E *
*...".."....";:.UT,UU%:.B(50003).0..5328
0,14:.53281,6...$..I.1.38:."...";:..C.&.
.I.1.22:.".....";:....(..I.1.37:."....."
;:....*..I.1.22:.".....";:....,.."......
..................... ..:....".........
.......... . . ...[.0.."...............
.... . ....Y.2.."....................
....4.."..............C O M M O D O R E.
..D.6.."...............EDUCATIONAL.....8
.."................SOFTWARE...:.. ** COM
MODORE LOGO **.6.;..H(UD$,24);".........
.PRESS SPACE BAR OR WAIT.":I.0.X.<..A$:.
A$.." ".I.I.1:.I.250.828.|.>.T1$."":T2$.
"":T3$."":T4$."":I.0...@..300...C.. ** S
PACE BAR PRESS **...H..UO,0:.H(UD$,24);"
.......PRESS SPACE BAR TO CONTINUE."...L
..UI$:.UI$.." ".844...N.....R.. ** PAGE
DESIGN ROUTINE **.%.T.UP.UP.1.O.W.."."H(
UT$.UP$,21);I(UP$.UG$.D(UP),18).~.\.." -
-------------------------------------"..
.`..UH..0.870.A.A..H(UD$,24);H(UP$,7);"H
ELP - PRESS H <RETURN>".R.F.UH.0:.".."
:....K.. ** PLEASE WAIT REMARK **.'.P..H
(UD$,24);" ONE MOMENT PLEASE..
. ".-.U...J.... ** SET UP VARIABLES
**.....UX$."H":.UQ%(1000):UB.32768:U1.19
6:U2.197:U3.198:U4.216:UC.167:UU.1024.S.
..UT.59468:UU%.12:UL%.14:UP%.1146:UM.327
68:UO.158:. 50003,0......B(50003).0.UB.1
024:U1.209:U2.210:U3.211:U4.214:UC.204:U
U.2048.U....B(50003).0.UT.53272:UU%.21:U
L%.23:UP%.2139:UM.1024:UO.198.Y...UD$.".
........................".....UP$."
".....
UT$." ARTILLERY ":. PLACE PROGRAM
TITLE HERE !!!!!!!!!!!!!!!!!***......A(
100),B(100),H(39),A1(2),B1(2),A2(2),B2(2
),L(2).4.....N.... ** SET VARIABLES **.W
....900.R.... ** CHECK FOR 8032 **......
".":." ":. SHIFTED SPACE......B(UB.40)..
96..700...... ** MEMORY CHECK **.T.... .
(0).2000.937......"....THIS MACHINE DOES
NOT HAVE ENOUGH.".&...."MEMORY TO RUN T
HIS PROGRAM !".1....UU.71.7.....Q...."..
":.B(50003).0.962...... ** BASIC 2.0 OR
4.0 OR C-64 SETUP **......1075,133:.
1076,144:.1077,234:.1079,4:.1080,133:.10
81,145......1091,155:.1098,133:.1099,144
:.1100,234:.1103,133......1104,145:.1105
,234:.1082,234.-....B(50003)..160.955.\.
...1093,88:.1094,228:.1097,85:.1102,228:
.965.Q....B(50003)..1.990. ....1093,49:.
1094,230:.1097,46:.1102,230:.965.Z.B..20
99,141:.2100,20:.2101,3:.2103,8:.2104,14
1:.2105,21...C..2106,3:.2115,145:.2117,5
2:.2118,234:.2121,49:.2122,141.P.D..2123
,20:.2124,3:.2126,234:.2127,141:.2128,21
:.2129,3.N.E..UU.48:. DISABLE STOP KEY.
.J..800:. TITLE...T..300:. MENU......".T
HE PGM WILL NOT WORK ON THIS MACHINE!":.
......UZ.1..UP%:.UP%:UZ.0:. ** PROGRAM S
TARTS HERE **. ..."..";:.:.B(50003).0..
53281,6:.53280,6., O..UT,UL%.= T.. GOSUB
2890.H X..:.900.N ...".":. UT,UU%:. RES
ET TO GRAPHICS.. ..Z$.". ..":. X.1 . 5:Z
$.Z$.Z$:.X.P ..A$.".":. X.1 . 6:A$.A$.A$
:.X:B$.".":. X.1 . 5:B$.B$.B$:.X.X ..N.2
.. ... CONSTRUCT MOUNTAIN..!#..".";H(U
D$,23);"BUILDING MOUNTAIN...".0!(.X1..(6
..(1).8).D!2.X2..(25..(1).8).^!<.L(1)..(
3.(X1.3)..(1)).|!F.L(2)..(X2.1.(36.X2)..
(1))..!P.H9..(1).11.1..!Z.. I.1 . X1:H(I
).H9:.I..!D.H9..(1).11.1.S!N.. I.X2 . 39
:H(I).H9:.I..!X.. .(H(1).H(39)).4 . . 13
60.."..X3.X1..(.(1).(X2.X1.6)).3.$"..H(X
3)..(1).11.9.:"..D1.(H(X3).H(1)).2.Q" .D
2.(H(X3).H(39)).2.I"... D1.D2..0 . . 161
0.T"..J..180.."..K.180.(X3.X1.1).."H.H9.
H(1).D1.."R.. I.X1.1 . X3.1.."..J.J.K.O"
..H(I).H9..(J...180).D1.V"...I.."..J.0..
"..K.180.(X2.X3.1)..#..H9.H(39).D2..#...
I.X3.1 . X2.1. #".J.J.K.:#,.H(I).H9..(J
...180).D2.A#6..I.L#@.. 1690.A#J.D.(H(1)
.H(39)).2.I#T.J.0.}#^.K.180.(X2.X1.1)..#
H.H9.H(39).D. #R.. I.X1.1 . X2.1..#|.J.J
.K.C#..H(I).H9..(J...180).D.K#... I.U#..
.".";..#..W..(100.(.(1)..5))..#...H(B$,2
2);..$... I.1 . 39:H(I)..(H(I)..5):.I.:$
B.. X.1 . 39:.X.1 . . 1750.D$L..".";.Y$V
..J(Z$,1,H(X).4);.S$... Z.1 . H(X):.".";
:.Z..$... X:."."..$...".";..$...J(B$,1,2
2.H(1));:. L(1).1 . . 1810.G$...J(A$,1,L
(1).1);.Q$..."^";..$...".";..$&..J(B$,1,
22.H(39));..%0..J(A$,1,L(2).1);..%:.."^"
;.J%?..H(UD$,23)"....PLAYER 1...........
........PLAYER 2.".T%D..".";.E%N..J(B$,1
,24);.U%X.." ";.}%B.K.1..%L..W..0
. . 1930..%V...W;" MPH WIND <----- ";..
%... 1950.W%...W;" MPH WIND ------> ";.
.%...".";..&...".";:N.3.N:. N.1 . . 2010
.8&...H(UD$,23)"... PLAYER 1 ...........
.....*PLAYER 2*".D&...".";H(A$,23);"ANGL
E (1-90) . ..";:UL.2..&..US$."0123456789
H":.35:E.E(UR$):. E.90 . ."... ..";:. 19
70..&...".";:.E.0 . . 1965..&...H(B$,1);
H(A$,23);".POWDER(1-15) ....";:UL.2:US
$."0123456789.1'F.US$.US$."H":.35:V.E(UR
$):. V.15 . V..0 . . 1975.<'P.. 2040..'Z
..".
";" ";.N'..."
";..(...H(UD$,23)"..
*PLAYER 1*................ PLAYER 2 .".Q
(..."
";".ANGLE (1-90) . ..";:UL.2..(..US
$."0123456789H":.35:E.E(UR$):. E.90 . E.
0 . . 2025..(..."...POWDER (1-15) ...
..";:.35.S(..V.E(UR$):.V.15 . V..0 . . 2
032..(..K.K.1:. E.0 . . 1310..)..A2(N).A
2(N).2.86..)..E.90.E..)... N.1 . . 2090.
() .E..E.4)*.X1.L(N).E)4.Y1.H(L(N)).1.Q)
>.T.0:M.0.E)H.V1..(E...180).V.|)R.V2..(E
...180).V..7..)\.T.T..5:M.M.1..)F.V1.V1.
(V1.W..5).1500..)P.X.X1.(V1.W..5.50).T.L
)Z.X..(X..5)..)..Y.Y1.(V2.T.3).T..)..Y..
(Y..5)..)..Z.23.Y:.".";.'*..A(M).Z:B(M).
X:. X.39 . X.1 . . 2530.?*...Y.H(X)..0 .
. 2520.R*... Z.0 . . 2290.E*... Z.0 . .
2260.S*J..H(B$,Z);..*T.. X.1 . . 2280..
*...H(A$,X.1);..*..."Q"..*...".";..*...
M.4.1 . . 2140.V*... A(M.4).0 . . 2340..
*... A(M.4).0 . B(M.4)..0 . . 2140..+...
H(B$,A(M.4));."+$..H(A$,B(M.4).1);.,+...
" ";.6+8..".";.A+B.. 2140.T+L.. M.1 . .
2140.T+V.. B(M).1 . B(M).39 . . 1950..+`
.. LINES 2410 AND 2440 DETERMINE HIT. CH
ANGE '1.5' TO CHANGE DIFFICULTY...+J.. .
(B(M.1).L(N)).1.5 . . 2430..+T.. 2440..,
~.. T.1 . . 2710.$,... .(B(M.1).L(3.N)).
1.5 . . 2790.7,... T.1 . . 2140.B,... 26
50.L,..."..".W,..."..... ANOTHER GA
ME ? (Y/N) ..";..,..UL.1:US$."YNH":.35..
,D.. UR$."Y" . 1000..,N..300..,X..".";.I
,... J.4 . 1 . .1..,... M.J..0 . . 2620.
.,... A(M.J).0 . . 2580..-... A(M.J).0 .
B(M.J)..0 . . 2620./-... H(B$,A(M.J));.
G-... B(M.J).1 . . 2600.\-...H(A$,B(M.J)
.1);.F-(.." ";.P-2..".";..-<.. J:. M.1 .
. 2830..-F.. B(M).1 . B(M).39 . . 2840.
.-P.. 2380.J-Z.. B(M.1).1 . . 2670..-D..
H(A$,B(M.1).1);..-N..H(B$,23.H(B(M.1)));
.%.X.. Z.1 . 3: ."..MWN....M!N";:. X.1 .
5:.X.X....".... .... ....";:. X.1 .
5:. X:. Z:.".";.C.... 2830.M....".";...
..H(A$,L(N).1);......H(B$,24.H(L(N)));.
P.... Z.1 .10:."....Q.......M.!...N.....
.MM!NN....";".";......" .... ......
........";../H.. X.1 . 2:. X:. Z../R
..X.1 .50:. X.(/... 2470.2/...".";.G/...
H(A$,L(3.N).1);.B/...H(B$,24.H(L(3.N).1)
);.M/... 2740.S/...../..W.W..(10.(.(1)..
5))../"..".";H(B$,24);" ";../,..
W..0 . ." ...";W;" MPH WIND ----->
";:. 1950..06.." ...";.W;" MPH WIND <-
---- ";:. 1950..0@....0J...G0T.. "...
........";.15);".ARTILLERY":.:..G0^.. .1
1);"CREATIVE COMPUTING"..0H.. .13);"P.O.
BOX 789-M"..0R.. .6);"MORRISTOWN, NEW J
ERSEY 07960"..0S.."...........NOTE:PRESS
< RETURN > AFTER."..1T.."......EACH RES
PONSE FROM THE KEYBOARD."..1V..B1.1.10.N
1X..H(UD$,21);".......NOTE:PRESS .< RETU
RN >. AFTER .".C1Y..B2.1.300:.:B2.0..1Z.
.H(UD$,21);".......NOTE:PRESS < RETURN >
AFTER ."..1{..B2.1.300:.:B2.0..1|...I1.
.. B1.1.2000:. B1.R1..B1.0.X1......Y
> CLICK IMAGE PREVIEW FOR FULL MODAL