ARROW
FILE INFORMATION
FILENAME(S): ARROW
FILE TYPE(S): PRG
FILE SIZE: 7.8K
FIRST SEEN: 2025-11-30 21:23:54
APPEARS ON: 1 disk(s)
FILE HASH
f9d1c9444ad781f35f67188ccd4dd3daf6d5f34db6be4023d7d9fa896f47606f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 33 1 | ARROW | PRG | DuncanTwain | 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 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000050: 8D 15 03 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 25 0C CD 00 81 55 51 B2 55 42 A4 55 |245.%....UQ.UB.U|
00000420: 42 AA 39 39 39 00 41 0C D2 00 55 51 25 28 55 51 |B.999.A...UQ%(UQ|
00000430: AB 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 22 93 |.UB)..(UQ):.:.".|
00000440: 22 00 54 0C D7 00 55 5A B2 31 3A 55 56 25 B2 C2 |".T...UZ.1:UV%..|
00000450: 28 55 54 29 00 5D 0C D8 00 89 33 30 30 00 A1 0C |(UT).]....300...|
00000460: D9 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 |..UZ.0:US$.UJ$:U|
00000470: 47 24 B2 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 |G$.UK$:UP.UJ:UL.|
00000480: 55 4B 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |UK:..(50003).0..|
00000490: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 |53281,6:.53280,1|
000004A0: 34 00 C8 0C DC 00 55 54 24 B2 55 4C 24 3A 99 22 |4.....UT$.UL$:."|
000004B0: 93 22 3B 97 55 54 2C 55 56 25 3A 81 55 51 B2 55 |.";.UT,UV%:.UQ.U|
000004C0: 42 A4 55 42 AA 39 39 39 00 DD 0C E1 00 97 55 51 |B.UB.999......UQ|
000004D0: 2C 55 51 25 28 55 51 AB 55 42 29 3A 82 00 16 0D |,UQ%(UQ.UB):....|
000004E0: E2 00 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 20 |....(UD$,24);". |
000004F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000510: 20 20 20 22 3A 8E 00 22 0D E6 00 97 55 31 2C 55 | ":.."....U1,U|
00000520: 31 25 00 2E 0D E8 00 97 55 32 2C 55 32 25 00 3A |1%......U2,U2%.:|
00000530: 0D E9 00 97 55 34 2C 55 34 25 00 48 0D EA 00 97 |....U4,U4%.H....|
00000540: 55 33 2C 55 33 25 AB 31 00 52 0D EB 00 8E 3A 89 |U3,U3%.1.R....:.|
00000550: 33 35 00 84 0D F0 00 55 44 25 B2 28 28 55 32 25 |35.....UD%.((U2%|
00000560: AC 32 35 36 AA 55 31 25 AA 55 33 25 29 AB 55 42 |.256.U1%.U3%).UB|
00000570: 29 AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 25 AA |).40:..(UD$,UD%.|
00000580: 31 29 3A 8E 00 BF 0D F5 00 99 C8 28 55 44 24 2C |1):........(UD$,|
00000590: 32 34 29 3B 22 1D 20 20 20 20 20 20 20 20 20 20 |24);". |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 12 20 48 45 4C | . HEL|
000005B0: 50 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E 00 |P COMING . ":..|
000005C0: EB 0D FA 00 55 31 25 B2 C2 28 55 31 29 3A 55 32 |....U1%..(U1):U2|
000005D0: 25 B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 55 33 |%..(U2):U3%..(U3|
000005E0: 29 3A 55 34 25 B2 C2 28 55 34 29 00 13 0E FB 00 |):U4%..(U4).....|
000005F0: 55 4A 24 B2 55 53 24 3A 55 4B 24 B2 55 47 24 3A |UJ$.US$:UK$.UG$:|
00000600: 55 4C 24 B2 55 54 24 3A 55 4A B2 55 50 3A 55 4B |UL$.UT$:UJ.UP:UK|
00000610: B2 55 4C 00 19 0E FF 00 8E 00 2A 0E 2C 01 8F 20 |.UL.......*.,.. |
00000620: 2A 2A 20 4D 45 4E 55 20 2A 2A 00 30 0E 2D 01 3A |** MENU **.0.-.:|
00000630: 00 68 0E 2E 01 97 35 33 32 38 31 2C 31 3A 99 22 |.h....53281,1:."|
00000640: 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 |.":.UT,UU%:..(50|
00000650: 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 39 3A |003).0..53281,9:|
00000660: 97 35 33 32 38 30 2C 39 00 6E 0E 2F 01 3A 00 94 |.53280,9.n./.:..|
00000670: 0E 31 01 99 22 13 20 20 20 20 20 20 20 20 20 20 |.1..". |
00000680: 20 41 52 52 4F 57 20 4D 45 4E 55 20 4F 50 54 49 | ARROW MENU OPTI|
00000690: 4F 4E 53 22 00 B8 0E 36 01 99 22 20 20 20 20 20 |ONS"...6.." |
000006A0: 20 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ..........|
000006B0: A3 A3 A3 A3 A3 A3 A3 A3 00 CD 0E 3A 01 99 22 11 |...........:..".|
000006C0: 11 20 20 20 20 20 20 20 20 D5 C3 C9 22 00 EE 0E |. ..."...|
000006D0: 3B 01 99 22 20 20 20 20 20 20 20 20 DD 31 DD 20 |;.." .1. |
000006E0: 20 20 53 54 41 52 54 20 47 41 4D 45 20 22 00 01 | START GAME "..|
000006F0: 0F 3C 01 99 22 20 20 20 20 20 20 20 20 CA C3 CB |.<.." ...|
00000700: 22 00 16 0F 3F 01 99 22 11 11 20 20 20 20 20 20 |"...?..".. |
00000710: 20 20 D5 C3 C9 22 00 3D 0F 40 01 99 22 20 20 20 | ...".=.@.." |
00000720: 20 20 20 20 20 DD 32 DD 20 20 20 47 41 4D 45 20 | .2. GAME |
00000730: 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 50 0F |INSTRUCTIONS".P.|
00000740: 41 01 99 22 20 20 20 20 20 20 20 20 CA C3 CB 22 |A.." ..."|
00000750: 00 65 0F 4E 01 99 22 11 11 20 20 20 20 20 20 20 |.e.N..".. |
00000760: 20 D5 C3 C9 22 00 7F 0F 4F 01 99 22 20 20 20 20 | ..."...O.." |
00000770: 20 20 20 20 DD 33 DD 20 20 20 51 55 49 54 22 00 | .3. QUIT".|
00000780: 92 0F 50 01 99 22 20 20 20 20 20 20 20 20 CA C3 |..P.." ..|
00000790: CB 22 00 C1 0F 54 01 99 22 20 20 20 20 20 20 20 |."...T.." |
000007A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007C0: 22 00 EC 0F 59 01 99 22 11 11 20 20 20 20 20 20 |"...Y..".. |
000007D0: 20 50 52 45 53 53 20 41 20 4E 55 4D 42 45 52 20 | PRESS A NUMBER |
000007E0: 4B 45 59 20 28 31 2D 33 29 20 22 3B 00 13 10 5E |KEY (1-3) ";...^|
000007F0: 01 55 4C B2 31 3A 55 53 24 B2 22 31 32 33 22 3A |.UL.1:US$."123":|
00000800: 8D 33 35 3A 8F 20 49 4E 50 55 54 20 52 4F 55 54 |.35:. INPUT ROUT|
00000810: 49 4E 45 00 1E 10 60 01 55 53 24 B2 22 22 00 37 |INE...`.US$."".7|
00000820: 10 63 01 91 C5 28 55 52 24 29 8D 31 34 36 30 2C |.c...(UR$).1460,|
00000830: 34 30 30 2C 33 39 36 00 40 10 68 01 89 33 30 30 |400,396.@.h..300|
00000840: 00 67 10 8B 01 8F 20 2A 2A 20 52 45 2D 45 4E 41 |.g.... ** RE-ENA|
00000850: 42 4C 45 20 53 54 4F 50 20 4B 45 59 20 41 4E 44 |BLE STOP KEY AND|
00000860: 20 45 4E 44 20 2A 2A 00 96 10 8C 01 8B C2 28 35 | END **.......(5|
00000870: 30 30 30 33 29 B3 B1 31 AF C2 28 35 30 30 30 33 |0003)..1..(50003|
00000880: 29 B3 B1 31 36 30 AF C2 28 35 30 30 30 33 29 B3 |)..160..(50003).|
00000890: B1 30 A7 33 39 39 00 C0 10 8D 01 9E 55 55 AA 37 |.0.399......UU.7|
000008A0: 31 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 |1:..(50003).0..5|
000008B0: 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 |3281,6:.53280,14|
000008C0: 00 CC 10 8E 01 99 22 9A 93 22 3A 80 00 D7 10 8F |......"..":.....|
000008D0: 01 8D 38 37 35 3A 8E 00 F8 10 90 01 8F 20 2A 2A |..875:....... **|
000008E0: 20 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 | STUDENT INSTRUC|
000008F0: 54 49 4F 4E 53 20 2A 2A 00 27 11 95 01 99 22 93 |TIONS **.'....".|
00000900: 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 |":.UT,UL%:..(500|
00000910: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 30 3A 97 |03).0..53281,0:.|
00000920: 35 33 32 38 30 2C 30 00 4D 11 9A 01 55 48 B2 31 |53280,0.M...UH.1|
00000930: 3A 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 45 |:UP.0:UG$.".TUDE|
00000940: 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 5C 11 |NT .NST":.850.\.|
00000950: E5 01 8D 31 32 32 30 3A 8D 38 33 35 00 70 11 EA |...1220:.835.p..|
00000960: 01 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 |..UZ.1..UP%:.217|
00000970: 00 76 11 F3 01 8E 00 9C 11 58 02 8F 20 2A 2A 20 |.v.......X.. ** |
00000980: 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 43 41 |PROGRAM MODIFICA|
00000990: 54 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 A2 11 BB |TION INST **....|
000009A0: 02 8E 00 C7 11 BC 02 8F 20 2A 2A 20 54 4F 20 55 |........ ** TO U|
000009B0: 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D |SE 8032 LOAD CBM|
000009C0: 34 30 33 32 20 2A 2A 00 FD 11 C6 02 99 22 93 11 |4032 **......"..|
000009D0: 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E |...BEFORE RUNNIN|
000009E0: 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F |G THIS PROGRAM O|
000009F0: 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 33 12 |N AN 8032 ...3.|
00000A00: D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 |..." LOAD T|
00000A10: 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 |HE 'CBM 4032' PR|
00000A20: 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 |OGRAM...........|
00000A30: 11 11 22 00 3E 12 DA 02 9E 55 55 AA 37 31 00 44 |..".>....UU.71.D|
00000A40: 12 E4 02 80 00 64 12 20 03 8F 20 2A 2A 20 54 20 |.....d. .. ** T |
00000A50: 49 20 54 20 4C 20 45 20 20 20 50 20 41 20 47 20 |I T L E P A G |
00000A60: 45 20 2A 2A 00 98 12 22 03 99 22 93 11 1D 05 22 |E **...".."...."|
00000A70: 3B 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 |;:.UT,UU%:..(500|
00000A80: 30 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 34 3A |03).0..53280,14:|
00000A90: 97 35 33 32 38 31 2C 31 00 AF 12 24 03 81 49 B2 |.53281,1...$..I.|
00000AA0: 31 A4 33 38 3A 99 22 1F 12 A6 92 22 3B 3A 82 00 |1.38:."....";:..|
00000AB0: C7 12 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 9D |..&..I.1.22:."..|
00000AC0: 12 A6 92 22 3B 3A 82 00 DF 12 28 03 81 49 B2 31 |...";:....(..I.1|
00000AD0: A4 33 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 |.37:.".....";:..|
00000AE0: F7 12 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 9D |..*..I.1.22:."..|
00000AF0: 12 A6 92 22 3B 3A 82 00 1C 13 2C 03 99 22 13 11 |...";:....,.."..|
00000B00: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000B10: 1D 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 00 3E 13 2E |......... ..>..|
00000B20: 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
00000B30: 1D 1D 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 61 |...... . . ...a|
00000B40: 13 30 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.0.."...........|
00000B50: 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 1C 12 A3 DF |........ . ....|
00000B60: 1F 00 7F 13 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |....2.."........|
00000B70: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 |............ ..|
00000B80: A7 13 34 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D |..4.."..........|
00000B90: 1D 1D 1D 1D 43 20 4F 20 4D 20 4D 20 4F 20 44 20 |....C O M M O D |
00000BA0: 4F 20 52 20 45 11 11 00 C7 13 36 03 99 22 1D 1D |O R E.....6.."..|
00000BB0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 |............. |
00000BC0: 20 36 20 34 11 11 22 00 F2 13 38 03 99 22 11 11 | 6 4.."...8.."..|
00000BD0: 1D 1D 1D 1D 1D 1D 1D 20 20 50 4C 41 59 20 54 48 |....... PLAY TH|
00000BE0: 45 20 47 41 4D 45 20 4F 46 20 1C 20 41 52 52 4F |E GAME OF . ARRO|
00000BF0: 57 1F 00 27 14 3A 03 99 C8 28 55 44 24 2C 32 33 |W..'.:...(UD$,23|
00000C00: 29 3B 22 1D 1D 1D 1D 1D 1D A4 A4 A4 A4 A4 A4 A4 |);".............|
00000C10: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000C20: A4 A4 A4 A4 A4 A4 22 00 63 14 3B 03 99 C8 28 55 |......".c.;...(U|
00000C30: 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 20 |D$,24);"....... |
00000C40: 50 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 |PRESS SPACE BAR |
00000C50: 54 4F 20 43 4F 4E 54 49 4E 55 45 20 92 9E 22 3A |TO CONTINUE ..":|
00000C60: 49 B2 30 00 7F 14 3C 03 A1 41 24 3A 8B 41 24 B3 |I.0...<..A$:.A$.|
00000C70: B1 22 20 22 A7 49 B2 49 AA 31 3A 89 38 32 38 00 |." ".I.I.1:.828.|
00000C80: A3 14 3E 03 54 31 24 B2 22 22 3A 54 32 24 B2 22 |..>.T1$."":T2$."|
00000C90: 22 3A 54 33 24 B2 22 22 3A 54 34 24 B2 22 22 3A |":T3$."":T4$."":|
00000CA0: 49 B2 30 00 AC 14 40 03 89 33 30 30 00 C8 14 43 |I.0...@..300...C|
00000CB0: 03 8F 20 2A 2A 20 53 50 41 43 45 20 42 41 52 20 |.. ** SPACE BAR |
00000CC0: 50 52 45 53 53 20 2A 2A 00 03 15 48 03 97 55 4F |PRESS **...H..UO|
00000CD0: 2C 30 3A 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D |,0:..(UD$,24);".|
00000CE0: 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 |......PRESS SPAC|
00000CF0: 45 20 42 41 52 20 54 4F 20 43 4F 4E 54 49 4E 55 |E BAR TO CONTINU|
00000D00: 45 92 22 00 1A 15 4C 03 A1 55 49 24 3A 8B 55 49 |E."...L..UI$:.UI|
00000D10: 24 B3 B1 22 20 22 A7 38 34 34 00 20 15 4E 03 8E |$.." ".844. .N..|
00000D20: 00 40 15 52 03 8F 20 2A 2A 20 50 41 47 45 20 44 |.@.R.. ** PAGE D|
00000D30: 45 53 49 47 4E 20 52 4F 55 54 49 4E 45 20 2A 2A |ESIGN ROUTINE **|
00000D40: 00 4C 15 54 03 55 50 B2 55 50 AA 31 00 76 15 57 |.L.T.UP.UP.1.v.W|
00000D50: 03 99 22 93 22 C8 28 55 54 24 AA 55 50 24 2C 32 |..".".(UT$.UP$,2|
00000D60: 31 29 3B C9 28 55 50 24 AA 55 47 24 AA C4 28 55 |1);.(UP$.UG$..(U|
00000D70: 50 29 2C 31 38 29 00 A5 15 5C 03 99 22 20 2D 2D |P),18)...\.." --|
00000D80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000D90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000DA0: 2D 2D 2D 2D 22 00 B4 15 60 03 8B 55 48 B3 B1 30 |----"...`..UH..0|
00000DB0: A7 38 37 30 00 E8 15 61 03 99 C8 28 55 44 24 2C |.870...a...(UD$,|
00000DC0: 32 34 29 3B C8 28 55 50 24 2C 37 29 3B 22 48 45 |24);.(UP$,7);"HE|
00000DD0: 4C 50 20 2D 20 50 52 45 53 53 20 20 20 48 20 3C |LP - PRESS H <|
00000DE0: 52 45 54 55 52 4E 3E 22 00 F9 15 66 03 55 48 B2 |RETURN>"...f.UH.|
00000DF0: 30 3A 99 22 13 11 22 3A 8E 00 18 16 6B 03 8F 20 |0:."..":....k.. |
00000E00: 2A 2A 20 50 4C 45 41 53 45 20 57 41 49 54 20 52 |** PLEASE WAIT R|
00000E10: 45 4D 41 52 4B 20 2A 2A 00 4E 16 70 03 99 C8 28 |EMARK **.N.p...(|
00000E20: 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 |UD$,24);" |
00000E30: 20 20 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 | ONE MOMENT P|
00000E40: 4C 45 41 53 45 2E 2E 2E 20 20 20 20 20 22 00 54 |LEASE... ".T|
00000E50: 16 75 03 8E 00 71 16 84 03 8F 20 2A 2A 20 53 45 |.u...q.... ** SE|
00000E60: 54 20 55 50 20 56 41 52 49 41 42 4C 45 53 20 2A |T UP VARIABLES *|
00000E70: 2A 00 BC 16 85 03 55 58 24 B2 22 48 22 3A 86 55 |*.....UX$."H":.U|
00000E80: 51 25 28 31 30 30 30 29 3A 55 42 B2 33 32 37 36 |Q%(1000):UB.3276|
00000E90: 38 3A 55 31 B2 31 39 36 3A 55 32 B2 31 39 37 3A |8:U1.196:U2.197:|
00000EA0: 55 33 B2 31 39 38 3A 55 34 B2 32 31 36 3A 55 43 |U3.198:U4.216:UC|
00000EB0: B2 31 36 37 3A 55 55 B2 31 30 32 34 00 FA 16 86 |.167:UU.1024....|
00000EC0: 03 55 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 32 |.UT.59468:UU%.12|
00000ED0: 3A 55 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 36 |:UL%.14:UP%.1146|
00000EE0: 3A 55 4D B2 33 32 37 36 38 3A 55 4F B2 31 35 38 |:UM.32768:UO.158|
00000EF0: 3A 97 20 35 30 30 30 33 2C 30 00 3D 17 87 03 8B |:. 50003,0.=....|
00000F00: C2 28 35 30 30 30 33 29 B2 30 A7 55 42 B2 31 30 |.(50003).0.UB.10|
00000F10: 32 34 3A 55 31 B2 32 30 39 3A 55 32 B2 32 31 30 |24:U1.209:U2.210|
00000F20: 3A 55 33 B2 32 31 31 3A 55 34 B2 32 31 34 3A 55 |:U3.211:U4.214:U|
00000F30: 43 B2 32 30 34 3A 55 55 B2 32 30 34 38 00 7C 17 |C.204:UU.2048.|.|
00000F40: 88 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 54 |....(50003).0.UT|
00000F50: B2 35 33 32 37 32 3A 55 55 25 B2 32 31 3A 55 4C |.53272:UU%.21:UL|
00000F60: 25 B2 32 33 3A 55 50 25 B2 32 31 33 39 3A 55 4D |%.23:UP%.2139:UM|
00000F70: B2 31 30 32 34 3A 55 4F B2 31 39 38 00 A0 17 89 |.1024:UO.198....|
00000F80: 03 55 44 24 B2 22 13 11 11 11 11 11 11 11 11 11 |.UD$."..........|
00000F90: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."|
00000FA0: 00 D2 17 8A 03 55 50 24 B2 22 20 20 20 20 20 20 |.....UP$." |
00000FB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FD0: 20 22 00 20 18 8B 03 55 54 24 B2 22 20 C1 D2 D2 | ". ...UT$." ...|
00000FE0: CF D7 20 20 20 20 20 20 20 20 20 A0 A0 A0 A0 22 |.. ...."|
00000FF0: 3A 8F 20 50 4C 41 43 45 20 50 52 4F 47 52 41 4D |:. PLACE PROGRAM|
00001000: 20 54 49 54 4C 45 20 48 45 52 45 20 21 21 21 21 | TITLE HERE !!!!|
00001010: 21 21 21 21 21 21 21 21 21 21 21 21 21 2A 2A 2A |!!!!!!!!!!!!!***|
00001020: 00 26 18 8C 03 8E 00 40 18 8E 03 8F 20 2A 2A 20 |.&.....@.... ** |
00001030: 53 45 54 20 56 41 52 49 41 42 4C 45 53 20 2A 2A |SET VARIABLES **|
00001040: 00 49 18 93 03 8D 39 30 30 00 60 18 94 03 86 50 |.I....900.`....P|
00001050: 28 38 30 29 2C 44 28 33 29 2C 53 41 28 31 33 29 |(80),D(3),SA(13)|
00001060: 00 7B 18 98 03 8F 20 2A 2A 20 43 48 45 43 4B 20 |.{.... ** CHECK |
00001070: 46 4F 52 20 38 30 33 32 20 2A 2A 00 99 18 9D 03 |FOR 8032 **.....|
00001080: 99 22 93 22 3A 99 22 A0 22 3A 8F 20 53 48 49 46 |.".":.".":. SHIF|
00001090: 54 45 44 20 53 50 41 43 45 00 B0 18 A2 03 8B C2 |TED SPACE.......|
000010A0: 28 55 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 30 |(UB.40)..96..700|
000010B0: 00 C9 18 A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 |...... ** MEMORY|
000010C0: 20 43 48 45 43 4B 20 2A 2A 00 DD 18 A4 03 8B 20 | CHECK **...... |
000010D0: B8 28 30 29 B1 32 30 30 30 A7 39 33 37 00 0B 19 |.(0).2000.937...|
000010E0: A5 03 99 22 93 11 11 05 54 48 49 53 20 4D 41 43 |..."....THIS MAC|
000010F0: 48 49 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 |HINE DOES NOT HA|
00001100: 56 45 20 45 4E 4F 55 47 48 11 22 00 2F 19 A6 03 |VE ENOUGH."./...|
00001110: 99 22 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 |."MEMORY TO RUN |
00001120: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 21 22 00 |THIS PROGRAM !".|
00001130: 3A 19 A7 03 9E 55 55 AA 37 31 00 40 19 A8 03 80 |:....UU.71.@....|
00001140: 00 5A 19 A9 03 99 22 93 05 22 3A 8B C2 28 35 30 |.Z...."..":..(50|
00001150: 30 30 33 29 B2 30 A7 39 36 32 00 89 19 AC 03 8F |003).0.962......|
00001160: 20 2A 2A 20 42 41 53 49 43 20 32 2E 30 20 20 4F | ** BASIC 2.0 O|
00001170: 52 20 20 34 2E 30 20 20 4F 52 20 20 43 2D 36 34 |R 4.0 OR C-64|
00001180: 20 53 45 54 55 50 20 2A 2A 00 C7 19 AD 03 97 31 | SETUP **......1|
00001190: 30 37 35 2C 31 33 33 3A 97 31 30 37 36 2C 31 34 |075,133:.1076,14|
000011A0: 34 3A 97 31 30 37 37 2C 32 33 34 3A 97 31 30 37 |4:.1077,234:.107|
000011B0: 39 2C 34 3A 97 31 30 38 30 2C 31 33 33 3A 97 31 |9,4:.1080,133:.1|
000011C0: 30 38 31 2C 31 34 35 00 FD 19 AE 03 97 31 30 39 |081,145......109|
000011D0: 31 2C 31 35 35 3A 97 31 30 39 38 2C 31 33 33 3A |1,155:.1098,133:|
000011E0: 97 31 30 39 39 2C 31 34 34 3A 97 31 31 30 30 2C |.1099,144:.1100,|
000011F0: 32 33 34 3A 97 31 31 30 33 2C 31 33 33 00 1F 1A |234:.1103,133...|
00001200: AF 03 97 31 31 30 34 2C 31 34 35 3A 97 31 31 30 |...1104,145:.110|
00001210: 35 2C 32 33 34 3A 97 31 30 38 32 2C 32 33 34 00 |5,234:.1082,234.|
00001220: 36 1A B1 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 |6.....(50003)..1|
00001230: 36 30 A7 39 35 35 00 65 1A B6 03 97 31 30 39 33 |60.955.e....1093|
00001240: 2C 38 38 3A 97 31 30 39 34 2C 32 32 38 3A 97 31 |,88:.1094,228:.1|
00001250: 30 39 37 2C 38 35 3A 97 31 31 30 32 2C 32 32 38 |097,85:.1102,228|
00001260: 3A 89 39 36 35 00 7A 1A BB 03 8B C2 28 35 30 30 |:.965.z.....(500|
00001270: 30 33 29 B3 B1 31 A7 39 39 30 00 A9 1A C0 03 97 |03)..1.990......|
00001280: 31 30 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 33 |1093,49:.1094,23|
00001290: 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 30 32 |0:.1097,46:.1102|
000012A0: 2C 32 33 30 3A 89 39 36 35 00 E3 1A C2 03 97 32 |,230:.965......2|
000012B0: 30 39 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 30 |099,141:.2100,20|
000012C0: 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 33 2C 38 |:.2101,3:.2103,8|
000012D0: 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 31 30 35 |:.2104,141:.2105|
000012E0: 2C 32 31 00 1F 1B C3 03 97 32 31 30 36 2C 33 3A |,21......2106,3:|
000012F0: 97 32 31 31 35 2C 31 34 35 3A 97 32 31 31 37 2C |.2115,145:.2117,|
00001300: 35 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 31 |52:.2118,234:.21|
00001310: 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 00 |21,49:.2122,141.|
00001320: 59 1B C4 03 97 32 31 32 33 2C 32 30 3A 97 32 31 |Y....2123,20:.21|
00001330: 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A 97 |24,3:.2126,234:.|
00001340: 32 31 32 37 2C 31 34 31 3A 97 32 31 32 38 2C 32 |2127,141:.2128,2|
00001350: 31 3A 97 32 31 32 39 2C 33 00 77 1B C5 03 9E 55 |1:.2129,3.w....U|
00001360: 55 AA 34 38 3A 8F 20 44 49 53 41 42 4C 45 20 53 |U.48:. DISABLE S|
00001370: 54 4F 50 20 4B 45 59 00 88 1B CA 03 8D 38 30 30 |TOP KEY......800|
00001380: 3A 8F 20 54 49 54 4C 45 00 98 1B D4 03 89 33 30 |:. TITLE......30|
00001390: 30 3A 8F 20 4D 45 4E 55 00 C9 1B DE 03 99 22 93 |0:. MENU......".|
000013A0: 54 48 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 |THE PGM WILL NOT|
000013B0: 20 57 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D 41 | WORK ON THIS MA|
000013C0: 43 48 49 4E 45 21 22 3A 80 00 FE 1B E8 03 8B 55 |CHINE!":.......U|
000013D0: 5A B2 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A |Z.1..UP%:.UP%:UZ|
000013E0: B2 30 3A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 |.0:. ** PROGRAM |
000013F0: 53 54 41 52 54 53 20 48 45 52 45 20 2A 2A 00 2A |STARTS HERE **.*|
00001400: 1C E9 03 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 |...."..";:.:..(5|
00001410: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 |0003).0..53281,6|
00001420: 3A 97 35 33 32 38 30 2C 31 34 00 40 1C FC 03 50 |:.53280,14.@...P|
00001430: 47 24 B2 22 41 52 52 4F 57 22 3A 8D 32 33 38 30 |G$."ARROW":.2380|
00001440: 00 66 1C 10 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.f....**********|
00001450: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001460: 2A 2A 2A 2A 2A 2A 00 8C 1C 24 04 8F 2A 20 20 20 |******...$..* |
00001470: 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 53 20 4D | MODIFICATIONS M|
00001480: 41 44 45 20 42 59 20 20 20 20 20 2A 00 B2 1C 38 |ADE BY *...8|
00001490: 04 8F 2A 20 20 20 43 41 52 59 20 4C 45 57 49 53 |..* CARY LEWIS|
000014A0: 20 41 4E 44 20 48 49 4E 20 4A 41 4E 47 20 20 20 | AND HIN JANG |
000014B0: 20 2A 00 D8 1C 4C 04 8F 2A 2A 2A 2A 2A 2A 2A 2A | *...L..********|
000014C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000014D0: 2A 2A 2A 2A 2A 2A 2A 2A 00 FE 1C 60 04 99 22 93 |********...`..".|
000014E0: 11 12 20 41 52 52 4F 57 20 92 20 20 20 20 4A 49 |.. ARROW . JI|
000014F0: 4D 20 42 55 54 54 45 52 46 49 45 4C 44 22 00 1B |M BUTTERFIELD"..|
00001500: 1D 74 04 99 22 11 49 4E 53 54 52 55 43 54 49 4F |.t..".INSTRUCTIO|
00001510: 4E 53 20 28 59 2F 4E 29 20 3F 22 00 25 1D B0 04 |NS (Y/N) ?".%...|
00001520: 89 31 31 36 30 00 57 1D C4 04 99 22 11 11 20 D5 |.1160.W....".. .|
00001530: 53 45 20 54 48 45 20 4A 4F 59 53 54 49 43 4B 20 |SE THE JOYSTICK |
00001540: 49 4E 20 50 4F 52 54 20 32 20 54 4F 20 47 55 49 |IN PORT 2 TO GUI|
00001550: 44 45 20 54 48 45 22 00 6D 1D EC 04 99 22 20 4D |DE THE".m...." M|
00001560: 4F 56 49 4E 47 20 53 4E 41 4B 45 2E 22 00 73 1D |OVING SNAKE.".s.|
00001570: 00 05 99 00 A3 1D 28 05 99 22 11 20 D9 4F 55 20 |......(..". .OU |
00001580: 53 43 4F 52 45 20 50 4F 49 4E 54 53 20 42 59 20 |SCORE POINTS BY |
00001590: 48 49 54 54 49 4E 47 20 54 48 45 20 42 4F 58 45 |HITTING THE BOXE|
000015A0: 53 2E 22 00 A9 1D 32 05 99 00 CA 1D 3C 05 99 22 |S."...2.....<.."|
000015B0: 11 20 C4 4F 4E 27 54 20 48 49 54 20 54 48 45 20 |. .ON'T HIT THE |
000015C0: 42 4F 55 4E 44 41 52 59 2E 22 00 E7 1D 50 05 99 |BOUNDARY."...P..|
000015D0: 22 11 20 C4 4F 4E 27 54 20 48 49 54 20 59 4F 55 |". .ON'T HIT YOU|
000015E0: 52 53 45 4C 46 2E 22 00 15 1E 64 05 99 22 11 11 |RSELF."...d.."..|
000015F0: 11 20 D9 4F 55 52 20 54 55 52 4E 20 43 41 4E 20 |. .OUR TURN CAN |
00001600: 4C 41 53 54 20 46 4F 52 20 36 30 20 53 45 43 4F |LAST FOR 60 SECO|
00001610: 4E 44 53 2E 22 00 1B 1E 78 05 8E 00 43 1E B4 05 |NDS."...x...C...|
00001620: 53 B2 30 3A 44 28 30 29 B2 32 32 3A 44 28 31 29 |S.0:D(0).22:D(1)|
00001630: B2 36 30 3A 44 28 32 29 B2 36 32 3A 44 28 33 29 |.60:D(2).62:D(3)|
00001640: B2 33 30 00 5D 1E C8 05 54 39 B2 55 4D 3A 54 36 |.30.]...T9.UM:T6|
00001650: B2 33 35 39 39 3A 97 55 54 2C 55 55 25 00 7C 1E |.3599:.UT,UU%.|.|
00001660: DC 05 4D 31 B2 35 39 34 36 37 3A 4D 32 B2 35 39 |..M1.59467:M2.59|
00001670: 34 36 36 3A 4D 33 B2 35 39 34 36 34 00 98 1E F0 |466:M3.59464....|
00001680: 05 97 35 33 32 38 31 2C 31 3A 99 22 93 22 3B 3A |..53281,1:.".";:|
00001690: 97 35 33 32 38 31 2C 39 00 C6 1E F1 05 99 22 20 |.53281,9......" |
000016A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000016B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 53 43 4F | SCO|
000016C0: 52 45 3A 20 30 22 00 EC 1E 04 06 81 4A B2 55 4D |RE: 0"......J.UM|
000016D0: AA 34 30 A4 55 4D AA 37 39 3A 97 4A 2C 38 31 3A |.40.UM.79:.J,81:|
000016E0: 97 4A AA 39 32 30 2C 38 31 3A 82 4A 00 14 1F 18 |.J.920,81:.J....|
000016F0: 06 81 4A B2 55 4D AA 38 30 A4 55 4D AA 39 36 30 |..J.UM.80.UM.960|
00001700: A9 34 30 3A 97 4A 2C 38 31 3A 97 4A AA 33 39 2C |.40:.J,81:.J.39,|
00001710: 38 31 3A 82 00 38 1F 2C 06 56 B2 32 30 3A 48 B2 |81:..8.,.V.20:H.|
00001720: 33 35 3A 56 31 B2 30 3A 48 31 B2 AB 31 3A 50 32 |35:V1.0:H1..1:P2|
00001730: B2 31 30 3A 44 31 B2 31 00 49 1F 40 06 54 49 24 |.10:D1.1.I.@.TI$|
00001740: B2 22 30 30 30 30 30 30 22 00 65 1F 54 06 8B 36 |."000000".e.T..6|
00001750: 30 AB C5 28 C9 28 54 49 24 2C 32 29 29 B1 31 30 |0..(.(TI$,2)).10|
00001760: A7 31 36 38 30 00 A2 1F 68 06 99 22 13 53 45 43 |.1680...h..".SEC|
00001770: 4F 4E 44 53 20 4C 45 46 54 20 54 4F 20 50 4C 41 |ONDS LEFT TO PLA|
00001780: 59 22 3B 36 30 AB C5 28 C9 28 54 49 24 2C 32 29 |Y";60..(.(TI$,2)|
00001790: 29 3B 22 9D 20 22 3A 8B 54 49 B1 54 36 89 32 32 |);". ":.TI.T6.22|
000017A0: 36 30 00 AC 1F 7C 06 89 31 37 30 30 00 E4 1F 90 |60...|..1700....|
000017B0: 06 99 22 13 53 45 43 4F 4E 44 53 20 4C 45 46 54 |..".SECONDS LEFT|
000017C0: 20 54 4F 20 50 4C 41 59 22 3B 36 30 AB C5 28 C9 | TO PLAY";60..(.|
000017D0: 28 54 49 24 2C 32 29 29 3A 8B 54 49 B1 54 36 89 |(TI$,2)):.TI.T6.|
000017E0: 32 32 36 30 00 FF 1F A4 06 8F 47 45 54 5A 24 3A |2260......GETZ$:|
000017F0: 49 46 5A 24 3D 22 22 47 4F 54 4F 31 37 36 30 00 |IFZ$=""GOTO1760.|
00001800: 0A 20 A9 06 8D 20 32 35 30 30 00 15 20 AB 06 89 |. ... 2500.. ...|
00001810: 20 31 37 34 30 00 3B 20 AE 06 8B 5A 24 B2 22 48 | 1740.; ...Z$."H|
00001820: 22 A7 46 4C B2 31 3A 53 54 24 B2 54 49 24 3A 8D |".FL.1:ST$.TI$:.|
00001830: 31 39 35 3A 54 49 24 B2 53 54 24 00 64 20 B8 06 |195:TI$.ST$.d ..|
00001840: 5A B2 28 C6 28 5A 24 29 AB 35 30 29 AD 32 3A 8B |Z.(.(Z$).50).2:.|
00001850: 5A B3 B1 B5 28 5A 29 B0 5A B3 30 B0 5A B1 33 89 |Z...(Z).Z.0.Z.3.|
00001860: 31 37 36 30 00 90 20 CC 06 44 31 B2 5A 3A 44 B2 |1760.. ..D1.Z:D.|
00001870: 5A AB 31 2E 35 3A 56 31 B2 B5 28 B6 28 44 29 29 |Z.1.5:V1..(.(D))|
00001880: AC B4 28 44 29 3A 48 31 B2 B4 28 44 29 AB 56 31 |..(D):H1..(D).V1|
00001890: 00 AA 20 E0 06 56 B2 56 AB 56 31 3A 48 B2 48 AA |.. ..V.V.V1:H.H.|
000018A0: 48 31 3A 20 8D 20 32 37 30 30 00 BA 20 F4 06 50 |H1: . 2700.. ..P|
000018B0: B2 55 4D AA 56 AC 34 30 AA 48 00 E1 20 08 07 50 |.UM.V.40.H.. ..P|
000018C0: 39 B2 C2 28 50 29 3A 97 4D 31 2C 31 36 3A 97 4D |9..(P):.M1,16:.M|
000018D0: 33 2C 32 39 AC 44 31 AA 38 30 3A 97 4D 32 2C 31 |3,29.D1.80:.M2,1|
000018E0: 35 00 FF 20 1C 07 52 36 B2 52 37 3A 52 37 B2 52 |5.. ..R6.R7:R7.R|
000018F0: 37 AA 31 3A 8B 52 37 B1 50 32 A7 52 37 B2 30 00 |7.1:.R7.P2.R7.0.|
00001900: 28 21 30 07 50 31 B2 50 28 52 37 29 3A 50 28 52 |(!0.P1.P(R7):P(R|
00001910: 37 29 B2 50 3A 97 4D 31 2C 30 3A 8B 50 31 B3 B1 |7).P:.M1,0:.P1..|
00001920: 30 A7 97 50 31 2C 33 32 00 4C 21 44 07 97 50 2C |0..P1,32.L!D..P,|
00001930: 44 28 44 31 29 3A 50 31 B2 50 28 52 36 29 3A 8B |D(D1):P1.P(R6):.|
00001940: 50 31 B3 B1 30 A7 97 50 31 2C 38 31 00 5E 21 58 |P1..0..P1,81.^!X|
00001950: 07 8B 50 39 B3 B1 33 32 89 32 31 30 30 04 00 71 |..P9..32.2100..q|
00001960: 21 6C 07 8B BB 28 31 29 B1 2E 30 35 89 31 36 34 |!l...(1)..05.164|
00001970: 30 00 B2 21 80 07 81 56 33 B2 56 32 AB 31 A4 56 |0..!...V3.V2.1.V|
00001980: 32 AA 31 3A 50 33 B2 56 33 AC 34 30 AA 54 39 3A |2.1:P3.V3.40.T9:|
00001990: 81 48 33 B2 48 32 AB 31 A4 48 32 AA 31 3A 8B C2 |.H3.H2.1.H2.1:..|
000019A0: 28 50 33 AA 48 33 29 B3 B1 31 30 32 89 31 39 36 |(P3.H3)..102.196|
000019B0: 30 04 00 C0 21 94 07 97 50 33 AA 48 33 2C 33 32 |0...!...P3.H3,32|
000019C0: 00 D6 21 A8 07 82 48 33 2C 56 33 3A 54 B2 30 3A |..!...H3,V3:T.0:|
000019D0: 97 50 38 2C 33 32 00 FA 21 BC 07 56 32 B2 B5 28 |.P8,32..!..V2..(|
000019E0: BB 28 31 29 AC 32 30 29 AA 33 3A 48 32 B2 B5 28 |.(1).20).3:H2..(|
000019F0: BB 28 31 29 AC 33 36 29 AA 32 00 3A 22 D0 07 81 |.(1).36).2.:"...|
00001A00: 56 33 B2 56 32 AB 31 A4 56 32 AA 31 3A 50 33 B2 |V3.V2.1.V2.1:P3.|
00001A10: 56 33 AC 34 30 AA 54 39 3A 81 48 33 B2 48 32 AB |V3.40.T9:.H3.H2.|
00001A20: 31 A4 48 32 AA 31 3A 8B C2 28 50 33 AA 48 33 29 |1.H2.1:..(P3.H3)|
00001A30: B3 B1 33 32 89 31 39 38 30 04 00 6D 22 E4 07 82 |..32.1980..m"...|
00001A40: 48 33 2C 56 33 3A 81 56 33 B2 56 32 AB 31 A4 56 |H3,V3:.V3.V2.1.V|
00001A50: 32 AA 31 3A 50 33 B2 56 33 AC 34 30 AA 54 39 3A |2.1:P3.V3.40.T9:|
00001A60: 81 48 33 B2 48 32 AB 31 A4 48 32 AA 31 00 86 22 |.H3.H2.1.H2.1.."|
00001A70: F8 07 97 4D 31 2C 31 36 3A 97 4D 32 2C 31 35 3A |...M1,16:.M2,15:|
00001A80: 97 4D 33 2C 33 30 00 9B 22 0C 08 97 50 33 AA 48 |.M3,30.."...P3.H|
00001A90: 33 2C 31 30 32 3A 97 4D 31 2C 30 00 CD 22 20 08 |3,102:.M1,0.." .|
00001AA0: 82 48 33 2C 56 33 3A 54 B2 39 AC BB 28 31 29 3A |.H3,V3:T.9..(1):|
00001AB0: 50 38 B2 56 32 AC 34 30 AA 48 32 AA 54 39 3A 97 |P8.V2.40.H2.T9:.|
00001AC0: 50 38 2C 34 39 AA 54 3A 89 31 36 34 30 00 E0 22 |P8,49.T:.1640.."|
00001AD0: 34 08 8B 50 39 B3 B1 31 30 32 89 32 32 32 30 04 |4..P9..102.2220.|
00001AE0: 00 EB 22 48 08 54 24 B2 54 49 24 00 19 23 5C 08 |.."H.T$.TI$..#\.|
00001AF0: 54 B2 54 AB 31 3A 53 B2 53 AA 31 3A 8D 20 32 36 |T.T.1:S.S.1:. 26|
00001B00: 30 30 3A 97 50 38 2C 54 AA 34 39 3A 97 4D 31 2C |00:.P8,T.49:.M1,|
00001B10: 31 36 3A 97 4D 32 2C 31 35 00 48 23 70 08 99 22 |16:.M2,15.H#p.."|
00001B20: 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001B30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001B40: 1D 1D 1D 1D 1D 22 3B 53 00 73 23 84 08 81 4A B2 |.....";S.s#...J.|
00001B50: 31 30 30 A4 33 30 A9 AB 31 3A 97 4D 33 2C 4A 3A |100.30..1:.M3,J:|
00001B60: 82 3A 97 4D 31 2C 30 3A 8B 54 B1 B2 30 89 32 31 |.:.M1,0:.T..0.21|
00001B70: 34 30 04 00 8D 23 98 08 50 32 B2 50 32 AA 31 3A |40...#..P2.P2.1:|
00001B80: 54 49 24 B2 54 24 3A 89 31 39 32 30 04 00 B3 23 |TI$.T$:.1920...#|
00001B90: AC 08 97 4D 31 2C 31 36 3A 97 4D 32 2C 31 35 3A |...M1,16:.M2,15:|
00001BA0: 97 4D 33 2C 32 30 30 3A 81 4A B2 31 A4 31 30 30 |.M3,200:.J.1.100|
00001BB0: 30 3A 82 00 BD 23 C0 08 97 4D 31 2C 30 00 DD 23 |0:...#...M1,0..#|
00001BC0: D4 08 99 22 13 53 45 43 4F 4E 44 53 20 4C 45 46 |...".SECONDS LEF|
00001BD0: 54 20 54 4F 20 50 4C 41 59 20 20 30 22 00 0A 24 |T TO PLAY 0"..$|
00001BE0: DE 08 99 22 13 11 11 11 11 11 11 11 1D 1D 20 20 |...".......... |
00001BF0: 20 20 20 20 20 20 20 20 47 20 41 20 4D 20 45 20 | G A M E |
00001C00: 20 20 4F 20 56 20 45 20 52 22 00 42 24 E8 08 99 | O V E R".B$...|
00001C10: 22 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 12 20 |".............. |
00001C20: 50 4C 41 59 20 41 4E 4F 54 48 45 52 20 47 41 4D |PLAY ANOTHER GAM|
00001C30: 45 20 28 59 2F 4E 29 20 3F 92 20 20 20 9D 9D 9D |E (Y/N) ?. ...|
00001C40: 22 3B 00 5F 24 FC 08 55 4C B2 31 3A 55 53 24 B2 |";._$..UL.1:US$.|
00001C50: 22 59 4E 22 3A 8D 33 35 3A 5A 24 B2 55 52 24 00 |"YN":.35:Z$.UR$.|
00001C60: 70 24 10 09 8B 5A 24 B2 22 59 22 A7 31 34 36 30 |p$...Z$."Y".1460|
00001C70: 00 76 24 24 09 8E 00 7C 24 88 09 8E 00 9D 24 C4 |.v$$...|$.....$.|
00001C80: 09 8F 20 20 20 2A 2A 2A 20 4A 4F 59 53 54 49 43 |.. *** JOYSTIC|
00001C90: 4B 20 52 4F 55 54 49 4E 45 20 2A 2A 2A 00 BE 24 |K ROUTINE ***..$|
00001CA0: C9 09 8F 20 20 20 2A 2A 2A 20 20 20 20 20 20 20 |... *** |
00001CB0: 20 42 59 20 20 20 20 20 20 20 20 2A 2A 2A 00 DF | BY ***..|
00001CC0: 24 CE 09 8F 20 20 20 2A 2A 2A 20 53 48 41 57 4E |$... *** SHAWN|
00001CD0: 20 57 48 45 41 54 43 52 4F 46 54 20 2A 2A 2A 00 | WHEATCROFT ***.|
00001CE0: E5 24 D3 09 3A 00 F3 24 D8 09 97 20 35 36 33 32 |.$..:..$... 5632|
00001CF0: 32 2C 30 00 03 25 DD 09 4A 56 B2 C2 28 35 36 33 |2,0..%..JV..(563|
00001D00: 32 30 29 00 11 25 E2 09 46 B2 4A 56 20 AF 20 31 |20)..%..F.JV . 1|
00001D10: 36 00 23 25 E7 09 4A 56 B2 31 35 AB 28 4A 56 AF |6.#%..JV.15.(JV.|
00001D20: 31 35 29 00 33 25 EC 09 97 20 35 36 33 32 32 2C |15).3%... 56322,|
00001D30: 32 35 35 00 44 25 F1 09 8B 20 4A 56 B2 32 20 A7 |255.D%... JV.2 .|
00001D40: 20 5A B2 30 00 55 25 F6 09 8B 20 4A 56 B2 34 20 | Z.0.U%... JV.4 |
00001D50: A7 20 5A B2 31 00 66 25 FB 09 8B 20 4A 56 B2 38 |. Z.1.f%... JV.8|
00001D60: 20 A7 20 5A B2 32 00 77 25 00 0A 8B 20 4A 56 B2 | . Z.2.w%... JV.|
00001D70: 31 20 A7 20 5A B2 33 00 7D 25 05 0A 8E 00 83 25 |1 . Z.3.}%.....%|
00001D80: 0A 0A 3A 00 A4 25 28 0A 8F 20 20 20 2A 2A 2A 20 |..:..%(.. *** |
00001D90: 20 53 4F 55 4E 44 20 20 52 4F 55 54 49 4E 45 20 | SOUND ROUTINE |
00001DA0: 20 2A 2A 2A 00 C5 25 2D 0A 8F 20 20 20 2A 2A 2A | ***..%-.. ***|
00001DB0: 20 20 20 20 20 20 20 20 42 59 20 20 20 20 20 20 | BY |
00001DC0: 20 20 2A 2A 2A 00 E6 25 32 0A 8F 20 20 20 2A 2A | ***..%2.. **|
00001DD0: 2A 20 53 48 41 57 4E 20 57 48 45 41 54 43 52 4F |* SHAWN WHEATCRO|
00001DE0: 46 54 20 2A 2A 2A 00 EC 25 37 0A 3A 00 FA 25 3C |FT ***..%7.:..%<|
00001DF0: 0A 53 49 44 B2 35 34 32 37 32 00 0A 26 41 0A 97 |.SID.54272..&A..|
00001E00: 20 53 49 44 AA 32 34 2C 31 35 00 1A 26 46 0A 97 | SID.24,15..&F..|
00001E10: 20 53 49 44 AA 31 2C 32 35 35 00 28 26 4B 0A 97 | SID.1,255.(&K..|
00001E20: 20 53 49 44 AA 35 2C 39 00 36 26 50 0A 97 20 53 | SID.5,9.6&P.. S|
00001E30: 49 44 AA 36 2C 39 00 45 26 55 0A 97 20 53 49 44 |ID.6,9.E&U.. SID|
00001E40: AA 34 2C 31 37 00 5B 26 5A 0A 81 20 4C 4F 4F 50 |.4,17.[&Z.. LOOP|
00001E50: B2 31 20 A4 20 35 30 20 3A 20 82 00 6A 26 5F 0A |.1 . 50 : ..j&_.|
00001E60: 97 20 53 49 44 AA 34 2C 31 36 00 70 26 64 0A 8E |. SID.4,16.p&d..|
00001E70: 00 76 26 69 0A 3A 00 95 26 8C 0A 8F 20 2A 2A 2A |.v&i.:..&... ***|
00001E80: 20 53 4F 55 4E 44 20 52 4F 55 54 49 4E 45 20 23 | SOUND ROUTINE #|
00001E90: 32 20 2A 2A 2A 00 9B 26 96 0A 3A 00 A9 26 A0 0A |2 ***..&..:..&..|
00001EA0: 53 49 44 B2 35 34 32 37 32 00 B9 26 AA 0A 97 20 |SID.54272..&... |
00001EB0: 53 49 44 AA 32 34 2C 31 35 00 C8 26 B4 0A 97 20 |SID.24,15..&... |
00001EC0: 53 49 44 AA 35 2C 31 30 00 DF 26 BE 0A 97 20 53 |SID.5,10..&... S|
00001ED0: 49 44 AA 31 2C BB 28 58 29 AC 33 32 AA 35 30 00 |ID.1,.(X).32.50.|
00001EE0: EE 26 C8 0A 97 20 53 49 44 AA 34 2C 33 32 00 FD |.&... SID.4,32..|
00001EF0: 26 D2 0A 97 20 53 49 44 AA 34 2C 33 33 00 15 27 |&... SID.4,33..'|
00001F00: DC 0A 81 20 4C 4F 4F 50 20 B2 20 31 20 A4 20 31 |... LOOP . 1 . 1|
00001F10: 30 20 3A 20 82 00 1B 27 E6 0A 8E 00 00 00 AF |0 : ...'....... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...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.999.A.R.UQ%(UQ.UB).B(U
Q):.:.".".T.W.UZ.1:UV%.B(UT).].X..300...
Y.UZ.0:US$.UJ$:UG$.UK$:UP.UJ:UL.UK:.B(50
003).0..53281,6:.53280,14.H...UT$.UL$:."
.";.UT,UV%:.UQ.UB.UB.999......UQ,UQ%(UQ.
UB):.......H(UD$,24);".
":.."....U1,U1%......
U2,U2%.:....U4,U4%.H....U3,U3%.1.R....:.
35.....UD%.((U2%.256.U1%.U3%).UB).40:.H(
UD$,UD%.1):.......H(UD$,24);".
. HELP COMING . ":......U1%.
B(U1):U2%.B(U2):U3%.B(U3):U4%.B(U4).....
UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL.....
..*.,.. ** MENU **.0.-.:.H....53281,1:."
.":.UT,UU%:.B(50003).0..53281,9:.53280,9
.N./.:...1..". ARROW MENU OPTI
ONS"...6.." ..................
.M.:..".. UCI"...;.." .1.
START GAME "...<.." JCK"...?.."
.. UCI".=.@.." .2. GAME
INSTRUCTIONS".P.A.." JCK".E.N..".
. UCI"..O.." .3. QUIT".
..P.." JCK".A.T.."
"...Y.."..
PRESS A NUMBER KEY (1-3) ";...^.UL.1:US
$."123":.35:. INPUT ROUTINE...`.US$."".7
.C..E(UR$).1460,400,396.@.H..300.G.... *
* RE-ENABLE STOP KEY AND END **......B(5
0003)..1.B(50003)..160.B(50003)..0.399..
....UU.71:.B(50003).0..53281,6:.53280,14
.L...."..":..W....875:....... ** STUDENT
INSTRUCTIONS **.'....".":.UT,UL%:.B(500
03).0..53281,0:.53280,0.M...UH.1:UP.0:UG
$."STUDENT INST":.850.\....1220:.835.P..
..UZ.1..UP%:.217.V.......X.. ** PROGRAM
MODIFICATION INST **.......G.... ** TO U
SE 8032 LOAD CBM4032 **...F..".....BEFOR
E RUNNING THIS PROGRAM ON AN 8032 ...3.
P.." LOAD THE 'CBM 4032' PROGRAM...
..........".>.Z..UU.71.D.....D. .. ** T
I T L E P A G E **...".."....";:.UT,UU
%:.B(50003).0..53280,14:.53281,1...$..I.
1.38:."....";:..G.&..I.1.22:.".....";:..
..(..I.1.37:.".....";:....*..I.1.22:."..
...";:....,.."..........................
. ..>...."................... . . ...A
.0.."................... . .......2.."
.................... ....4.."..........
....C O M M O D O R E...G.6.."..........
..... 6 4.."...8.."......... PLAY TH
E GAME OF . ARROW..'.:..H(UD$,23);".....
..............................".C.;..H(U
D$,24);"....... PRESS SPACE BAR TO CONTI
NUE ..":I.0..<..A$:.A$.." ".I.I.1:.828.
..>.T1$."":T2$."":T3$."":T4$."":I.0...@.
.300.H.C.. ** SPACE BAR PRESS **...H..UO
,0:.H(UD$,24);".......PRESS SPACE BAR TO
CONTINUE."...L..UI$:.UI$.." ".844. .N..
.@.R.. ** PAGE DESIGN ROUTINE **.L.T.UP.
UP.1.V.W.."."H(UT$.UP$,21);I(UP$.UG$.D(U
P),18)...\.." --------------------------
------------"...`..UH..0.870...A..H(UD$,
24);H(UP$,7);"HELP - PRESS H <RETURN>"
...F.UH.0:."..":....K.. ** PLEASE WAIT R
EMARK **.N.P..H(UD$,24);" ONE
MOMENT PLEASE... ".T.U...Q.... ** SE
T UP VARIABLES **.....UX$."H":.UQ%(1000)
:UB.32768:U1.196:U2.197:U3.198:U4.216:UC
.167:UU.1024.....UT.59468:UU%.12:UL%.14:
UP%.1146:UM.32768:UO.158:. 50003,0.=....
B(50003).0.UB.1024:U1.209:U2.210:U3.211:
U4.214:UC.204:UU.2048.|....B(50003).0.UT
.53272:UU%.21:UL%.23:UP%.2139:UM.1024:UO
.198. ...UD$."........................."
.R...UP$."
". ...UT$." ARROW "
:. PLACE PROGRAM TITLE HERE !!!!!!!!!!!!
!!!!!***.&.....@.... ** SET VARIABLES **
.I....900.`....P(80),D(3),SA(13).{.... *
* CHECK FOR 8032 **......".":." ":. SHIF
TED SPACE......B(UB.40)..96..700.I.... *
* MEMORY CHECK **...... .(0).2000.937...
..."....THIS MACHINE DOES NOT HAVE ENOUG
H."./...."MEMORY TO RUN THIS PROGRAM !".
:....UU.71.@.....Z...."..":.B(50003).0.9
62...... ** BASIC 2.0 OR 4.0 OR C-64
SETUP **.G....1075,133:.1076,144:.1077,
234:.1079,4:.1080,133:.1081,145......109
1,155:.1098,133:.1099,144:.1100,234:.110
3,133......1104,145:.1105,234:.1082,234.
6....B(50003)..160.955.E....1093,88:.109
4,228:.1097,85:.1102,228:.965.Z....B(500
03)..1.990......1093,49:.1094,230:.1097,
46:.1102,230:.965...B..2099,141:.2100,20
:.2101,3:.2103,8:.2104,141:.2105,21...C.
.2106,3:.2115,145:.2117,52:.2118,234:.21
21,49:.2122,141.Y.D..2123,20:.2124,3:.21
26,234:.2127,141:.2128,21:.2129,3.W.E..U
U.48:. DISABLE STOP KEY...J..800:. TITLE
...T..300:. MENU.I....".THE PGM WILL NOT
WORK ON THIS MACHINE!":.......UZ.1..UP%
:.UP%:UZ.0:. ** PROGRAM STARTS HERE **.*
...."..";:.:.B(50003).0..53281,6:.53280,
14.@...PG$."ARROW":.2380.F....**********
**********************...$..* MODIFIC
ATIONS MADE BY *...8..* CARY LEWIS
AND HIN JANG *.X.L..****************
****************...`.."... ARROW . JI
M BUTTERFIELD"...T..".INSTRUCTIONS (Y/N)
?".%....1160.W.D..".. USE THE JOYSTICK
IN PORT 2 TO GUIDE THE".M...." MOVING SN
AKE.".S.......(..". YOU SCORE POINTS BY
HITTING THE BOXES."...2...J.<..". DON'T
HIT THE BOUNDARY."...P..". DON'T HIT YOU
RSELF."...D.."... YOUR TURN CAN LAST FOR
60 SECONDS."...X...C...S.0:D(0).22:D(1)
.60:D(2).62:D(3).30.].H.T9.UM:T6.3599:.U
T,UU%.|...M1.59467:M2.59466:M3.59464....
..53281,1:.".";:.53281,9.F...."
SCORE: 0"......J.UM
.40.UM.79:.J,81:.J.920,81:.J......J.UM.8
0.UM.960.40:.J,81:.J.39,81:..8.,.V.20:H.
35:V1.0:H1..1:P2.10:D1.1.I.@.TI$."000000
".E.T..60.E(I(TI$,2)).10.1680...H..".SEC
ONDS LEFT TO PLAY";60.E(I(TI$,2));". ":.
TI.T6.2260...|..1700......".SECONDS LEFT
TO PLAY";60.E(I(TI$,2)):.TI.T6.2260....
..GETZ$:IFZ$=""GOTO1760.. ... 2500.. ...
1740.; ...Z$."H".FL.1:ST$.TI$:.195:TI$.
ST$.D ..Z.(F(Z$).50).2:.Z...(Z).Z.0.Z.3.
1760.. L.D1.Z:D.Z.1.5:V1..(.(D))..(D):H1
..(D).V1.. ..V.V.V1:H.H.H1: . 2700.. ..P
.UM.V.40.H.. ..P9.B(P):.M1,16:.M3,29.D1.
80:.M2,15.. ..R6.R7:R7.R7.1:.R7.P2.R7.0.
(!0.P1.P(R7):P(R7).P:.M1,0:.P1..0..P1,32
.L!D..P,D(D1):P1.P(R6):.P1..0..P1,81.^!X
..P9..32.2100..Q!L...(1)..05.1640..!...V
3.V2.1.V2.1:P3.V3.40.T9:.H3.H2.1.H2.1:.B
(P3.H3)..102.1960...!...P3.H3,32.V!...H3
,V3:T.0:.P8,32..!..V2..(.(1).20).3:H2..(
.(1).36).2.:"P..V3.V2.1.V2.1:P3.V3.40.T9
:.H3.H2.1.H2.1:.B(P3.H3)..32.1980..M"...
H3,V3:.V3.V2.1.V2.1:P3.V3.40.T9:.H3.H2.1
.H2.1.."...M1,16:.M2,15:.M3,30.."...P3.H
3,102:.M1,0.M" ..H3,V3:T.9..(1):P8.V2.40
.H2.T9:.P8,49.T:.1640.."4..P9..102.2220.
.."H.T$.TI$..#\.T.T.1:S.S.1:. 2600:.P8,T
.49:.M1,16:.M2,15.H#P.."................
.....................";S.S#...J.100.30..
1:.M3,J:.:.M1,0:.T..0.2140...#..P2.P2.1:
TI$.T$:.1920...#...M1,16:.M2,15:.M3,200:
.J.1.1000:...#...M1,0..#T..".SECONDS LEF
T TO PLAY 0"..$..."..........
G A M E O V E R".B$..."..............
PLAY ANOTHER GAME (Y/N) ?. ...";._$..U
L.1:US$."YN":.35:Z$.UR$.P$...Z$."Y".1460
.V$$...|$.....$D.. *** JOYSTICK ROUTIN
E ***..$I.. *** BY ***..
$N.. *** SHAWN WHEATCROFT ***..$S.:..$
X.. 56322,0..%..JV.B(56320)..%..F.JV . 1
6.#%..JV.15.(JV.15).3%... 56322,255.D%..
. JV.2 . Z.0.U%... JV.4 . Z.1.F%... JV.8
. Z.2.W%... JV.1 . Z.3.}%.....%..:..%(.
. *** SOUND ROUTINE ***.E%-.. ***
BY ***..%2.. *** SHAWN
WHEATCROFT ***..%7.:..%<.SID.54272..&A..
SID.24,15..&F.. SID.1,255.(&K.. SID.5,9
.6&P.. SID.6,9.E&U.. SID.4,17.[&Z.. LOOP
.1 . 50 : ..J&_.. SID.4,16.P&D...V&I.:..
&... *** SOUND ROUTINE #2 ***..&..:..& .
SID.54272..&... SID.24,15.H&... SID.5,10
..&... SID.1,.(X).32.50..&H.. SID.4,32..
&R.. SID.4,33..'... LOOP . 1 . 10 : ...'
.......
> CLICK IMAGE PREVIEW FOR FULL MODAL