SCRAMBLE 7
FILE INFORMATION
FILENAME(S): SCRAMBLE 7
FILE TYPE(S): PRG
FILE SIZE: 10.2K
FIRST SEEN: 2025-12-02 00:17:48
APPEARS ON: 1 disk(s)
FILE HASH
b63b972fa61374dbdfeac2337f563241457fc4f8f6c39b1700a1f6514c754985
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PUB DOMAIN | SCRAMBLE 7 | PRG | Maestro | 27 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 85 90 EA A9 04 85 91 EA 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 9B 4C 58 E4 78 A9 55 85 90 EA A9 E4 |.....LX.x.U.....|
00000050: 85 91 EA 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A 00 E4 08 23 00 8F 20 2B |UTINE **...#.. +|
000000D0: 2B 2B 20 49 4E 50 55 54 20 53 45 43 54 49 4F 4E |++ INPUT SECTION|
000000E0: 20 2B 2B 2B 00 FC 08 28 00 97 55 4F 2C 30 3A 55 | +++...(..UO,0:U|
000000F0: 52 24 B2 22 22 3A 55 49 24 B2 22 22 00 0C 09 2A |R$."":UI$.""...*|
00000100: 00 8B 55 4C B2 30 A7 55 4C B2 38 30 00 16 09 2D |..UL.0.UL.80...-|
00000110: 00 97 55 43 2C 30 00 2A 09 32 00 A1 55 49 24 3A |..UC,0.*.2..UI$:|
00000120: 8B 55 49 24 B2 22 22 A7 35 30 00 54 09 37 00 8B |.UI$."".50.T.7..|
00000130: 55 49 24 B2 C7 28 31 33 29 AF C3 28 55 52 24 29 |UI$..(13)..(UR$)|
00000140: B1 B2 31 A7 97 55 43 2C 31 3A 99 22 20 9D 22 3B |..1..UC,1:." .";|
00000150: 3A 89 38 35 00 67 09 3C 00 8B 55 49 24 B2 C7 28 |:.85.g.<..UI$..(|
00000160: 32 30 29 A7 31 30 35 00 7B 09 3E 00 8B 20 C3 28 |20).105.{.>.. .(|
00000170: 55 52 24 29 B2 B1 55 4C A7 35 30 00 A0 09 41 00 |UR$)..UL.50...A.|
00000180: 8D 31 32 30 3A 8F 20 43 48 45 43 4B 20 46 4F 52 |.120:. CHECK FOR|
00000190: 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 | VALID CHARACTER|
000001A0: 00 B0 09 46 00 55 52 24 B2 55 52 24 AA 55 49 24 |...F.UR$.UR$.UI$|
000001B0: 00 BA 09 4B 00 99 55 49 24 3B 00 C2 09 50 00 89 |...K..UI$;...P..|
000001C0: 35 30 00 E7 09 55 00 8F 20 2B 2B 2B 20 43 48 45 |50...U.. +++ CHE|
000001D0: 43 4B 20 46 4F 52 20 48 45 4C 50 20 52 45 51 55 |CK FOR HELP REQU|
000001E0: 45 53 54 20 2B 2B 2B 00 0F 0A 5A 00 8B 55 52 24 |EST +++...Z..UR$|
000001F0: B2 55 58 24 A7 31 39 35 3A 8F 20 45 58 49 54 20 |.UX$.195:. EXIT |
00000200: 54 4F 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 00 |TO HELP ROUTINE.|
00000210: 1E 0A 5F 00 8B 55 46 B2 31 A7 8D 32 34 30 00 2B |.._..UF.1..240.+|
00000220: 0A 64 00 55 46 B2 30 3A 99 3A 8E 00 44 0A 66 00 |.d.UF.0:.:..D.f.|
00000230: 8F 20 2B 2B 20 43 48 45 43 4B 20 44 45 4C 45 54 |. ++ CHECK DELET|
00000240: 45 20 2B 2B 00 55 0A 69 00 8B C3 28 55 52 24 29 |E ++.U.i...(UR$)|
00000250: B3 31 A7 35 30 00 6D 0A 6E 00 55 52 24 B2 C8 28 |.1.50.m.n.UR$..(|
00000260: 55 52 24 2C C3 28 55 52 24 29 AB 31 29 00 7F 0A |UR$,.(UR$).1)...|
00000270: 73 00 99 22 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 |s..". ..";:.50.|
00000280: A6 0A 78 00 8F 20 2B 2B 20 43 48 45 43 4B 20 46 |..x.. ++ CHECK F|
00000290: 4F 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 |OR VALID CHARACT|
000002A0: 45 52 53 20 2B 2B 00 B8 0A 7D 00 8B C3 28 55 53 |ERS ++...}...(US|
000002B0: 24 29 B2 30 A7 31 35 30 00 C8 0A 7F 00 55 53 24 |$).0.150.....US$|
000002C0: B2 55 53 24 AA 55 58 24 00 D9 0A 82 00 81 55 53 |.US$.UX$......US|
000002D0: B2 31 A4 C3 28 55 53 24 29 00 F0 0A 87 00 8B 55 |.1..(US$)......U|
000002E0: 49 24 B2 CA 28 55 53 24 2C 55 53 2C 31 29 A7 8E |I$..(US$,US,1)..|
000002F0: 00 F6 0A 8C 00 82 00 03 0B 91 00 55 49 24 B2 22 |...........UI$."|
00000300: 22 3A 8E 00 1E 0B 96 00 8F 20 2A 2A 20 53 54 41 |":....... ** STA|
00000310: 4E 44 41 52 44 20 49 4E 50 55 54 20 2A 2A 00 2F |NDARD INPUT **./|
00000320: 0B 98 00 8B C6 28 55 49 24 29 B2 34 36 A7 8E 00 |.....(UI$).46...|
00000330: 40 0B 9B 00 8B 55 49 24 B2 C7 28 33 32 29 A7 8E |@....UI$..(32)..|
00000340: 00 5D 0B A0 00 8B C6 28 55 49 24 29 B3 34 38 B0 |.].....(UI$).48.|
00000350: C6 28 55 49 24 29 B1 35 37 A7 31 37 30 00 63 0B |.(UI$).57.170.c.|
00000360: A5 00 8E 00 80 0B AA 00 8B C6 28 55 49 24 29 B3 |..........(UI$).|
00000370: 36 35 B0 C6 28 55 49 24 29 B1 39 30 A7 31 38 30 |65..(UI$).90.180|
00000380: 00 86 0B AF 00 8E 00 AA 0B B4 00 8B C6 28 55 49 |.............(UI|
00000390: 24 29 B3 31 39 33 B0 C6 28 55 49 24 29 B1 32 31 |$).193..(UI$).21|
000003A0: 38 A7 55 49 24 B2 22 22 3A 8E 00 CD 0B B9 00 8B |8.UI$."":.......|
000003B0: C2 28 55 54 29 B2 55 55 25 A7 55 49 24 B2 C7 28 |.(UT).UU%.UI$..(|
000003C0: C6 28 55 49 24 29 AB 31 32 38 29 3A 8E 00 D3 0B |.(UI$).128):....|
000003D0: BB 00 8E 00 E0 0B BE 00 55 49 24 B2 22 22 3A 8E |........UI$."":.|
000003E0: 00 05 0C C3 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 |.....UF.1:. +++ |
000003F0: 48 45 4C 50 20 52 4F 55 54 49 4E 45 20 45 58 49 |HELP ROUTINE EXI|
00000400: 54 20 2B 2B 2B 00 0E 0C C5 00 8D 32 35 30 00 17 |T +++......250..|
00000410: 0C C8 00 8D 32 34 35 00 36 0C CD 00 81 55 51 B2 |....245.6....UQ.|
00000420: 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 AA |UB.(U2%.256.U1%.|
00000430: 55 33 25 AB 32 29 00 52 0C D2 00 55 51 25 28 55 |U3%.2).R...UQ%(U|
00000440: 51 AB 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 22 |Q.UB)..(UQ):.:."|
00000450: 93 22 00 65 0C D7 00 55 5A B2 31 3A 55 56 25 B2 |.".e...UZ.1:UV%.|
00000460: C2 28 55 54 29 00 6E 0C D8 00 89 33 30 30 00 B2 |.(UT).n....300..|
00000470: 0C D9 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 3A |...UZ.0:US$.UJ$:|
00000480: 55 47 24 B2 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C |UG$.UK$:UP.UJ:UL|
00000490: B2 55 4B 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |.UK:..(50003).0.|
000004A0: 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C |.53281,6:.53280,|
000004B0: 31 34 00 E7 0C DC 00 55 54 24 B2 55 4C 24 3A 99 |14.....UT$.UL$:.|
000004C0: 22 93 22 3B 3A 97 55 54 2C 55 56 25 3A 81 55 51 |".";:.UT,UV%:.UQ|
000004D0: B2 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 |.UB.(U2%.256.U1%|
000004E0: AA 55 33 25 AB 33 29 00 FC 0C E1 00 97 55 51 2C |.U3%.3)......UQ,|
000004F0: 55 51 25 28 55 51 AB 55 42 29 3A 82 00 08 0D E6 |UQ%(UQ.UB):.....|
00000500: 00 97 55 31 2C 55 31 25 00 14 0D E8 00 97 55 32 |..U1,U1%......U2|
00000510: 2C 55 32 25 00 20 0D E9 00 97 55 34 2C 55 34 25 |,U2%. ....U4,U4%|
00000520: 00 2E 0D EA 00 97 55 33 2C 55 33 25 AB 31 00 36 |......U3,U3%.1.6|
00000530: 0D EB 00 89 33 35 00 68 0D F0 00 55 44 25 B2 28 |....35.h...UD%.(|
00000540: 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 |(U2%.256.U1%.U3%|
00000550: 29 AB 55 42 29 AD 34 30 3A 99 C8 28 55 44 24 2C |).UB).40:..(UD$,|
00000560: 55 44 25 AA 31 29 3A 8E 00 A3 0D F5 00 99 C8 28 |UD%.1):........(|
00000570: 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 |UD$,24);" |
00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 | .|
00000590: 20 48 45 4C 50 20 43 4F 4D 49 4E 47 20 92 20 20 | HELP COMING . |
000005A0: 22 3A 8E 00 CF 0D FA 00 55 31 25 B2 C2 28 55 31 |":......U1%..(U1|
000005B0: 29 3A 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 B2 |):U2%..(U2):U3%.|
000005C0: C2 28 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 00 |.(U3):U4%..(U4).|
000005D0: F7 0D FB 00 55 4A 24 B2 55 53 24 3A 55 4B 24 B2 |....UJ$.US$:UK$.|
000005E0: 55 47 24 3A 55 4C 24 B2 55 54 24 3A 55 4A B2 55 |UG$:UL$.UT$:UJ.U|
000005F0: 50 3A 55 4B B2 55 4C 00 FD 0D FF 00 8E 00 0E 0E |P:UK.UL.........|
00000600: 2C 01 8F 20 2A 2A 20 4D 45 4E 55 20 2A 2A 00 14 |,.. ** MENU **..|
00000610: 0E 2D 01 3A 00 43 0E 2E 01 99 22 93 22 3A 97 55 |.-.:.C....".":.U|
00000620: 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 |T,UU%:..(50003).|
00000630: 30 A7 97 35 33 32 38 31 2C 39 3A 97 35 33 32 38 |0..53281,9:.5328|
00000640: 30 2C 38 00 49 0E 2F 01 3A 00 66 0E 31 01 99 22 |0,8.I./.:.f.1.."|
00000650: 13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000660: 20 4D 45 4E 55 22 00 95 0E 36 01 99 22 20 2D 2D | MENU"...6.." --|
00000670: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000690: 2D 2D 2D 2D 22 00 B5 0E 3B 01 99 22 11 11 20 20 |----"...;..".. |
000006A0: 20 20 20 20 20 31 2E 20 20 20 53 43 52 41 4D 42 | 1. SCRAMB|
000006B0: 4C 45 20 37 22 00 DF 0E 40 01 99 22 11 11 20 20 |LE 7"...@..".. |
000006C0: 20 20 20 20 20 32 2E 20 20 20 53 54 55 44 45 4E | 2. STUDEN|
000006D0: 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 |T INSTRUCTIONS".|
000006E0: 09 0F 45 01 99 22 11 11 20 20 20 20 20 20 20 33 |..E..".. 3|
000006F0: 2E 20 20 20 54 45 41 43 48 45 52 20 49 4E 53 54 |. TEACHER INST|
00000700: 52 55 43 54 49 4F 4E 53 22 00 36 0F 4A 01 99 22 |RUCTIONS".6.J.."|
00000710: 11 11 20 20 20 20 20 20 20 34 2E 20 20 20 4D 4F |.. 4. MO|
00000720: 44 49 46 49 43 41 54 49 4F 4E 20 4F 46 20 50 52 |DIFICATION OF PR|
00000730: 4F 47 52 41 4D 22 00 52 0F 4F 01 99 22 11 11 20 |OGRAM".R.O..".. |
00000740: 20 20 20 20 20 20 35 2E 20 20 20 51 55 49 54 11 | 5. QUIT.|
00000750: 11 22 00 81 0F 54 01 99 22 20 2D 2D 2D 2D 2D 2D |."...T.." ------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000780: 22 00 AC 0F 59 01 99 22 11 11 20 20 20 20 20 20 |"...Y..".. |
00000790: 20 50 52 45 53 53 20 41 20 4E 55 4D 42 45 52 20 | PRESS A NUMBER |
000007A0: 4B 45 59 20 28 31 2D 35 29 20 22 3B 00 D5 0F 5E |KEY (1-5) ";...^|
000007B0: 01 55 4C B2 31 3A 55 53 24 B2 22 31 32 33 34 35 |.UL.1:US$."12345|
000007C0: 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 54 20 52 4F |":.35:. INPUT RO|
000007D0: 55 54 49 4E 45 00 E7 0F 5F 01 8B C3 28 55 52 24 |UTINE..._...(UR$|
000007E0: 29 B1 31 A7 33 30 30 00 F2 0F 60 01 55 53 24 B2 |).1.300...`.US$.|
000007F0: 22 22 00 13 10 63 01 91 C5 28 55 52 24 29 8D 31 |""...c...(UR$).1|
00000800: 30 30 30 2C 34 30 30 2C 35 30 30 2C 36 30 30 2C |000,400,500,600,|
00000810: 33 39 36 00 1C 10 68 01 89 33 30 30 00 43 10 8B |396...h..300.C..|
00000820: 01 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 |.. ** RE-ENABLE |
00000830: 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 |STOP KEY AND END|
00000840: 20 2A 2A 00 72 10 8C 01 8B C2 28 35 30 30 30 33 | **.r.....(50003|
00000850: 29 B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 |)..1..(50003)..1|
00000860: 36 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 |60..(50003)..0.3|
00000870: 39 39 00 9C 10 8D 01 9E 55 55 AA 37 31 3A 8B C2 |99......UU.71:..|
00000880: 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 |(50003).0..53281|
00000890: 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 A8 10 8E |,6:.53280,14....|
000008A0: 01 99 22 9A 93 22 3A 80 00 B3 10 8F 01 8D 38 37 |.."..":.......87|
000008B0: 35 3A 8E 00 D4 10 90 01 8F 20 2A 2A 20 53 54 55 |5:....... ** STU|
000008C0: 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E |DENT INSTRUCTION|
000008D0: 53 20 2A 2A 00 03 11 95 01 99 22 93 22 3A 97 55 |S **......".":.U|
000008E0: 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 |T,UL%:..(50003).|
000008F0: 30 A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 |0..53281,0:.5328|
00000900: 30 2C 30 00 24 11 9A 01 55 50 B2 30 3A 55 47 24 |0,0.$...UP.0:UG$|
00000910: B2 22 D3 54 55 44 45 4E 54 20 C9 4E 53 54 22 3A |.".TUDENT .NST":|
00000920: 8D 38 35 30 00 2A 11 C7 01 8F 00 30 11 CC 01 8F |.850.*.....0....|
00000930: 00 61 11 D1 01 99 22 11 11 11 11 11 11 20 20 20 |.a...."...... |
00000940: 20 20 C9 4E 20 54 48 49 53 20 47 41 4D 45 2C 20 | .N THIS GAME, |
00000950: C9 27 4C 4C 20 47 49 56 45 20 59 4F 55 20 41 20 |.'LL GIVE YOU A |
00000960: 22 00 91 11 D3 01 99 22 11 20 53 43 52 41 4D 42 |"......". SCRAMB|
00000970: 4C 45 44 20 57 4F 52 44 20 41 4E 44 20 54 48 45 |LED WORD AND THE|
00000980: 20 46 49 52 53 54 20 4C 45 54 54 45 52 20 49 4E | FIRST LETTER IN|
00000990: 22 00 B8 11 D5 01 99 22 11 20 54 48 45 20 57 4F |"......". THE WO|
000009A0: 52 44 2E 20 20 C9 54 20 49 53 20 55 50 20 54 4F |RD. .T IS UP TO|
000009B0: 20 59 4F 55 20 54 4F 22 00 D5 11 D6 01 99 22 11 | YOU TO"......".|
000009C0: 20 55 4E 53 43 52 41 4D 42 4C 45 20 49 54 2E 22 | UNSCRAMBLE IT."|
000009D0: 3A 8D 38 33 35 00 09 12 E0 01 8D 38 35 30 3A 99 |:.835......850:.|
000009E0: 22 11 11 20 CE 4F 54 45 3A 11 11 11 D4 4F 20 41 |".. .OTE:....O A|
000009F0: 44 56 41 4E 43 45 20 46 52 4F 4D 20 4F 4E 45 20 |DVANCE FROM ONE |
00000A00: 51 55 45 53 54 49 4F 4E 22 00 33 12 E3 01 99 22 |QUESTION".3...."|
00000A10: 11 20 54 4F 20 54 48 45 20 4E 45 58 54 20 50 52 |. TO THE NEXT PR|
00000A20: 45 53 53 20 54 48 45 20 D3 D0 C1 C3 C5 20 42 41 |ESS THE ..... BA|
00000A30: 52 2E 22 00 5D 12 E5 01 99 22 11 20 C9 46 20 41 |R.".]....". .F A|
00000A40: 54 20 41 4E 59 54 49 4D 45 20 59 4F 55 20 57 49 |T ANYTIME YOU WI|
00000A50: 53 48 20 54 4F 20 52 45 54 55 52 4E 22 00 8E 12 |SH TO RETURN"...|
00000A60: E8 01 99 22 11 20 54 4F 20 54 48 45 20 CD C5 CE |...". TO THE ...|
00000A70: D5 20 50 52 45 53 53 20 48 20 41 4E 44 20 54 48 |. PRESS H AND TH|
00000A80: 45 4E 20 48 49 54 20 D2 C5 D4 D5 D2 CE 22 00 97 |EN HIT ......"..|
00000A90: 12 E9 01 8D 38 33 35 00 AB 12 EA 01 8B 55 5A B2 |....835......UZ.|
00000AA0: 31 A7 9E 55 50 25 3A 89 32 31 37 00 B1 12 F3 01 |1..UP%:.217.....|
00000AB0: 8E 00 D2 12 F4 01 8F 20 2A 2A 20 54 45 41 43 48 |....... ** TEACH|
00000AC0: 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 |ER INSTRUCTIONS |
00000AD0: 2A 2A 00 02 13 F5 01 99 22 93 22 3A 97 55 54 2C |**......".":.UT,|
00000AE0: 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UL%:..(50003).0.|
00000AF0: 97 35 33 32 38 31 2C 32 3A 97 35 33 32 38 30 2C |.53281,2:.53280,|
00000B00: 31 30 00 23 13 F6 01 55 50 B2 30 3A 55 47 24 B2 |10.#...UP.0:UG$.|
00000B10: 22 D4 45 41 43 48 45 52 20 C9 4E 53 54 22 3A 8D |".EACHER .NST":.|
00000B20: 38 35 30 00 51 13 F7 01 99 22 11 11 20 20 20 20 |850.Q....".. |
00000B30: 20 20 D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 | .O THE BEST OF|
00000B40: 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 | OUR KNOWLEDGE,.|
00000B50: 22 00 7A 13 F8 01 99 22 20 20 20 54 48 49 53 20 |".z...." THIS |
00000B60: 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 48 |PROGRAM IS IN TH|
00000B70: 45 20 50 55 42 4C 49 43 11 22 00 A6 13 F9 01 99 |E PUBLIC."......|
00000B80: 22 20 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 20 |" DOMAIN. .F |
00000B90: 54 48 49 53 20 49 53 20 4E 4F 54 20 54 48 45 20 |THIS IS NOT THE |
00000BA0: 43 41 53 45 11 22 00 C3 13 FA 01 99 22 20 20 20 |CASE."......" |
00000BB0: 50 4C 45 41 53 45 20 43 4F 4E 54 41 43 54 3A 11 |PLEASE CONTACT:.|
00000BC0: 11 11 22 00 ED 13 FB 01 99 22 20 20 20 20 20 20 |.."......" |
00000BD0: C3 4F 4D 4D 4F 44 4F 52 45 20 C2 55 53 49 4E 45 |.OMMODORE .USINE|
00000BE0: 53 53 20 CD 41 43 48 49 4E 45 53 11 22 00 10 14 |SS .ACHINES."...|
00000BF0: FC 01 99 22 20 20 20 20 20 20 20 20 20 20 33 33 |..." 33|
00000C00: 37 30 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 2E |70 .HARMACY .VE.|
00000C10: 00 34 14 FD 01 99 22 20 20 20 20 20 20 20 20 20 |.4...." |
00000C20: 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 | .GINCOURT, .NTA|
00000C30: 52 49 4F 22 00 56 14 FE 01 99 22 20 20 20 20 20 |RIO".V...." |
00000C40: 20 20 20 20 20 C3 41 4E 41 44 41 20 20 20 CD 31 | .ANADA .1|
00000C50: D7 20 32 CB 34 22 00 76 14 FF 01 99 22 20 20 20 |. 2.4".v...." |
00000C60: 20 20 20 20 20 20 20 28 34 31 36 29 20 34 39 39 | (416) 499|
00000C70: 2D 34 32 39 32 22 00 87 14 00 02 8D 20 38 33 35 |-4292"...... 835|
00000C80: 3A 8D 20 38 35 30 3A 00 AE 14 01 02 99 22 20 20 |:. 850:......" |
00000C90: 20 20 20 11 11 D0 52 4F 47 52 41 4D 20 CE 41 4D | ...ROGRAM .AM|
00000CA0: 45 3A 20 D3 43 52 41 4D 42 4C 45 20 34 11 00 D2 |E: .CRAMBLE 4...|
00000CB0: 14 02 02 99 22 20 20 20 20 20 D7 52 49 54 54 45 |...." .RITTE|
00000CC0: 4E 20 C2 59 20 20 3A 20 C3 41 52 4C 20 D2 45 49 |N .Y : .ARL .EI|
00000CD0: 44 11 00 F6 14 03 02 99 22 20 20 20 20 20 D5 50 |D......." .P|
00000CE0: 47 52 41 44 45 44 20 C2 59 20 3A 20 20 20 20 20 |GRADED .Y : |
00000CF0: 20 20 20 20 20 11 00 21 15 04 02 99 22 20 20 20 | ..!...." |
00000D00: 20 20 11 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 | ..HIS PROGRAM |
00000D10: 57 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 11 |WILL RUN ON ANY.|
00000D20: 11 00 48 15 05 02 99 22 20 20 20 20 20 20 20 20 |..H...." |
00000D30: 20 C2 C1 D3 C9 C3 A0 32 2E 30 20 D0 C5 D4 20 C3 | ......2.0 ... .|
00000D40: CF CD D0 D5 D4 C5 D2 11 00 6F 15 06 02 99 22 20 |.........o...." |
00000D50: 20 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 20 34 2E | ..... 4.|
00000D60: 30 20 D0 C5 D4 A0 C3 CF CD D0 D5 D4 C5 D2 11 00 |0 ..............|
00000D70: 91 15 07 02 99 22 20 20 20 20 20 20 20 20 20 38 |....." 8|
00000D80: 30 33 32 20 C3 C2 CD 20 C3 CF CD D0 D5 D4 C5 D2 |032 ... ........|
00000D90: 11 00 B6 15 08 02 99 22 20 20 20 20 20 20 20 20 |......." |
00000DA0: 20 C3 CF CD CD CF C4 CF D2 C5 20 36 34 20 C3 CF | ......... 64 ..|
00000DB0: CD D0 D5 D4 C5 D2 00 C4 15 09 02 8D 38 33 35 3A |............835:|
00000DC0: 8D 38 35 30 00 EF 15 0A 02 99 22 11 11 20 20 20 |.850......".. |
00000DD0: 20 20 20 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 | .HIS PROGRAM |
00000DE0: 49 53 20 44 45 53 49 47 4E 45 44 20 54 4F 22 00 |IS DESIGNED TO".|
00000DF0: 1A 16 0B 02 99 22 11 20 48 45 4C 50 20 53 54 55 |.....". HELP STU|
00000E00: 44 45 4E 54 53 20 57 49 54 48 20 54 48 45 49 52 |DENTS WITH THEIR|
00000E10: 20 53 50 45 4C 4C 49 4E 47 22 00 2B 16 0D 02 99 | SPELLING".+....|
00000E20: 22 11 20 53 4B 49 4C 4C 53 2E 22 00 59 16 12 02 |". SKILLS.".Y...|
00000E30: 99 22 11 11 20 20 20 20 20 D4 48 45 20 57 4F 52 |.".. .HE WOR|
00000E40: 44 53 20 43 41 4E 20 42 45 20 45 41 53 49 4C 59 |DS CAN BE EASILY|
00000E50: 20 43 48 41 4E 47 45 44 22 00 87 16 17 02 99 22 | CHANGED"......"|
00000E60: 11 20 54 4F 20 57 4F 52 44 53 20 54 48 41 54 20 |. TO WORDS THAT |
00000E70: 59 4F 55 20 46 45 45 4C 20 59 4F 55 52 20 53 54 |YOU FEEL YOUR ST|
00000E80: 55 44 45 4E 54 53 22 00 B4 16 1C 02 99 22 11 20 |UDENTS"......". |
00000E90: 53 48 4F 55 4C 44 20 4B 4E 4F 57 2E 20 20 C9 46 |SHOULD KNOW. .F|
00000EA0: 20 59 4F 55 20 57 49 53 48 20 54 4F 20 43 48 41 | YOU WISH TO CHA|
00000EB0: 4E 47 45 22 00 DE 16 21 02 99 22 11 20 57 4F 52 |NGE"...!..". WOR|
00000EC0: 44 53 2C 20 54 48 45 4E 20 43 4F 4E 53 55 4C 54 |DS, THEN CONSULT|
00000ED0: 20 54 48 45 20 50 52 4F 47 52 41 4D 20 22 00 02 | THE PROGRAM "..|
00000EE0: 17 26 02 99 22 11 20 4D 4F 44 49 46 49 43 41 54 |.&..". MODIFICAT|
00000EF0: 49 4F 4E 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ION INSTRUCTIONS|
00000F00: 2E 22 00 0B 17 44 02 8D 38 33 35 00 1F 17 4E 02 |."...D..835...N.|
00000F10: 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 |.UZ.1..UP%:.217.|
00000F20: 25 17 57 02 8E 00 4B 17 58 02 8F 20 2A 2A 20 50 |%.W...K.X.. ** P|
00000F30: 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 43 41 54 |ROGRAM MODIFICAT|
00000F40: 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 5C 17 59 02 |ION INST **.\.Y.|
00000F50: 99 22 93 22 3A 97 55 54 2C 55 4C 25 00 7C 17 5D |.".":.UT,UL%.|.]|
00000F60: 02 55 50 B2 30 3A 55 47 24 B2 22 D0 52 4F 47 52 |.UP.0:UG$.".ROGR|
00000F70: 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 AC 17 62 |AM .OD":.850...b|
00000F80: 02 99 22 11 11 11 11 11 20 20 C9 46 20 59 4F 55 |.."..... .F YOU|
00000F90: 20 57 41 4E 54 20 54 4F 20 43 48 41 4E 47 45 20 | WANT TO CHANGE |
00000FA0: 54 48 45 20 4C 49 53 54 20 4F 46 22 00 D7 17 67 |THE LIST OF"...g|
00000FB0: 02 99 22 11 20 57 4F 52 44 53 2C 20 54 48 45 4E |..". WORDS, THEN|
00000FC0: 20 4C 49 53 54 20 4C 49 4E 45 53 20 31 34 38 30 | LIST LINES 1480|
00000FD0: 2D 31 35 32 30 2E 22 00 05 18 6C 02 99 22 11 11 |-1520."...l.."..|
00000FE0: 20 20 D0 4C 45 41 53 45 20 44 4F 20 4E 4F 54 20 | .LEASE DO NOT |
00000FF0: 49 4E 43 52 45 41 53 45 20 4F 52 20 44 45 43 52 |INCREASE OR DECR|
00001000: 45 41 53 45 22 00 2F 18 71 02 99 22 11 20 54 48 |EASE"./.q..". TH|
00001010: 45 20 4E 55 4D 42 45 52 20 4F 46 20 57 4F 52 44 |E NUMBER OF WORD|
00001020: 53 20 49 4E 20 54 48 45 20 4C 49 53 54 2E 22 00 |S IN THE LIST.".|
00001030: 3D 18 76 02 8D 38 33 35 3A 8D 38 35 30 00 6A 18 |=.v..835:.850.j.|
00001040: 7B 02 99 22 11 11 20 CE 4F 54 45 3A 11 11 11 D7 |{..".. .OTE:....|
00001050: 48 45 4E 20 43 48 41 4E 47 49 4E 47 20 57 4F 52 |HEN CHANGING WOR|
00001060: 44 53 2C 20 41 56 4F 49 44 22 00 A8 18 80 02 99 |DS, AVOID"......|
00001070: 22 11 20 4D 41 4B 49 4E 47 20 44 41 54 41 20 53 |". MAKING DATA S|
00001080: 54 41 54 45 4D 45 4E 54 53 20 4D 4F 52 45 20 54 |TATEMENTS MORE T|
00001090: 48 41 4E 20 54 57 4F 20 20 20 20 11 4C 49 4E 45 |HAN TWO .LINE|
000010A0: 53 20 4C 4F 4E 47 2E 22 00 D5 18 85 02 99 22 11 |S LONG."......".|
000010B0: 11 20 20 20 20 20 C9 46 20 54 48 49 53 20 48 41 |. .F THIS HA|
000010C0: 50 50 45 4E 53 2C 20 54 48 45 4E 20 54 41 4B 45 |PPENS, THEN TAKE|
000010D0: 20 54 48 45 22 00 05 19 8A 02 99 22 11 20 4C 41 | THE"......". LA|
000010E0: 53 54 20 57 4F 52 44 20 49 4E 20 54 48 45 20 53 |ST WORD IN THE S|
000010F0: 54 41 54 45 4D 45 4E 54 2C 20 41 4E 44 20 50 55 |TATEMENT, AND PU|
00001100: 54 20 49 54 22 00 3C 19 8F 02 99 22 11 20 49 4E |T IT".<....". IN|
00001110: 20 49 54 53 20 4F 57 4E 20 53 45 50 41 52 41 54 | ITS OWN SEPARAT|
00001120: 45 20 44 41 54 41 20 53 54 41 54 45 4D 45 4E 54 |E DATA STATEMENT|
00001130: 2E 22 3A 8D 38 33 35 3A 8D 38 35 30 00 6A 19 95 |.":.835:.850.j..|
00001140: 02 99 22 11 20 20 C9 46 20 4F 4E 45 20 57 41 4E |..". .F ONE WAN|
00001150: 54 53 20 54 4F 20 43 48 41 4E 47 45 20 54 48 45 |TS TO CHANGE THE|
00001160: 20 57 4F 52 44 20 44 4F 47 22 00 9A 19 96 02 99 | WORD DOG"......|
00001170: 22 11 20 54 4F 20 54 48 45 20 57 4F 52 44 20 43 |". TO THE WORD C|
00001180: 4F 4D 50 55 54 45 52 20 54 48 45 20 4C 49 4E 45 |OMPUTER THE LINE|
00001190: 20 57 4F 55 4C 44 20 42 45 22 00 B2 19 97 02 99 | WOULD BE"......|
000011A0: 22 11 20 43 48 41 4E 47 45 44 20 46 52 4F 4D 3A |". CHANGED FROM:|
000011B0: 11 22 00 FC 19 99 02 99 22 11 20 31 34 38 30 20 |."......". 1480 |
000011C0: 44 41 54 41 20 41 50 50 4C 45 2C 44 4F 47 2C 42 |DATA APPLE,DOG,B|
000011D0: 49 52 44 2C 48 45 4C 4C 4F 2C 48 45 4C 50 2C 4F |IRD,HELLO,HELP,O|
000011E0: 55 54 2C 59 45 4C 4C 4F 57 2C 4D 45 4C 54 2C 4F |UT,YELLOW,MELT,O|
000011F0: 52 41 4E 47 45 2C 44 4F 4E 45 22 3B 00 12 1A 9A |RANGE,DONE";....|
00001200: 02 99 22 20 42 45 4C 4F 57 2C 46 45 45 4C 49 4E |.." BELOW,FEELIN|
00001210: 47 22 00 20 1A 9B 02 99 22 11 20 54 4F 3A 11 22 |G". ....". TO:."|
00001220: 00 58 1A 9C 02 99 22 11 20 31 34 38 30 20 44 41 |.X....". 1480 DA|
00001230: 54 41 20 41 50 50 4C 45 2C 43 4F 4D 50 55 54 45 |TA APPLE,COMPUTE|
00001240: 52 2C 43 41 54 2C 42 49 52 44 2C 48 45 4C 4C 4F |R,CAT,BIRD,HELLO|
00001250: 2C 48 45 4C 50 2C 22 3B 00 82 1A 9D 02 99 22 20 |,HELP,";......" |
00001260: 4F 55 54 2C 59 45 4C 4C 4F 57 2C 4D 45 4C 54 2C |OUT,YELLOW,MELT,|
00001270: 4F 52 41 4E 47 45 2C 44 4F 4E 45 2C 42 45 4C 4F |ORANGE,DONE,BELO|
00001280: 57 22 00 9C 1A 9E 02 99 22 20 31 34 38 31 20 44 |W"......" 1481 D|
00001290: 41 54 41 20 46 45 45 4C 49 4E 47 22 00 A5 1A AD |ATA FEELING"....|
000012A0: 02 8D 38 33 35 00 B9 1A B2 02 8B 55 5A B2 31 A7 |..835......UZ.1.|
000012B0: 9E 55 50 25 3A 89 32 31 37 00 BF 1A BB 02 8E 00 |.UP%:.217.......|
000012C0: E4 1A BC 02 8F 20 2A 2A 20 54 4F 20 55 53 45 20 |..... ** TO USE |
000012D0: 38 30 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 33 |8032 LOAD CBM403|
000012E0: 32 20 2A 2A 00 1A 1B C6 02 99 22 93 11 11 11 05 |2 **......".....|
000012F0: 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E 47 20 54 |BEFORE RUNNING T|
00001300: 48 49 53 20 50 52 4F 47 52 41 4D 20 4F 4E 20 41 |HIS PROGRAM ON A|
00001310: 4E 20 38 30 33 32 20 20 11 11 00 50 1B D0 02 99 |N 8032 ...P....|
00001320: 22 20 20 20 20 20 20 4C 4F 41 44 20 54 48 45 20 |" LOAD THE |
00001330: 27 43 42 4D 20 34 30 33 32 27 20 50 52 4F 47 52 |'CBM 4032' PROGR|
00001340: 41 4D 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |AM............."|
00001350: 00 5B 1B DA 02 9E 55 55 AA 37 31 00 61 1B E4 02 |.[....UU.71.a...|
00001360: 80 00 86 1B 1D 03 8F 20 2A 2A 20 54 4F 20 55 53 |....... ** TO US|
00001370: 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D 34 |E 8032 LOAD CBM4|
00001380: 30 33 32 20 2A 2A 00 D1 1B 1E 03 99 22 93 11 11 |032 **......"...|
00001390: 11 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E 47 20 |.BEFORE RUNNING |
000013A0: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F 4E 20 |THIS PROGRAM ON |
000013B0: 41 4E 20 38 30 33 32 20 20 11 11 4C 4F 41 44 20 |AN 8032 ..LOAD |
000013C0: 43 42 4D 20 34 30 33 32 20 50 52 4F 47 52 41 4D |CBM 4032 PROGRAM|
000013D0: 22 00 DD 1B 1F 03 9E 31 30 39 33 3A 80 00 FD 1B |"......1093:....|
000013E0: 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 4C 20 45 | .. ** T I T L E|
000013F0: 20 20 20 50 20 41 20 47 20 45 20 2A 2A 00 31 1C | P A G E **.1.|
00001400: 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 54 2C 55 |".."....";:.UT,U|
00001410: 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |U%:..(50003).0..|
00001420: 35 33 32 38 30 2C 31 34 3A 97 35 33 32 38 31 2C |53280,14:.53281,|
00001430: 36 00 47 1C 24 03 81 49 B2 31 A4 33 38 3A 99 22 |6.G.$..I.1.38:."|
00001440: 12 A6 92 22 3B 3A 82 00 5F 1C 26 03 81 49 B2 31 |...";:.._.&..I.1|
00001450: A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B 3A 82 00 |.22:.".....";:..|
00001460: 77 1C 28 03 81 49 B2 31 A4 33 37 3A 99 22 9D 9D |w.(..I.1.37:."..|
00001470: 12 A6 92 22 3B 3A 82 00 8F 1C 2A 03 81 49 B2 31 |...";:....*..I.1|
00001480: A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B 3A 82 00 |.22:.".....";:..|
00001490: B4 1C 2C 03 99 22 13 11 11 11 11 11 11 1D 1D 1D |..,.."..........|
000014A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................|
000014B0: A9 20 20 92 00 D6 1C 2E 03 99 22 1D 1D 1D 1D 1D |. .......".....|
000014C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 |.............. .|
000014D0: 20 20 12 20 92 A9 00 F7 1C 30 03 99 22 1D 1D 1D | . .....0.."...|
000014E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................|
000014F0: 20 92 20 20 12 A3 DF 00 15 1D 32 03 99 22 1D 1D | . ......2.."..|
00001500: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001510: DF 12 20 20 92 00 3D 1D 34 03 99 22 11 11 1D 1D |.. ..=.4.."....|
00001520: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F 20 4D 20 |..........C O M |
00001530: 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 00 60 1D |M O D O R E...`.|
00001540: 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |6.."............|
00001550: 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 4C 11 11 |...EDUCATIONAL..|
00001560: 00 7F 1D 38 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |...8..".........|
00001570: 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 52 45 00 |.......SOFTWARE.|
00001580: 9A 1D 3A 03 8F 20 2A 2A 20 43 4F 4D 4D 4F 44 4F |..:.. ** COMMODO|
00001590: 52 45 20 4C 4F 47 4F 20 2A 2A 00 D2 1D 3B 03 99 |RE LOGO **...;..|
000015A0: C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D |.(UD$,24);".....|
000015B0: 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 45 |.....PRESS SPACE|
000015C0: 20 42 41 52 20 4F 52 20 57 41 49 54 92 22 3A 49 | BAR OR WAIT.":I|
000015D0: B2 30 00 F4 1D 3C 03 A1 41 24 3A 8B 41 24 B3 B1 |.0...<..A$:.A$..|
000015E0: 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 32 35 30 |" ".I.I.1:.I.250|
000015F0: A7 38 32 38 00 18 1E 3E 03 54 31 24 B2 22 22 3A |.828...>.T1$."":|
00001600: 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 3A 54 34 |T2$."":T3$."":T4|
00001610: 24 B2 22 22 3A 49 B2 30 00 21 1E 40 03 89 33 30 |$."":I.0.!.@..30|
00001620: 30 00 3D 1E 43 03 8F 20 2A 2A 20 53 50 41 43 45 |0.=.C.. ** SPACE|
00001630: 20 42 41 52 20 50 52 45 53 53 20 2A 2A 00 78 1E | BAR PRESS **.x.|
00001640: 48 03 97 55 4F 2C 30 3A 99 C8 28 55 44 24 2C 32 |H..UO,0:..(UD$,2|
00001650: 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 |4);".......PRESS|
00001660: 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 43 4F | SPACE BAR TO CO|
00001670: 4E 54 49 4E 55 45 92 22 00 8F 1E 4C 03 A1 55 49 |NTINUE."...L..UI|
00001680: 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 34 34 00 |$:.UI$.." ".844.|
00001690: 95 1E 4E 03 8E 00 B5 1E 52 03 8F 20 2A 2A 20 50 |..N.....R.. ** P|
000016A0: 41 47 45 20 44 45 53 49 47 4E 20 52 4F 55 54 49 |AGE DESIGN ROUTI|
000016B0: 4E 45 20 2A 2A 00 C1 1E 54 03 55 50 B2 55 50 AA |NE **...T.UP.UP.|
000016C0: 31 00 EB 1E 57 03 99 22 93 22 C8 28 55 54 24 AA |1...W..".".(UT$.|
000016D0: 55 50 24 2C 32 31 29 3B C9 28 55 50 24 AA 55 47 |UP$,21);.(UP$.UG|
000016E0: 24 AA C4 28 55 50 29 2C 31 38 29 00 1A 1F 5C 03 |$..(UP),18)...\.|
000016F0: 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |." -------------|
00001700: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001710: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 29 1F 60 03 8B |---------".).`..|
00001720: 55 48 B3 B1 30 A7 38 37 30 00 5D 1F 61 03 99 C8 |UH..0.870.].a...|
00001730: 28 55 44 24 2C 32 34 29 3B C8 28 55 50 24 2C 37 |(UD$,24);.(UP$,7|
00001740: 29 3B 22 48 45 4C 50 20 2D 20 50 52 45 53 53 20 |);"HELP - PRESS |
00001750: 20 20 48 20 3C 52 45 54 55 52 4E 3E 22 00 6F 1F | H <RETURN>".o.|
00001760: 66 03 97 55 4F 2C 30 3A 99 22 13 11 22 3A 8E 00 |f..UO,0:."..":..|
00001770: 8E 1F 6B 03 8F 20 2A 2A 20 50 4C 45 41 53 45 20 |..k.. ** PLEASE |
00001780: 57 41 49 54 20 52 45 4D 41 52 4B 20 2A 2A 00 C4 |WAIT REMARK **..|
00001790: 1F 70 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 20 |.p...(UD$,24);" |
000017A0: 20 20 20 20 20 20 20 20 20 20 4F 4E 45 20 4D 4F | ONE MO|
000017B0: 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E 2E 20 20 |MENT PLEASE... |
000017C0: 20 20 20 22 00 CA 1F 75 03 8E 00 E7 1F 84 03 8F | "...u........|
000017D0: 20 2A 2A 20 53 45 54 20 55 50 20 56 41 52 49 41 | ** SET UP VARIA|
000017E0: 42 4C 45 53 20 2A 2A 00 32 20 85 03 55 58 24 B2 |BLES **.2 ..UX$.|
000017F0: 22 48 22 3A 86 55 51 25 28 31 30 30 30 29 3A 55 |"H":.UQ%(1000):U|
00001800: 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 36 3A 55 |B.32768:U1.196:U|
00001810: 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A 55 34 B2 |2.197:U3.198:U4.|
00001820: 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 B2 31 30 |216:UC.167:UU.10|
00001830: 32 34 00 70 20 86 03 55 54 B2 35 39 34 36 38 3A |24.p ..UT.59468:|
00001840: 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 3A 55 50 |UU%.12:UL%.14:UP|
00001850: 25 B2 31 31 34 36 3A 55 4D B2 33 32 37 36 38 3A |%.1146:UM.32768:|
00001860: 55 4F B2 31 35 38 3A 97 20 35 30 30 30 33 2C 30 |UO.158:. 50003,0|
00001870: 00 B3 20 87 03 8B C2 28 35 30 30 30 33 29 B2 30 |.. ....(50003).0|
00001880: A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 30 39 3A |.UB.1024:U1.209:|
00001890: 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 3A 55 34 |U2.210:U3.211:U4|
000018A0: B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 55 B2 32 |.214:UC.204:UU.2|
000018B0: 30 34 38 00 F2 20 88 03 8B C2 28 35 30 30 30 33 |048.. ....(50003|
000018C0: 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A 55 55 25 |).0.UT.53272:UU%|
000018D0: B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 25 B2 32 |.21:UL%.23:UP%.2|
000018E0: 31 33 39 3A 55 4D B2 31 30 32 34 3A 55 4F B2 31 |139:UM.1024:UO.1|
000018F0: 39 38 00 16 21 89 03 55 44 24 B2 22 13 11 11 11 |98..!..UD$."....|
00001900: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001910: 11 11 11 11 11 22 00 48 21 8A 03 55 50 24 B2 22 |.....".H!..UP$."|
00001920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001940: 20 20 20 20 20 20 20 22 00 6E 21 8B 03 55 54 24 | ".n!..UT$|
00001950: B2 22 20 D3 C3 D2 C1 CD C2 CC C5 20 37 22 3A 8F |." ........ 7":.|
00001960: 20 50 52 4F 47 52 41 4D 20 54 49 54 4C 45 00 74 | PROGRAM TITLE.t|
00001970: 21 8C 03 8E 00 8E 21 8E 03 8F 20 2A 2A 20 53 45 |!.....!... ** SE|
00001980: 54 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 97 |T VARIABLES **..|
00001990: 21 93 03 8D 39 30 30 00 9D 21 94 03 3A 00 A3 21 |!...900..!..:..!|
000019A0: 95 03 3A 00 BE 21 98 03 8F 20 2A 2A 20 43 48 45 |..:..!... ** CHE|
000019B0: 43 4B 20 46 4F 52 20 38 30 33 32 20 2A 2A 00 DC |CK FOR 8032 **..|
000019C0: 21 9D 03 99 22 93 22 3A 99 22 A0 22 3A 8F 20 53 |!...".":.".":. S|
000019D0: 48 49 46 54 45 44 20 53 50 41 43 45 00 F3 21 A2 |HIFTED SPACE..!.|
000019E0: 03 8B C2 28 55 42 AA 34 30 29 B3 B1 39 36 A7 8D |...(UB.40)..96..|
000019F0: 37 30 30 00 0C 22 A3 03 8F 20 2A 2A 20 4D 45 4D |700.."... ** MEM|
00001A00: 4F 52 59 20 43 48 45 43 4B 20 2A 2A 00 20 22 A4 |ORY CHECK **. ".|
00001A10: 03 8B 20 B8 28 30 29 B1 32 30 30 30 A7 39 33 37 |.. .(0).2000.937|
00001A20: 00 4E 22 A5 03 99 22 93 11 11 05 54 48 49 53 20 |.N"..."....THIS |
00001A30: 4D 41 43 48 49 4E 45 20 44 4F 45 53 20 4E 4F 54 |MACHINE DOES NOT|
00001A40: 20 48 41 56 45 20 45 4E 4F 55 47 48 11 22 00 72 | HAVE ENOUGH.".r|
00001A50: 22 A6 03 99 22 4D 45 4D 4F 52 59 20 54 4F 20 52 |"..."MEMORY TO R|
00001A60: 55 4E 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |UN THIS PROGRAM |
00001A70: 21 22 00 7D 22 A7 03 9E 55 55 AA 37 31 00 83 22 |!".}"...UU.71.."|
00001A80: A8 03 80 00 9D 22 A9 03 99 22 93 05 22 3A 8B C2 |....."..."..":..|
00001A90: 28 35 30 30 30 33 29 B2 30 A7 39 36 32 00 CC 22 |(50003).0.962.."|
00001AA0: AC 03 8F 20 2A 2A 20 42 41 53 49 43 20 32 2E 30 |... ** BASIC 2.0|
00001AB0: 20 20 4F 52 20 20 34 2E 30 20 20 4F 52 20 20 43 | OR 4.0 OR C|
00001AC0: 2D 36 34 20 53 45 54 55 50 20 2A 2A 00 0A 23 AD |-64 SETUP **..#.|
00001AD0: 03 97 31 30 37 35 2C 31 33 33 3A 97 31 30 37 36 |..1075,133:.1076|
00001AE0: 2C 31 34 34 3A 97 31 30 37 37 2C 32 33 34 3A 97 |,144:.1077,234:.|
00001AF0: 31 30 37 39 2C 34 3A 97 31 30 38 30 2C 31 33 33 |1079,4:.1080,133|
00001B00: 3A 97 31 30 38 31 2C 31 34 35 00 40 23 AE 03 97 |:.1081,145.@#...|
00001B10: 31 30 39 31 2C 31 35 35 3A 97 31 30 39 38 2C 31 |1091,155:.1098,1|
00001B20: 33 33 3A 97 31 30 39 39 2C 31 34 34 3A 97 31 31 |33:.1099,144:.11|
00001B30: 30 30 2C 32 33 34 3A 97 31 31 30 33 2C 31 33 33 |00,234:.1103,133|
00001B40: 00 62 23 AF 03 97 31 31 30 34 2C 31 34 35 3A 97 |.b#...1104,145:.|
00001B50: 31 31 30 35 2C 32 33 34 3A 97 31 30 38 32 2C 32 |1105,234:.1082,2|
00001B60: 33 34 00 79 23 B1 03 8B C2 28 35 30 30 30 33 29 |34.y#....(50003)|
00001B70: B3 B1 31 36 30 A7 39 35 35 00 A8 23 B6 03 97 31 |..160.955..#...1|
00001B80: 30 39 33 2C 38 38 3A 97 31 30 39 34 2C 32 32 38 |093,88:.1094,228|
00001B90: 3A 97 31 30 39 37 2C 38 35 3A 97 31 31 30 32 2C |:.1097,85:.1102,|
00001BA0: 32 32 38 3A 89 39 36 35 00 BD 23 BB 03 8B C2 28 |228:.965..#....(|
00001BB0: 35 30 30 30 33 29 B3 B1 31 A7 39 39 30 00 EC 23 |50003)..1.990..#|
00001BC0: C0 03 97 31 30 39 33 2C 34 39 3A 97 31 30 39 34 |...1093,49:.1094|
00001BD0: 2C 32 33 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 |,230:.1097,46:.1|
00001BE0: 31 30 32 2C 32 33 30 3A 89 39 36 35 00 26 24 C2 |102,230:.965.&$.|
00001BF0: 03 97 32 30 39 39 2C 31 34 31 3A 97 32 31 30 30 |..2099,141:.2100|
00001C00: 2C 32 30 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 |,20:.2101,3:.210|
00001C10: 33 2C 38 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 |3,8:.2104,141:.2|
00001C20: 31 30 35 2C 32 31 00 62 24 C3 03 97 32 31 30 36 |105,21.b$...2106|
00001C30: 2C 33 3A 97 32 31 31 35 2C 31 34 35 3A 97 32 31 |,3:.2115,145:.21|
00001C40: 31 37 2C 35 32 3A 97 32 31 31 38 2C 32 33 34 3A |17,52:.2118,234:|
00001C50: 97 32 31 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 |.2121,49:.2122,1|
00001C60: 34 31 00 9C 24 C4 03 97 32 31 32 33 2C 32 30 3A |41..$...2123,20:|
00001C70: 97 32 31 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 |.2124,3:.2126,23|
00001C80: 34 3A 97 32 31 32 37 2C 31 34 31 3A 97 32 31 32 |4:.2127,141:.212|
00001C90: 38 2C 32 31 3A 97 32 31 32 39 2C 33 00 BA 24 C5 |8,21:.2129,3..$.|
00001CA0: 03 9E 55 55 AA 34 38 3A 8F 20 44 49 53 41 42 4C |..UU.48:. DISABL|
00001CB0: 45 20 53 54 4F 50 20 4B 45 59 00 CB 24 CA 03 8D |E STOP KEY..$...|
00001CC0: 38 30 30 3A 8F 20 54 49 54 4C 45 00 DB 24 D4 03 |800:. TITLE..$..|
00001CD0: 89 33 30 30 3A 8F 20 4D 45 4E 55 00 0C 25 DE 03 |.300:. MENU..%..|
00001CE0: 99 22 93 54 48 45 20 50 47 4D 20 57 49 4C 4C 20 |.".THE PGM WILL |
00001CF0: 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 48 49 53 |NOT WORK ON THIS|
00001D00: 20 4D 41 43 48 49 4E 45 21 22 3A 80 00 41 25 E8 | MACHINE!":..A%.|
00001D10: 03 8B 55 5A B2 31 A7 9E 55 50 25 3A 9E 55 50 25 |..UZ.1..UP%:.UP%|
00001D20: 3A 55 5A B2 30 3A 8F 20 2A 2A 20 50 52 4F 47 52 |:UZ.0:. ** PROGR|
00001D30: 41 4D 20 53 54 41 52 54 53 20 48 45 52 45 20 2A |AM STARTS HERE *|
00001D40: 2A 00 6D 25 E9 03 99 22 93 05 22 3B 3A 8C 3A 8B |*.m%..."..";:.:.|
00001D50: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00001D60: 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 79 25 |1,6:.53280,14.y%|
00001D70: 4C 04 97 55 54 2C 55 4C 25 00 82 25 51 04 8D 38 |L..UT,UL%..%Q..8|
00001D80: 37 35 00 CF 25 56 04 53 24 B2 22 20 20 20 20 20 |75..%V.S$." |
00001D90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001DA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 9D 9D 9D | ...|
00001DB0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00001DC0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 00 |................|
00001DD0: D8 25 5B 04 57 B2 36 30 00 EA 25 60 04 8B 48 5A |.%[.W.60..%`..HZ|
00001DE0: B1 30 A7 20 89 20 31 31 36 35 00 F5 25 62 04 86 |.0. . 1165..%b..|
00001DF0: 57 24 28 57 29 00 00 26 63 04 86 48 28 31 33 29 |W$(W)..&c..H(13)|
00001E00: 00 0D 26 64 04 86 52 48 24 28 31 30 29 00 16 26 |..&d..RH$(10)..&|
00001E10: 65 04 48 5A B2 31 00 1C 26 69 04 8C 00 2E 26 6A |e.HZ.1..&i....&j|
00001E20: 04 81 4A B2 31 A4 57 3A 87 57 24 28 4A 29 00 4F |..J.1.W:.W$(J).O|
00001E30: 26 6F 04 8B C3 28 57 24 28 4A 29 29 B3 33 B0 C3 |&o...(W$(J)).3..|
00001E40: 28 57 24 28 4A 29 29 B1 31 32 A7 4B 32 B2 31 00 |(W$(J)).12.K2.1.|
00001E50: 9A 26 74 04 8B 4B 32 B2 31 A7 99 22 13 CE CF A0 |.&t..K2.1.."....|
00001E60: D7 CF D2 C4 D3 A0 D7 C9 D4 C8 A0 CC C5 D3 D3 A0 |................|
00001E70: D4 C8 C1 CE A0 32 20 CC C5 D4 D4 C5 D2 D3 A0 CF |.....2 .........|
00001E80: D2 A0 A0 A0 A0 CD CF D2 C5 A0 D4 C8 C1 CE A0 31 |...............1|
00001E90: 32 A0 CC C5 D4 D4 C5 D2 D3 22 00 A6 26 75 04 8B |2........"..&u..|
00001EA0: 4B 32 B2 31 A7 8E 00 BE 26 79 04 82 3A 99 22 93 |K2.1....&y..:.".|
00001EB0: 22 3A 97 55 54 2C 55 4C 25 3A 8D 38 35 30 00 D0 |":.UT,UL%:.850..|
00001EC0: 26 8D 04 50 24 B2 22 43 4F 4E 54 49 4E 55 45 22 |&..P$."CONTINUE"|
00001ED0: 00 FF 26 92 04 99 22 13 11 11 11 11 11 11 20 C9 |..&..."....... .|
00001EE0: 46 20 59 4F 55 20 57 49 53 48 20 54 4F 20 53 45 |F YOU WISH TO SE|
00001EF0: 45 20 41 4C 4C 22 57 22 20 57 4F 52 44 53 22 00 |E ALL"W" WORDS".|
00001F00: 2B 27 97 04 99 22 11 20 42 45 46 4F 52 45 20 42 |+'...". BEFORE B|
00001F10: 45 47 49 4E 4E 49 4E 47 2C 20 54 48 45 4E 20 50 |EGINNING, THEN P|
00001F20: 52 45 53 53 1D 27 59 27 2E 11 22 00 49 27 9C 04 |RESS.'Y'..".I'..|
00001F30: 99 22 20 C9 46 20 4E 4F 54 20 54 48 45 4E 20 50 |." .F NOT THEN P|
00001F40: 52 45 53 53 20 27 4E 27 2E 00 58 27 A1 04 99 22 |RESS 'N'..X'..."|
00001F50: 11 11 11 20 3F 20 22 3B 00 76 27 A6 04 55 53 24 |... ? ";.v'..US$|
00001F60: B2 22 59 4E 22 3A 55 4C B2 31 3A 8D 33 35 3A 5A |."YN":UL.1:.35:Z|
00001F70: 5A 24 B2 55 52 24 00 89 27 AB 04 8B 5A 5A 24 B2 |Z$.UR$..'...ZZ$.|
00001F80: 22 59 22 A7 89 31 32 30 38 00 9C 27 B0 04 8B 5A |"Y"..1208..'...Z|
00001F90: 5A 24 B2 22 4E 22 A7 89 31 32 38 31 00 A8 27 B8 |Z$."N"..1281..'.|
00001FA0: 04 47 B2 30 3A 44 B2 30 00 C0 27 BA 04 99 22 11 |.G.0:D.0..'...".|
00001FB0: 22 3B 3A 55 48 B2 31 3A 8D 38 35 30 3A 41 B2 31 |";:UH.1:.850:A.1|
00001FC0: 00 DB 27 BF 04 81 47 B2 47 A4 47 AA 33 30 3A 99 |..'...G.G.G.30:.|
00001FD0: A6 41 29 57 24 28 47 29 22 11 22 00 EC 27 C4 04 |.A)W$(G)"."..'..|
00001FE0: 8B 47 B2 30 A7 99 22 13 11 11 22 3B 00 1A 28 C9 |.G.0.."...";..(.|
00001FF0: 04 41 24 B2 C4 28 47 29 3A 8B CA 28 41 24 2C 33 |.A$..(G):..(A$,3|
00002000: 2C 31 29 B2 22 30 22 A7 99 22 13 11 11 22 3B 3A |,1)."0".."...";:|
00002010: 41 B2 31 33 3A 44 B2 44 AA 31 00 28 28 CE 04 8B |A.13:D.D.1.((...|
00002020: 44 B1 31 A7 41 B2 32 36 00 44 28 D3 04 8B 47 B1 |D.1.A.26.D(...G.|
00002030: 57 AB 31 A7 50 24 B2 22 42 45 47 49 4E 22 3A 89 |W.1.P$."BEGIN":.|
00002040: 31 32 34 33 00 4A 28 D8 04 82 00 53 28 DB 04 8D |1243.J(....S(...|
00002050: 38 33 35 00 59 28 DD 04 3A 00 5F 28 E2 04 3A 00 |835.Y(..:._(..:.|
00002060: 7D 28 EC 04 8B 47 B3 57 A7 99 22 91 91 22 3B 3A |}(...G.W.."..";:|
00002070: 41 B2 30 3A 44 B2 30 3A 89 31 32 31 30 00 90 28 |A.0:D.0:.1210..(|
00002080: 01 05 55 50 B2 30 3A 43 55 B2 30 3A 52 49 B2 30 |..UP.0:CU.0:RI.0|
00002090: 00 A2 28 23 05 43 24 B2 22 22 3A 59 B2 30 3A 46 |..(#.C$."":Y.0:F|
000020A0: B2 30 00 BA 28 32 05 43 55 B2 43 55 AA 31 3A 8B |.0..(2.CU.CU.1:.|
000020B0: 43 55 B2 31 31 A7 31 37 30 30 00 DC 28 34 05 55 |CU.11.1700..(4.U|
000020C0: 47 24 B2 22 D1 55 45 53 54 49 4F 4E 22 3A 55 48 |G$.".UESTION":UH|
000020D0: B2 31 3A 8D 38 35 30 3A 8D 38 37 35 00 0E 29 3C |.1:.850:.875..)<|
000020E0: 05 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
000020F0: 11 20 22 53 24 22 D5 4E 53 43 52 41 4D 42 4C 45 |. "S$".NSCRAMBLE|
00002100: 20 54 48 45 20 57 4F 52 44 3A 20 22 53 24 00 2E | THE WORD: "S$..|
00002110: 29 41 05 41 B2 B5 28 57 AC BB 28 31 29 29 AA 31 |)A.A..(W..(1)).1|
00002120: 3A 52 48 24 28 43 55 29 B2 57 24 28 41 29 00 3D |:RH$(CU).W$(A).=|
00002130: 29 42 05 8B 43 55 B2 31 A7 31 33 35 30 00 67 29 |)B..CU.1.1350.g)|
00002140: 44 05 81 4E 57 B2 31 A4 43 55 AB 31 3A 8B 52 48 |D..NW.1.CU.1:.RH|
00002150: 24 28 43 55 29 B2 52 48 24 28 4E 57 29 A7 89 31 |$(CU).RH$(NW)..1|
00002160: 33 34 35 3A 82 4E 57 00 87 29 46 05 42 24 B2 57 |345:.NW..)F.B$.W|
00002170: 24 28 41 29 3A 4B B2 C3 28 42 24 29 3A 8B 4B B1 |$(A):K..(B$):.K.|
00002180: 31 32 A7 31 33 34 35 00 C4 29 4B 05 99 22 13 11 |12.1345..)K.."..|
00002190: 11 11 11 11 11 11 11 11 20 D4 48 45 20 46 49 52 |........ .HE FIR|
000021A0: 53 54 20 4C 45 54 54 45 52 20 49 4E 20 54 48 45 |ST LETTER IN THE|
000021B0: 20 57 4F 52 44 20 49 53 20 12 22 CA 28 42 24 2C | WORD IS .".(B$,|
000021C0: 31 2C 31 29 00 FB 29 50 05 99 22 13 11 11 11 11 |1,1)..)P..".....|
000021D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 53 |.............."S|
000021E0: 24 A6 31 34 29 22 92 3F 20 11 22 3B 3A 81 56 B2 |$.14)".? .";:.V.|
000021F0: 31 A4 4B 3A 99 22 2D 22 3B 3A 82 00 12 2A 55 05 |1.K:."-";:...*U.|
00002200: 44 B2 B5 28 4B AC BB 28 31 29 29 AA 31 3A 44 52 |D..(K..(1)).1:DR|
00002210: B2 30 00 2E 2A 5A 05 54 B2 54 AA 31 3A 8B 44 B2 |.0..*Z.T.T.1:.D.|
00002220: 48 28 54 29 A7 54 B2 30 3A 89 31 33 36 35 00 3C |H(T).T.0:.1365.<|
00002230: 2A 5F 05 8B 54 B3 4B A7 31 33 37 30 00 51 2A 64 |*_..T.K.1370.Q*d|
00002240: 05 59 B2 59 AA 31 3A 48 28 59 29 B2 44 3A 54 B2 |.Y.Y.1:H(Y).D:T.|
00002250: 30 00 65 2A 69 05 43 24 B2 43 24 AA CA 28 42 24 |0.e*i.C$.C$..(B$|
00002260: 2C 44 2C 31 29 00 73 2A 6E 05 8B 59 B3 4B A7 31 |,D,1).s*n..Y.K.1|
00002270: 33 36 35 00 83 2A 73 05 8B 43 24 B2 42 24 A7 31 |365..*s..C$.B$.1|
00002280: 33 34 35 00 89 2A 78 05 3A 00 92 2A 7D 05 8D 38 |345..*x.:..*}..8|
00002290: 36 35 00 B1 2A 7E 05 99 22 13 11 11 11 11 11 11 |65..*~..".......|
000022A0: 11 11 11 11 11 11 11 22 A6 32 32 29 22 12 22 43 |.......".22)"."C|
000022B0: 24 00 E7 2A 82 05 99 A6 31 36 29 22 11 11 11 20 |$..*....16)"... |
000022C0: 20 20 20 20 20 20 20 20 20 20 20 20 9D 9D 9D 9D | ....|
000022D0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 11 11 22 3B 3A 50 B2 |...........";:P.|
000022E0: 4B 3A 89 31 35 33 30 00 F8 2A 87 05 8B 5A 4C B3 |K:.1530..*...ZL.|
000022F0: 50 AA 31 A7 31 34 30 35 00 37 2B 8C 05 43 47 B2 |P.1.1405.7+..CG.|
00002300: B5 28 54 49 AD 36 30 29 3A 8B 49 4E 24 B2 42 24 |.(TI.60):.IN$.B$|
00002310: A7 54 59 B2 54 59 AA 31 3A 4D 24 B2 22 20 D9 4F |.TY.TY.1:M$." .O|
00002320: 55 20 47 55 45 53 53 45 44 20 49 54 21 22 AA 53 |U GUESSED IT!".S|
00002330: 24 3A 52 48 32 B2 30 00 70 2B 91 05 8B 49 4E 24 |$:RH2.0.p+...IN$|
00002340: B3 B1 42 24 A7 4D 24 B2 22 20 D3 4F 52 52 59 2E |..B$.M$." .ORRY.|
00002350: 20 D9 4F 55 20 44 49 44 20 4E 4F 54 20 47 55 45 | .OU DID NOT GUE|
00002360: 53 53 20 49 54 21 22 AA 53 24 3A 52 48 32 B2 31 |SS IT!".S$:RH2.1|
00002370: 00 79 2B 95 05 8D 38 35 30 00 AC 2B 96 05 8B 52 |.y+...850..+...R|
00002380: 48 32 B2 31 A7 20 99 22 13 11 11 11 11 11 11 11 |H2.1. ."........|
00002390: 11 11 11 11 11 11 20 22 53 24 22 D4 48 45 20 57 |...... "S$".HE W|
000023A0: 4F 52 44 20 57 41 53 20 12 22 42 24 00 F2 2B 97 |ORD WAS ."B$..+.|
000023B0: 05 8B 52 48 32 B2 30 A7 99 22 13 11 11 11 11 11 |..RH2.0.."......|
000023C0: 11 11 11 11 11 11 11 11 20 C9 54 20 54 4F 4F 4B |........ .T TOOK|
000023D0: 20 59 4F 55 22 43 47 22 53 45 43 4F 4E 44 53 2E | YOU"CG"SECONDS.|
000023E0: 22 3A 52 49 B2 52 49 AA 31 3A 43 53 B2 43 53 AA |":RI.RI.1:CS.CS.|
000023F0: 43 47 00 06 2C 9B 05 99 22 13 11 11 11 11 11 11 |CG..,...".......|
00002400: 11 11 11 22 4D 24 00 0F 2C A0 05 8D 38 33 35 00 |..."M$..,...835.|
00002410: 2B 2C B4 05 46 B2 30 3A 54 B2 30 3A 59 B2 30 3A |+,..F.0:T.0:Y.0:|
00002420: 4B B2 30 3A 4D 24 B2 22 22 3A 8C 00 46 2C BE 05 |K.0:M$."":..F,..|
00002430: 81 4D B2 31 A4 31 33 3A 48 28 4D 29 B2 30 3A 82 |.M.1.13:H(M).0:.|
00002440: 3A 89 31 33 31 35 00 5B 2C C3 05 8F 2A 47 52 41 |:.1315.[,...*GRA|
00002450: 44 45 20 37 20 57 4F 52 44 53 2A 00 A6 2C C8 05 |DE 7 WORDS*..,..|
00002460: 83 41 42 4F 56 45 2C 41 49 52 50 4C 41 4E 45 2C |.ABOVE,AIRPLANE,|
00002470: 41 50 50 4C 45 53 2C 41 4E 47 45 4C 2C 41 4E 49 |APPLES,ANGEL,ANI|
00002480: 4D 41 4C 53 2C 41 53 4B 45 44 2C 41 4C 41 52 4D |MALS,ASKED,ALARM|
00002490: 2C 41 4D 4F 4E 47 2C 41 4C 49 56 45 2C 41 52 54 |,AMONG,ALIVE,ART|
000024A0: 2C 42 41 4B 45 52 00 EB 2C CD 05 83 52 4F 55 47 |,BAKER..,...ROUG|
000024B0: 48 4E 45 53 53 2C 50 52 49 45 53 54 2C 42 4F 55 |HNESS,PRIEST,BOU|
000024C0: 51 55 45 54 2C 42 41 4E 51 55 45 54 2C 52 45 4C |QUET,BANQUET,REL|
000024D0: 49 41 42 4C 45 2C 50 4F 53 54 50 4F 4E 45 2C 41 |IABLE,POSTPONE,A|
000024E0: 47 45 4E 43 59 2C 4A 45 57 45 4C 00 2E 2D D2 05 |GENCY,JEWEL..-..|
000024F0: 83 42 45 54 54 45 52 2C 42 45 52 52 59 2C 42 45 |.BETTER,BERRY,BE|
00002500: 44 54 49 4D 45 2C 42 45 54 57 45 45 4E 2C 42 49 |DTIME,BETWEEN,BI|
00002510: 47 47 45 52 2C 42 45 4C 4F 4E 47 2C 42 52 55 53 |GGER,BELONG,BRUS|
00002520: 48 2C 42 4F 54 54 4C 45 2C 42 55 49 4C 44 00 71 |H,BOTTLE,BUILD.q|
00002530: 2D D7 05 83 51 4F 55 54 41 54 49 4F 4E 2C 43 48 |-...QOUTATION,CH|
00002540: 49 4E 4F 4F 4B 2C 4C 41 43 52 4F 53 53 45 2C 41 |INOOK,LACROSSE,A|
00002550: 42 53 54 52 41 43 54 2C 4D 45 52 43 48 41 4E 54 |BSTRACT,MERCHANT|
00002560: 2C 43 52 49 4D 49 4E 41 4C 2C 41 53 48 41 4D 45 |,CRIMINAL,ASHAME|
00002570: 44 00 B5 2D DC 05 83 43 41 42 49 4E 2C 43 41 4D |D..-...CABIN,CAM|
00002580: 45 4C 2C 43 41 4E 44 4C 45 2C 43 41 4E 4E 4F 54 |EL,CANDLE,CANNOT|
00002590: 2C 43 41 56 45 2C 43 48 41 53 45 2C 43 4C 4F 55 |,CAVE,CHASE,CLOU|
000025A0: 44 2C 43 48 45 45 53 45 2C 43 48 45 53 54 2C 43 |D,CHEESE,CHEST,C|
000025B0: 41 54 54 4C 45 00 C1 2D E1 05 83 50 52 4F 56 45 |ATTLE..-...PROVE|
000025C0: 4E 00 07 2E E6 05 83 44 41 4E 47 45 52 2C 44 41 |N......DANGER,DA|
000025D0: 52 4B 45 52 2C 44 4F 43 54 4F 52 2C 44 52 55 4D |RKER,DOCTOR,DRUM|
000025E0: 2C 44 49 52 54 59 2C 44 45 45 50 2C 44 4F 4E 4B |,DIRTY,DEEP,DONK|
000025F0: 45 59 2C 44 52 41 57 49 4E 47 2C 44 55 52 49 4E |EY,DRAWING,DURIN|
00002600: 47 2C 44 45 4C 41 59 00 27 2E EB 05 83 45 41 52 |G,DELAY.'....EAR|
00002610: 54 48 2C 45 58 43 49 54 45 2C 45 4C 45 50 48 41 |TH,EXCITE,ELEPHA|
00002620: 4E 54 2C 45 43 48 4F 00 49 2E F0 05 83 41 4C 54 |NT,ECHO.I....ALT|
00002630: 48 4F 55 47 48 2C 41 43 48 45 2C 4F 4E 49 4F 4E |HOUGH,ACHE,ONION|
00002640: 2C 50 4C 45 41 53 41 4E 54 00 63 2E FA 05 49 4E |,PLEASANT.c...IN|
00002650: 24 B2 22 20 22 3A 5A 54 B2 54 49 AA 31 35 3A 5A |$." ":ZT.TI.15:Z|
00002660: 43 B2 32 00 6E 2E FC 05 99 22 91 91 22 3B 00 A3 |C.2.n...."..";..|
00002670: 2E FD 05 55 53 24 B2 22 22 3A 55 4C B2 C3 28 42 |...US$."":UL..(B|
00002680: 24 29 3A 54 49 24 B2 22 30 30 30 30 30 30 22 3A |$):TI$."000000":|
00002690: 8D 33 35 3A 49 4E 24 B2 55 52 24 3A 55 50 B2 55 |.35:IN$.UR$:UP.U|
000026A0: 50 AB 31 00 AD 2E FE 05 89 31 34 32 30 00 C2 2E |P.1......1420...|
000026B0: 00 06 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 31 35 |...Z$:.Z$.."".15|
000026C0: 36 30 00 F3 2E 04 06 8B 5A 54 B3 B2 54 49 A7 99 |60......ZT..TI..|
000026D0: CA 28 22 12 20 92 22 2C 5A 43 2C 33 29 3B 22 9D |.(". .",ZC,3);".|
000026E0: 22 3B 3A 5A 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 |";:ZC.3.ZC:ZT.TI|
000026F0: AA 31 35 00 F9 2E 09 06 3A 00 03 2F 13 06 89 31 |.15.....:../...1|
00002700: 35 33 36 00 19 2F 18 06 5A B2 C6 28 5A 24 29 3A |536../..Z..(Z$):|
00002710: 5A 4C B2 C3 28 49 4E 24 29 00 2D 2F 1D 06 8B 5A |ZL..(IN$).-/...Z|
00002720: B2 31 33 B0 5A B2 32 30 A7 31 36 30 30 00 41 2F |.13.Z.20.1600.A/|
00002730: 22 06 8B 5A B3 36 35 B0 5A B1 39 30 A7 31 36 30 |"..Z.65.Z.90.160|
00002740: 30 00 4D 2F 27 06 5A 24 B2 C7 28 5A 29 00 5C 2F |0.M/'.Z$..(Z).\/|
00002750: 2C 06 8B 5A 4C B1 50 A7 31 35 33 35 00 76 2F 31 |,..ZL.P.1535.v/1|
00002760: 06 49 4E 24 B2 49 4E 24 AA 5A 24 3A 8B 44 52 B2 |.IN$.IN$.Z$:.DR.|
00002770: 30 A7 99 5A 24 3B 00 7C 2F 36 06 3A 00 92 2F 40 |0..Z$;.|/6.:../@|
00002780: 06 8B 5A B2 31 33 AF 5A 4C B3 50 AA 31 A7 31 35 |..Z.13.ZL.P.1.15|
00002790: 33 35 00 B8 2F 45 06 8B 5A B2 31 33 A7 49 4E 24 |35../E..Z.13.IN$|
000027A0: B2 CA 28 49 4E 24 2C 32 29 3A 99 22 20 22 43 52 |..(IN$,2):." "CR|
000027B0: 24 3B 3A 89 31 34 31 35 00 EB 2F 4A 06 8B 5A B2 |$;:.1415../J..Z.|
000027C0: 32 30 AF 5A 4C B1 31 A7 5A 4C B2 5A 4C AB 31 3A |20.ZL.1.ZL.ZL.1:|
000027D0: 49 4E 24 B2 C8 28 49 4E 24 2C 5A 4C 29 3A 99 22 |IN$..(IN$,ZL):."|
000027E0: 20 9D 9D 22 3B 3A 89 31 35 33 35 00 F5 2F 4F 06 | ..";:.1535../O.|
000027F0: 89 31 35 33 36 00 0A 30 A4 06 55 47 24 B2 22 22 |.1536..0..UG$.""|
00002800: 3A 55 50 B2 30 3A 8D 38 35 30 00 24 30 A9 06 99 |:UP.0:.850.$0...|
00002810: 22 13 11 11 11 11 11 11 20 D9 CF D5 D2 A0 D3 C3 |"....... .......|
00002820: CF D2 C5 22 00 37 30 AA 06 99 22 20 A3 A3 A3 A3 |...".70..." ....|
00002830: A3 A3 A3 A3 A3 A3 22 00 54 30 AE 06 99 22 11 11 |......".T0..."..|
00002840: 20 C3 CF D2 D2 C5 C3 D4 A0 C1 CE D3 D7 C5 D2 D3 | ...............|
00002850: 3A 22 52 49 00 76 30 B3 06 99 22 11 11 20 C9 CE |:"RI.v0...".. ..|
00002860: C3 CF D2 D2 C5 C3 D4 A0 C1 CE D3 D7 C5 D2 D3 3A |...............:|
00002870: 22 31 30 AB 52 49 00 85 30 B4 06 8B 52 49 B2 30 |"10.RI..0...RI.0|
00002880: A7 31 37 32 30 00 AB 30 B5 06 4D 47 B2 B5 28 43 |.1720..0..MG..(C|
00002890: 53 AD 52 49 29 3A 8B 43 53 AD 52 49 AB 4D 47 B2 |S.RI):.CS.RI.MG.|
000028A0: B1 2E 35 A7 4D 47 B2 4D 47 AA 31 00 D9 30 B6 06 |..5.MG.MG.1..0..|
000028B0: 99 22 11 11 20 C1 D6 C5 D2 C1 C7 C5 A0 D4 C9 CD |.".. ...........|
000028C0: C5 20 C6 CF D2 A0 C3 CF D2 D2 C5 C3 D4 20 C1 CE |. ........... ..|
000028D0: D3 D7 C5 D2 D3 3A 22 4D 47 00 E2 30 B8 06 8D 38 |.....:"MG..0...8|
000028E0: 33 35 00 E8 30 BD 06 8E 00 00 00 |35..0...... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......LX.X.U.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
...#.. +++ INPUT SECTION +++...(..UO,0:U
R$."":UI$.""...*..UL.0.UL.80...-..UC,0.*
.2..UI$:.UI$."".50.T.7..UI$.G(13).C(UR$)
..1..UC,1:." .";:.85.G.<..UI$.G(20).105.
{.>.. C(UR$)..UL.50. .A..120:. CHECK FOR
VALID CHARACTER...F.UR$.UR$.UI$...K..UI
$;.B.P..50...U.. +++ CHECK FOR HELP REQU
EST +++...Z..UR$.UX$.195:. EXIT TO HELP
ROUTINE..._..UF.1..240.+.D.UF.0:.:..D.F.
. ++ CHECK DELETE ++.U.I..C(UR$).1.50.M.
N.UR$.H(UR$,C(UR$).1)..S..". ..";:.50.
..X.. ++ CHECK FOR VALID CHARACTERS ++..
.}..C(US$).0.150.H..US$.US$.UX$.Y....US
.1.C(US$)......UI$.J(US$,US,1)..........
...UI$."":....... ** STANDARD INPUT **./
....F(UI$).46...@....UI$.G(32)...]. ..F(
UI$).48.F(UI$).57.170.C..........F(UI$).
65.F(UI$).90.180............F(UI$).193.F
(UI$).218.UI$."":..M....B(UT).UU%.UI$.G(
F(UI$).128):..S.........UI$."":....C.UF.
1:. +++ HELP ROUTINE EXIT +++...E..250..
.H..245.6.M..UQ.UB.(U2%.256.U1%.U3%.2).R
.R.UQ%(UQ.UB).B(UQ):.:.".".E.W.UZ.1:UV%.
B(UT).N.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:
UP.UJ:UL.UK:.B(50003).0..53281,6:.53280,
14.....UT$.UL$:.".";:.UT,UV%:.UQ.UB.(U2%
.256.U1%.U3%.3)......UQ,UQ%(UQ.UB):.....
..U1,U1%......U2,U2%. ....U4,U4%......U3
,U3%.1.6....35.H...UD%.((U2%.256.U1%.U3%
).UB).40:.H(UD$,UD%.1):.......H(UD$,24);
" . HELP COMING .
":..O...U1%.B(U1):U2%.B(U2):U3%.B(U3):U4
%.B(U4).....UJ$.US$:UK$.UG$:UL$.UT$:UJ.U
P:UK.UL.........,.. ** MENU **...-.:.C..
..".":.UT,UU%:.B(50003).0..53281,9:.5328
0,8.I./.:.F.1..". MENU"..
.6.." ----------------------------------
----"...;..".. 1. SCRAMBLE 7"...
@..".. 2. STUDENT INSTRUCTIONS".
..E..".. 3. TEACHER INSTRUCTIONS
".6.J..".. 4. MODIFICATION OF PR
OGRAM".R.O..".. 5. QUIT.."...T..
" --------------------------------------
"...Y..".. PRESS A NUMBER KEY (1-5
) ";.U.^.UL.1:US$."12345":.35:. INPUT RO
UTINE..._..C(UR$).1.300...`.US$.""...C..
E(UR$).1000,400,500,600,396...H..300.C..
.. ** RE-ENABLE STOP KEY AND END **.R...
.B(50003)..1.B(50003)..160.B(50003)..0.3
99......UU.71:.B(50003).0..53281,6:.5328
0,14......"..":.......875:..T.... ** STU
DENT INSTRUCTIONS **......".":.UT,UL%:.B
(50003).0..53281,0:.53280,0.$...UP.0:UG$
."STUDENT INST":.850.*.G...0.L...A.Q..".
..... IN THIS GAME, I'LL GIVE YOU A
"...S..". SCRAMBLED WORD AND THE FIRST L
ETTER IN"...U..". THE WORD. IT IS UP TO
YOU TO".U.V..". UNSCRAMBLE IT.":.835...
...850:.".. NOTE:...TO ADVANCE FROM ONE
QUESTION".3....". TO THE NEXT PRESS THE
SPACE BAR.".]....". IF AT ANYTIME YOU WI
SH TO RETURN"......". TO THE MENU PRESS
H AND THEN HIT RETURN"......835......UZ.
1..UP%:.217.......R.... ** TEACHER INSTR
UCTIONS **......".":.UT,UL%:.B(50003).0.
.53281,2:.53280,10.#...UP.0:UG$."TEACHER
INST":.850.Q....".. TO THE BEST OF
OUR KNOWLEDGE,.".Z...." THIS PROGRAM
IS IN THE PUBLIC."......" DOMAIN. IF
THIS IS NOT THE CASE.".C...." PLEASE C
ONTACT:..."......" COMMODORE BUSINE
SS MACHINES."......" 3370 PHARM
ACY AVE..4...." AGINCOURT, ONTA
RIO".V...." CANADA M1W 2K4".V
...." (416) 499-4292"...... 835
:. 850:......" ..PROGRAM NAME: SCRAM
BLE 4..R...." WRITTEN BY : CARL REI
D......." UPGRADED BY : ..!
...." .THIS PROGRAM WILL RUN ON ANY.
..H...." BASIC 2.0 PET COMPUTER.
.O...." BASIC 4.0 PET COMPUTER..
....." 8032 CBM COMPUTER......."
COMMODORE 64 COMPUTER.D....835:
.850......".. THIS PROGRAM IS DESIG
NED TO"......". HELP STUDENTS WITH THEIR
SPELLING".+....". SKILLS.".Y...."..
THE WORDS CAN BE EASILY CHANGED"......"
. TO WORDS THAT YOU FEEL YOUR STUDENTS".
.....". SHOULD KNOW. IF YOU WISH TO CHA
NGE"...!..". WORDS, THEN CONSULT THE PRO
GRAM "...&..". MODIFICATION INSTRUCTIONS
."...D..835...N..UZ.1..UP%:.217.%.W...K.
X.. ** PROGRAM MODIFICATION INST **.\.Y.
.".":.UT,UL%.|.].UP.0:UG$."PROGRAM MOD":
.850...B.."..... IF YOU WANT TO CHANGE
THE LIST OF".W.G..". WORDS, THEN LIST LI
NES 1480-1520."...L..".. PLEASE DO NOT
INCREASE OR DECREASE"./.Q..". THE NUMBER
OF WORDS IN THE LIST.".=.V..835:.850.J.
{..".. NOTE:...WHEN CHANGING WORDS, AVOI
D"......". MAKING DATA STATEMENTS MORE T
HAN TWO .LINES LONG.".U....".. IF
THIS HAPPENS, THEN TAKE THE"......". LA
ST WORD IN THE STATEMENT, AND PUT IT".<.
...". IN ITS OWN SEPARATE DATA STATEMENT
.":.835:.850.J....". IF ONE WANTS TO CH
ANGE THE WORD DOG"......". TO THE WORD C
OMPUTER THE LINE WOULD BE"......". CHANG
ED FROM:."......". 1480 DATA APPLE,DOG,B
IRD,HELLO,HELP,OUT,YELLOW,MELT,ORANGE,DO
NE";......" BELOW,FEELING". ....". TO:."
.X....". 1480 DATA APPLE,COMPUTER,CAT,BI
RD,HELLO,HELP,";......" OUT,YELLOW,MELT,
ORANGE,DONE,BELOW"......" 1481 DATA FEEL
ING"......835......UZ.1..UP%:.217.......
..... ** TO USE 8032 LOAD CBM4032 **...F
..".....BEFORE RUNNING THIS PROGRAM ON A
N 8032 ...P.P.." LOAD THE 'CBM 403
2' PROGRAM.............".[.Z..UU.71.A...
....... ** TO USE 8032 LOAD CBM4032 **.Q
...."....BEFORE RUNNING THIS PROGRAM ON
AN 8032 ..LOAD CBM 4032 PROGRAM"......1
093:.... .. ** T I T L E P A G E **.1.
".."....";:.UT,UU%:.B(50003).0..53280,14
:.53281,6.G.$..I.1.38:."...";:.._.&..I.1
.22:.".....";:..W.(..I.1.37:.".....";:..
..*..I.1.22:.".....";:....,.."..........
................. ..V....".............
...... . . .....0.."...................
. ......2..".................... ..=.
4.."..............C O M M O D O R E...`.
6.."...............EDUCATIONAL....8..".
...............SOFTWARE...:.. ** COMMODO
RE LOGO **.R.;..H(UD$,24);"..........PRE
SS SPACE BAR OR WAIT.":I.0...<..A$:.A$..
" ".I.I.1:.I.250.828...>.T1$."":T2$."":T
3$."":T4$."":I.0.!.@..300.=.C.. ** SPACE
BAR PRESS **.X.H..UO,0:.H(UD$,24);"....
...PRESS SPACE BAR TO CONTINUE."...L..UI
$:.UI$.." ".844...N.....R.. ** PAGE DESI
GN ROUTINE **.A.T.UP.UP.1...W.."."H(UT$.
UP$,21);I(UP$.UG$.D(UP),18)...\.." -----
---------------------------------".).`..
UH..0.870.].A..H(UD$,24);H(UP$,7);"HELP
- PRESS H <RETURN>".O.F..UO,0:."..":..
..K.. ** PLEASE WAIT REMARK **.D.P..H(UD
$,24);" ONE MOMENT PLEASE...
".J.U........ ** SET UP VARIABLES **.
2 ..UX$."H":.UQ%(1000):UB.32768:U1.196:U
2.197:U3.198:U4.216:UC.167:UU.1024.P ..U
T.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.2
048.. ...B(50003).0.UT.53272:UU%.21:UL%.
23:UP%.2139:UM.1024:UO.198..!..UD$."....
.....................".H!..UP$."
".N!..UT$
." SCRAMBLE 7":. PROGRAM TITLE.T!.....!.
.. ** SET VARIABLES **..!...900..!..:..!
..:..!... ** CHECK FOR 8032 **..!...".":
." ":. SHIFTED SPACE..!...B(UB.40)..96..
700.."... ** MEMORY CHECK **. "... .(0).
2000.937.N"..."....THIS MACHINE DOES NOT
HAVE ENOUGH.".R"..."MEMORY TO RUN THIS
PROGRAM !".}"...UU.71.."....."..."..":.B
(50003).0.962.L"... ** BASIC 2.0 OR 4.
0 OR C-64 SETUP **..#...1075,133:.1076
,144:.1077,234:.1079,4:.1080,133:.1081,1
45.@#...1091,155:.1098,133:.1099,144:.11
00,234:.1103,133.B#...1104,145:.1105,234
:.1082,234.Y#...B(50003)..160.955..#...1
093,88:.1094,228:.1097,85:.1102,228:.965
..#...B(50003)..1.990..#...1093,49:.1094
,230:.1097,46:.1102,230:.965.&$B..2099,1
41:.2100,20:.2101,3:.2103,8:.2104,141:.2
105,21.B$C..2106,3:.2115,145:.2117,52:.2
118,234:.2121,49:.2122,141..$D..2123,20:
.2124,3:.2126,234:.2127,141:.2128,21:.21
29,3..$E..UU.48:. DISABLE STOP KEY.K$J..
800:. TITLE..$T..300:. MENU..%...".THE P
GM WILL NOT WORK ON THIS MACHINE!":..A%.
..UZ.1..UP%:.UP%:UZ.0:. ** PROGRAM START
S HERE **.M%..."..";:.:.B(50003).0..5328
1,6:.53280,14.Y%L..UT,UL%..%Q..875.O%V.S
$." ...
................................X%[.W.60
..%`..HZ.0. . 1165..%B..W$(W)..&C..H(13)
..&D..RH$(10)..&E.HZ.1..&I....&J..J.1.W:
.W$(J).O&O..C(W$(J)).3.C(W$(J)).12.K2.1.
.&T..K2.1..".NO WORDS WITH LESS THAN 2 L
ETTERS OR MORE THAN 12 LETTERS"..&U..
K2.1....&Y..:.".":.UT,UL%:.850.P&..P$."C
ONTINUE"..&..."....... IF YOU WISH TO SE
E ALL"W" WORDS".+'...". BEFORE BEGINNING
, THEN PRESS.'Y'..".I'..." IF NOT THEN P
RESS 'N'..X'..."... ? ";.V'..US$."YN":UL
.1:.35:ZZ$.UR$..'...ZZ$."Y"..1208..'...Z
Z$."N"..1281..'..G.0:D.0..'...".";:UH.1:
.850:A.1..'...G.G.G.30:..A)W$(G)"."..'D.
.G.0.."...";..(I.A$.D(G):.J(A$,3,1)."0".
."...";:A.13:D.D.1.((N..D.1.A.26.D(S..G.
W.1.P$."BEGIN":.1243.J(X...S(...835.Y(..
:._(..:.}(...G.W.."..";:A.0:D.0:.1210..(
..UP.0:CU.0:RI.0..(#.C$."":Y.0:F.0..(2.C
U.CU.1:.CU.11.1700..(4.UG$."QUESTION":UH
.1:.850:.875..)<..".............. "S$"UN
SCRAMBLE THE WORD: "S$..)A.A..(W..(1)).1
:RH$(CU).W$(A).=)B..CU.1.1350.G)D..NW.1.
CU.1:.RH$(CU).RH$(NW)..1345:.NW..)F.B$.W
$(A):K.C(B$):.K.12.1345.D)K.."..........
THE FIRST LETTER IN THE WORD IS ."J(B$,
1,1)..)P.."..................."S$.14)".?
.";:.V.1.K:."-";:...*U.D..(K..(1)).1:DR
.0..*Z.T.T.1:.D.H(T).T.0:.1365.<*_..T.K.
1370.Q*D.Y.Y.1:H(Y).D:T.0.E*I.C$.C$.J(B$
,D,1).S*N..Y.K.1365..*S..C$.B$.1345..*X.
:..*}..865..*~.."..............".22)"."C
$..*....16)"... ............
...";:P.K:.1530..*...ZL.P.1.1405.7+..CG.
.(TI.60):.IN$.B$.TY.TY.1:M$." YOU GUESSE
D IT!".S$:RH2.0.P+...IN$..B$.M$." SORRY.
YOU DID NOT GUESS IT!".S$:RH2.1.Y+...85
0..+...RH2.1. .".............. "S$"THE W
ORD WAS ."B$..+...RH2.0.."..............
IT TOOK YOU"CG"SECONDS.":RI.RI.1:CS.CS.
CG..,...".........."M$.., ..835.+,..F.0:
T.0:Y.0:K.0:M$."":..F,...M.1.13:H(M).0:.
:.1315.[,C..*GRADE 7 WORDS*..,H..ABOVE,A
IRPLANE,APPLES,ANGEL,ANIMALS,ASKED,ALARM
,AMONG,ALIVE,ART,BAKER..,M..ROUGHNESS,PR
IEST,BOUQUET,BANQUET,RELIABLE,POSTPONE,A
GENCY,JEWEL..-R..BETTER,BERRY,BEDTIME,BE
TWEEN,BIGGER,BELONG,BRUSH,BOTTLE,BUILD.Q
-W..QOUTATION,CHINOOK,LACROSSE,ABSTRACT,
MERCHANT,CRIMINAL,ASHAMED..-...CABIN,CAM
EL,CANDLE,CANNOT,CAVE,CHASE,CLOUD,CHEESE
,CHEST,CATTLE.A-...PROVEN......DANGER,DA
RKER,DOCTOR,DRUM,DIRTY,DEEP,DONKEY,DRAWI
NG,DURING,DELAY.'....EARTH,EXCITE,ELEPHA
NT,ECHO.I....ALTHOUGH,ACHE,ONION,PLEASAN
T.C...IN$." ":ZT.TI.15:ZC.2.N...."..";..
...US$."":UL.C(B$):TI$."000000":.35:IN$.
UR$:UP.UP.1......1420.B....Z$:.Z$.."".15
60......ZT..TI..J(". .",ZC,3);".";:ZC.3.
ZC:ZT.TI.15.....:../...1536../..Z.F(Z$):
ZL.C(IN$).-/...Z.13.Z.20.1600.A/"..Z.65.
Z.90.1600.M/'.Z$.G(Z).\/,..ZL.P.1535.V/1
.IN$.IN$.Z$:.DR.0..Z$;.|/6.:../@..Z.13.Z
L.P.1.1535../E..Z.13.IN$.J(IN$,2):." "CR
$;:.1415../J..Z.20.ZL.1.ZL.ZL.1:IN$.H(IN
$,ZL):." ..";:.1535../O..1536..0..UG$.""
:UP.0:.850.$0..."....... YOUR SCORE".70.
.." ..........".T0...".. CORRECT ANSWERS
:"RI.V0...".. INCORRECT ANSWERS:"10.RI..
0...RI.0.1720..0..MG..(CS.RI):.CS.RI.MG.
..5.MG.MG.1.Y0...".. AVERAGE TIME FOR CO
RRECT ANSWERS:"MG..0...835..0......
> CLICK IMAGE PREVIEW FOR FULL MODAL