HANGMAN 1.C3
FILE INFORMATION
FILENAME(S): HANGMAN 1.C3
FILE TYPE(S): PRG
FILE SIZE: 13.1K
FIRST SEEN: 2025-10-19 22:35:46
APPEARS ON: 1 disk(s)
FILE HASH
299008b9cc5c194b587170260e9ecd9653c97672054a151e7a0fd5b640b7177a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| !! | HANGMAN 1.C3 | PRG | Radd Maxx | 20 | 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 55 52 24 B2 22 22 3A 55 49 24 B2 |...(.UR$."":UI$.|
00000100: 22 22 3A 97 55 4F 2C 30 00 18 09 2A 00 8B 55 4C |"":.UO,0...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 2B 09 2D 00 99 22 20 |.0.UL.80.+.-.." |
00000120: 20 9D 9D 22 3B 3A 97 55 43 2C 30 00 3F 09 32 00 | ..";:.UC,0.?.2.|
00000130: A1 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 00 |.UI$:.UI$."".50.|
00000140: 69 09 37 00 8B 55 49 24 B2 C7 28 31 33 29 AF C3 |i.7..UI$..(13)..|
00000150: 28 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 |(UR$)..1..UC,1:.|
00000160: 22 20 9D 22 3B 3A 89 38 35 00 7C 09 3C 00 8B 55 |" .";:.85.|.<..U|
00000170: 49 24 B2 C7 28 32 30 29 A7 31 30 35 00 90 09 3E |I$..(20).105...>|
00000180: 00 8B 20 C3 28 55 52 24 29 B2 B1 55 4C A7 35 30 |.. .(UR$)..UL.50|
00000190: 00 B5 09 41 00 8D 31 32 30 3A 8F 20 43 48 45 43 |...A..120:. CHEC|
000001A0: 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 |K FOR VALID CHAR|
000001B0: 41 43 54 45 52 00 C5 09 46 00 55 52 24 B2 55 52 |ACTER...F.UR$.UR|
000001C0: 24 AA 55 49 24 00 CF 09 4B 00 99 55 49 24 3B 00 |$.UI$...K..UI$;.|
000001D0: D7 09 50 00 89 35 30 00 FC 09 55 00 8F 20 2B 2B |..P..50...U.. ++|
000001E0: 2B 20 43 48 45 43 4B 20 46 4F 52 20 48 45 4C 50 |+ CHECK FOR HELP|
000001F0: 20 52 45 51 55 45 53 54 20 2B 2B 2B 00 24 0A 5A | REQUEST +++.$.Z|
00000200: 00 8B 55 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 |..UR$.UX$.195:. |
00000210: 45 58 49 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 |EXIT TO HELP ROU|
00000220: 54 49 4E 45 00 33 0A 5F 00 8B 55 46 B2 31 A7 8D |TINE.3._..UF.1..|
00000230: 32 34 30 00 40 0A 64 00 55 46 B2 30 3A 99 3A 8E |240.@.d.UF.0:.:.|
00000240: 00 59 0A 66 00 8F 20 2B 2B 20 43 48 45 43 4B 20 |.Y.f.. ++ CHECK |
00000250: 44 45 4C 45 54 45 20 2B 2B 00 6A 0A 69 00 8B C3 |DELETE ++.j.i...|
00000260: 28 55 52 24 29 B3 31 A7 35 30 00 82 0A 6E 00 55 |(UR$).1.50...n.U|
00000270: 52 24 B2 C8 28 55 52 24 2C C3 28 55 52 24 29 AB |R$..(UR$,.(UR$).|
00000280: 31 29 00 94 0A 73 00 99 22 9D 20 20 9D 9D 22 3B |1)...s..". ..";|
00000290: 3A 89 35 30 00 BB 0A 78 00 8F 20 2B 2B 20 43 48 |:.50...x.. ++ CH|
000002A0: 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 |ECK FOR VALID CH|
000002B0: 41 52 41 43 54 45 52 53 20 2B 2B 00 CD 0A 7D 00 |ARACTERS ++...}.|
000002C0: 8B C3 28 55 53 24 29 B2 30 A7 31 35 30 00 DE 0A |..(US$).0.150...|
000002D0: 82 00 81 55 53 B2 31 A4 C3 28 55 53 24 29 00 F5 |...US.1..(US$)..|
000002E0: 0A 87 00 8B 55 49 24 B2 CA 28 55 53 24 2C 55 53 |....UI$..(US$,US|
000002F0: 2C 31 29 A7 8E 00 FB 0A 8C 00 82 00 08 0B 91 00 |,1).............|
00000300: 55 49 24 B2 22 22 3A 8E 00 23 0B 96 00 8F 20 2A |UI$."":..#.... *|
00000310: 2A 20 53 54 41 4E 44 41 52 44 20 49 4E 50 55 54 |* STANDARD INPUT|
00000320: 20 2A 2A 00 34 0B 98 00 8B C6 28 55 49 24 29 B2 | **.4.....(UI$).|
00000330: 34 36 A7 8E 00 45 0B 9B 00 8B 55 49 24 B2 C7 28 |46...E....UI$..(|
00000340: 33 32 29 A7 8E 00 62 0B A0 00 8B C6 28 55 49 24 |32)...b.....(UI$|
00000350: 29 B3 34 38 B0 C6 28 55 49 24 29 B1 35 37 A7 31 |).48..(UI$).57.1|
00000360: 37 30 00 68 0B A5 00 8E 00 85 0B AA 00 8B C6 28 |70.h...........(|
00000370: 55 49 24 29 B3 36 35 B0 C6 28 55 49 24 29 B1 39 |UI$).65..(UI$).9|
00000380: 30 A7 31 38 30 00 8B 0B AF 00 8E 00 AF 0B B4 00 |0.180...........|
00000390: 8B C6 28 55 49 24 29 B3 31 39 33 B0 C6 28 55 49 |..(UI$).193..(UI|
000003A0: 24 29 B1 32 31 38 A7 55 49 24 B2 22 22 3A 8E 00 |$).218.UI$."":..|
000003B0: D2 0B B9 00 8B C2 28 55 54 29 B2 55 55 25 A7 55 |......(UT).UU%.U|
000003C0: 49 24 B2 C7 28 C6 28 55 49 24 29 AB 31 32 38 29 |I$..(.(UI$).128)|
000003D0: 3A 8E 00 D8 0B BB 00 8E 00 E5 0B BE 00 55 49 24 |:............UI$|
000003E0: B2 22 22 3A 8E 00 0A 0C C3 00 55 46 B2 31 3A 8F |."":......UF.1:.|
000003F0: 20 2B 2B 2B 20 48 45 4C 50 20 52 4F 55 54 49 4E | +++ HELP ROUTIN|
00000400: 45 20 45 58 49 54 20 2B 2B 2B 00 13 0C C5 00 8D |E EXIT +++......|
00000410: 32 35 30 00 1C 0C C8 00 8D 32 34 35 00 3B 0C CD |250......245.;..|
00000420: 00 81 55 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 |..UQ.UB.(U2%.256|
00000430: AA 55 31 25 AA 55 33 25 AB 32 29 00 57 0C D2 00 |.U1%.U3%.2).W...|
00000440: 55 51 25 28 55 51 AB 55 42 29 B2 C2 28 55 51 29 |UQ%(UQ.UB)..(UQ)|
00000450: 3A 82 3A 99 22 93 22 00 6A 0C D7 00 55 5A B2 31 |:.:.".".j...UZ.1|
00000460: 3A 55 56 25 B2 C2 28 55 54 29 00 73 0C D8 00 89 |:UV%..(UT).s....|
00000470: 33 30 30 00 98 0C D9 00 55 5A B2 30 3A 55 53 24 |300.....UZ.0:US$|
00000480: B2 55 4A 24 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 |.UJ$:UG$.UK$:UP.|
00000490: 55 4A 3A 55 4C B2 55 4B 00 CF 0C DA 00 8B C2 28 |UJ:UL.UK.......(|
000004A0: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
000004B0: 31 3A 99 22 93 22 3B 3A 97 35 33 32 38 31 2C 36 |1:.".";:.53281,6|
000004C0: 3A 97 35 33 32 38 30 2C 31 34 3A 89 32 32 30 00 |:.53280,14:.220.|
000004D0: D9 0C DB 00 99 22 93 22 3B 00 08 0D DC 00 55 54 |.....".";.....UT|
000004E0: 24 B2 55 4C 24 3A 97 55 54 2C 55 56 25 3A 81 55 |$.UL$:.UT,UV%:.U|
000004F0: 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 |Q.UB.(U2%.256.U1|
00000500: 25 AA 55 33 25 AB 33 29 00 1D 0D E1 00 97 55 51 |%.U3%.3)......UQ|
00000510: 2C 55 51 25 28 55 51 AB 55 42 29 3A 82 00 29 0D |,UQ%(UQ.UB):..).|
00000520: E6 00 97 55 31 2C 55 31 25 00 35 0D E8 00 97 55 |...U1,U1%.5....U|
00000530: 32 2C 55 32 25 00 41 0D E9 00 97 55 34 2C 55 34 |2,U2%.A....U4,U4|
00000540: 25 00 4F 0D EA 00 97 55 33 2C 55 33 25 AB 31 00 |%.O....U3,U3%.1.|
00000550: 57 0D EB 00 89 33 35 00 89 0D F0 00 55 44 25 B2 |W....35.....UD%.|
00000560: 28 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 |((U2%.256.U1%.U3|
00000570: 25 29 AB 55 42 29 AD 34 30 3A 99 C8 28 55 44 24 |%).UB).40:..(UD$|
00000580: 2C 55 44 25 AA 31 29 3A 8E 00 C4 0D F5 00 99 C8 |,UD%.1):........|
00000590: 28 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 |(UD$,24);" |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 12 20 48 45 4C 50 20 43 4F 4D 49 4E 47 20 92 20 |. HELP COMING . |
000005C0: 20 22 3A 8E 00 F0 0D FA 00 55 31 25 B2 C2 28 55 | ":......U1%..(U|
000005D0: 31 29 3A 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 |1):U2%..(U2):U3%|
000005E0: B2 C2 28 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 |..(U3):U4%..(U4)|
000005F0: 00 18 0E FB 00 55 4A 24 B2 55 53 24 3A 55 4B 24 |.....UJ$.US$:UK$|
00000600: B2 55 47 24 3A 55 4C 24 B2 55 54 24 3A 55 4A B2 |.UG$:UL$.UT$:UJ.|
00000610: 55 50 3A 55 4B B2 55 4C 00 1E 0E FF 00 8E 00 2F |UP:UK.UL......./|
00000620: 0E 2C 01 8F 20 2A 2A 20 4D 45 4E 55 20 2A 2A 00 |.,.. ** MENU **.|
00000630: 35 0E 2D 01 3A 00 64 0E 2E 01 99 22 93 22 3A 97 |5.-.:.d....".":.|
00000640: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)|
00000650: B2 30 A7 97 35 33 32 38 31 2C 39 3A 97 35 33 32 |.0..53281,9:.532|
00000660: 38 30 2C 38 00 6A 0E 2F 01 3A 00 87 0E 31 01 99 |80,8.j./.:...1..|
00000670: 22 13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00000680: 20 20 4D 45 4E 55 22 00 B6 0E 36 01 99 22 20 2D | MENU"...6.." -|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006B0: 2D 2D 2D 2D 2D 22 00 DA 0E 3B 01 99 22 11 11 20 |-----"...;..".. |
000006C0: 20 20 20 20 20 20 31 2E 20 20 20 42 45 47 49 4E | 1. BEGIN|
000006D0: 20 48 41 4E 47 4D 41 4E 20 31 00 04 0F 40 01 99 | HANGMAN 1...@..|
000006E0: 22 11 11 20 20 20 20 20 20 20 32 2E 20 20 20 53 |".. 2. S|
000006F0: 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 |TUDENT INSTRUCTI|
00000700: 4F 4E 53 22 00 2E 0F 45 01 99 22 11 11 20 20 20 |ONS"...E..".. |
00000710: 20 20 20 20 33 2E 20 20 20 54 45 41 43 48 45 52 | 3. TEACHER|
00000720: 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 5B | INSTRUCTIONS".[|
00000730: 0F 4A 01 99 22 11 11 20 20 20 20 20 20 20 34 2E |.J..".. 4.|
00000740: 20 20 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 | MODIFICATION |
00000750: 4F 46 20 50 52 4F 47 52 41 4D 22 00 77 0F 4F 01 |OF PROGRAM".w.O.|
00000760: 99 22 11 11 20 20 20 20 20 20 20 35 2E 20 20 20 |.".. 5. |
00000770: 51 55 49 54 11 11 22 00 A6 0F 54 01 99 22 20 2D |QUIT.."...T.." -|
00000780: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000790: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000007A0: 2D 2D 2D 2D 2D 22 00 D1 0F 59 01 99 22 11 11 20 |-----"...Y..".. |
000007B0: 20 20 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 | PRESS A NU|
000007C0: 4D 42 45 52 20 4B 45 59 20 28 31 2D 35 29 20 22 |MBER KEY (1-5) "|
000007D0: 3B 00 FA 0F 5E 01 55 4C B2 31 3A 55 53 24 B2 22 |;...^.UL.1:US$."|
000007E0: 31 32 33 34 35 22 3A 8D 33 35 3A 8F 20 49 4E 50 |12345":.35:. INP|
000007F0: 55 54 20 52 4F 55 54 49 4E 45 00 05 10 60 01 55 |UT ROUTINE...`.U|
00000800: 53 24 B2 22 22 00 26 10 63 01 91 C5 28 55 52 24 |S$."".&.c...(UR$|
00000810: 29 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 36 |).1000,400,500,6|
00000820: 30 30 2C 33 39 36 00 2F 10 68 01 89 33 30 30 00 |00,396./.h..300.|
00000830: 56 10 8B 01 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 |V.... ** RE-ENAB|
00000840: 4C 45 20 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 |LE STOP KEY AND |
00000850: 45 4E 44 20 2A 2A 00 85 10 8C 01 8B C2 28 35 30 |END **.......(50|
00000860: 30 30 33 29 B3 B1 31 AF C2 28 35 30 30 30 33 29 |003)..1..(50003)|
00000870: B3 B1 31 36 30 AF C2 28 35 30 30 30 33 29 B3 B1 |..160..(50003)..|
00000880: 30 A7 33 39 39 00 AF 10 8D 01 9E 55 55 AA 37 31 |0.399......UU.71|
00000890: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53|
000008A0: 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 |281,6:.53280,14.|
000008B0: BB 10 8E 01 99 22 9A 93 22 3A 80 00 C6 10 8F 01 |....."..":......|
000008C0: 8D 38 37 35 3A 8E 00 E7 10 90 01 8F 20 2A 2A 20 |.875:....... ** |
000008D0: 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 |STUDENT INSTRUCT|
000008E0: 49 4F 4E 53 20 2A 2A 00 16 11 95 01 99 22 93 22 |IONS **......"."|
000008F0: 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 |:.UT,UL%:..(5000|
00000900: 33 29 B2 30 A7 97 35 33 32 38 31 2C 30 3A 97 35 |3).0..53281,0:.5|
00000910: 33 32 38 30 2C 30 00 37 11 9A 01 55 50 B2 30 3A |3280,0.7...UP.0:|
00000920: 55 47 24 B2 22 D3 54 55 44 45 4E 54 20 C9 4E 53 |UG$.".TUDENT .NS|
00000930: 54 22 3A 8D 38 35 30 00 66 11 9C 01 99 22 11 1D |T":.850.f...."..|
00000940: D9 4F 55 52 20 42 45 53 54 20 46 52 49 45 4E 44 |.OUR BEST FRIEND|
00000950: 20 48 41 53 20 42 45 45 4E 20 41 52 52 45 53 54 | HAS BEEN ARREST|
00000960: 45 44 20 41 4E 44 00 92 11 9E 01 99 22 11 1D 43 |ED AND......"..C|
00000970: 48 41 52 47 45 44 20 57 49 54 48 20 41 52 53 4F |HARGED WITH ARSO|
00000980: 4E 2C 20 54 52 45 41 53 4F 4E 2C 20 41 52 4D 45 |N, TREASON, ARME|
00000990: 44 22 00 BF 11 A0 01 99 22 11 1D 52 4F 42 42 45 |D"......"..ROBBE|
000009A0: 52 59 20 41 4E 44 20 50 55 42 4C 49 43 20 44 52 |RY AND PUBLIC DR|
000009B0: 55 4E 4B 45 4E 45 53 53 20 12 D0 CC D5 D3 92 00 |UNKENESS .......|
000009C0: E5 11 A2 01 99 22 11 1D 4D 55 52 44 45 52 2C 20 |....."..MURDER, |
000009D0: 4D 41 59 48 45 4D 2C 20 49 47 4E 4F 52 41 4E 43 |MAYHEM, IGNORANC|
000009E0: 45 20 41 4E 44 00 F7 11 A3 01 99 22 11 1D 55 47 |E AND......"..UG|
000009F0: 4C 49 4E 45 53 53 2E 00 26 12 A4 01 99 22 11 1D |LINESS..&...."..|
00000A00: C8 4F 57 45 56 45 52 2C 20 54 48 45 20 4A 55 44 |.OWEVER, THE JUD|
00000A10: 47 45 2C 20 42 45 49 4E 47 20 41 20 42 45 4E 45 |GE, BEING A BENE|
00000A20: 56 4F 4C 45 4E 54 00 56 12 A5 01 99 22 11 1D 53 |VOLENT.V...."..S|
00000A30: 4F 52 54 2C 20 57 49 4C 4C 20 4C 45 54 20 59 4F |ORT, WILL LET YO|
00000A40: 55 52 20 46 52 49 45 4E 44 20 50 4C 45 41 2D 42 |UR FRIEND PLEA-B|
00000A50: 41 52 47 41 49 4E 00 84 12 A6 01 99 22 1D 54 48 |ARGAIN......".TH|
00000A60: 45 20 43 48 41 52 47 45 53 20 44 4F 57 4E 20 54 |E CHARGES DOWN T|
00000A70: 4F 20 55 47 4C 49 4E 45 53 53 2C 20 50 52 4F 56 |O UGLINESS, PROV|
00000A80: 49 44 45 44 00 BB 12 A8 01 99 22 11 1D 48 45 2F |IDED......"..HE/|
00000A90: 53 48 45 20 48 41 53 20 4F 4E 45 20 46 52 49 45 |SHE HAS ONE FRIE|
00000AA0: 4E 44 2E 20 20 C7 D5 C5 D3 D3 A0 D7 C8 CF 3F 3F |ND. .........??|
00000AB0: 22 3A 8D 38 33 35 3A 8D 38 35 30 00 E8 12 AA 01 |":.835:.850.....|
00000AC0: 99 22 11 1D D4 4F 20 53 41 56 45 20 59 4F 55 52 |."...O SAVE YOUR|
00000AD0: 20 46 52 49 45 4E 44 27 53 20 4C 49 46 45 2C 20 | FRIEND'S LIFE, |
00000AE0: 59 4F 55 20 4D 55 53 54 00 14 13 AB 01 99 22 11 |YOU MUST......".|
00000AF0: 1D 47 55 45 53 53 20 54 48 45 20 53 45 43 52 45 |.GUESS THE SECRE|
00000B00: 54 20 57 4F 52 44 2F 57 4F 52 44 53 2E 20 20 C5 |T WORD/WORDS. .|
00000B10: 41 43 48 22 00 41 13 AC 01 99 22 11 1D 54 49 4D |ACH".A...."..TIM|
00000B20: 45 20 59 4F 55 20 47 55 45 53 53 20 41 20 C3 CF |E YOU GUESS A ..|
00000B30: D2 D2 C5 C3 D4 20 4C 45 54 54 45 52 2C 20 59 4F |..... LETTER, YO|
00000B40: 55 00 70 13 AD 01 99 22 11 1D 48 41 56 45 20 41 |U.p...."..HAVE A|
00000B50: 20 43 48 41 4E 43 45 20 54 4F 20 47 55 45 53 53 | CHANCE TO GUESS|
00000B60: 20 54 48 45 20 57 4F 52 44 2F 57 4F 52 44 53 2C | THE WORD/WORDS,|
00000B70: 00 9C 13 AE 01 99 22 11 1D 57 49 54 48 20 4E 4F |......"..WITH NO|
00000B80: 20 50 45 4E 41 4C 54 59 20 46 4F 52 20 41 20 57 | PENALTY FOR A W|
00000B90: 52 4F 4E 47 20 47 55 45 53 53 2E 22 00 CB 13 B2 |RONG GUESS."....|
00000BA0: 01 99 22 11 1D C2 55 54 20 C2 C5 D7 C1 D2 C5 21 |.."...UT ......!|
00000BB0: 21 21 21 20 20 C5 41 43 48 20 54 49 4D 45 20 59 |!!! .ACH TIME Y|
00000BC0: 4F 55 20 47 55 45 53 53 20 41 4E 00 FA 13 B4 01 |OU GUESS AN.....|
00000BD0: 99 22 11 1D C9 CE C3 CF D2 D2 C5 C3 D4 20 4C 45 |."........... LE|
00000BE0: 54 54 45 52 2C 20 59 4F 55 52 20 46 52 49 45 4E |TTER, YOUR FRIEN|
00000BF0: 44 20 41 44 56 41 4E 43 45 53 00 16 14 B5 01 99 |D ADVANCES......|
00000C00: 22 11 1D 4F 4E 45 20 53 54 45 50 20 43 4C 4F 53 |"..ONE STEP CLOS|
00000C10: 45 52 20 54 4F 22 00 34 14 B6 01 99 20 A3 31 30 |ER TO".4.... .10|
00000C20: 29 3B 22 11 21 21 21 21 20 20 C4 CF CF CD 20 20 |);".!!!! .... |
00000C30: 21 21 21 21 00 42 14 B8 01 8D 38 33 35 3A 8D 38 |!!!!.B....835:.8|
00000C40: 35 30 00 71 14 E0 01 99 22 11 11 1D CE 4F 54 45 |50.q...."....OTE|
00000C50: 3A 11 11 11 D4 4F 20 41 44 56 41 4E 43 45 20 46 |:....O ADVANCE F|
00000C60: 52 4F 4D 20 4F 4E 45 20 51 55 45 53 54 49 4F 4E |ROM ONE QUESTION|
00000C70: 22 00 9B 14 E2 01 99 22 11 1D 54 4F 20 54 48 45 |"......"..TO THE|
00000C80: 20 4E 45 58 54 20 50 52 45 53 53 20 54 48 45 20 | NEXT PRESS THE |
00000C90: D3 D0 C1 C3 C5 20 42 41 52 2E 22 00 A4 14 E8 01 |..... BAR.".....|
00000CA0: 8D 38 33 35 00 B8 14 EA 01 8B 55 5A B2 31 A7 9E |.835......UZ.1..|
00000CB0: 55 50 25 3A 89 32 31 37 00 BE 14 F3 01 8E 00 DF |UP%:.217........|
00000CC0: 14 F4 01 8F 20 2A 2A 20 54 45 41 43 48 45 52 20 |.... ** TEACHER |
00000CD0: 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 |INSTRUCTIONS **.|
00000CE0: 0F 15 F5 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 |.....".":.UT,UL%|
00000CF0: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53|
00000D00: 32 38 31 2C 32 3A 97 35 33 32 38 30 2C 31 30 00 |281,2:.53280,10.|
00000D10: 30 15 F6 01 55 50 B2 30 3A 55 47 24 B2 22 D4 45 |0...UP.0:UG$.".E|
00000D20: 41 43 48 45 52 20 C9 4E 53 54 22 3A 8D 38 35 30 |ACHER .NST":.850|
00000D30: 00 5E 15 F7 01 99 22 11 11 20 20 20 20 20 20 D4 |.^....".. .|
00000D40: 4F 20 54 48 45 20 42 45 53 54 20 4F 46 20 4F 55 |O THE BEST OF OU|
00000D50: 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 87 |R KNOWLEDGE,."..|
00000D60: 15 F8 01 99 22 20 20 20 54 48 49 53 20 50 52 4F |...." THIS PRO|
00000D70: 47 52 41 4D 20 49 53 20 49 4E 20 54 48 45 20 50 |GRAM IS IN THE P|
00000D80: 55 42 4C 49 43 11 22 00 B3 15 F9 01 99 22 20 20 |UBLIC."......" |
00000D90: 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 20 54 48 49 | DOMAIN. .F THI|
00000DA0: 53 20 49 53 20 4E 4F 54 20 54 48 45 20 43 41 53 |S IS NOT THE CAS|
00000DB0: 45 11 22 00 D0 15 FA 01 99 22 20 20 20 50 4C 45 |E."......" PLE|
00000DC0: 41 53 45 20 43 4F 4E 54 41 43 54 3A 11 11 11 22 |ASE CONTACT:..."|
00000DD0: 00 FA 15 FB 01 99 22 20 20 20 20 20 20 C3 4F 4D |......" .OM|
00000DE0: 4D 4F 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 20 |MODORE .USINESS |
00000DF0: CD 41 43 48 49 4E 45 53 11 22 00 1D 16 FC 01 99 |.ACHINES."......|
00000E00: 22 20 20 20 20 20 20 20 20 20 20 33 33 37 30 20 |" 3370 |
00000E10: D0 48 41 52 4D 41 43 59 20 C1 56 45 2E 00 41 16 |.HARMACY .VE..A.|
00000E20: FD 01 99 22 20 20 20 20 20 20 20 20 20 20 C1 47 |..." .G|
00000E30: 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 52 49 4F |INCOURT, .NTARIO|
00000E40: 22 00 63 16 FE 01 99 22 20 20 20 20 20 20 20 20 |".c...." |
00000E50: 20 20 C3 41 4E 41 44 41 20 20 20 CD 31 D7 20 32 | .ANADA .1. 2|
00000E60: CB 34 22 00 83 16 FF 01 99 22 20 20 20 20 20 20 |.4"......" |
00000E70: 20 20 20 20 28 34 31 36 29 20 34 39 39 2D 34 32 | (416) 499-42|
00000E80: 39 32 22 00 99 16 00 02 55 50 B2 31 3A 8D 20 38 |92".....UP.1:. 8|
00000E90: 33 35 3A 8D 20 38 35 30 3A 00 BF 16 01 02 99 22 |35:. 850:......"|
00000EA0: 20 20 20 20 20 11 11 D0 52 4F 47 52 41 4D 20 CE | ...ROGRAM .|
00000EB0: 41 4D 45 3A 20 C8 41 4E 47 4D 41 4E 20 31 11 00 |AME: .ANGMAN 1..|
00000EC0: E1 16 02 02 99 22 20 20 20 20 20 D7 52 49 54 54 |....." .RITT|
00000ED0: 45 4E 20 C2 59 20 20 3A 20 D5 4E 4B 4E 4F 57 4E |EN .Y : .NKNOWN|
00000EE0: 11 00 FC 16 03 02 99 22 20 20 20 20 20 D5 50 47 |......." .PG|
00000EF0: 52 41 44 45 44 20 C2 59 20 3A 20 11 00 27 17 04 |RADED .Y : ..'..|
00000F00: 02 99 22 20 20 20 20 20 11 D4 48 49 53 20 50 52 |.." ..HIS PR|
00000F10: 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E 20 4F |OGRAM WILL RUN O|
00000F20: 4E 20 41 4E 59 11 11 00 47 17 07 02 99 22 20 20 |N ANY...G...." |
00000F30: 20 20 20 20 20 20 20 D0 C5 D4 20 36 34 20 C3 CF | ... 64 ..|
00000F40: CD D0 D5 D4 C5 D2 11 00 6C 17 08 02 99 22 20 20 |........l...." |
00000F50: 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 C5 | .........|
00000F60: 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 75 17 44 | 64 .........u.D|
00000F70: 02 8D 38 33 35 00 89 17 4E 02 8B 55 5A B2 31 A7 |..835...N..UZ.1.|
00000F80: 9E 55 50 25 3A 89 32 31 37 00 8F 17 57 02 8E 00 |.UP%:.217...W...|
00000F90: B5 17 58 02 8F 20 2A 2A 20 50 52 4F 47 52 41 4D |..X.. ** PROGRAM|
00000FA0: 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 49 4E | MODIFICATION IN|
00000FB0: 53 54 20 2A 2A 00 C6 17 59 02 99 22 93 22 3A 97 |ST **...Y..".":.|
00000FC0: 55 54 2C 55 4C 25 00 E6 17 5D 02 55 50 B2 30 3A |UT,UL%...].UP.0:|
00000FD0: 55 47 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 |UG$.".ROGRAM .OD|
00000FE0: 22 3A 8D 38 35 30 00 13 18 62 02 99 22 11 1D C9 |":.850...b.."...|
00000FF0: 4E 20 4F 52 44 45 52 20 54 4F 20 43 48 41 4E 47 |N ORDER TO CHANG|
00001000: 45 20 54 48 45 20 57 4F 52 44 53 20 49 4E 20 54 |E THE WORDS IN T|
00001010: 48 45 22 00 3B 18 67 02 99 22 11 1D 43 41 54 41 |HE".;.g.."..CATA|
00001020: 47 4F 52 49 45 53 20 41 4C 52 45 41 44 59 20 55 |GORIES ALREADY U|
00001030: 53 45 44 20 49 4E 20 54 48 49 53 00 66 18 6C 02 |SED IN THIS.f.l.|
00001040: 99 22 11 1D 50 52 4F 47 52 41 4D 20 53 49 4D 50 |."..PROGRAM SIMP|
00001050: 4C 59 20 43 48 41 4E 47 45 20 54 48 45 20 44 41 |LY CHANGE THE DA|
00001060: 54 41 20 49 4E 22 00 81 18 71 02 99 22 11 1D 4C |TA IN"...q.."..L|
00001070: 49 4E 45 53 20 32 33 30 35 2D 32 34 30 30 2E 20 |INES 2305-2400. |
00001080: 22 00 AF 18 76 02 99 22 11 1D D4 4F 20 43 48 41 |"...v.."...O CHA|
00001090: 4E 47 45 20 54 48 45 20 43 41 54 41 47 4F 52 49 |NGE THE CATAGORI|
000010A0: 45 53 20 55 53 45 44 20 43 48 41 4E 47 45 22 00 |ES USED CHANGE".|
000010B0: C6 18 7B 02 99 22 11 1D 4C 49 4E 45 20 31 34 30 |..{.."..LINE 140|
000010C0: 35 20 54 4F 3A 22 00 EF 18 80 02 99 22 11 1D 31 |5 TO:"......"..1|
000010D0: 34 30 35 20 C3 D4 24 28 31 29 3D 27 C6 C9 D2 D3 |405 ..$(1)='....|
000010E0: D4 A0 C3 C1 D4 C1 C7 CF D2 D9 27 2E 2E 2E 22 00 |..........'...".|
000010F0: 1F 19 85 02 99 22 11 1D 41 4E 44 20 53 4F 20 4F |....."..AND SO O|
00001100: 4E 20 55 50 20 54 4F 20 C3 D4 24 28 35 29 3D 27 |N UP TO ..$(5)='|
00001110: C6 C9 C6 D4 C8 A0 C3 C1 D4 C1 C7 CF D2 D9 27 00 |..............'.|
00001120: 49 19 8A 02 99 22 1D D4 48 45 4E 20 43 48 41 4E |I...."..HEN CHAN|
00001130: 47 45 20 54 48 45 20 44 41 54 41 20 4C 49 4E 45 |GE THE DATA LINE|
00001140: 53 20 54 4F 20 54 48 45 22 00 72 19 8F 02 99 22 |S TO THE".r...."|
00001150: 11 1D 44 41 54 41 20 59 4F 55 20 57 41 4E 54 20 |..DATA YOU WANT |
00001160: 49 4E 20 45 41 43 48 20 43 41 54 41 47 4F 52 59 |IN EACH CATAGORY|
00001170: 2E 22 00 7B 19 94 02 8D 38 33 35 00 8F 19 B2 02 |.".{....835.....|
00001180: 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 |.UZ.1..UP%:.217.|
00001190: 95 19 BB 02 8E 00 BA 19 BC 02 8F 20 2A 2A 20 54 |........... ** T|
000011A0: 4F 20 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 |O USE 8032 LOAD |
000011B0: 43 42 4D 34 30 33 32 20 2A 2A 00 F0 19 C6 02 99 |CBM4032 **......|
000011C0: 22 93 11 11 11 05 42 45 46 4F 52 45 20 52 55 4E |".....BEFORE RUN|
000011D0: 4E 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 |NING THIS PROGRA|
000011E0: 4D 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 |M ON AN 8032 ..|
000011F0: 00 26 1A D0 02 99 22 20 20 20 20 20 20 4C 4F 41 |.&...." LOA|
00001200: 44 20 54 48 45 20 27 43 42 4D 20 34 30 33 32 27 |D THE 'CBM 4032'|
00001210: 20 50 52 4F 47 52 41 4D 11 11 11 11 11 11 11 11 | PROGRAM........|
00001220: 11 11 11 11 11 22 00 31 1A DA 02 9E 55 55 AA 37 |.....".1....UU.7|
00001230: 31 00 37 1A E4 02 80 00 5C 1A 1D 03 8F 20 2A 2A |1.7.....\.... **|
00001240: 20 54 4F 20 55 53 45 20 38 30 33 32 20 4C 4F 41 | TO USE 8032 LOA|
00001250: 44 20 43 42 4D 34 30 33 32 20 2A 2A 00 A7 1A 1E |D CBM4032 **....|
00001260: 03 99 22 93 11 11 11 42 45 46 4F 52 45 20 52 55 |.."....BEFORE RU|
00001270: 4E 4E 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 |NNING THIS PROGR|
00001280: 41 4D 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 |AM ON AN 8032 .|
00001290: 11 4C 4F 41 44 20 43 42 4D 20 34 30 33 32 20 50 |.LOAD CBM 4032 P|
000012A0: 52 4F 47 52 41 4D 22 00 B3 1A 1F 03 9E 31 30 39 |ROGRAM"......109|
000012B0: 33 3A 80 00 D3 1A 20 03 8F 20 2A 2A 20 54 20 49 |3:.... .. ** T I|
000012C0: 20 54 20 4C 20 45 20 20 20 50 20 41 20 47 20 45 | T L E P A G E|
000012D0: 20 2A 2A 00 07 1B 22 03 99 22 93 11 1D 05 22 3B | **...".."....";|
000012E0: 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 |:.UT,UU%:..(5000|
000012F0: 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 |3).0..53280,14:.|
00001300: 35 33 32 38 31 2C 36 00 1D 1B 24 03 81 49 B2 31 |53281,6...$..I.1|
00001310: A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 00 35 1B |.38:."...";:..5.|
00001320: 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 |&..I.1.22:."....|
00001330: 92 22 3B 3A 82 00 4D 1B 28 03 81 49 B2 31 A4 33 |.";:..M.(..I.1.3|
00001340: 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 65 1B |7:.".....";:..e.|
00001350: 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 |*..I.1.22:."....|
00001360: 92 22 3B 3A 82 00 8A 1B 2C 03 99 22 13 11 11 11 |.";:....,.."....|
00001370: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001380: 1D 1D 1D 1D 1D 12 A9 20 20 92 00 AC 1B 2E 03 99 |....... .......|
00001390: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
000013A0: 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 CD 1B 30 |.... . . .....0|
000013B0: 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
000013C0: 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 EB 1B |...... . ......|
000013D0: 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |2.."............|
000013E0: 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 13 1C 34 03 |........ ....4.|
000013F0: 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00001400: 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 |C O M M O D O R |
00001410: 45 11 11 00 36 1C 36 03 99 22 1D 1D 1D 1D 1D 1D |E...6.6.."......|
00001420: 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 |.........EDUCATI|
00001430: 4F 4E 41 4C 11 11 00 55 1C 38 03 99 22 1D 1D 1D |ONAL...U.8.."...|
00001440: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 |.............SOF|
00001450: 54 57 41 52 45 00 70 1C 3A 03 8F 20 2A 2A 20 43 |TWARE.p.:.. ** C|
00001460: 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A |OMMODORE LOGO **|
00001470: 00 A8 1C 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B |...;...(UD$,24);|
00001480: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 |"..........PRESS|
00001490: 20 53 50 41 43 45 20 42 41 52 20 4F 52 20 57 41 | SPACE BAR OR WA|
000014A0: 49 54 92 22 3A 49 B2 30 00 CA 1C 3C 03 A1 41 24 |IT.":I.0...<..A$|
000014B0: 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A |:.A$.." ".I.I.1:|
000014C0: 8B 49 B3 32 35 30 A7 38 32 38 00 EE 1C 3E 03 54 |.I.250.828...>.T|
000014D0: 31 24 B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 |1$."":T2$."":T3$|
000014E0: B2 22 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 F7 |."":T4$."":I.0..|
000014F0: 1C 40 03 89 33 30 30 00 13 1D 43 03 8F 20 2A 2A |.@..300...C.. **|
00001500: 20 53 50 41 43 45 20 42 41 52 20 50 52 45 53 53 | SPACE BAR PRESS|
00001510: 20 2A 2A 00 4E 1D 48 03 99 C8 28 55 44 24 2C 32 | **.N.H...(UD$,2|
00001520: 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 |4);".......PRESS|
00001530: 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 43 4F | SPACE BAR TO CO|
00001540: 4E 54 49 4E 55 45 92 22 3A 97 55 4F 2C 30 00 65 |NTINUE.":.UO,0.e|
00001550: 1D 4C 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 |.L..UI$:.UI$.." |
00001560: 22 A7 38 34 34 00 6B 1D 4E 03 8E 00 8B 1D 52 03 |".844.k.N.....R.|
00001570: 8F 20 2A 2A 20 50 41 47 45 20 44 45 53 49 47 4E |. ** PAGE DESIGN|
00001580: 20 52 4F 55 54 49 4E 45 20 2A 2A 00 97 1D 54 03 | ROUTINE **...T.|
00001590: 55 50 B2 55 50 AA 31 00 C1 1D 57 03 99 22 93 22 |UP.UP.1...W.."."|
000015A0: C8 28 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 |.(UT$.UP$,21);.(|
000015B0: 55 50 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 38 |UP$.UG$..(UP),18|
000015C0: 29 00 F0 1D 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D |)...\.." -------|
000015D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000015E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"|
000015F0: 00 FF 1D 60 03 8B 55 48 B3 B1 30 A7 38 37 30 00 |...`..UH..0.870.|
00001600: 33 1E 61 03 99 C8 28 55 44 24 2C 32 34 29 3B C8 |3.a...(UD$,24);.|
00001610: 28 55 50 24 2C 37 29 3B 22 48 45 4C 50 20 2D 20 |(UP$,7);"HELP - |
00001620: 50 52 45 53 53 20 20 20 48 20 3C 52 45 54 55 52 |PRESS H <RETUR|
00001630: 4E 3E 22 00 44 1E 66 03 55 48 B2 30 3A 99 22 13 |N>".D.f.UH.0:.".|
00001640: 11 22 3A 8E 00 63 1E 6B 03 8F 20 2A 2A 20 50 4C |.":..c.k.. ** PL|
00001650: 45 41 53 45 20 57 41 49 54 20 52 45 4D 41 52 4B |EASE WAIT REMARK|
00001660: 20 2A 2A 00 99 1E 70 03 99 C8 28 55 44 24 2C 32 | **...p...(UD$,2|
00001670: 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 4F |4);" O|
00001680: 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 |NE MOMENT PLEASE|
00001690: 2E 2E 2E 20 20 20 20 20 22 00 9F 1E 75 03 8E 00 |... "...u...|
000016A0: BC 1E 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 20 |..... ** SET UP |
000016B0: 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 07 1F 85 |VARIABLES **....|
000016C0: 03 55 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 |.UX$."H":.UQ%(10|
000016D0: 30 30 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 |00):UB.32768:U1.|
000016E0: 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 |196:U2.197:U3.19|
000016F0: 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A |8:U4.216:UC.167:|
00001700: 55 55 B2 31 30 32 34 00 45 1F 86 03 55 54 B2 35 |UU.1024.E...UT.5|
00001710: 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 |9468:UU%.12:UL%.|
00001720: 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 |14:UP%.1146:UM.3|
00001730: 32 37 36 38 3A 97 20 35 30 30 30 33 2C 30 3A 55 |2768:. 50003,0:U|
00001740: 4F B2 31 35 38 00 88 1F 87 03 8B C2 28 35 30 30 |O.158.......(500|
00001750: 30 33 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 |03).0.UB.1024:U1|
00001760: B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 |.209:U2.210:U3.2|
00001770: 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 |11:U4.214:UC.204|
00001780: 3A 55 55 B2 32 30 34 38 00 C7 1F 88 03 8B C2 28 |:UU.2048.......(|
00001790: 35 30 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 |50003).0.UT.5327|
000017A0: 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A |2:UU%.21:UL%.23:|
000017B0: 55 50 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 34 |UP%.2139:UM.1024|
000017C0: 3A 55 4F B2 31 39 38 00 EB 1F 89 03 55 44 24 B2 |:UO.198.....UD$.|
000017D0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
000017E0: 11 11 11 11 11 11 11 11 11 11 22 00 1D 20 8A 03 |..........".. ..|
000017F0: 55 50 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |UP$." |
00001800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001810: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 6B 20 | ".k |
00001820: 8B 03 55 54 24 B2 22 20 C8 C1 CE C7 CD C1 CE 20 |..UT$." ....... |
00001830: 31 20 20 20 20 20 A0 A0 A0 A0 22 3A 8F 20 50 4C |1 ....":. PL|
00001840: 41 43 45 20 50 52 4F 47 52 41 4D 20 54 49 54 4C |ACE PROGRAM TITL|
00001850: 45 20 48 45 52 45 20 21 21 21 21 21 21 21 21 21 |E HERE !!!!!!!!!|
00001860: 21 21 21 21 21 21 21 21 2A 2A 2A 00 90 20 8C 03 |!!!!!!!!***.. ..|
00001870: 86 20 48 4D 24 28 38 29 2C 54 44 24 28 36 2C 34 |. HM$(8),TD$(6,4|
00001880: 29 2C 50 52 24 28 31 37 29 2C 43 24 28 32 35 29 |),PR$(17),C$(25)|
00001890: 00 96 20 8D 03 8E 00 B0 20 8E 03 8F 20 2A 2A 20 |.. ..... ... ** |
000018A0: 53 45 54 20 56 41 52 49 41 42 4C 45 53 20 2A 2A |SET VARIABLES **|
000018B0: 00 B9 20 93 03 8D 39 30 30 00 BF 20 95 03 3A 00 |.. ...900.. ..:.|
000018C0: DA 20 98 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 |. ... ** CHECK F|
000018D0: 4F 52 20 38 30 33 32 20 2A 2A 00 F8 20 9D 03 99 |OR 8032 **.. ...|
000018E0: 22 93 22 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 |".":.".":. SHIFT|
000018F0: 45 44 20 53 50 41 43 45 00 0F 21 A2 03 8B C2 28 |ED SPACE..!....(|
00001900: 55 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 |UB.40)..96..700.|
00001910: 28 21 A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 |(!... ** MEMORY |
00001920: 43 48 45 43 4B 20 2A 2A 00 3C 21 A4 03 8B 20 B8 |CHECK **.<!... .|
00001930: 28 30 29 B1 32 30 30 30 A7 39 33 37 00 6A 21 A5 |(0).2000.937.j!.|
00001940: 03 99 22 93 11 11 05 54 48 49 53 20 4D 41 43 48 |.."....THIS MACH|
00001950: 49 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 |INE DOES NOT HAV|
00001960: 45 20 45 4E 4F 55 47 48 11 22 00 8E 21 A6 03 99 |E ENOUGH."..!...|
00001970: 22 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 |"MEMORY TO RUN T|
00001980: 48 49 53 20 50 52 4F 47 52 41 4D 20 21 22 00 99 |HIS PROGRAM !"..|
00001990: 21 A7 03 9E 55 55 AA 37 31 00 9F 21 A8 03 80 00 |!...UU.71..!....|
000019A0: B9 21 A9 03 99 22 93 05 22 3A 8B C2 28 35 30 30 |.!..."..":..(500|
000019B0: 30 33 29 B2 30 A7 39 36 32 00 E8 21 AC 03 8F 20 |03).0.962..!... |
000019C0: 2A 2A 20 42 41 53 49 43 20 32 2E 30 20 20 4F 52 |** BASIC 2.0 OR|
000019D0: 20 20 34 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 | 4.0 OR C-64 |
000019E0: 53 45 54 55 50 20 2A 2A 00 26 22 AD 03 97 31 30 |SETUP **.&"...10|
000019F0: 37 35 2C 31 33 33 3A 97 31 30 37 36 2C 31 34 34 |75,133:.1076,144|
00001A00: 3A 97 31 30 37 37 2C 32 33 34 3A 97 31 30 37 39 |:.1077,234:.1079|
00001A10: 2C 34 3A 97 31 30 38 30 2C 31 33 33 3A 97 31 30 |,4:.1080,133:.10|
00001A20: 38 31 2C 31 34 35 00 5C 22 AE 03 97 31 30 39 31 |81,145.\"...1091|
00001A30: 2C 31 35 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 |,155:.1098,133:.|
00001A40: 31 30 39 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 |1099,144:.1100,2|
00001A50: 33 34 3A 97 31 31 30 33 2C 31 33 33 00 7E 22 AF |34:.1103,133.~".|
00001A60: 03 97 31 31 30 34 2C 31 34 35 3A 97 31 31 30 35 |..1104,145:.1105|
00001A70: 2C 32 33 34 3A 97 31 30 38 32 2C 32 33 34 00 95 |,234:.1082,234..|
00001A80: 22 B1 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 |"....(50003)..16|
00001A90: 30 A7 39 35 35 00 C4 22 B6 03 97 31 30 39 33 2C |0.955.."...1093,|
00001AA0: 38 38 3A 97 31 30 39 34 2C 32 32 38 3A 97 31 30 |88:.1094,228:.10|
00001AB0: 39 37 2C 38 35 3A 97 31 31 30 32 2C 32 32 38 3A |97,85:.1102,228:|
00001AC0: 89 39 36 35 00 D9 22 BB 03 8B C2 28 35 30 30 30 |.965.."....(5000|
00001AD0: 33 29 B3 B1 31 A7 39 39 30 00 08 23 C0 03 97 31 |3)..1.990..#...1|
00001AE0: 30 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 |093,49:.1094,230|
00001AF0: 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 30 32 2C |:.1097,46:.1102,|
00001B00: 32 33 30 3A 89 39 36 35 00 42 23 C2 03 97 32 30 |230:.965.B#...20|
00001B10: 39 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 30 3A |99,141:.2100,20:|
00001B20: 97 32 31 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A |.2101,3:.2103,8:|
00001B30: 97 32 31 30 34 2C 31 34 31 3A 97 32 31 30 35 2C |.2104,141:.2105,|
00001B40: 32 31 00 7E 23 C3 03 97 32 31 30 36 2C 33 3A 97 |21.~#...2106,3:.|
00001B50: 32 31 31 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 |2115,145:.2117,5|
00001B60: 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 31 32 |2:.2118,234:.212|
00001B70: 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 00 B8 |1,49:.2122,141..|
00001B80: 23 C4 03 97 32 31 32 33 2C 32 30 3A 97 32 31 32 |#...2123,20:.212|
00001B90: 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 |4,3:.2126,234:.2|
00001BA0: 31 32 37 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 |127,141:.2128,21|
00001BB0: 3A 97 32 31 32 39 2C 33 00 D6 23 C5 03 9E 55 55 |:.2129,3..#...UU|
00001BC0: AA 34 38 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 |.48:. DISABLE ST|
00001BD0: 4F 50 20 4B 45 59 00 E7 23 CA 03 8D 38 30 30 3A |OP KEY..#...800:|
00001BE0: 8F 20 54 49 54 4C 45 00 F7 23 D4 03 89 33 30 30 |. TITLE..#...300|
00001BF0: 3A 8F 20 4D 45 4E 55 00 28 24 DE 03 99 22 93 54 |:. MENU.($...".T|
00001C00: 48 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 |HE PGM WILL NOT |
00001C10: 57 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 |WORK ON THIS MAC|
00001C20: 48 49 4E 45 21 22 3A 80 00 5D 24 E8 03 8B 55 5A |HINE!":..]$...UZ|
00001C30: B2 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 |.1..UP%:.UP%:UZ.|
00001C40: 30 3A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 |0:. ** PROGRAM S|
00001C50: 54 41 52 54 53 20 48 45 52 45 20 2A 2A 00 88 24 |TARTS HERE **..$|
00001C60: E9 03 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 |..."..";:.:..(50|
00001C70: 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A |003).0..53281,6:|
00001C80: 97 35 33 32 38 30 2C 36 00 AB 24 F2 03 97 55 54 |.53280,6..$...UT|
00001C90: 2C 55 4C 25 3A 55 47 24 B2 22 D0 41 47 45 20 23 |,UL%:UG$.".AGE #|
00001CA0: 22 3A 55 50 B2 30 3A 55 48 B2 31 00 CF 24 C4 04 |":UP.0:UH.1..$..|
00001CB0: 8D 38 35 30 3A 99 22 11 11 11 11 22 A3 31 33 29 |.850:."....".13)|
00001CC0: 22 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 |".............".|
00001CD0: E3 24 C9 04 99 A3 31 33 29 22 DD 22 A3 32 35 29 |.$....13)".".25)|
00001CE0: 22 DD 22 00 FC 24 CE 04 99 A3 31 33 29 22 DD 20 |"."..$....13)". |
00001CF0: 20 C8 C1 CE C7 CD C1 CE 20 20 DD 22 00 10 25 D3 | ....... ."..%.|
00001D00: 04 99 A3 31 33 29 22 DD 22 A3 32 35 29 22 DD 22 |...13)".".25)"."|
00001D10: 00 29 25 D8 04 99 A3 31 33 29 22 AD C0 C0 C0 C0 |.)%....13)".....|
00001D20: C0 C0 C0 C0 C0 C0 C0 BD 22 00 68 25 37 05 99 22 |........".h%7.."|
00001D30: 11 11 11 1D D7 48 41 54 20 49 53 20 59 4F 55 52 |.....HAT IS YOUR|
00001D40: 20 46 49 52 53 54 20 4E 41 4D 45 3F 20 22 3B 3A | FIRST NAME? ";:|
00001D50: 55 4C B2 31 32 3A 55 53 24 B2 22 22 3A 8D 33 35 |UL.12:US$."":.35|
00001D60: 3A 4E 4D 24 B2 55 52 24 00 86 25 3C 05 55 48 B2 |:NM$.UR$..%<.UH.|
00001D70: 31 3A 8D 38 35 30 3A 99 22 11 11 1D CF 4B 41 59 |1:.850:."....KAY|
00001D80: 2C 20 22 4E 4D 24 00 B5 25 41 05 99 22 11 11 1D |, "NM$..%A.."...|
00001D90: D7 48 45 4E 20 59 4F 55 20 47 55 45 53 53 20 41 |.HEN YOU GUESS A|
00001DA0: 20 43 4F 52 52 45 43 54 20 4C 45 54 54 45 52 2C | CORRECT LETTER,|
00001DB0: 20 59 4F 55 22 00 E5 25 46 05 99 22 11 1D 57 49 | YOU"..%F.."..WI|
00001DC0: 4C 4C 20 42 45 20 41 53 4B 45 44 20 49 46 20 59 |LL BE ASKED IF Y|
00001DD0: 4F 55 20 57 4F 55 4C 44 20 4C 49 4B 45 20 54 4F |OU WOULD LIKE TO|
00001DE0: 20 54 52 59 22 00 14 26 4B 05 99 22 11 1D 54 4F | TRY"..&K.."..TO|
00001DF0: 20 47 55 45 53 53 20 54 48 45 20 45 4E 54 49 52 | GUESS THE ENTIR|
00001E00: 45 20 57 4F 52 44 2E 1D 1D D4 59 50 45 20 45 49 |E WORD....YPE EI|
00001E10: 54 48 45 52 00 40 26 50 05 99 22 11 1D 59 45 53 |THER.@&P.."..YES|
00001E20: 20 4F 52 20 4E 4F 20 41 43 43 4F 52 44 49 4E 47 | OR NO ACCORDING|
00001E30: 20 54 4F 20 59 4F 55 52 20 57 49 53 48 45 53 22 | TO YOUR WISHES"|
00001E40: 00 64 26 55 05 99 22 11 1D 41 4E 44 20 46 4F 4C |.d&U.."..AND FOL|
00001E50: 4C 4F 57 20 54 48 45 20 49 4E 53 54 52 55 43 54 |LOW THE INSTRUCT|
00001E60: 49 4F 4E 53 00 7A 26 56 05 99 22 11 1D 41 43 43 |IONS.z&V.."..ACC|
00001E70: 4F 52 44 49 4E 47 4C 59 2E 22 00 83 26 5A 05 8D |ORDINGLY."..&Z..|
00001E80: 38 33 35 00 9C 26 64 05 81 20 49 B2 31 20 A4 20 |835..&d.. I.1 . |
00001E90: 38 3A 87 20 48 4D 24 28 49 29 3A 82 00 B5 26 69 |8:. HM$(I):...&i|
00001EA0: 05 81 20 49 B2 31 20 A4 20 36 3A 20 81 20 4A B2 |.. I.1 . 6: . J.|
00001EB0: 31 20 A4 20 34 00 C8 26 6E 05 87 20 54 44 24 28 |1 . 4..&n.. TD$(|
00001EC0: 49 2C 4A 29 3A 82 3A 82 00 EA 26 73 05 41 24 B2 |I,J):.:...&s.A$.|
00001ED0: 22 11 9D 9D 9D 9D 22 3A 42 24 B2 22 11 9D 9D 9D |".....":B$."....|
00001EE0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 00 2E 27 78 05 99 |........."..'x..|
00001EF0: 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8D 38 35 30 |".":.UT,UL%:.850|
00001F00: 3A 99 22 11 1D C3 48 4F 4F 53 45 20 4F 4E 45 20 |:."...HOOSE ONE |
00001F10: 4F 46 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 |OF THE FOLLOWING|
00001F20: 20 43 41 54 45 47 4F 52 49 45 53 3A 11 11 00 45 | CATEGORIES:...E|
00001F30: 27 7C 05 8F 20 2A 2A 2A 43 41 54 41 47 4F 52 49 |'|.. ***CATAGORI|
00001F40: 45 53 2A 2A 2A 00 8B 27 7D 05 43 54 24 28 31 29 |ES***..'}.CT$(1)|
00001F50: B2 22 43 4F 4D 50 55 54 45 52 53 22 3A 43 54 24 |."COMPUTERS":CT$|
00001F60: 28 32 29 B2 22 53 50 4F 52 54 53 22 3A 43 54 24 |(2)."SPORTS":CT$|
00001F70: 28 33 29 B2 22 43 41 52 53 22 3A 43 54 24 28 34 |(3)."CARS":CT$(4|
00001F80: 29 B2 22 4E 41 54 49 4F 4E 53 22 00 A3 27 7E 05 |)."NATIONS"..'~.|
00001F90: 43 54 24 28 35 29 B2 22 50 4F 54 20 50 4F 55 52 |CT$(5)."POT POUR|
00001FA0: 52 49 22 00 BA 27 82 05 8F 20 2A 2A 2A 2A 2A 2A |RI"..'... ******|
00001FB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DE 27 87 05 81 |**********..'...|
00001FC0: 20 41 B2 31 20 A4 20 35 3A 99 41 3B 22 9D 2E 20 | A.1 . 5:.A;".. |
00001FD0: 22 3B 43 54 24 28 41 29 3B 22 11 22 3A 82 00 21 |";CT$(A);".":..!|
00001FE0: 28 8C 05 99 22 11 11 20 20 20 20 D9 4F 55 52 20 |(...".. .OUR |
00001FF0: 43 48 4F 49 43 45 2C 20 22 AA 4E 4D 24 AA 22 20 |CHOICE, ".NM$." |
00002000: 22 3B 3A 55 53 24 B2 22 31 32 33 34 35 48 22 3A |";:US$."12345H":|
00002010: 55 4C B2 31 3A 8D 33 35 3A 43 B2 C5 28 55 52 24 |UL.1:.35:C..(UR$|
00002020: 29 00 4E 28 9B 05 99 20 22 11 20 20 20 20 CC 45 |).N(... ". .E|
00002030: 54 20 4D 45 20 54 48 49 4E 4B 20 4F 46 20 41 20 |T ME THINK OF A |
00002040: 57 4F 52 44 2E 2E 2E 22 3A 54 54 B2 54 49 00 6E |WORD...":TT.TI.n|
00002050: 28 A0 05 81 20 49 B2 30 20 A4 20 28 43 AB 31 29 |(... I.0 . (C.1)|
00002060: AC 32 30 AA B5 28 BB 28 31 29 AC 32 30 29 00 7A |.20..(.(1).20).z|
00002070: 28 A5 05 87 20 57 44 24 3A 82 00 91 28 AA 05 8B |(... WD$:...(...|
00002080: 20 54 49 AB 54 54 B3 31 32 30 20 A7 20 31 34 35 | TI.TT.120 . 145|
00002090: 30 00 AA 28 AF 05 4C 4D 24 B2 22 22 3A 50 52 24 |0..(..LM$."":PR$|
000020A0: B2 22 22 3A 4C 47 24 B2 22 22 00 BC 28 B4 05 81 |."":LG$.""..(...|
000020B0: 49 B2 31 20 A4 20 C3 28 57 44 24 29 00 F1 28 B9 |I.1 . .(WD$)..(.|
000020C0: 05 8B 20 CA 28 57 44 24 2C 49 2C 31 29 B2 22 20 |.. .(WD$,I,1)." |
000020D0: 22 20 A7 20 50 52 24 28 49 29 B2 22 20 22 3A 50 |" . PR$(I)." ":P|
000020E0: 52 24 B2 50 52 24 AA 22 20 22 3A 89 20 31 34 37 |R$.PR$." ":. 147|
000020F0: 35 00 0C 29 BE 05 50 52 24 28 49 29 B2 22 2D 22 |5..)..PR$(I)."-"|
00002100: 3A 50 52 24 B2 50 52 24 AA 22 2D 22 00 1F 29 C3 |:PR$.PR$."-"..).|
00002110: 05 82 3A 99 22 93 22 3A 97 55 54 2C 55 55 25 00 |..:.".":.UT,UU%.|
00002120: 30 29 C8 05 4D 4E 24 B2 C8 28 4E 4D 24 2C 31 29 |0)..MN$..(NM$,1)|
00002130: 00 5C 29 CD 05 8B 20 C6 28 4D 4E 24 29 B1 39 35 |.\)... .(MN$).95|
00002140: 20 A7 4E 4D 24 B2 C7 28 C6 28 4D 4E 24 29 AB 31 | .NM$..(.(MN$).1|
00002150: 32 38 29 AA CA 28 4E 4D 24 2C 32 29 00 7C 29 D2 |28)..(NM$,2).|).|
00002160: 05 56 50 B2 31 37 3A 48 50 B2 30 3A 4D B2 30 3A |.VP.17:HP.0:M.0:|
00002170: 99 22 93 22 3B 3A 55 58 24 B2 22 22 00 93 29 D7 |.".";:UX$.""..).|
00002180: 05 81 20 49 B2 31 20 A4 20 31 36 3A 99 22 11 22 |.. I.1 . 16:."."|
00002190: 3B 3A 82 00 AC 29 DC 05 81 20 49 B2 31 A4 38 3A |;:...)... I.1.8:|
000021A0: 99 3A 99 48 4D 24 28 49 29 3B 3A 82 00 BA 29 E1 |.:.HM$(I);:...).|
000021B0: 05 81 20 49 B2 31 20 A4 20 37 00 D6 29 E6 05 99 |.. I.1 . 7..)...|
000021C0: 22 12 20 91 9D A3 A3 A3 A3 20 91 9D 22 3B 3A 82 |". ...... ..";:.|
000021D0: 3A 99 22 92 22 3B 00 EC 29 EB 05 99 22 12 20 91 |:.".";..)...". .|
000021E0: 9D 20 20 92 C5 C5 C5 C5 12 20 92 22 00 19 2A F0 |. ...... ."..*.|
000021F0: 05 99 22 13 22 3B A3 33 34 29 3B 22 12 A2 20 20 |..".";.34);".. |
00002200: 92 11 9D 9D A7 A5 11 9D 9D D5 C9 11 9D 9D CA CB |................|
00002210: 91 91 91 12 A2 A2 20 22 3B 00 34 2A F5 05 81 20 |...... ";.4*... |
00002220: 49 B2 31 20 A4 20 32 33 3A 99 22 9D 12 20 92 11 |I.1 . 23:.".. ..|
00002230: 22 3B 3A 82 00 4E 2A FA 05 99 22 9D 12 20 92 22 |";:..N*...".. ."|
00002240: 3B 3A 97 20 55 4D AA 39 39 39 2C 31 36 30 00 6E |;:. UM.999,160.n|
00002250: 2A FF 05 99 22 13 53 45 43 52 45 54 20 57 4F 52 |*...".SECRET WOR|
00002260: 44 3A 20 22 3B 43 54 24 28 43 29 3B 22 91 00 85 |D: ";CT$(C);"...|
00002270: 2A 04 06 81 20 49 B2 31 20 A4 20 38 20 3A 99 22 |*... I.1 . 8 :."|
00002280: 11 22 20 3A 82 00 A1 2A 09 06 99 A3 31 38 29 3B |." :...*....18);|
00002290: 22 11 4C 45 54 54 45 52 53 20 4D 49 53 53 45 44 |".LETTERS MISSED|
000022A0: 22 00 BC 2A 0E 06 99 A3 31 38 29 3B 22 A3 A3 A3 |"..*....18);"...|
000022B0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 CD 2A 13 |..........."..*.|
000022C0: 06 99 22 13 11 11 11 11 22 3B 50 52 24 00 E4 2A |..".....";PR$..*|
000022D0: 18 06 81 20 49 B2 31 20 A4 20 31 37 3A 99 22 11 |... I.1 . 17:.".|
000022E0: 22 3B 3A 82 00 F2 2A 1D 06 99 A3 31 36 29 3B 4C |";:...*....16);L|
000022F0: 4D 24 00 35 2B 22 06 99 22 13 11 11 11 11 11 11 |M$.5+"..".......|
00002300: 47 55 45 53 53 20 41 20 4C 45 54 54 45 52 20 20 |GUESS A LETTER |
00002310: 20 20 20 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D | .......|
00002320: 9D 9D 9D 22 3B 3A 8D 32 31 38 35 3A 47 24 B2 43 |...";:.2185:G$.C|
00002330: 24 AA 22 20 22 00 50 2B 27 06 8B 20 CA 28 47 24 |$." ".P+'.. .(G$|
00002340: 2C 32 2C 31 29 B2 22 20 22 20 89 20 31 36 31 30 |,2,1)." " . 1610|
00002350: 00 5C 2B 2C 06 99 22 91 91 91 91 22 00 6B 2B 31 |.\+,.."....".k+1|
00002360: 06 81 20 49 B2 31 20 A4 20 32 30 00 83 2B 36 06 |.. I.1 . 20..+6.|
00002370: 8B 20 49 AD 32 B2 B5 28 49 AD 32 29 A7 20 99 22 |. I.2..(I.2). ."|
00002380: 12 22 3B 00 A4 2B 3B 06 99 22 4F 4E 4C 59 20 4F |.";..+;.."ONLY O|
00002390: 4E 45 20 4C 45 54 54 45 52 2C 20 22 3B 4E 4D 24 |NE LETTER, ";NM$|
000023A0: 3B 22 91 22 00 B5 2B 40 06 81 20 4A B2 31 20 A4 |;"."..+@.. J.1 .|
000023B0: 20 35 30 3A 82 00 C4 2B 45 06 82 20 49 3A 89 20 | 50:...+E.. I:. |
000023C0: 31 35 37 30 00 D3 2B 4A 06 47 24 B2 C8 28 47 24 |1570..+J.G$..(G$|
000023D0: 2C 31 29 00 F2 2B 4F 06 8B 20 47 24 B1 B2 22 41 |,1)..+O.. G$.."A|
000023E0: 22 20 AF 20 47 24 B3 B2 22 5A 22 20 89 20 31 36 |" . G$.."Z" . 16|
000023F0: 34 35 00 09 2C 54 06 99 22 91 91 91 91 22 3A 81 |45..,T.."....":.|
00002400: 20 49 B2 31 20 A4 20 32 30 00 21 2C 59 06 8B 20 | I.1 . 20.!,Y.. |
00002410: 49 AD 32 B2 B5 28 49 AD 32 29 A7 20 99 22 12 22 |I.2..(I.2). ."."|
00002420: 3B 00 3F 2C 5E 06 99 22 54 48 41 54 27 53 20 4E |;.?,^.."THAT'S N|
00002430: 4F 54 20 41 20 4C 45 54 54 45 52 21 21 91 22 00 |OT A LETTER!!.".|
00002440: 50 2C 63 06 81 20 4A B2 31 20 A4 20 35 30 3A 82 |P,c.. J.1 . 50:.|
00002450: 00 5F 2C 68 06 82 20 49 3A 89 20 31 35 37 30 00 |._,h.. I:. 1570.|
00002460: 72 2C 6D 06 81 20 49 B2 31 20 A4 20 C3 28 4C 47 |r,m.. I.1 . .(LG|
00002470: 24 29 00 8D 2C 72 06 8B 20 47 24 B2 CA 28 4C 47 |$)..,r.. G$..(LG|
00002480: 24 2C 49 2C 31 29 20 89 20 31 36 36 30 00 9C 2C |$,I,1) . 1660..,|
00002490: 77 06 82 20 49 3A 89 20 31 36 39 30 00 A8 2C 7C |w.. I:. 1690..,||
000024A0: 06 99 22 91 91 91 91 22 00 B7 2C 81 06 81 20 49 |.."...."..,... I|
000024B0: B2 31 20 A4 20 32 30 00 D0 2C 86 06 8B 20 49 AD |.1 . 20..,... I.|
000024C0: 32 B2 B5 28 49 AD 32 29 20 A7 20 99 22 12 22 3B |2..(I.2) . .".";|
000024D0: 00 F0 2C 8B 06 99 22 54 48 41 54 20 4C 45 54 54 |..,..."THAT LETT|
000024E0: 45 52 20 57 41 53 20 54 52 49 45 44 21 21 91 22 |ER WAS TRIED!!."|
000024F0: 00 01 2D 90 06 81 20 4A B2 31 20 A4 20 35 30 3A |..-... J.1 . 50:|
00002500: 82 00 10 2D 95 06 82 20 49 3A 89 20 31 35 37 30 |...-... I:. 1570|
00002510: 00 2D 2D 9A 06 99 22 91 91 20 20 20 20 20 20 20 |.--...".. |
00002520: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 44 2D | ".D-|
00002530: 9F 06 46 B2 30 3A 81 20 49 B2 31 20 A4 20 C3 28 |..F.0:. I.1 . .(|
00002540: 57 44 24 29 00 68 2D A4 06 8B 20 47 24 B2 CA 28 |WD$).h-... G$..(|
00002550: 57 44 24 2C 49 2C 31 29 20 A7 20 50 52 24 28 49 |WD$,I,1) . PR$(I|
00002560: 29 B2 47 24 3A 46 B2 31 00 6E 2D A9 06 82 00 7F |).G$:F.1.n-.....|
00002570: 2D AE 06 8B 20 46 B2 30 20 89 20 31 39 31 30 00 |-... F.0 . 1910.|
00002580: 95 2D B3 06 4C 47 24 B2 4C 47 24 AA 47 24 3A 50 |.-..LG$.LG$.G$:P|
00002590: 52 24 B2 22 22 00 A8 2D B8 06 81 20 49 B2 31 20 |R$.""..-... I.1 |
000025A0: A4 20 C3 28 57 44 24 29 00 BD 2D BD 06 50 52 24 |. .(WD$)..-..PR$|
000025B0: B2 50 52 24 AA 50 52 24 28 49 29 3A 82 00 CE 2D |.PR$.PR$(I):...-|
000025C0: C2 06 99 22 13 11 11 11 11 22 3B 50 52 24 00 EB |...".....";PR$..|
000025D0: 2D C7 06 99 22 20 20 20 20 20 20 20 20 20 20 20 |-..." |
000025E0: 20 20 20 20 20 20 20 20 20 91 22 00 FA 2D CC 06 | ."..-..|
000025F0: 81 20 49 B2 31 20 A4 20 32 30 00 13 2E D1 06 8B |. I.1 . 20......|
00002600: 20 49 AD 32 B2 B5 28 49 AD 32 29 20 A7 20 99 22 | I.2..(I.2) . ."|
00002610: 12 22 3B 00 2E 2E D6 06 99 22 56 45 52 59 20 47 |.";......"VERY G|
00002620: 4F 4F 44 2C 22 AA 4E 4D 24 AA 22 21 91 22 00 41 |OOD,".NM$."!.".A|
00002630: 2E DB 06 81 20 4A B2 31 20 A4 20 35 30 3A 82 3A |.... J.1 . 50:.:|
00002640: 82 00 56 2E E0 06 8B 20 50 52 24 B2 57 44 24 20 |..V.... PR$.WD$ |
00002650: 89 20 31 38 33 30 00 86 2E E5 06 99 22 13 11 11 |. 1830......"...|
00002660: 11 11 11 11 47 55 45 53 53 20 57 4F 52 44 20 28 |....GUESS WORD (|
00002670: 59 2F 4E 29 3F 20 20 20 20 20 20 20 20 9D 9D 9D |Y/N)? ...|
00002680: 9D 9D 9D 9D 22 3B 00 90 2E EA 06 8D 32 31 38 35 |....";......2185|
00002690: 00 AA 2E EF 06 8B 20 C8 28 43 24 2C 31 29 B3 B1 |...... .(C$,1)..|
000026A0: 22 59 22 20 A7 20 31 35 37 30 00 CD 2E F4 06 99 |"Y" . 1570......|
000026B0: 22 13 11 11 11 11 11 11 47 55 45 53 53 20 54 48 |".......GUESS TH|
000026C0: 45 20 57 4F 52 44 28 53 29 20 20 20 22 00 E8 2E |E WORD(S) "...|
000026D0: F9 06 8D 20 32 31 38 35 3A 47 24 B2 C8 28 43 24 |... 2185:G$..(C$|
000026E0: 2C C3 28 57 44 24 29 29 00 FC 2E FE 06 8B 20 47 |,.(WD$))...... G|
000026F0: 24 B2 57 44 24 20 89 20 31 38 33 30 00 1F 2F 03 |$.WD$ . 1830../.|
00002700: 07 99 22 13 11 11 11 11 11 11 20 20 20 20 20 20 |.."....... |
00002710: 20 20 20 20 20 20 20 20 20 20 20 20 20 91 22 00 | .".|
00002720: 2E 2F 08 07 81 20 49 B2 31 20 A4 20 32 30 00 47 |./... I.1 . 20.G|
00002730: 2F 0D 07 8B 20 49 AD 32 B2 B5 28 49 AD 32 29 20 |/... I.2..(I.2) |
00002740: A7 20 99 22 12 22 3B 00 5D 2F 12 07 99 22 53 4F |. .".";.]/..."SO|
00002750: 52 52 59 2C 22 AA 4E 4D 24 AA 22 91 22 00 70 2F |RRY,".NM$.".".p/|
00002760: 17 07 81 20 4A B2 31 20 A4 20 35 30 3A 82 3A 82 |... J.1 . 50:.:.|
00002770: 00 91 2F 1C 07 99 22 13 11 11 11 11 11 11 11 11 |../...".........|
00002780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002790: 22 00 9C 2F 21 07 89 20 31 35 37 30 00 CD 2F 26 |"../!.. 1570../&|
000027A0: 07 55 58 24 B2 22 48 22 3A 97 55 54 2C 55 55 25 |.UX$."H":.UT,UU%|
000027B0: 3A 99 22 93 11 11 11 11 11 11 11 11 11 1D 1D 1D |:.".............|
000027C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 00 DC 2F |...........";../|
000027D0: 2B 07 81 20 49 B2 31 20 A4 20 31 30 00 F4 2F 30 |+.. I.1 . 10../0|
000027E0: 07 99 22 DA 20 DA 20 DA 20 DA 20 DA 20 DA 20 22 |..". . . . . . "|
000027F0: AA 42 24 3B 00 0C 30 35 07 99 22 20 20 20 20 20 |.B$;..05.." |
00002800: 20 20 20 20 20 20 DA 22 AA 42 24 3B 00 24 30 3A | .".B$;.$0:|
00002810: 07 99 22 DA 20 59 4F 55 20 57 4F 4E 21 20 20 22 |..". YOU WON! "|
00002820: AA 42 24 3B 00 3C 30 3F 07 99 22 20 20 20 20 20 |.B$;.<0?.." |
00002830: 20 20 20 20 20 20 DA 22 AA 42 24 3B 00 54 30 44 | .".B$;.T0D|
00002840: 07 99 22 DA 20 DA 20 DA 20 DA 20 DA 20 DA 20 22 |..". . . . . . "|
00002850: AA 42 24 3B 00 62 30 49 07 99 22 91 91 91 91 91 |.B$;.b0I..".....|
00002860: 22 3B 00 7A 30 4E 07 99 22 20 DA 20 DA 20 DA 20 |";.z0N.." . . . |
00002870: DA 20 DA 20 DA 22 AA 42 24 3B 00 92 30 53 07 99 |. . .".B$;..0S..|
00002880: 22 DA 20 20 20 20 20 20 20 20 20 20 20 22 AA 42 |". ".B|
00002890: 24 3B 00 AC 30 58 07 99 22 20 20 12 59 4F 55 20 |$;..0X.." .YOU |
000028A0: 57 4F 4E 21 92 20 DA 22 AA 42 24 3B 00 C4 30 5D |WON!. .".B$;..0]|
000028B0: 07 99 22 DA 20 20 20 20 20 20 20 20 20 20 20 22 |..". "|
000028C0: AA 42 24 3B 00 DC 30 62 07 99 22 20 DA 20 DA 20 |.B$;..0b.." . . |
000028D0: DA 20 DA 20 DA 20 DA 22 AA 42 24 3B 00 EC 30 67 |. . . .".B$;..0g|
000028E0: 07 99 22 91 91 91 91 91 22 3B 3A 82 00 1D 31 6C |..".....";:...1l|
000028F0: 07 99 3A 99 22 11 11 11 11 11 11 1D 43 41 52 45 |..:.".......CARE|
00002900: 20 46 4F 52 20 41 4E 4F 54 48 45 52 20 43 48 41 | FOR ANOTHER CHA|
00002910: 4E 43 45 20 54 4F 20 53 41 56 45 20 41 00 38 31 |NCE TO SAVE A.81|
00002920: 70 07 99 22 11 1D 46 52 49 45 4E 44 20 22 3B 4E |p.."..FRIEND ";N|
00002930: 4D 24 3B 22 3F 20 22 3B 00 4B 31 71 07 55 58 24 |M$;"? ";.K1q.UX$|
00002940: B2 22 48 22 3A 89 20 32 31 36 30 00 6F 31 76 07 |."H":. 2160.o1v.|
00002950: 99 22 13 11 11 11 11 11 11 20 20 20 20 20 20 20 |."....... |
00002960: 20 20 20 20 20 20 20 20 20 20 20 20 20 91 22 00 | .".|
00002970: 7E 31 7B 07 81 20 49 B2 31 20 A4 20 32 30 00 96 |~1{.. I.1 . 20..|
00002980: 31 80 07 8B 20 49 AD 32 B2 B5 28 49 AD 32 29 A7 |1... I.2..(I.2).|
00002990: 20 99 22 12 22 3B 00 B3 31 85 07 99 22 59 4F 55 | .".";..1..."YOU|
000029A0: 20 42 4C 45 57 20 49 54 20 22 AA 4E 4D 24 AA 22 | BLEW IT ".NM$."|
000029B0: 21 91 22 00 C6 31 8A 07 81 20 4A B2 31 20 A4 20 |!."..1... J.1 . |
000029C0: 35 30 3A 82 3A 82 00 E0 31 8F 07 4C 47 24 B2 4C |50:.:...1..LG$.L|
000029D0: 47 24 AA 47 24 3A 4C 4D 24 B2 4C 4D 24 AA 47 24 |G$.G$:LM$.LM$.G$|
000029E0: 00 FB 31 94 07 99 22 13 22 3A 81 20 49 B2 31 20 |..1...".":. I.1 |
000029F0: A4 20 31 30 3A 99 22 11 22 3A 82 00 0F 32 99 07 |. 10:.".":...2..|
00002A00: 99 A3 31 38 29 AA 4C 4D 24 3A 4D B2 4D AA 31 00 |..18).LM$:M.M.1.|
00002A10: 20 32 9E 07 8B 20 4D B2 39 20 89 20 32 30 34 35 | 2... M.9 . 2045|
00002A20: 00 3C 32 A3 07 81 20 49 B2 31 20 A4 20 32 3A 56 |.<2... I.1 . 2:V|
00002A30: 50 B2 56 50 AB 31 3A 99 22 13 22 3B 00 53 32 A8 |P.VP.1:.".";.S2.|
00002A40: 07 81 20 4A B2 32 20 A4 20 56 50 3A 99 22 11 22 |.. J.2 . VP:."."|
00002A50: 3B 3A 82 00 66 32 AD 07 8B 20 56 50 B2 31 20 A7 |;:..f2... VP.1 .|
00002A60: 20 99 22 91 22 3B 00 77 32 B2 07 99 A6 48 50 AA | .".";.w2....HP.|
00002A70: 31 29 AA 22 9D 22 3B 00 85 32 B7 07 81 20 4A B2 |1).".";..2... J.|
00002A80: 31 20 A4 20 38 00 9D 32 BC 07 99 22 11 22 AA 48 |1 . 8..2...".".H|
00002A90: 4D 24 28 4A 29 AA 22 9D 9D 9D 9D 22 3B 00 B3 32 |M$(J)."....";..2|
00002AA0: C1 07 82 20 4A 3A 99 22 11 20 20 20 20 22 3B 3A |... J:.". ";:|
00002AB0: 82 20 49 00 CF 32 C6 07 81 20 49 B2 31 20 A4 20 |. I..2... I.1 . |
00002AC0: 34 3A 48 50 B2 48 50 AA 31 3A 99 22 13 22 3B 00 |4:HP.HP.1:.".";.|
00002AD0: E6 32 CB 07 81 20 4A B2 32 20 A4 20 56 50 3A 99 |.2... J.2 . VP:.|
00002AE0: 22 11 22 3B 3A 82 00 F8 32 D0 07 8B 20 56 50 B2 |".";:...2... VP.|
00002AF0: 31 20 A7 99 22 91 22 3B 00 07 33 D5 07 99 A6 48 |1 ..".";..3....H|
00002B00: 50 29 AA 22 9D 22 3B 00 15 33 DA 07 81 20 4A B2 |P).".";..3... J.|
00002B10: 31 20 A4 20 38 00 33 33 DF 07 99 22 11 20 22 AA |1 . 8.33...". ".|
00002B20: 48 4D 24 28 4A 29 AA 22 9D 9D 9D 9D 9D 22 3B 3A |HM$(J).".....";:|
00002B30: 82 3A 82 00 44 33 E4 07 8B 20 4D B3 38 20 89 20 |.:..D3... M.8 . |
00002B40: 31 35 37 30 00 53 33 E9 07 99 22 13 22 3B A6 48 |1570.S3...".";.H|
00002B50: 50 29 3B 00 61 33 EE 07 81 20 49 B2 31 20 A4 20 |P);.a3... I.1 . |
00002B60: 38 00 7F 33 F3 07 99 22 11 20 20 22 AA 48 4D 24 |8..3...". ".HM$|
00002B70: 28 49 29 AA 22 9D 9D 9D 9D 9D 9D 22 3B 3A 82 00 |(I)."......";:..|
00002B80: 8A 33 F8 07 89 20 31 35 37 30 00 A2 33 FD 07 99 |.3... 1570..3...|
00002B90: 22 13 11 11 11 11 11 11 11 11 11 22 3B A6 33 34 |"..........";.34|
00002BA0: 29 3B 00 BA 33 02 08 81 20 49 B2 31 20 A4 20 36 |);..3... I.1 . 6|
00002BB0: 3A 81 20 4A B2 31 20 A4 20 34 00 CE 33 07 08 99 |:. J.1 . 4..3...|
00002BC0: 54 44 24 28 49 2C 4A 29 AA 41 24 3B 3A 82 00 DD |TD$(I,J).A$;:...|
00002BD0: 33 0C 08 99 22 91 91 91 91 22 3B 3A 82 00 EE 33 |3..."....";:...3|
00002BE0: 11 08 99 22 13 11 11 22 3B A6 33 34 29 3B 00 07 |..."...";.34);..|
00002BF0: 34 16 08 81 20 49 B2 31 20 A4 20 31 36 3A 99 22 |4... I.1 . 16:."|
00002C00: 11 20 AA B4 20 22 3B 00 15 34 1B 08 81 20 4A B2 |. .. ";..4... J.|
00002C10: 33 20 A4 20 38 00 28 34 20 08 99 20 41 24 AA 48 |3 . 8.(4 .. A$.H|
00002C20: 4D 24 28 4A 29 3B 3A 82 00 3D 34 25 08 99 22 91 |M$(J);:..=4%..".|
00002C30: 91 91 91 91 91 9D 9D 9D 9D 22 3B 3A 82 00 50 34 |.........";:..P4|
00002C40: 2A 08 81 20 49 B2 31 20 A4 20 31 30 30 30 3A 82 |*.. I.1 . 1000:.|
00002C50: 00 62 34 2F 08 99 22 91 12 A9 20 20 DF 22 AA 41 |.b4/.."... .".A|
00002C60: 24 3B 00 73 34 34 08 99 22 12 A5 52 20 A7 22 AA |$;.s44.."..R .".|
00002C70: 41 24 3B 00 84 34 39 08 99 22 12 B4 49 DB AA 22 |A$;..49.."..I.."|
00002C80: AA 41 24 3B 00 95 34 3E 08 99 22 12 B5 50 DD B6 |.A$;..4>.."..P..|
00002C90: 22 AA 41 24 3B 00 A7 34 43 08 99 22 12 A1 20 DD |".A$;..4C..".. .|
00002CA0: 92 A1 22 AA 41 24 3B 00 B9 34 48 08 99 22 AA 12 |..".A$;..4H.."..|
00002CB0: 20 20 92 B4 22 AA 41 24 3B 00 CB 34 4D 08 99 22 | ..".A$;..4M.."|
00002CC0: A7 12 20 20 92 A5 22 AA 41 24 3B 00 DA 34 52 08 |.. ..".A$;..4R.|
00002CD0: 99 22 A7 12 20 20 92 A5 22 3B 00 ED 34 57 08 81 |.".. ..";..4W..|
00002CE0: 20 49 B2 31 20 A4 20 33 30 30 30 3A 82 00 26 35 | I.1 . 3000:..&5|
00002CF0: 5C 08 99 22 93 22 3A 55 48 B2 31 3A 97 55 54 2C |\..".":UH.1:.UT,|
00002D00: 55 4C 25 3A 8D 38 35 30 3A 99 22 11 11 11 11 11 |UL%:.850:.".....|
00002D10: 1D D4 48 45 20 53 45 43 52 45 54 20 57 4F 52 44 |..HE SECRET WORD|
00002D20: 20 57 41 53 3A 22 00 40 35 61 08 99 22 11 1D 1D | WAS:".@5a.."...|
00002D30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 AA 57 44 24 |...........".WD$|
00002D40: 00 6E 35 66 08 99 22 11 11 11 11 1D C2 45 54 54 |.n5f.."......ETT|
00002D50: 45 52 20 4C 55 43 4B 20 4E 45 58 54 20 54 49 4D |ER LUCK NEXT TIM|
00002D60: 45 2C 20 22 3B 4E 4D 24 3B 22 21 21 21 22 00 9A |E, ";NM$;"!!!"..|
00002D70: 35 6B 08 99 22 11 11 11 11 1D C3 41 52 45 20 54 |5k.."......ARE T|
00002D80: 4F 20 57 41 53 54 45 20 41 4E 4F 54 48 45 52 20 |O WASTE ANOTHER |
00002D90: 46 52 49 45 4E 44 3F 20 22 3B 00 A0 35 70 08 8C |FRIEND? ";..5p..|
00002DA0: 00 B7 35 75 08 81 20 49 B2 31 20 A4 20 33 32 3A |..5u.. I.1 . 32:|
00002DB0: 87 20 57 44 24 3A 82 00 D4 35 7A 08 55 53 24 B2 |. WD$:...5z.US$.|
00002DC0: 22 59 4E 22 3A 55 4C B2 31 3A 8D 33 35 3A 43 24 |"YN":UL.1:.35:C$|
00002DD0: B2 55 52 24 00 EE 35 7F 08 8B 43 24 B2 22 59 22 |.UR$..5...C$."Y"|
00002DE0: A7 55 58 24 B2 22 48 22 3A 89 31 34 30 30 00 FE |.UX$."H":.1400..|
00002DF0: 35 84 08 9C 3A 8D 39 30 30 3A 89 33 30 30 00 1C |5...:.900:.300..|
00002E00: 36 89 08 43 24 B2 22 22 3A 8F 20 20 49 4E 50 55 |6..C$."":. INPU|
00002E10: 54 20 53 55 42 52 4F 55 54 49 4E 45 00 27 36 8E |T SUBROUTINE.'6.|
00002E20: 08 55 53 24 B2 22 22 00 3C 36 93 08 55 4C B2 31 |.US$."".<6..UL.1|
00002E30: 35 3A 8D 33 35 3A 43 24 B2 55 52 24 00 42 36 98 |5:.35:C$.UR$.B6.|
00002E40: 08 8E 00 55 36 C5 08 83 22 20 D5 C9 20 22 2C 22 |...U6..." .. ","|
00002E50: 20 CA CB 20 22 00 63 36 CA 08 83 22 12 A9 20 20 | .. ".c6...".. |
00002E60: DF 92 22 00 71 36 CF 08 83 22 12 AA 20 20 B4 92 |..".q6...".. ..|
00002E70: 22 00 7F 36 D4 08 83 22 12 AA 20 20 B4 92 22 00 |"..6...".. ..".|
00002E80: 8D 36 D9 08 83 22 20 12 A7 A5 92 20 22 00 9B 36 |.6..." .... "..6|
00002E90: DE 08 83 22 20 12 A7 A5 92 20 22 00 A9 36 E3 08 |..." .... "..6..|
00002EA0: 83 22 AC 12 A7 A5 92 BB 22 00 B5 36 E8 08 83 22 |."......"..6..."|
00002EB0: C5 C3 C6 A4 22 00 CF 36 ED 08 83 22 20 20 20 20 |...."..6..." |
00002EC0: 22 2C 22 20 20 20 20 22 2C 22 20 20 20 20 22 00 |"," "," ".|
00002ED0: 13 37 F2 08 83 22 C5 20 20 20 22 2C 22 20 C5 20 |.7...". "," . |
00002EE0: 20 22 2C 22 20 20 C5 20 22 2C 22 20 20 20 C5 22 | "," . "," ."|
00002EF0: 2C 22 CD 20 20 20 22 2C 22 20 CD 20 20 22 2C 22 |,". "," . ","|
00002F00: 20 20 CD 20 22 2C 22 A5 20 20 20 22 2C 22 20 A5 | . ",". "," .|
00002F10: 20 20 22 00 5E 37 F7 08 83 22 20 20 A5 20 22 2C | ".^7..." . ",|
00002F20: 22 20 20 20 A5 22 2C 22 A5 20 20 20 22 2C 22 C7 |" .",". ",".|
00002F30: 20 20 20 22 2C 22 DD 20 20 20 22 2C 22 D9 20 20 | ",". ",". |
00002F40: 20 22 2C 22 A5 20 20 20 22 2C 22 A5 20 20 20 22 | ",". ",". "|
00002F50: 2C 22 A5 20 20 20 22 2C 22 A5 20 20 20 22 00 6A |,". ",". ".j|
00002F60: 37 FC 08 83 22 A5 20 20 20 22 00 B7 37 01 09 8F |7...". "..7...|
00002F70: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00002F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002F90: 20 20 20 20 20 20 20 20 20 20 A6 A6 A6 57 4F 52 | ...WOR|
00002FA0: 44 20 44 41 54 41 20 46 4F 52 20 43 41 54 45 47 |D DATA FOR CATEG|
00002FB0: 4F 52 59 20 31 A6 A6 00 00 38 06 09 83 20 43 50 |ORY 1....8... CP|
00002FC0: 55 2C 43 48 49 50 2C 52 41 4D 2C 43 4F 52 45 2C |U,CHIP,RAM,CORE,|
00002FD0: 4D 45 4D 4F 52 59 2C 22 44 41 54 41 22 2C 54 45 |MEMORY,"DATA",TE|
00002FE0: 52 4D 49 4E 41 4C 2C 22 46 4C 4F 50 50 59 20 44 |RMINAL,"FLOPPY D|
00002FF0: 49 53 43 22 2C 43 59 43 4C 45 53 2C 4C 4F 4F 50 |ISC",CYCLES,LOOP|
00003000: 00 43 38 0B 09 83 20 49 4E 43 52 45 4D 45 4E 54 |.C8... INCREMENT|
00003010: 2C 49 4E 50 55 54 2C 4C 4F 47 49 43 2C 4F 43 54 |,INPUT,LOGIC,OCT|
00003020: 41 4C 2C 53 55 42 52 4F 55 54 49 4E 45 2C 48 45 |AL,SUBROUTINE,HE|
00003030: 58 41 44 45 43 49 4D 41 4C 2C 53 55 42 53 43 52 |XADECIMAL,SUBSCR|
00003040: 49 50 54 00 60 38 10 09 83 20 4F 55 54 50 55 54 |IPT.`8... OUTPUT|
00003050: 2C 50 45 52 49 50 48 45 52 41 4C 2C 42 59 54 45 |,PERIPHERAL,BYTE|
00003060: 00 AD 38 15 09 8F 22 20 20 20 20 20 20 20 20 20 |..8..." |
00003070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003090: A6 A6 A6 57 4F 52 44 20 44 41 54 41 20 46 4F 52 |...WORD DATA FOR|
000030A0: 20 43 41 54 45 47 4F 52 59 20 32 A6 A6 00 F8 38 | CATEGORY 2....8|
000030B0: 1A 09 83 20 42 41 53 45 42 41 4C 4C 2C 46 4F 4F |... BASEBALL,FOO|
000030C0: 54 42 41 4C 4C 2C 42 41 53 4B 45 54 42 41 4C 4C |TBALL,BASKETBALL|
000030D0: 2C 53 4F 43 43 45 52 2C 52 55 47 42 59 2C 48 4F |,SOCCER,RUGBY,HO|
000030E0: 43 4B 45 59 2C 53 4B 49 49 4E 47 2C 22 57 41 54 |CKEY,SKIING,"WAT|
000030F0: 45 52 20 50 4F 4C 4F 22 00 40 39 1F 09 83 20 56 |ER POLO".@9... V|
00003100: 4F 4C 4C 45 59 42 41 4C 4C 2C 42 4F 58 49 4E 47 |OLLEYBALL,BOXING|
00003110: 2C 22 54 49 44 44 4C 45 59 20 57 49 4E 4B 53 22 |,"TIDDLEY WINKS"|
00003120: 2C 43 48 45 53 53 2C 22 4A 41 49 20 41 4C 41 49 |,CHESS,"JAI ALAI|
00003130: 22 2C 53 57 49 4D 4D 49 4E 47 2C 54 52 41 43 4B |",SWIMMING,TRACK|
00003140: 00 8D 39 24 09 8F 22 20 20 20 20 20 20 20 20 20 |..9$.." |
00003150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003170: A6 A6 A6 57 4F 52 44 20 44 41 54 41 20 46 4F 52 |...WORD DATA FOR|
00003180: 20 43 41 54 45 47 4F 52 59 20 33 A6 A6 00 CD 39 | CATEGORY 3....9|
00003190: 29 09 83 20 22 41 55 54 4F 20 52 41 43 49 4E 47 |).. "AUTO RACING|
000031A0: 22 2C 46 45 4E 43 49 4E 47 2C 41 52 43 48 45 52 |",FENCING,ARCHER|
000031B0: 59 2C 43 59 43 4C 49 4E 47 2C 22 4D 4F 55 4E 54 |Y,CYCLING,"MOUNT|
000031C0: 41 49 4E 20 43 4C 49 4D 42 49 4E 47 22 00 15 3A |AIN CLIMBING"..:|
000031D0: 2E 09 83 20 50 4F 52 53 43 48 45 2C 54 4F 59 4F |... PORSCHE,TOYO|
000031E0: 54 41 2C 56 4F 4C 4B 53 57 41 47 45 4E 2C 4C 49 |TA,VOLKSWAGEN,LI|
000031F0: 4E 43 4F 4C 4E 2C 50 41 4E 54 45 52 41 2C 4C 4F |NCOLN,PANTERA,LO|
00003200: 54 55 53 2C 54 52 49 55 4D 50 48 2C 43 48 45 56 |TUS,TRIUMPH,CHEV|
00003210: 52 4F 4C 45 54 00 5A 3A 33 09 83 20 44 4F 44 47 |ROLET.Z:3.. DODG|
00003220: 45 2C 42 4D 57 2C 45 44 53 45 4C 2C 44 41 54 53 |E,BMW,EDSEL,DATS|
00003230: 55 4E 2C 43 4F 4E 56 45 52 54 49 42 4C 45 2C 43 |UN,CONVERTIBLE,C|
00003240: 41 44 49 4C 4C 41 43 2C 43 41 50 52 49 2C 22 44 |ADILLAC,CAPRI,"D|
00003250: 55 4E 45 20 42 55 47 47 59 22 00 7F 3A 38 09 83 |UNE BUGGY"..:8..|
00003260: 20 4D 55 53 54 41 4E 47 2C 4A 41 4C 4F 50 59 2C | MUSTANG,JALOPY,|
00003270: 46 45 52 52 41 52 49 2C 52 41 4D 42 4C 45 52 00 |FERRARI,RAMBLER.|
00003280: CC 3A 3D 09 8F 22 20 20 20 20 20 20 20 20 20 20 |.:=.." |
00003290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000032A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A6 | .|
000032B0: A6 A6 57 4F 52 44 20 44 41 54 41 20 46 4F 52 20 |..WORD DATA FOR |
000032C0: 43 41 54 45 47 4F 52 59 20 34 A6 A6 00 14 3B 42 |CATEGORY 4....;B|
000032D0: 09 83 20 54 48 41 49 4C 41 4E 44 2C 41 4D 45 52 |.. THAILAND,AMER|
000032E0: 49 43 41 2C 46 52 41 4E 43 45 2C 53 50 41 49 4E |ICA,FRANCE,SPAIN|
000032F0: 2C 45 4E 47 4C 41 4E 44 2C 47 45 52 4D 41 4E 59 |,ENGLAND,GERMANY|
00003300: 2C 52 55 53 53 49 41 2C 49 54 41 4C 59 2C 47 52 |,RUSSIA,ITALY,GR|
00003310: 45 45 43 45 00 56 3B 47 09 83 20 45 47 59 50 54 |EECE.V;G.. EGYPT|
00003320: 2C 52 48 4F 44 45 53 49 41 2C 43 48 49 4C 45 2C |,RHODESIA,CHILE,|
00003330: 43 48 49 4E 41 2C 4A 41 50 41 4E 2C 49 4E 44 49 |CHINA,JAPAN,INDI|
00003340: 41 2C 43 41 4E 41 44 41 2C 4D 45 58 49 43 4F 2C |A,CANADA,MEXICO,|
00003350: 55 47 41 4E 44 41 00 6C 3B 4C 09 83 20 59 55 47 |UGANDA.l;L.. YUG|
00003360: 4F 53 4C 41 56 49 41 2C 47 55 41 4D 00 B9 3B 51 |OSLAVIA,GUAM..;Q|
00003370: 09 8F 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
00003380: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003390: 20 20 20 20 20 20 20 20 20 20 20 20 A6 A6 A6 57 | ...W|
000033A0: 4F 52 44 20 44 41 54 41 20 46 4F 52 20 43 41 54 |ORD DATA FOR CAT|
000033B0: 45 47 4F 52 59 20 35 A6 A6 00 03 3C 56 09 83 20 |EGORY 5....<V.. |
000033C0: 50 49 5A 5A 41 2C 54 45 4E 53 49 4F 4E 2C 4D 41 |PIZZA,TENSION,MA|
000033D0: 47 49 53 54 52 41 54 45 2C 22 54 41 4C 4B 20 53 |GISTRATE,"TALK S|
000033E0: 48 4F 57 22 2C 53 43 49 45 4E 54 49 53 54 2C 4D |HOW",SCIENTIST,M|
000033F0: 41 48 4F 47 41 4E 59 2C 54 48 49 4E 47 2C 46 41 |AHOGANY,THING,FA|
00003400: 55 4C 54 00 41 3C 5B 09 83 20 44 41 4E 47 45 52 |ULT.A<[.. DANGER|
00003410: 4F 55 53 2C 45 57 45 53 2C 53 59 4C 50 48 2C 51 |OUS,EWES,SYLPH,Q|
00003420: 55 41 49 4E 54 2C 4C 55 47 2C 42 59 45 2C 4D 41 |UAINT,LUG,BYE,MA|
00003430: 49 44 45 4E 2C 4C 41 55 47 48 2C 53 50 48 49 4E |IDEN,LAUGH,SPHIN|
00003440: 58 00 63 3C 60 09 83 20 45 52 52 4F 4E 45 4F 55 |X.c<`.. ERRONEOU|
00003450: 53 4C 59 2C 45 58 41 4D 50 4C 45 2C 51 55 49 4E |SLY,EXAMPLE,QUIN|
00003460: 49 4E 45 00 00 00 |INE... |
.......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 +++
...(.UR$."":UI$."":.UO,0...*..UL.0.UL.80
.+.-.." ..";:.UC,0.?.2..UI$:.UI$."".50.
I.7..UI$.G(13).C(UR$)..1..UC,1:." .";:.8
5.|.<..UI$.G(20).105...>.. C(UR$)..UL.50
...A..120:. CHECK FOR VALID CHARACTER.E.
F.UR$.UR$.UI$.O.K..UI$;.W.P..50...U.. ++
+ CHECK FOR HELP REQUEST +++.$.Z..UR$.UX
$.195:. EXIT TO HELP ROUTINE.3._..UF.1..
240.@.D.UF.0:.:..Y.F.. ++ CHECK DELETE +
+.J.I..C(UR$).1.50...N.UR$.H(UR$,C(UR$).
1)...S..". ..";:.50...X.. ++ CHECK FOR
VALID CHARACTERS ++.M.}..C(US$).0.150...
...US.1.C(US$)......UI$.J(US$,US,1).....
........UI$."":..#.... ** STANDARD INPUT
**.4....F(UI$).46...E....UI$.G(32)...B.
..F(UI$).48.F(UI$).57.170.H..........F(
UI$).65.F(UI$).90.180............F(UI$).
193.F(UI$).218.UI$."":..R....B(UT).UU%.U
I$.G(F(UI$).128):..X.........UI$."":....
C.UF.1:. +++ HELP ROUTINE EXIT +++...E..
250...H..245.;.M..UQ.UB.(U2%.256.U1%.U3%
.2).W.R.UQ%(UQ.UB).B(UQ):.:.".".J.W.UZ.1
:UV%.B(UT).S.X..300...Y.UZ.0:US$.UJ$:UG$
.UK$:UP.UJ:UL.UK.O.Z..B(50003).0..53281,
1:.".";:.53281,6:.53280,14:.220.Y...."."
;.....UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1
%.U3%.3)......UQ,UQ%(UQ.UB):..)....U1,U1
%.5....U2,U2%.A....U4,U4%.O....U3,U3%.1.
W....35.....UD%.((U2%.256.U1%.U3%).UB).4
0:.H(UD$,UD%.1):..D....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 **.5.-.:.D....".":.
UT,UU%:.B(50003).0..53281,9:.53280,8.J./
.:...1..". MENU"...6.." -
-------------------------------------".Z
.;..".. 1. BEGIN HANGMAN 1...@..
".. 2. STUDENT INSTRUCTIONS"...E
..".. 3. TEACHER INSTRUCTIONS".[
.J..".. 4. MODIFICATION OF PROGR
AM".W.O..".. 5. QUIT.."...T.." -
-------------------------------------".Q
.Y..".. PRESS A NUMBER KEY (1-5) "
;...^.UL.1:US$."12345":.35:. INPUT ROUTI
NE...`.US$."".&.C..E(UR$).1000,400,500,6
00,396./.H..300.V.... ** RE-ENABLE STOP
KEY AND END **......B(50003)..1.B(50003)
..160.B(50003)..0.399......UU.71:.B(5000
3).0..53281,6:.53280,14......"..":..F...
.875:....... ** STUDENT INSTRUCTIONS **.
.....".":.UT,UL%:.B(50003).0..53281,0:.5
3280,0.7...UP.0:UG$."STUDENT INST":.850.
F...."..YOUR BEST FRIEND HAS BEEN ARREST
ED AND......"..CHARGED WITH ARSON, TREAS
ON, ARMED"... .."..ROBBERY AND PUBLIC DR
UNKENESS .PLUS......."..MURDER, MAYHEM,
IGNORANCE AND......"..UGLINESS..&...."..
HOWEVER, THE JUDGE, BEING A BENEVOLENT.V
...."..SORT, WILL LET YOUR FRIEND PLEA-B
ARGAIN......".THE CHARGES DOWN TO UGLINE
SS, PROVIDED......"..HE/SHE HAS ONE FRIE
ND. GUESS WHO??":.835:.850......"..TO S
AVE YOUR FRIEND'S LIFE, YOU MUST......".
.GUESS THE SECRET WORD/WORDS. EACH".A..
.."..TIME YOU GUESS A CORRECT LETTER, YO
U.P...."..HAVE A CHANCE TO GUESS THE WOR
D/WORDS,......"..WITH NO PENALTY FOR A W
RONG GUESS.".K...."..BUT BEWARE!!!! EAC
H TIME YOU GUESS AN......"..INCORRECT LE
TTER, YOUR FRIEND ADVANCES......"..ONE S
TEP CLOSER TO".4.... .10);".!!!! DOOM
!!!!.B....835:.850.Q...."...NOTE:...TO A
DVANCE FROM ONE QUESTION"......"..TO THE
NEXT PRESS THE SPACE BAR."......835....
..UZ.1..UP%:.217............ ** TEACHER
INSTRUCTIONS **......".":.UT,UL%:.B(5000
3).0..53281,2:.53280,10.0...UP.0:UG$."TE
ACHER INST":.850.^....".. TO THE BE
ST OF OUR KNOWLEDGE,."......" THIS PRO
GRAM IS IN THE PUBLIC."......" DOMAIN.
IF THIS IS NOT THE CASE.".P...." PLE
ASE CONTACT:..."......" COMMODORE B
USINESS MACHINES."......" 3370
PHARMACY AVE..A...." AGINCOURT,
ONTARIO".C...." CANADA M1W 2
K4"......" (416) 499-4292".....
UP.1:. 835:. 850:......" ..PROGRAM N
AME: HANGMAN 1......." WRITTEN BY :
UNKNOWN......." UPGRADED BY : ..'..
.." .THIS PROGRAM WILL RUN ON ANY...
G...." PET 64 COMPUTER..L...."
COMMODORE 64 COMPUTER.U.D..835...
N..UZ.1..UP%:.217...W.....X.. ** PROGRAM
MODIFICATION INST **.F.Y..".":.UT,UL%..
.].UP.0:UG$."PROGRAM MOD":.850...B.."..I
N ORDER TO CHANGE THE WORDS IN THE".;.G.
."..CATAGORIES ALREADY USED IN THIS.F.L.
."..PROGRAM SIMPLY CHANGE THE DATA IN"..
.Q.."..LINES 2305-2400. "...V.."..TO CHA
NGE THE CATAGORIES USED CHANGE".F.{.."..
LINE 1405 TO:"......"..1405 CT$(1)='FIRS
T CATAGORY'..."......"..AND SO ON UP TO
CT$(5)='FIFTH CATAGORY'.I....".THEN CHAN
GE THE DATA LINES TO THE".R...."..DATA Y
OU WANT IN EACH CATAGORY.".{....835.....
.UZ.1..UP%:.217............ ** TO USE 80
32 LOAD CBM4032 **...F..".....BEFORE RUN
NING THIS PROGRAM ON AN 8032 ...&.P.."
LOAD THE 'CBM 4032' PROGRAM........
.....".1.Z..UU.71.7.....\.... ** TO USE
8032 LOAD CBM4032 **......"....BEFORE RU
NNING THIS PROGRAM ON AN 8032 ..LOAD CB
M 4032 PROGRAM"......1093:..S. .. ** T I
T L E P A G E **...".."....";:.UT,UU%
:.B(50003).0..53280,14:.53281,6...$..I.1
.38:."...";:..5.&..I.1.22:.".....";:..M.
(..I.1.37:.".....";:..E.*..I.1.22:."....
.";:....,.."...........................
......."................... . . ...M.0
.."................... . ......2.."....
................ ....4.."..............
C O M M O D O R E...6.6.."..............
.EDUCATIONAL...U.8.."................SOF
TWARE.P.:.. ** COMMODORE LOGO **...;..H(
UD$,24);"..........PRESS SPACE BAR OR WA
IT.":I.0.J.<..A$:.A$.." ".I.I.1:.I.250.8
28...>.T1$."":T2$."":T3$."":T4$."":I.0..
.@..300...C.. ** SPACE BAR PRESS **.N.H.
.H(UD$,24);".......PRESS SPACE BAR TO CO
NTINUE.":.UO,0.E.L..UI$:.UI$.." ".844.K.
N.....R.. ** PAGE DESIGN ROUTINE **...T.
UP.UP.1.A.W.."."H(UT$.UP$,21);I(UP$.UG$.
D(UP),18)...\.." -----------------------
---------------"...`..UH..0.870.3.A..H(U
D$,24);H(UP$,7);"HELP - PRESS H <RETUR
N>".D.F.UH.0:."..":..C.K.. ** PLEASE WAI
T REMARK **...P..H(UD$,24);" O
NE MOMENT PLEASE... "...U........ **
SET UP VARIABLES **.....UX$."H":.UQ%(10
00):UB.32768:U1.196:U2.197:U3.198:U4.216
:UC.167:UU.1024.E...UT.59468:UU%.12:UL%.
14:UP%.1146:UM.32768:. 50003,0:UO.158...
...B(50003).0.UB.1024:U1.209:U2.210:U3.2
11:U4.214:UC.204:UU.2048.G....B(50003).0
.UT.53272:UU%.21:UL%.23:UP%.2139:UM.1024
:UO.198.....UD$.".......................
..".. ..UP$."
".K ..UT$." HANGMAN 1
":. PLACE PROGRAM TITLE HERE !!!!!!!!!
!!!!!!!!***.. ... HM$(8),TD$(6,4),PR$(17
),C$(25).. ..... ... ** SET VARIABLES **
.. ...900.. ..:.Z ... ** CHECK FOR 8032
**.. ...".":." ":. SHIFTED SPACE..!...B(
UB.40)..96..700.(!... ** MEMORY CHECK **
.<!... .(0).2000.937.J!..."....THIS MACH
INE DOES NOT HAVE ENOUGH."..!..."MEMORY
TO RUN THIS PROGRAM !"..!...UU.71..!....
.!..."..":.B(50003).0.962..!... ** BASIC
2.0 OR 4.0 OR C-64 SETUP **.&"...10
75,133:.1076,144:.1077,234:.1079,4:.1080
,133:.1081,145.\"...1091,155:.1098,133:.
1099,144:.1100,234:.1103,133.~"...1104,1
45:.1105,234:.1082,234.."...B(50003)..16
0.955.D"...1093,88:.1094,228:.1097,85:.1
102,228:.965.Y"...B(50003)..1.990..#...1
093,49:.1094,230:.1097,46:.1102,230:.965
.B#B..2099,141:.2100,20:.2101,3:.2103,8:
.2104,141:.2105,21.~#C..2106,3:.2115,145
:.2117,52:.2118,234:.2121,49:.2122,141..
#D..2123,20:.2124,3:.2126,234:.2127,141:
.2128,21:.2129,3.V#E..UU.48:. DISABLE ST
OP KEY..#J..800:. TITLE..#T..300:. MENU.
($...".THE PGM WILL NOT WORK ON THIS MAC
HINE!":..]$...UZ.1..UP%:.UP%:UZ.0:. ** P
ROGRAM STARTS HERE **..$..."..";:.:.B(50
003).0..53281,6:.53280,6..$...UT,UL%:UG$
."PAGE #":UP.0:UH.1.O$D..850:."....".13)
"............."..$I...13)".".25)"."..$N.
..13)". HANGMAN ."..%S...13)".".25)"."
.)%X...13)".............".H%7.."....WHAT
IS YOUR FIRST NAME? ";:UL.12:US$."":.35
:NM$.UR$..%<.UH.1:.850:."...OKAY, "NM$..
%A.."...WHEN YOU GUESS A CORRECT LETTER,
YOU"..%F.."..WILL BE ASKED IF YOU WOULD
LIKE TO TRY"..&K.."..TO GUESS THE ENTIR
E WORD...TYPE EITHER.@&P.."..YES OR NO A
CCORDING TO YOUR WISHES".D&U.."..AND FOL
LOW THE INSTRUCTIONS.Z&V.."..ACCORDINGLY
."..&Z..835..&D.. I.1 . 8:. HM$(I):...&I
.. I.1 . 6: . J.1 . 4.H&N.. TD$(I,J):.:.
..&S.A$.".....":B$."............."..'X..
".":.UT,UL%:.850:."..CHOOSE ONE OF THE F
OLLOWING CATEGORIES:...E'|.. ***CATAGORI
ES***..'}.CT$(1)."COMPUTERS":CT$(2)."SPO
RTS":CT$(3)."CARS":CT$(4)."NATIONS"..'~.
CT$(5)."POT POURRI"..'... **************
**..'... A.1 . 5:.A;".. ";CT$(A);".":..!
(...".. YOUR CHOICE, ".NM$." ";:US$."
12345H":UL.1:.35:C.E(UR$).N(... ". LE
T ME THINK OF A WORD...":TT.TI.N( .. I.0
. (C.1).20..(.(1).20).Z(... WD$:...(...
TI.TT.120 . 1450..(..LM$."":PR$."":LG$.
""..(...I.1 . C(WD$)..(... J(WD$,I,1)."
" . PR$(I)." ":PR$.PR$." ":. 1475..)..PR
$(I)."-":PR$.PR$."-"..)C..:.".":.UT,UU%.
0)H.MN$.H(NM$,1).\)M.. F(MN$).95 .NM$.G(
F(MN$).128).J(NM$,2).|)R.VP.17:HP.0:M.0:
.".";:UX$.""..)W.. I.1 . 16:.".";:...)..
. I.1.8:.:.HM$(I);:...)... I.1 . 7.V)...
". ...... ..";:.:.".";..)...". .. .EEEE
. ."..*...".";.34);".. .........UI...JK
...... ";.4*... I.1 . 23:.".. ..";:..N*.
..".. .";:. UM.999,160.N*...".SECRET WOR
D: ";CT$(C);"...*... I.1 . 8 :."." :...*
....18);".LETTERS MISSED"..*....18);"...
...........".M*...".....";PR$..*... I.1
. 17:.".";:...*....16);LM$.5+"..".......
GUESS A LETTER ..........";:.2
185:G$.C$." ".P+'.. J(G$,2,1)." " . 1610
.\+,.."....".K+1.. I.1 . 20..+6.. I.2..(
I.2). .".";..+;.."ONLY ONE LETTER, ";NM$
;"."..+@.. J.1 . 50:..D+E.. I:. 1570.S+J
.G$.H(G$,1)..+O.. G$.."A" . G$.."Z" . 16
45..,T.."....":. I.1 . 20.!,Y.. I.2..(I.
2). .".";.?,^.."THAT'S NOT A LETTER!!.".
P,C.. J.1 . 50:.._,H.. I:. 1570.R,M.. I.
1 . C(LG$)..,R.. G$.J(LG$,I,1) . 1660..,
W.. I:. 1690..,|.."...."..,... I.1 . 20.
P,... I.2..(I.2) . .".";..,..."THAT LETT
ER WAS TRIED!!."..-... J.1 . 50:...-...
I:. 1570.--...".. ".D-
..F.0:. I.1 . C(WD$).H-... G$.J(WD$,I,1)
. PR$(I).G$:F.1.N-....-... F.0 . 1910.
.-..LG$.LG$.G$:PR$.""..-... I.1 . C(WD$)
..-..PR$.PR$.PR$(I):..N-B..".....";PR$..
-G.." ."..-L.. I.1 .
20...Q.. I.2..(I.2) . .".";...V.."VERY G
OOD,".NM$."!.".A.... J.1 . 50:.:..V....
PR$.WD$ . 1830......".......GUESS WORD (
Y/N)? .......";......2185...... H
(C$,1).."Y" . 1570.M....".......GUESS TH
E WORD(S) "...... 2185:G$.H(C$,C(WD$))
...... G$.WD$ . 1830../...".......
."../... I.1 . 20.G/... I.2
..(I.2) . .".";.]/..."SORRY,".NM$.".".P/
... J.1 . 50:.:.../...".........
"../!.. 1570.M/&.UX$."H":.UT,UU%
:."........................";../+.. I.1
. 10../0.."Z Z Z Z Z Z ".B$;..05.."
Z".B$;.$0:.."Z YOU WON! ".B$;.<0?
.." Z".B$;.T0D.."Z Z Z Z Z Z "
.B$;.B0I..".....";.Z0N.." Z Z Z Z Z Z".B
$;..0S.."Z ".B$;..0X.." .YOU
WON!. Z".B$;.D0].."Z ".B$;..0B
.." Z Z Z Z Z Z".B$;..0G..".....";:...1L
..:.".......CARE FOR ANOTHER CHANCE TO S
AVE A.81P.."..FRIEND ";NM$;"? ";.K1Q.UX$
."H":. 2160.O1V..".......
.".~1{.. I.1 . 20..1... I.2..(I.2).
.".";..1..."YOU BLEW IT ".NM$."!.".F1..
. J.1 . 50:.:...1..LG$.LG$.G$:LM$.LM$.G$
..1...".":. I.1 . 10:.".":...2....18).LM
$:M.M.1. 2... M.9 . 2045.<2... I.1 . 2:V
P.VP.1:.".";.S2... J.2 . VP:.".";:..F2..
. VP.1 . .".";.W2....HP.1).".";..2... J.
1 . 8..2...".".HM$(J)."....";..2A.. J:."
. ";:. I.O2F.. I.1 . 4:HP.HP.1:.".";.
.2K.. J.2 . VP:.".";:...2P.. VP.1 ..".";
..3U...HP).".";..3Z.. J.1 . 8.33...". ".
HM$(J).".....";:.:..D3... M.8 . 1570.S3.
..".";.HP);.A3... I.1 . 8.3...". ".HM$
(I)."......";:...3... 1570..3...".......
...";.34);..3... I.1 . 6:. J.1 . 4.N3...
TD$(I,J).A$;:...3..."....";:...3..."..."
;.34);..4... I.1 . 16:.". .. ";..4... J.
3 . 8.(4 .. A$.HM$(J);:..=4%..".........
.";:..P4*.. I.1 . 1000:..B4/.."... .".A
$;.S44.."..R .".A$;..49.."..I..".A$;..4>
.."..P..".A$;..4C..".. ...".A$;..4H.."..
..".A$;.K4M..".. ..".A$;.Z4R..".. ..
";..4W.. I.1 . 3000:..&5\..".":UH.1:.UT,
UL%:.850:."......THE SECRET WORD WAS:".@
5A.."..............".WD$.N5F..".....BETT
ER LUCK NEXT TIME, ";NM$;"!!!"..5K.."...
..CARE TO WASTE ANOTHER FRIEND? ";. 5P..
..5U.. I.1 . 32:. WD$:..T5Z.US$."YN":UL.
1:.35:C$.UR$..5..C$."Y".UX$."H":.1400..
5...:.900:.300..6..C$."":. INPUT SUBROU
TINE.'6..US$."".<6..UL.15:.35:C$.UR$.B6.
...U6E.." UI "," JK ".C6J..".. ..".Q6O.
.".. ..".6T..".. .."..6Y.." .... "..6
..." .... "..6..."......"..6..."ECF.".O6
..." "," "," "..7..."E "," E
"," E "," E","M "," M "," M ",".
"," . ".^7..." . "," .",". ","G
",". ","Y ",". ",". ",". ",
". ".J7...". "..7..."
...WORD DATA F
OR CATEGORY 1....8... CPU,CHIP,RAM,CORE,
MEMORY,"DATA",TERMINAL,"FLOPPY DISC",CYC
LES,LOOP.C8... INCREMENT,INPUT,LOGIC,OCT
AL,SUBROUTINE,HEXADECIMAL,SUBSCRIPT.`8..
. OUTPUT,PERIPHERAL,BYTE..8..."
...WORD
DATA FOR CATEGORY 2....8... BASEBALL,FOO
TBALL,BASKETBALL,SOCCER,RUGBY,HOCKEY,SKI
ING,"WATER POLO".@9... VOLLEYBALL,BOXING
,"TIDDLEY WINKS",CHESS,"JAI ALAI",SWIMMI
NG,TRACK..9$.."
...WORD DATA FOR CATEGOR
Y 3...M9).. "AUTO RACING",FENCING,ARCHER
Y,CYCLING,"MOUNTAIN CLIMBING"..:... PORS
CHE,TOYOTA,VOLKSWAGEN,LINCOLN,PANTERA,LO
TUS,TRIUMPH,CHEVROLET.Z:3.. DODGE,BMW,ED
SEL,DATSUN,CONVERTIBLE,CADILLAC,CAPRI,"D
UNE BUGGY".:8.. MUSTANG,JALOPY,FERRARI,
RAMBLER.L:=.."
...WORD DATA FOR CATEGORY
4....;B.. THAILAND,AMERICA,FRANCE,SPAIN
,ENGLAND,GERMANY,RUSSIA,ITALY,GREECE.V;G
.. EGYPT,RHODESIA,CHILE,CHINA,JAPAN,INDI
A,CANADA,MEXICO,UGANDA.L;L.. YUGOSLAVIA,
GUAM..;Q.."
...WORD DATA FOR CATEGORY 5.
...<V.. PIZZA,TENSION,MAGISTRATE,"TALK S
HOW",SCIENTIST,MAHOGANY,THING,FAULT.A<[.
. DANGEROUS,EWES,SYLPH,QUAINT,LUG,BYE,MA
IDEN,LAUGH,SPHINX.C<`.. ERRONEOUSLY,EXAM
PLE,QUININE...
> CLICK IMAGE PREVIEW FOR FULL MODAL