MASTER MIND1.C3
FILE INFORMATION
FILENAME(S): MASTER MIND1.C3
FILE TYPE(S): PRG
FILE SIZE: 9K
FIRST SEEN: 2025-10-20 14:31:29
APPEARS ON: 2 disk(s)
FILE HASH
01881135e9ed02eb16c2a78d436f27d0d484333724001b3baa74e7ce0c3788fd
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAMES | MASTER MIND1.C3 | PRG | Treasure Chest - Klaus Der Suhler | 26 | 0 | DOWNLOAD FILE |
| ICHAELS ISK 2 | MASTER MIND1.C3 | PRG | Treasure Chest - Thunderbird | 26 | 0 | 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 1F 09 2D |..UL.0.UL.80...-|
00000110: 00 99 22 20 20 9D 9D 22 3B 3A 97 55 43 2C 30 00 |.." ..";:.UC,0.|
00000120: 33 09 32 00 A1 55 49 24 3A 8B 55 49 24 B2 22 22 |3.2..UI$:.UI$.""|
00000130: A7 35 30 00 5D 09 37 00 8B 55 49 24 B2 C7 28 31 |.50.].7..UI$..(1|
00000140: 33 29 AF C3 28 55 52 24 29 B1 B2 31 A7 97 55 43 |3)..(UR$)..1..UC|
00000150: 2C 31 3A 99 22 20 9D 22 3B 3A 89 38 35 00 70 09 |,1:." .";:.85.p.|
00000160: 3C 00 8B 55 49 24 B2 C7 28 32 30 29 A7 31 30 35 |<..UI$..(20).105|
00000170: 00 84 09 3E 00 8B 20 C3 28 55 52 24 29 B2 B1 55 |...>.. .(UR$)..U|
00000180: 4C A7 35 30 00 A9 09 41 00 8D 31 32 30 3A 8F 20 |L.50...A..120:. |
00000190: 43 48 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 |CHECK FOR VALID |
000001A0: 43 48 41 52 41 43 54 45 52 00 B9 09 46 00 55 52 |CHARACTER...F.UR|
000001B0: 24 B2 55 52 24 AA 55 49 24 00 C3 09 4B 00 99 55 |$.UR$.UI$...K..U|
000001C0: 49 24 3B 00 CB 09 50 00 89 35 30 00 F0 09 55 00 |I$;...P..50...U.|
000001D0: 8F 20 2B 2B 2B 20 43 48 45 43 4B 20 46 4F 52 20 |. +++ CHECK FOR |
000001E0: 48 45 4C 50 20 52 45 51 55 45 53 54 20 2B 2B 2B |HELP REQUEST +++|
000001F0: 00 18 0A 5A 00 8B 55 52 24 B2 55 58 24 A7 31 39 |...Z..UR$.UX$.19|
00000200: 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 45 4C 50 |5:. EXIT TO HELP|
00000210: 20 52 4F 55 54 49 4E 45 00 27 0A 5F 00 8B 55 46 | ROUTINE.'._..UF|
00000220: B2 31 A7 8D 32 34 30 00 34 0A 64 00 55 46 B2 30 |.1..240.4.d.UF.0|
00000230: 3A 99 3A 8E 00 4D 0A 66 00 8F 20 2B 2B 20 43 48 |:.:..M.f.. ++ CH|
00000240: 45 43 4B 20 44 45 4C 45 54 45 20 2B 2B 00 5E 0A |ECK DELETE ++.^.|
00000250: 69 00 8B C3 28 55 52 24 29 B3 31 A7 35 30 00 76 |i...(UR$).1.50.v|
00000260: 0A 6E 00 55 52 24 B2 C8 28 55 52 24 2C C3 28 55 |.n.UR$..(UR$,.(U|
00000270: 52 24 29 AB 31 29 00 88 0A 73 00 99 22 9D 20 20 |R$).1)...s..". |
00000280: 9D 9D 22 3B 3A 89 35 30 00 AF 0A 78 00 8F 20 2B |..";:.50...x.. +|
00000290: 2B 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C 49 |+ CHECK FOR VALI|
000002A0: 44 20 43 48 41 52 41 43 54 45 52 53 20 2B 2B 00 |D CHARACTERS ++.|
000002B0: C1 0A 7D 00 8B C3 28 55 53 24 29 B2 30 A7 31 35 |..}...(US$).0.15|
000002C0: 30 00 D1 0A 7F 00 55 53 24 B2 55 53 24 AA 55 58 |0.....US$.US$.UX|
000002D0: 24 00 E2 0A 82 00 81 55 53 B2 31 A4 C3 28 55 53 |$......US.1..(US|
000002E0: 24 29 00 F9 0A 87 00 8B 55 49 24 B2 CA 28 55 53 |$)......UI$..(US|
000002F0: 24 2C 55 53 2C 31 29 A7 8E 00 FF 0A 8C 00 82 00 |$,US,1).........|
00000300: 0C 0B 91 00 55 49 24 B2 22 22 3A 8E 00 27 0B 96 |....UI$."":..'..|
00000310: 00 8F 20 2A 2A 20 53 54 41 4E 44 41 52 44 20 49 |.. ** STANDARD I|
00000320: 4E 50 55 54 20 2A 2A 00 38 0B 98 00 8B C6 28 55 |NPUT **.8.....(U|
00000330: 49 24 29 B2 34 36 A7 8E 00 49 0B 9B 00 8B 55 49 |I$).46...I....UI|
00000340: 24 B2 C7 28 33 32 29 A7 8E 00 66 0B A0 00 8B C6 |$..(32)...f.....|
00000350: 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 24 29 B1 |(UI$).48..(UI$).|
00000360: 35 37 A7 31 37 30 00 6C 0B A5 00 8E 00 89 0B AA |57.170.l........|
00000370: 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 28 55 49 |...(UI$).65..(UI|
00000380: 24 29 B1 39 30 A7 31 38 30 00 8F 0B AF 00 8E 00 |$).90.180.......|
00000390: B3 0B B4 00 8B C6 28 55 49 24 29 B3 31 39 33 B0 |......(UI$).193.|
000003A0: C6 28 55 49 24 29 B1 32 31 38 A7 55 49 24 B2 22 |.(UI$).218.UI$."|
000003B0: 22 3A 8E 00 D6 0B B9 00 8B C2 28 55 54 29 B2 55 |":........(UT).U|
000003C0: 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 24 29 AB |U%.UI$..(.(UI$).|
000003D0: 31 32 38 29 3A 8E 00 DC 0B BB 00 8E 00 E9 0B BE |128):...........|
000003E0: 00 55 49 24 B2 22 22 3A 8E 00 0E 0C C3 00 55 46 |.UI$."":......UF|
000003F0: B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 20 52 4F |.1:. +++ HELP RO|
00000400: 55 54 49 4E 45 20 45 58 49 54 20 2B 2B 2B 00 17 |UTINE EXIT +++..|
00000410: 0C C5 00 8D 32 35 30 00 20 0C C8 00 8D 32 34 35 |....250. ....245|
00000420: 00 32 0C CD 00 81 55 51 B2 55 42 A4 55 4D AA 39 |.2....UQ.UB.UM.9|
00000430: 32 30 00 4E 0C D2 00 55 51 25 28 55 51 AB 55 42 |20.N...UQ%(UQ.UB|
00000440: 29 B2 C2 28 55 51 29 3A 82 3A 99 22 93 22 00 61 |)..(UQ):.:.".".a|
00000450: 0C D7 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 54 |...UZ.1:UV%..(UT|
00000460: 29 00 6A 0C D8 00 89 33 30 30 00 8F 0C D9 00 55 |).j....300.....U|
00000470: 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 |Z.0:US$.UJ$:UG$.|
00000480: 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 00 |UK$:UP.UJ:UL.UK.|
00000490: C6 0C DA 00 8B C2 28 35 30 30 30 33 29 B2 30 A7 |......(50003).0.|
000004A0: 97 35 33 32 38 31 2C 31 3A 99 22 93 22 3B 3A 97 |.53281,1:.".";:.|
000004B0: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 |53281,6:.53280,1|
000004C0: 34 3A 89 32 32 30 00 D0 0C DB 00 99 22 93 22 3B |4:.220......".";|
000004D0: 00 FF 0C DC 00 55 54 24 B2 55 4C 24 3A 97 55 54 |.....UT$.UL$:.UT|
000004E0: 2C 55 56 25 3A 81 55 51 B2 55 42 A4 28 55 32 25 |,UV%:.UQ.UB.(U2%|
000004F0: AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 33 29 00 |.256.U1%.U3%.3).|
00000500: 14 0D E1 00 97 55 51 2C 55 51 25 28 55 51 AB 55 |.....UQ,UQ%(UQ.U|
00000510: 42 29 3A 82 00 20 0D E6 00 97 55 31 2C 55 31 25 |B):.. ....U1,U1%|
00000520: 00 2C 0D E8 00 97 55 32 2C 55 32 25 00 38 0D E9 |.,....U2,U2%.8..|
00000530: 00 97 55 34 2C 55 34 25 00 46 0D EA 00 97 55 33 |..U4,U4%.F....U3|
00000540: 2C 55 33 25 AB 31 00 4E 0D EB 00 89 33 35 00 80 |,U3%.1.N....35..|
00000550: 0D F0 00 55 44 25 B2 28 28 55 32 25 AC 32 35 36 |...UD%.((U2%.256|
00000560: AA 55 31 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 |.U1%.U3%).UB).40|
00000570: 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E |:..(UD$,UD%.1):.|
00000580: 00 BB 0D F5 00 99 C8 28 55 44 24 2C 32 34 29 3B |.......(UD$,24);|
00000590: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000005A0: 20 20 20 20 20 20 20 12 20 48 45 4C 50 20 43 4F | . HELP CO|
000005B0: 4D 49 4E 47 20 92 20 20 22 3A 8E 00 E7 0D FA 00 |MING . ":......|
000005C0: 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 C2 28 |U1%..(U1):U2%..(|
000005D0: 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A 55 34 |U2):U3%..(U3):U4|
000005E0: 25 B2 C2 28 55 34 29 00 0F 0E FB 00 55 4A 24 B2 |%..(U4).....UJ$.|
000005F0: 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 |US$:UK$.UG$:UL$.|
00000600: 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 00 |UT$:UJ.UP:UK.UL.|
00000610: 15 0E FF 00 8E 00 26 0E 2C 01 8F 20 2A 2A 20 4D |......&.,.. ** M|
00000620: 45 4E 55 20 2A 2A 00 2C 0E 2D 01 3A 00 5B 0E 2E |ENU **.,.-.:.[..|
00000630: 01 99 22 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 |..".":.UT,UU%:..|
00000640: 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 |(50003).0..53281|
00000650: 2C 39 3A 97 35 33 32 38 30 2C 38 00 61 0E 2F 01 |,9:.53280,8.a./.|
00000660: 3A 00 7E 0E 31 01 99 22 13 20 20 20 20 20 20 20 |:.~.1..". |
00000670: 20 20 20 20 20 20 20 20 20 4D 45 4E 55 22 00 AD | MENU"..|
00000680: 0E 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.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 22 00 CE 0E |------------"...|
000006B0: 3B 01 99 22 11 11 20 20 20 20 20 20 20 31 2E 20 |;..".. 1. |
000006C0: 20 20 4D 41 53 54 45 52 20 4D 49 4E 44 22 00 F8 | MASTER MIND"..|
000006D0: 0E 40 01 99 22 11 11 20 20 20 20 20 20 20 32 2E |.@..".. 2.|
000006E0: 20 20 20 53 54 55 44 45 4E 54 20 49 4E 53 54 52 | STUDENT INSTR|
000006F0: 55 43 54 49 4F 4E 53 22 00 22 0F 45 01 99 22 11 |UCTIONS".".E..".|
00000700: 11 20 20 20 20 20 20 20 33 2E 20 20 20 54 45 41 |. 3. TEA|
00000710: 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E |CHER INSTRUCTION|
00000720: 53 22 00 3E 0F 4F 01 99 22 11 11 20 20 20 20 20 |S".>.O..".. |
00000730: 20 20 34 2E 20 20 20 51 55 49 54 11 11 22 00 6D | 4. QUIT..".m|
00000740: 0F 54 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.T.." ----------|
00000750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 98 0F |------------"...|
00000770: 59 01 99 22 11 11 20 20 20 20 20 20 20 50 52 45 |Y..".. PRE|
00000780: 53 53 20 41 20 4E 55 4D 42 45 52 20 4B 45 59 20 |SS A NUMBER KEY |
00000790: 28 31 2D 34 29 20 22 3B 00 C0 0F 5E 01 55 4C B2 |(1-4) ";...^.UL.|
000007A0: 31 3A 55 53 24 B2 22 31 32 33 34 22 3A 8D 33 35 |1:US$."1234":.35|
000007B0: 3A 8F 20 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 |:. INPUT ROUTINE|
000007C0: 00 D2 0F 5F 01 8B C3 28 55 52 24 29 B1 31 A7 33 |..._...(UR$).1.3|
000007D0: 30 30 00 DD 0F 60 01 55 53 24 B2 22 22 00 FA 0F |00...`.US$.""...|
000007E0: 63 01 91 C5 28 55 52 24 29 8D 31 30 30 30 2C 34 |c...(UR$).1000,4|
000007F0: 30 30 2C 35 30 30 2C 33 39 36 00 03 10 68 01 89 |00,500,396...h..|
00000800: 33 30 30 00 2A 10 8B 01 8F 20 2A 2A 20 52 45 2D |300.*.... ** RE-|
00000810: 45 4E 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 20 |ENABLE STOP KEY |
00000820: 41 4E 44 20 45 4E 44 20 2A 2A 00 59 10 8C 01 8B |AND END **.Y....|
00000830: C2 28 35 30 30 30 33 29 B3 B1 31 AF C2 28 35 30 |.(50003)..1..(50|
00000840: 30 30 33 29 B3 B1 31 36 30 AF C2 28 35 30 30 30 |003)..160..(5000|
00000850: 33 29 B3 B1 30 A7 33 39 39 00 83 10 8D 01 9E 55 |3)..0.399......U|
00000860: 55 AA 37 31 3A 8B C2 28 35 30 30 30 33 29 B2 30 |U.71:..(50003).0|
00000870: A7 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 |..53281,6:.53280|
00000880: 2C 31 34 00 8F 10 8E 01 99 22 9A 93 22 3A 80 00 |,14......"..":..|
00000890: 9A 10 8F 01 8D 38 37 35 3A 8E 00 BB 10 90 01 8F |.....875:.......|
000008A0: 20 2A 2A 20 53 54 55 44 45 4E 54 20 49 4E 53 54 | ** STUDENT INST|
000008B0: 52 55 43 54 49 4F 4E 53 20 2A 2A 00 EA 10 95 01 |RUCTIONS **.....|
000008C0: 99 22 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 28 |.".":.UT,UU%:..(|
000008D0: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
000008E0: 30 3A 97 35 33 32 38 30 2C 30 00 1E 11 9A 01 55 |0:.53280,0.....U|
000008F0: 54 24 B2 22 20 4D 41 53 54 45 52 20 4D 49 4E 44 |T$." MASTER MIND|
00000900: 22 3A 55 50 B2 30 3A 55 47 24 B2 22 53 54 55 44 |":UP.0:UG$."STUD|
00000910: 45 4E 54 20 49 4E 53 54 22 3A 8D 38 35 30 00 45 |ENT INST":.850.E|
00000920: 11 9B 01 99 22 11 20 20 20 20 20 20 20 4D 41 53 |....". MAS|
00000930: 54 45 52 20 4D 49 4E 44 20 49 4E 53 54 52 55 43 |TER MIND INSTRUC|
00000940: 54 49 4F 4E 53 00 6C 11 9C 01 99 22 20 20 20 20 |TIONS.l...." |
00000950: 20 20 20 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 | .............|
00000960: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 99 11 9D |..........."....|
00000970: 01 99 22 20 54 48 45 20 43 4F 4D 50 55 54 45 52 |.." THE COMPUTER|
00000980: 20 43 48 4F 4F 53 45 53 20 41 20 34 20 44 49 47 | CHOOSES A 4 DIG|
00000990: 49 54 20 4E 55 4D 42 45 52 00 C4 11 9E 01 99 3A |IT NUMBER......:|
000009A0: 99 22 20 20 20 20 20 45 41 43 48 20 44 49 47 49 |." EACH DIGI|
000009B0: 54 20 43 41 4E 20 42 45 20 46 52 4F 4D 20 30 20 |T CAN BE FROM 0 |
000009C0: 54 4F 20 39 00 EB 11 9F 01 99 3A 99 22 20 20 20 |TO 9......:." |
000009D0: 20 20 20 20 20 44 49 47 49 54 53 20 43 41 4E 20 | DIGITS CAN |
000009E0: 42 45 20 52 45 50 45 41 54 45 44 00 1A 12 A0 01 |BE REPEATED.....|
000009F0: 99 3A 99 22 20 59 4F 55 20 48 41 56 45 20 31 30 |.:." YOU HAVE 10|
00000A00: 20 54 55 52 4E 53 20 54 4F 20 47 55 45 53 53 20 | TURNS TO GUESS |
00000A10: 54 48 45 20 4E 55 4D 42 45 52 00 44 12 A1 01 99 |THE NUMBER.D....|
00000A20: 3A 99 3A 99 22 20 54 48 45 20 43 4F 4D 50 55 54 |:.:." THE COMPUT|
00000A30: 45 52 20 53 43 4F 52 45 53 20 45 41 43 48 20 54 |ER SCORES EACH T|
00000A40: 55 52 4E 3A 00 88 12 A2 01 99 3A 99 22 20 D1 20 |URN:......:." . |
00000A50: 46 4F 52 20 45 41 43 48 20 43 4F 52 52 45 43 54 |FOR EACH CORRECT|
00000A60: 20 44 49 47 49 54 20 49 4E 20 49 54 53 20 20 20 | DIGIT IN ITS |
00000A70: 20 20 20 20 20 20 20 20 43 4F 52 52 45 43 54 20 | CORRECT |
00000A80: 50 4F 53 49 54 49 4F 4E 00 CC 12 A3 01 99 3A 99 |POSITION......:.|
00000A90: 22 20 D7 20 46 4F 52 20 45 41 43 48 20 43 4F 52 |" . FOR EACH COR|
00000AA0: 52 45 43 54 20 44 49 47 49 54 20 4E 4F 54 20 49 |RECT DIGIT NOT I|
00000AB0: 4E 20 49 54 53 20 20 20 20 20 20 20 43 4F 52 52 |N ITS CORR|
00000AC0: 45 43 54 20 50 4F 53 49 54 49 4F 4E 00 E2 12 E5 |ECT POSITION....|
00000AD0: 01 8D 38 33 35 3A 99 22 93 22 3A 97 55 54 2C 55 |..835:.".":.UT,U|
00000AE0: 4C 25 00 F6 12 EA 01 8B 55 5A B2 31 A7 9E 55 50 |L%......UZ.1..UP|
00000AF0: 25 3A 89 32 31 37 00 01 13 F2 01 55 47 24 B2 22 |%:.217.....UG$."|
00000B00: 22 00 07 13 F3 01 8E 00 28 13 F4 01 8F 20 2A 2A |".......(.... **|
00000B10: 20 54 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 | TEACHER INSTRUC|
00000B20: 54 49 4F 4E 53 20 2A 2A 00 58 13 F5 01 99 22 93 |TIONS **.X....".|
00000B30: 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 |":.UT,UL%:..(500|
00000B40: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 32 3A 97 |03).0..53281,2:.|
00000B50: 35 33 32 38 30 2C 31 30 00 8C 13 F6 01 55 54 24 |53280,10.....UT$|
00000B60: B2 22 20 CD C1 D3 D4 C5 D2 A0 CD C9 CE C4 22 3A |." ...........":|
00000B70: 55 50 B2 30 3A 55 47 24 B2 22 D4 45 41 43 48 45 |UP.0:UG$.".EACHE|
00000B80: 52 20 C9 4E 53 54 22 3A 8D 38 35 30 00 BA 13 F7 |R .NST":.850....|
00000B90: 01 99 22 11 11 20 20 20 20 20 20 D4 4F 20 54 48 |..".. .O TH|
00000BA0: 45 20 42 45 53 54 20 4F 46 20 4F 55 52 20 4B 4E |E BEST OF OUR KN|
00000BB0: 4F 57 4C 45 44 47 45 2C 11 22 00 E3 13 F8 01 99 |OWLEDGE,."......|
00000BC0: 22 20 20 20 54 48 49 53 20 50 52 4F 47 52 41 4D |" THIS PROGRAM|
00000BD0: 20 49 53 20 49 4E 20 54 48 45 20 50 55 42 4C 49 | IS IN THE PUBLI|
00000BE0: 43 11 22 00 0F 14 F9 01 99 22 20 20 20 44 4F 4D |C."......" DOM|
00000BF0: 41 49 4E 2E 20 20 C9 46 20 54 48 49 53 20 49 53 |AIN. .F THIS IS|
00000C00: 20 4E 4F 54 20 54 48 45 20 43 41 53 45 11 22 00 | NOT THE CASE.".|
00000C10: 2C 14 FA 01 99 22 20 20 20 50 4C 45 41 53 45 20 |,...." PLEASE |
00000C20: 43 4F 4E 54 41 43 54 3A 11 11 11 22 00 56 14 FB |CONTACT:...".V..|
00000C30: 01 99 22 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F |.." .OMMODO|
00000C40: 52 45 20 C2 55 53 49 4E 45 53 53 20 CD 41 43 48 |RE .USINESS .ACH|
00000C50: 49 4E 45 53 11 22 00 79 14 FC 01 99 22 20 20 20 |INES.".y...." |
00000C60: 20 20 20 20 20 20 20 33 33 37 30 20 D0 48 41 52 | 3370 .HAR|
00000C70: 4D 41 43 59 20 C1 56 45 2E 00 9D 14 FD 01 99 22 |MACY .VE......."|
00000C80: 20 20 20 20 20 20 20 20 20 20 C1 47 49 4E 43 4F | .GINCO|
00000C90: 55 52 54 2C 20 CF 4E 54 41 52 49 4F 22 00 BF 14 |URT, .NTARIO"...|
00000CA0: FE 01 99 22 20 20 20 20 20 20 20 20 20 20 C3 41 |..." .A|
00000CB0: 4E 41 44 41 20 20 20 CD 31 D7 20 32 CB 34 22 00 |NADA .1. 2.4".|
00000CC0: DF 14 FF 01 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
00000CD0: 28 34 31 36 29 20 34 39 39 2D 34 32 39 32 22 00 |(416) 499-4292".|
00000CE0: F5 14 00 02 55 50 B2 31 3A 8D 20 38 33 35 3A 8D |....UP.1:. 835:.|
00000CF0: 20 38 35 30 3A 00 1D 15 01 02 99 22 20 20 20 20 | 850:......" |
00000D00: 20 11 11 D0 52 4F 47 52 41 4D 20 CE 41 4D 45 3A | ...ROGRAM .AME:|
00000D10: 20 CD 41 53 54 45 52 20 CD 49 4E 44 11 00 43 15 | .ASTER .IND..C.|
00000D20: 02 02 99 22 20 20 20 20 20 D7 52 49 54 54 45 4E |..." .RITTEN|
00000D30: 20 C2 59 20 20 3A 20 CE 41 4E 43 59 20 D2 4F 50 | .Y : .ANCY .OP|
00000D40: 45 52 11 00 67 15 03 02 99 22 20 20 20 20 20 D5 |ER..g...." .|
00000D50: 50 47 52 41 44 45 44 20 C2 59 20 3A 20 20 20 20 |PGRADED .Y : |
00000D60: 20 20 20 20 20 20 11 00 92 15 04 02 99 22 20 20 | ......." |
00000D70: 20 20 20 11 D4 48 49 53 20 50 52 4F 47 52 41 4D | ..HIS PROGRAM|
00000D80: 20 57 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 | WILL RUN ON ANY|
00000D90: 11 11 00 B2 15 07 02 99 22 20 20 20 20 20 20 20 |........" |
00000DA0: 20 20 D0 C5 D4 20 36 34 20 C3 CF CD D0 D5 D4 C5 | ... 64 .......|
00000DB0: D2 11 00 D7 15 08 02 99 22 20 20 20 20 20 20 20 |........" |
00000DC0: 20 20 C3 CF CD CD CF C4 CF D2 C5 20 36 34 20 C3 | ......... 64 .|
00000DD0: CF CD D0 D5 D4 C5 D2 00 E0 15 09 02 8D 38 33 35 |.............835|
00000DE0: 00 F4 15 4E 02 8B 55 5A B2 31 A7 9E 55 50 25 3A |...N..UZ.1..UP%:|
00000DF0: 89 32 31 37 00 FA 15 57 02 8E 00 20 16 58 02 8F |.217...W... .X..|
00000E00: 20 2A 2A 20 50 52 4F 47 52 41 4D 20 4D 4F 44 49 | ** PROGRAM MODI|
00000E10: 46 49 43 41 54 49 4F 4E 20 49 4E 53 54 20 2A 2A |FICATION INST **|
00000E20: 00 31 16 59 02 99 22 93 22 3A 97 55 54 2C 55 4C |.1.Y..".":.UT,UL|
00000E30: 25 00 64 16 5D 02 55 54 24 B2 22 20 CD C1 D3 D4 |%.d.].UT$." ....|
00000E40: C5 D2 A0 CD C9 CE C4 22 3A 55 50 B2 30 3A 55 47 |.......":UP.0:UG|
00000E50: 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 22 3A |$.".ROGRAM .OD":|
00000E60: 8D 38 35 30 00 6D 16 94 02 8D 38 33 35 00 81 16 |.850.m....835...|
00000E70: B2 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 |...UZ.1..UP%:.21|
00000E80: 37 00 8C 16 BA 02 55 47 24 B2 22 22 00 92 16 BB |7.....UG$.""....|
00000E90: 02 8E 00 B7 16 BC 02 8F 20 2A 2A 20 54 4F 20 55 |........ ** TO U|
00000EA0: 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D |SE 8032 LOAD CBM|
00000EB0: 34 30 33 32 20 2A 2A 00 ED 16 C6 02 99 22 93 11 |4032 **......"..|
00000EC0: 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E |...BEFORE RUNNIN|
00000ED0: 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F |G THIS PROGRAM O|
00000EE0: 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 23 17 |N AN 8032 ...#.|
00000EF0: D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 |..." LOAD T|
00000F00: 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 |HE 'CBM 4032' PR|
00000F10: 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 |OGRAM...........|
00000F20: 11 11 22 00 2E 17 DA 02 9E 55 55 AA 37 31 00 34 |.."......UU.71.4|
00000F30: 17 E4 02 80 00 59 17 1D 03 8F 20 2A 2A 20 54 4F |.....Y.... ** TO|
00000F40: 20 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 | USE 8032 LOAD C|
00000F50: 42 4D 34 30 33 32 20 2A 2A 00 A4 17 1E 03 99 22 |BM4032 **......"|
00000F60: 93 11 11 11 42 45 46 4F 52 45 20 52 55 4E 4E 49 |....BEFORE RUNNI|
00000F70: 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |NG THIS PROGRAM |
00000F80: 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 4C 4F |ON AN 8032 ..LO|
00000F90: 41 44 20 43 42 4D 20 34 30 33 32 20 50 52 4F 47 |AD CBM 4032 PROG|
00000FA0: 52 41 4D 22 00 B0 17 1F 03 9E 31 30 39 33 3A 80 |RAM"......1093:.|
00000FB0: 00 D0 17 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 |... .. ** T I T |
00000FC0: 4C 20 45 20 20 20 50 20 41 20 47 20 45 20 2A 2A |L E P A G E **|
00000FD0: 00 04 18 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 |...".."....";:.U|
00000FE0: 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 |T,UU%:..(50003).|
00000FF0: 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 32 |0..53280,14:.532|
00001000: 38 31 2C 36 00 1A 18 24 03 81 49 B2 31 A4 33 38 |81,6...$..I.1.38|
00001010: 3A 99 22 12 A6 92 22 3B 3A 82 00 32 18 26 03 81 |:."...";:..2.&..|
00001020: 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B |I.1.22:.".....";|
00001030: 3A 82 00 4A 18 28 03 81 49 B2 31 A4 33 37 3A 99 |:..J.(..I.1.37:.|
00001040: 22 9D 9D 12 A6 92 22 3B 3A 82 00 62 18 2A 03 81 |".....";:..b.*..|
00001050: 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B |I.1.22:.".....";|
00001060: 3A 82 00 87 18 2C 03 99 22 13 11 11 11 11 11 11 |:....,..".......|
00001070: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001080: 1D 1D 12 A9 20 20 92 00 A9 18 2E 03 99 22 1D 1D |.... ......."..|
00001090: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000010A0: 12 20 92 20 20 12 20 92 A9 00 CA 18 30 03 99 22 |. . . .....0.."|
000010B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000010C0: 1D 1D 12 20 92 20 20 12 A3 DF 00 E8 18 32 03 99 |... . ......2..|
000010D0: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
000010E0: 1D 1D 1D DF 12 20 20 92 00 10 19 34 03 99 22 11 |..... ....4..".|
000010F0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F |.............C O|
00001100: 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 | M M O D O R E..|
00001110: 00 33 19 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.3.6..".........|
00001120: 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 |......EDUCATIONA|
00001130: 4C 11 11 00 52 19 38 03 99 22 1D 1D 1D 1D 1D 1D |L...R.8.."......|
00001140: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 |..........SOFTWA|
00001150: 52 45 00 6D 19 3A 03 8F 20 2A 2A 20 43 4F 4D 4D |RE.m.:.. ** COMM|
00001160: 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 A5 19 |ODORE LOGO **...|
00001170: 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D |;...(UD$,24);"..|
00001180: 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 |........PRESS SP|
00001190: 41 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 92 |ACE BAR OR WAIT.|
000011A0: 22 3A 49 B2 30 00 C7 19 3C 03 A1 41 24 3A 8B 41 |":I.0...<..A$:.A|
000011B0: 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 |$.." ".I.I.1:.I.|
000011C0: 32 35 30 A7 38 32 38 00 EB 19 3E 03 54 31 24 B2 |250.828...>.T1$.|
000011D0: 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 |"":T2$."":T3$.""|
000011E0: 3A 54 34 24 B2 22 22 3A 49 B2 30 00 F4 19 40 03 |:T4$."":I.0...@.|
000011F0: 89 33 30 30 00 10 1A 43 03 8F 20 2A 2A 20 53 50 |.300...C.. ** SP|
00001200: 41 43 45 20 42 41 52 20 50 52 45 53 53 20 2A 2A |ACE BAR PRESS **|
00001210: 00 4B 1A 48 03 97 55 4F 2C 30 3A 99 C8 28 55 44 |.K.H..UO,0:..(UD|
00001220: 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 |$,24);".......PR|
00001230: 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 4F |ESS SPACE BAR TO|
00001240: 20 43 4F 4E 54 49 4E 55 45 92 22 00 62 1A 4C 03 | CONTINUE.".b.L.|
00001250: A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 |.UI$:.UI$.." ".8|
00001260: 34 34 00 68 1A 4E 03 8E 00 88 1A 52 03 8F 20 2A |44.h.N.....R.. *|
00001270: 2A 20 50 41 47 45 20 44 45 53 49 47 4E 20 52 4F |* PAGE DESIGN RO|
00001280: 55 54 49 4E 45 20 2A 2A 00 94 1A 54 03 55 50 B2 |UTINE **...T.UP.|
00001290: 55 50 AA 31 00 BE 1A 57 03 99 22 93 22 C8 28 55 |UP.1...W..".".(U|
000012A0: 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 55 50 24 |T$.UP$,21);.(UP$|
000012B0: AA 55 47 24 AA C4 28 55 50 29 2C 31 38 29 00 ED |.UG$..(UP),18)..|
000012C0: 1A 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.\.." ----------|
000012D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000012E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 FC 1A |------------"...|
000012F0: 60 03 8B 55 48 B3 B1 30 A7 38 37 30 00 30 1B 61 |`..UH..0.870.0.a|
00001300: 03 99 C8 28 55 44 24 2C 32 34 29 3B C8 28 55 50 |...(UD$,24);.(UP|
00001310: 24 2C 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 45 |$,7);"HELP - PRE|
00001320: 53 53 20 20 20 48 20 3C 52 45 54 55 52 4E 3E 22 |SS H <RETURN>"|
00001330: 00 47 1B 66 03 55 48 B2 30 3A 97 55 4F 2C 30 3A |.G.f.UH.0:.UO,0:|
00001340: 99 22 13 11 22 3A 8E 00 66 1B 6B 03 8F 20 2A 2A |."..":..f.k.. **|
00001350: 20 50 4C 45 41 53 45 20 57 41 49 54 20 52 45 4D | PLEASE WAIT REM|
00001360: 41 52 4B 20 2A 2A 00 9C 1B 70 03 99 C8 28 55 44 |ARK **...p...(UD|
00001370: 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 |$,24);" |
00001380: 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C 45 | ONE MOMENT PLE|
00001390: 41 53 45 2E 2E 2E 20 20 20 20 20 22 00 A2 1B 75 |ASE... "...u|
000013A0: 03 8E 00 BF 1B 84 03 8F 20 2A 2A 20 53 45 54 20 |........ ** SET |
000013B0: 55 50 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 |UP VARIABLES **.|
000013C0: 0A 1C 85 03 55 58 24 B2 22 48 22 3A 86 55 51 25 |....UX$."H":.UQ%|
000013D0: 28 31 30 30 30 29 3A 55 42 B2 33 32 37 36 38 3A |(1000):UB.32768:|
000013E0: 55 31 B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 |U1.196:U2.197:U3|
000013F0: B2 31 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 |.198:U4.216:UC.1|
00001400: 36 37 3A 55 55 B2 31 30 32 34 00 48 1C 86 03 55 |67:UU.1024.H...U|
00001410: 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 |T.59468:UU%.12:U|
00001420: 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 |L%.14:UP%.1146:U|
00001430: 4D B2 33 32 37 36 38 3A 55 4F B2 31 35 38 3A 97 |M.32768:UO.158:.|
00001440: 20 35 30 30 30 33 2C 30 00 8B 1C 87 03 8B C2 28 | 50003,0.......(|
00001450: 35 30 30 30 33 29 B2 30 A7 55 42 B2 31 30 32 34 |50003).0.UB.1024|
00001460: 3A 55 31 B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 |:U1.209:U2.210:U|
00001470: 33 B2 32 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 |3.211:U4.214:UC.|
00001480: 32 30 34 3A 55 55 B2 32 30 34 38 00 CA 1C 88 03 |204:UU.2048.....|
00001490: 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 54 B2 35 |..(50003).0.UT.5|
000014A0: 33 32 37 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 |3272:UU%.21:UL%.|
000014B0: 32 33 3A 55 50 25 B2 32 31 33 39 3A 55 4D B2 31 |23:UP%.2139:UM.1|
000014C0: 30 32 34 3A 55 4F B2 31 39 38 00 EE 1C 89 03 55 |024:UO.198.....U|
000014D0: 44 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 11 |D$."............|
000014E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 20 |.............". |
000014F0: 1D 8A 03 55 50 24 B2 22 20 20 20 20 20 20 20 20 |...UP$." |
00001500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001520: 00 47 1D 8B 03 55 54 24 B2 22 20 CD C1 D3 D4 C5 |.G...UT$." .....|
00001530: D2 A0 CD C9 CE C4 22 3A 8F 20 50 52 4F 47 52 41 |......":. PROGRA|
00001540: 4D 20 54 49 54 4C 45 00 4D 1D 8C 03 8E 00 67 1D |M TITLE.M.....g.|
00001550: 8E 03 8F 20 2A 2A 20 53 45 54 20 56 41 52 49 41 |... ** SET VARIA|
00001560: 42 4C 45 53 20 2A 2A 00 70 1D 93 03 8D 39 30 30 |BLES **.p....900|
00001570: 00 76 1D 94 03 8C 00 7C 1D 95 03 3A 00 97 1D 98 |.v.....|...:....|
00001580: 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 4F 52 20 |.. ** CHECK FOR |
00001590: 38 30 33 32 20 2A 2A 00 B5 1D 9D 03 99 22 93 22 |8032 **......"."|
000015A0: 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 45 44 20 |:.".":. SHIFTED |
000015B0: 53 50 41 43 45 00 CC 1D A2 03 8B C2 28 55 42 AA |SPACE.......(UB.|
000015C0: 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 E5 1D A3 |40)..96..700....|
000015D0: 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 43 48 45 |.. ** MEMORY CHE|
000015E0: 43 4B 20 2A 2A 00 F9 1D A4 03 8B 20 B8 28 30 29 |CK **...... .(0)|
000015F0: B1 32 30 30 30 A7 39 33 37 00 27 1E A5 03 99 22 |.2000.937.'...."|
00001600: 93 11 11 05 54 48 49 53 20 4D 41 43 48 49 4E 45 |....THIS MACHINE|
00001610: 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 20 45 | DOES NOT HAVE E|
00001620: 4E 4F 55 47 48 11 22 00 4B 1E A6 03 99 22 4D 45 |NOUGH.".K...."ME|
00001630: 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 49 53 |MORY TO RUN THIS|
00001640: 20 50 52 4F 47 52 41 4D 20 21 22 00 56 1E A7 03 | PROGRAM !".V...|
00001650: 9E 55 55 AA 37 31 00 5C 1E A8 03 80 00 76 1E A9 |.UU.71.\.....v..|
00001660: 03 99 22 93 05 22 3A 8B C2 28 35 30 30 30 33 29 |.."..":..(50003)|
00001670: B2 30 A7 39 36 32 00 A5 1E AC 03 8F 20 2A 2A 20 |.0.962...... ** |
00001680: 42 41 53 49 43 20 32 2E 30 20 20 4F 52 20 20 34 |BASIC 2.0 OR 4|
00001690: 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 53 45 54 |.0 OR C-64 SET|
000016A0: 55 50 20 2A 2A 00 E3 1E AD 03 97 31 30 37 35 2C |UP **......1075,|
000016B0: 31 33 33 3A 97 31 30 37 36 2C 31 34 34 3A 97 31 |133:.1076,144:.1|
000016C0: 30 37 37 2C 32 33 34 3A 97 31 30 37 39 2C 34 3A |077,234:.1079,4:|
000016D0: 97 31 30 38 30 2C 31 33 33 3A 97 31 30 38 31 2C |.1080,133:.1081,|
000016E0: 31 34 35 00 19 1F AE 03 97 31 30 39 31 2C 31 35 |145......1091,15|
000016F0: 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 31 30 39 |5:.1098,133:.109|
00001700: 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 33 34 3A |9,144:.1100,234:|
00001710: 97 31 31 30 33 2C 31 33 33 00 3B 1F AF 03 97 31 |.1103,133.;....1|
00001720: 31 30 34 2C 31 34 35 3A 97 31 31 30 35 2C 32 33 |104,145:.1105,23|
00001730: 34 3A 97 31 30 38 32 2C 32 33 34 00 52 1F B1 03 |4:.1082,234.R...|
00001740: 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 30 A7 39 |..(50003)..160.9|
00001750: 35 35 00 81 1F B6 03 97 31 30 39 33 2C 38 38 3A |55......1093,88:|
00001760: 97 31 30 39 34 2C 32 32 38 3A 97 31 30 39 37 2C |.1094,228:.1097,|
00001770: 38 35 3A 97 31 31 30 32 2C 32 32 38 3A 89 39 36 |85:.1102,228:.96|
00001780: 35 00 96 1F BB 03 8B C2 28 35 30 30 30 33 29 B3 |5.......(50003).|
00001790: B1 31 A7 39 39 30 00 C5 1F C0 03 97 31 30 39 33 |.1.990......1093|
000017A0: 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 3A 97 31 |,49:.1094,230:.1|
000017B0: 30 39 37 2C 34 36 3A 97 31 31 30 32 2C 32 33 30 |097,46:.1102,230|
000017C0: 3A 89 39 36 35 00 FF 1F C2 03 97 32 30 39 39 2C |:.965......2099,|
000017D0: 31 34 31 3A 97 32 31 30 30 2C 32 30 3A 97 32 31 |141:.2100,20:.21|
000017E0: 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A 97 32 31 |01,3:.2103,8:.21|
000017F0: 30 34 2C 31 34 31 3A 97 32 31 30 35 2C 32 31 00 |04,141:.2105,21.|
00001800: 3B 20 C3 03 97 32 31 30 36 2C 33 3A 97 32 31 31 |; ...2106,3:.211|
00001810: 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 32 3A 97 |5,145:.2117,52:.|
00001820: 32 31 31 38 2C 32 33 34 3A 97 32 31 32 31 2C 34 |2118,234:.2121,4|
00001830: 39 3A 97 32 31 32 32 2C 31 34 31 00 75 20 C4 03 |9:.2122,141.u ..|
00001840: 97 32 31 32 33 2C 32 30 3A 97 32 31 32 34 2C 33 |.2123,20:.2124,3|
00001850: 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 31 32 37 |:.2126,234:.2127|
00001860: 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 3A 97 32 |,141:.2128,21:.2|
00001870: 31 32 39 2C 33 00 93 20 C5 03 9E 55 55 AA 34 38 |129,3.. ...UU.48|
00001880: 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 4F 50 20 |:. DISABLE STOP |
00001890: 4B 45 59 00 A4 20 CA 03 8D 38 30 30 3A 8F 20 54 |KEY.. ...800:. T|
000018A0: 49 54 4C 45 00 B4 20 D4 03 89 33 30 30 3A 8F 20 |ITLE.. ...300:. |
000018B0: 4D 45 4E 55 00 E5 20 DE 03 99 22 93 54 48 45 20 |MENU.. ...".THE |
000018C0: 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 57 4F 52 |PGM WILL NOT WOR|
000018D0: 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 48 49 4E |K ON THIS MACHIN|
000018E0: 45 21 22 3A 80 00 1A 21 E8 03 8B 55 5A B2 31 A7 |E!":...!...UZ.1.|
000018F0: 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 30 3A 8F |.UP%:.UP%:UZ.0:.|
00001900: 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 54 41 52 | ** PROGRAM STAR|
00001910: 54 53 20 48 45 52 45 20 2A 2A 00 46 21 E9 03 99 |TS HERE **.F!...|
00001920: 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 30 30 33 |"..";:.:..(50003|
00001930: 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 |).0..53281,6:.53|
00001940: 32 38 30 2C 31 34 00 64 21 74 04 55 54 24 B2 22 |280,14.d!t.UT$."|
00001950: 20 4D 41 53 54 45 52 20 4D 49 4E 44 22 3A 8D 20 | MASTER MIND":. |
00001960: 31 37 39 30 00 6E 21 88 04 8D 32 32 37 30 00 8E |1790.n!...2270..|
00001970: 21 9C 04 81 20 41 B2 31 20 A4 20 34 3A 8F 20 43 |!... A.1 . 4:. C|
00001980: 48 4F 4F 53 45 20 52 41 4E 44 4F 4D 20 23 00 A6 |HOOSE RANDOM #..|
00001990: 21 A6 04 4E 24 28 41 29 B2 C4 28 B5 28 31 30 AC |!..N$(A)..(.(10.|
000019A0: BB 28 31 29 29 29 00 BD 21 B0 04 4E 24 28 41 29 |.(1)))..!..N$(A)|
000019B0: B2 CA 28 4E 24 28 41 29 2C 32 2C 31 29 00 C5 21 |..(N$(A),2,1)..!|
000019C0: BA 04 82 20 41 00 E1 21 C4 04 99 22 93 22 3B A6 |... A..!...".";.|
000019D0: 31 34 29 3B 22 4D 41 53 54 45 52 20 4D 49 4E 44 |14);"MASTER MIND|
000019E0: 22 00 FA 21 CE 04 99 20 A3 31 34 29 3B 22 A3 A3 |"..!... .14);"..|
000019F0: A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 1C 22 D8 04 99 |.........".."...|
00001A00: 20 A3 36 29 3B 22 47 55 45 53 53 45 53 22 3B A6 | .6);"GUESSES";.|
00001A10: 38 29 3B 22 53 43 4F 52 49 4E 47 22 00 4C 22 E2 |8);"SCORING".L".|
00001A20: 04 99 22 91 22 3B 3A 81 20 41 B2 31 20 A4 20 31 |..".";:. A.1 . 1|
00001A30: 30 3A 8F 20 53 48 4F 57 20 47 55 45 53 53 20 4F |0:. SHOW GUESS O|
00001A40: 50 50 4F 52 54 55 4E 49 54 49 45 53 00 52 22 EC |PPORTUNITIES.R".|
00001A50: 04 99 00 6E 22 F6 04 99 20 A3 36 29 3B 22 12 20 |...n"... .6);". |
00001A60: 92 20 12 20 92 20 12 20 92 20 12 20 92 22 00 76 |. . . . . . .".v|
00001A70: 22 00 05 82 20 41 00 82 22 0A 05 99 22 13 11 11 |"... A.."..."...|
00001A80: 22 3B 00 9E 22 14 05 81 20 41 B2 31 20 A4 20 31 |";.."... A.1 . 1|
00001A90: 30 3A 8F 20 31 30 20 47 55 45 53 53 45 53 00 A6 |0:. 10 GUESSES..|
00001AA0: 22 1E 05 99 22 11 00 C0 22 28 05 81 20 42 B2 31 |"..."..."(.. B.1|
00001AB0: 20 A4 20 34 3A 8F 20 47 45 54 20 47 55 45 53 53 | . 4:. GET GUESS|
00001AC0: 00 F6 22 32 05 99 A3 42 AC 32 AA 34 29 3B 22 91 |.."2...B.2.4);".|
00001AD0: 22 3B 3A 55 4C B2 31 3A 55 53 24 B2 22 30 31 32 |";:UL.1:US$."012|
00001AE0: 33 34 35 36 37 38 39 22 3A 8D 33 35 3A 47 24 28 |3456789":.35:G$(|
00001AF0: 42 29 B2 55 52 24 00 09 23 64 05 82 20 42 3A 99 |B).UR$..#d.. B:.|
00001B00: A3 31 33 29 3B 22 91 22 3B 00 12 23 6E 05 4E 43 |.13);".";..#n.NC|
00001B10: B2 30 00 31 23 78 05 81 20 42 B2 31 20 A4 20 34 |.0.1#x.. B.1 . 4|
00001B20: 3A 8F 20 46 49 4E 44 20 23 20 43 4F 52 52 45 43 |:. FIND # CORREC|
00001B30: 54 00 5B 23 82 05 8B 20 47 24 28 42 29 B2 4E 24 |T.[#... G$(B).N$|
00001B40: 28 42 29 20 A7 20 43 28 42 29 B2 32 3A 4E 43 B2 |(B) . C(B).2:NC.|
00001B50: 4E 43 AA 31 3A 89 20 31 34 33 30 00 66 23 8C 05 |NC.1:. 1430.f#..|
00001B60: 43 28 42 29 B2 30 00 6E 23 96 05 82 20 42 00 77 |C(B).0.n#... B.w|
00001B70: 23 A0 05 4E 4D B2 30 00 98 23 AA 05 81 20 42 B2 |#..NM.0..#... B.|
00001B80: 31 20 A4 20 34 3A 8F 20 46 49 4E 44 20 23 20 4D |1 . 4:. FIND # M|
00001B90: 49 53 50 4C 41 43 45 44 00 AC 23 B4 05 8B 20 43 |ISPLACED..#... C|
00001BA0: 28 42 29 B1 31 20 A7 20 31 35 33 30 00 BA 23 BE |(B).1 . 1530..#.|
00001BB0: 05 81 20 44 B2 31 20 A4 20 34 00 CB 23 C8 05 8B |.. D.1 . 4..#...|
00001BC0: 20 44 B2 42 20 A7 20 31 35 32 30 00 DF 23 D2 05 | D.B . 1520..#..|
00001BD0: 8B 20 43 28 44 29 B1 30 20 A7 20 31 35 32 30 00 |. C(D).0 . 1520.|
00001BE0: F9 23 DC 05 8B 20 47 24 28 42 29 B3 B1 4E 24 28 |.#... G$(B)..N$(|
00001BF0: 44 29 20 A7 20 31 35 32 30 00 10 24 E6 05 43 28 |D) . 1520..$..C(|
00001C00: 44 29 B2 31 3A 4E 4D B2 4E 4D AA 31 3A 44 B2 35 |D).1:NM.NM.1:D.5|
00001C10: 00 18 24 F0 05 82 20 44 00 20 24 FA 05 82 20 42 |..$... D. $... B|
00001C20: 00 30 24 04 06 99 22 1D 1D 1D 1D 1D 1D 1D 22 3B |.0$...".......";|
00001C30: 00 42 24 0E 06 8B 20 4E 43 B2 30 20 A7 20 31 35 |.B$... NC.0 . 15|
00001C40: 39 30 00 63 24 18 06 81 20 42 B2 31 20 A4 20 4E |90.c$... B.1 . N|
00001C50: 43 3A 8F 20 50 52 49 4E 54 20 23 20 43 4F 52 52 |C:. PRINT # CORR|
00001C60: 45 43 54 00 6E 24 22 06 99 22 1D D1 22 3B 00 76 |ECT.n$".."..";.v|
00001C70: 24 2C 06 82 20 42 00 88 24 36 06 8B 20 4E 4D B2 |$,.. B..$6.. NM.|
00001C80: 30 20 A7 20 31 36 33 30 00 AB 24 40 06 81 20 42 |0 . 1630..$@.. B|
00001C90: B2 31 20 A4 20 4E 4D 3A 8F 20 50 52 49 4E 54 20 |.1 . NM:. PRINT |
00001CA0: 23 20 4D 49 53 50 4C 41 43 45 44 00 B6 24 4A 06 |# MISPLACED..$J.|
00001CB0: 99 22 1D D7 22 3B 00 BE 24 54 06 82 20 42 00 C7 |."..";..$T.. B..|
00001CC0: 24 5E 06 99 22 20 22 00 0D 25 68 06 8B 4E 43 B2 |$^.." "..%h..NC.|
00001CD0: 34 A7 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |4.."............|
00001CE0: 11 11 11 11 11 11 11 11 11 11 11 20 59 4F 55 20 |........... YOU |
00001CF0: 57 49 4E 20 49 4E 20 4F 4E 4C 59 22 3B 41 3B 22 |WIN IN ONLY";A;"|
00001D00: 54 52 49 45 53 21 22 3B 3A 41 B2 31 31 00 15 25 |TRIES!";:A.11..%|
00001D10: 72 06 82 20 41 00 5C 25 7C 06 8B 4E 43 B3 34 A7 |r.. A.\%|..NC.4.|
00001D20: 99 22 20 59 4F 55 20 4C 4F 53 45 21 20 54 48 45 |." YOU LOSE! THE|
00001D30: 20 43 4F 52 52 45 43 54 20 4E 55 4D 42 45 52 20 | CORRECT NUMBER |
00001D40: 49 53 20 22 3B 4E 24 28 31 29 3B 4E 24 28 32 29 |IS ";N$(1);N$(2)|
00001D50: 3B 4E 24 28 33 29 3B 4E 24 28 34 29 00 75 25 90 |;N$(3);N$(4).u%.|
00001D60: 06 99 22 91 91 91 91 91 22 3B C7 28 31 33 29 3B |..".....";.(13);|
00001D70: 3A 8D 38 33 35 00 84 25 C2 06 55 48 B2 31 3A 8D |:.835..%..UH.1:.|
00001D80: 20 38 35 30 00 8D 25 CC 06 5A 46 B2 31 00 93 25 | 850..%..ZF.1..%|
00001D90: F4 06 3A 00 A5 25 FE 06 8F 20 50 52 49 4E 54 20 |..:..%... PRINT |
00001DA0: 54 49 54 4C 45 00 BA 25 03 07 8B 5A 46 B2 30 A7 |TITLE..%...ZF.0.|
00001DB0: 20 55 48 B2 31 3A 8D 38 35 30 00 E6 25 04 07 8B | UH.1:.850..%...|
00001DC0: 5A 46 B2 31 A7 20 99 22 20 54 48 41 4E 4B 53 20 |ZF.1. ." THANKS |
00001DD0: 46 4F 52 20 50 4C 41 59 49 4E 47 2E 20 2E 20 2E |FOR PLAYING. . .|
00001DE0: 22 3A 5A 46 B2 30 00 EC 25 05 07 8C 00 04 26 08 |":ZF.0..%.....&.|
00001DF0: 07 81 20 54 B2 55 4D AA 32 30 34 20 A4 20 55 4D |.. T.UM.204 . UM|
00001E00: AA 33 39 35 00 13 26 12 07 87 20 53 3A 97 54 2C |.395..&... S:.T,|
00001E10: 53 3A 82 00 2B 26 30 07 81 20 54 B2 55 4D AA 34 |S:..+&0.. T.UM.4|
00001E20: 39 32 20 A4 20 55 4D AA 36 36 37 00 3A 26 3A 07 |92 . UM.667.:&:.|
00001E30: 87 20 53 3A 97 54 2C 53 3A 82 00 43 26 58 07 89 |. S:.T,S:..C&X..|
00001E40: 38 33 35 00 6A 26 62 07 83 20 32 32 34 2C 33 32 |835.j&b.. 224,32|
00001E50: 2C 33 32 2C 32 32 35 2C 39 37 2C 33 32 2C 33 32 |,32,225,97,32,32|
00001E60: 2C 32 32 35 2C 33 32 2C 33 32 00 96 26 6C 07 83 |,225,32,32..&l..|
00001E70: 20 33 32 2C 32 33 36 2C 32 32 36 2C 32 32 36 2C | 32,236,226,226,|
00001E80: 32 35 31 2C 39 37 2C 32 32 35 2C 32 33 36 2C 32 |251,97,225,236,2|
00001E90: 35 31 2C 32 32 36 00 C2 26 76 07 83 20 32 32 34 |51,226..&v.. 224|
00001EA0: 2C 33 32 2C 32 32 34 2C 32 32 36 2C 32 32 36 2C |,32,224,226,226,|
00001EB0: 32 35 31 2C 39 37 2C 32 32 35 2C 32 33 36 2C 32 |251,97,225,236,2|
00001EC0: 32 36 00 E7 26 80 07 83 20 32 32 36 2C 39 38 2C |26..&... 226,98,|
00001ED0: 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 |32,32,32,32,32,3|
00001EE0: 32 2C 33 32 2C 33 32 00 0B 27 8A 07 83 20 39 37 |2,32,32..'... 97|
00001EF0: 2C 39 37 2C 33 32 2C 39 37 2C 39 37 2C 33 32 2C |,97,32,97,97,32,|
00001F00: 33 32 2C 39 37 2C 39 37 2C 33 32 00 31 27 94 07 |32,97,97,32.1'..|
00001F10: 83 20 33 32 2C 32 32 35 2C 33 32 2C 33 32 2C 33 |. 32,225,32,32,3|
00001F20: 32 2C 33 32 2C 33 32 2C 33 32 2C 32 32 35 2C 33 |2,32,32,32,225,3|
00001F30: 32 00 56 27 9E 07 83 20 33 32 2C 33 32 2C 39 37 |2.V'... 32,32,97|
00001F40: 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 32 32 35 |,32,32,32,32,225|
00001F50: 2C 33 32 2C 33 32 00 7B 27 A8 07 83 20 33 32 2C |,32,32.{'... 32,|
00001F60: 32 35 34 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C |254,32,32,32,32,|
00001F70: 33 32 2C 33 32 2C 33 32 2C 33 32 00 A3 27 B2 07 |32,32,32,32..'..|
00001F80: 83 20 39 37 2C 32 32 35 2C 32 32 35 2C 33 32 2C |. 97,225,225,32,|
00001F90: 39 37 2C 33 32 2C 32 32 35 2C 33 32 2C 32 32 35 |97,32,225,32,225|
00001FA0: 2C 33 32 00 CB 27 BC 07 83 20 33 32 2C 33 32 2C |,32..'... 32,32,|
00001FB0: 32 32 36 2C 32 35 32 2C 31 32 33 2C 33 32 2C 33 |226,252,123,32,3|
00001FC0: 32 2C 33 32 2C 32 32 35 2C 33 32 00 F4 27 C6 07 |2,32,225,32..'..|
00001FD0: 83 20 33 32 2C 33 32 2C 32 33 36 2C 32 32 36 2C |. 32,32,236,226,|
00001FE0: 33 32 2C 33 32 2C 33 32 2C 32 32 35 2C 32 32 36 |32,32,32,225,226|
00001FF0: 2C 32 32 36 00 19 28 D0 07 83 20 32 35 31 2C 33 |,226..(... 251,3|
00002000: 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 |2,32,32,32,32,32|
00002010: 2C 33 32 2C 33 32 2C 33 32 00 40 28 DA 07 83 20 |,32,32,32.@(... |
00002020: 39 37 2C 33 32 2C 39 37 2C 33 32 2C 39 37 2C 33 |97,32,97,32,97,3|
00002030: 32 2C 32 33 36 2C 32 32 36 2C 32 32 36 2C 39 37 |2,236,226,226,97|
00002040: 00 66 28 E4 07 83 20 33 32 2C 33 32 2C 33 32 2C |.f(... 32,32,32,|
00002050: 33 32 2C 32 32 35 2C 33 32 2C 33 32 2C 33 32 2C |32,225,32,32,32,|
00002060: 32 32 35 2C 33 32 00 8B 28 EE 07 83 20 33 32 2C |225,32..(... 32,|
00002070: 33 32 2C 39 37 2C 33 32 2C 33 32 2C 33 32 2C 33 |32,97,32,32,32,3|
00002080: 32 2C 32 32 35 2C 33 32 2C 33 32 00 AF 28 F8 07 |2,225,32,32..(..|
00002090: 83 20 33 32 2C 39 37 2C 33 32 2C 33 32 2C 33 32 |. 32,97,32,32,32|
000020A0: 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 00 |,32,32,32,32,32.|
000020B0: D7 28 02 08 83 20 32 32 34 2C 33 32 2C 33 32 2C |.(... 224,32,32,|
000020C0: 32 32 35 2C 39 37 2C 32 32 35 2C 39 37 2C 33 32 |225,97,225,97,32|
000020D0: 2C 33 32 2C 32 32 34 00 FD 28 0C 08 83 20 33 32 |,32,224..(... 32|
000020E0: 2C 32 32 34 2C 39 38 2C 39 38 2C 39 38 2C 39 37 |,224,98,98,98,97|
000020F0: 2C 33 32 2C 33 32 2C 32 32 34 2C 39 37 00 24 29 |,32,32,224,97.$)|
00002100: 16 08 83 20 33 32 2C 33 32 2C 32 32 34 2C 39 38 |... 32,32,224,98|
00002110: 2C 39 38 2C 32 35 34 2C 39 37 2C 32 32 35 2C 39 |,98,254,97,225,9|
00002120: 37 2C 33 32 00 31 29 20 08 83 20 33 32 2C 32 32 |7,32.1) .. 32,22|
00002130: 35 00 5A 29 2A 08 83 20 32 32 34 2C 33 32 2C 33 |5.Z)*.. 224,32,3|
00002140: 32 2C 32 32 35 2C 39 37 2C 32 32 35 2C 32 32 34 |2,225,97,225,224|
00002150: 2C 33 32 2C 32 32 34 2C 33 32 00 83 29 34 08 83 |,32,224,32..)4..|
00002160: 20 32 32 35 2C 39 37 2C 32 32 35 2C 32 33 36 2C | 225,97,225,236,|
00002170: 32 32 36 2C 32 35 31 2C 33 32 2C 33 32 2C 33 32 |226,251,32,32,32|
00002180: 2C 33 32 00 A7 29 3E 08 83 20 33 32 2C 33 32 2C |,32..)>.. 32,32,|
00002190: 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 |32,32,32,32,32,3|
000021A0: 32 2C 33 32 2C 33 32 00 CB 29 48 08 83 20 33 32 |2,32,32..)H.. 32|
000021B0: 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C |,32,32,32,32,32,|
000021C0: 33 32 2C 33 32 2C 33 32 2C 33 32 00 EF 29 52 08 |32,32,32,32..)R.|
000021D0: 83 20 39 37 2C 39 37 2C 33 32 2C 39 37 2C 39 37 |. 97,97,32,97,97|
000021E0: 2C 33 32 2C 39 37 2C 33 32 2C 39 37 2C 39 37 00 |,32,97,32,97,97.|
000021F0: 14 2A 5C 08 83 20 33 32 2C 39 37 2C 32 32 35 2C |.*\.. 32,97,225,|
00002200: 33 32 2C 33 32 2C 33 32 2C 39 37 2C 33 32 2C 33 |32,32,32,97,32,3|
00002210: 32 2C 33 32 00 38 2A 66 08 83 20 33 32 2C 33 32 |2,32.8*f.. 32,32|
00002220: 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C |,32,32,32,32,32,|
00002230: 33 32 2C 33 32 2C 33 32 00 5C 2A 70 08 83 20 33 |32,32,32.\*p.. 3|
00002240: 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 |2,32,32,32,32,32|
00002250: 2C 33 32 2C 33 32 2C 33 32 2C 33 32 00 83 2A 7A |,32,32,32,32..*z|
00002260: 08 83 20 39 37 2C 32 32 35 2C 32 32 35 2C 33 32 |.. 97,225,225,32|
00002270: 2C 39 37 2C 33 32 2C 39 37 2C 33 32 2C 39 37 2C |,97,32,97,32,97,|
00002280: 32 32 35 00 A9 2A 84 08 83 20 33 32 2C 39 37 2C |225..*... 32,97,|
00002290: 32 32 35 2C 33 32 2C 33 32 2C 33 32 2C 32 32 35 |225,32,32,32,225|
000022A0: 2C 33 32 2C 33 32 2C 33 32 00 CD 2A 8E 08 83 20 |,32,32,32..*... |
000022B0: 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 |32,32,32,32,32,3|
000022C0: 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 00 F1 2A |2,32,32,32,32..*|
000022D0: 98 08 83 20 33 32 2C 33 32 2C 33 32 2C 33 32 2C |... 32,32,32,32,|
000022E0: 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 |32,32,32,32,32,3|
000022F0: 32 00 15 2B A2 08 83 20 39 37 2C 33 32 2C 39 37 |2..+... 97,32,97|
00002300: 2C 33 32 2C 39 37 2C 33 32 2C 39 37 2C 33 32 2C |,32,97,32,97,32,|
00002310: 39 37 2C 33 32 00 3A 2B AC 08 83 20 39 37 2C 39 |97,32.:+... 97,9|
00002320: 37 2C 32 32 35 2C 33 32 2C 33 32 2C 33 32 2C 39 |7,225,32,32,32,9|
00002330: 37 2C 33 32 2C 33 32 2C 33 32 00 5E 2B B6 08 83 |7,32,32,32.^+...|
00002340: 20 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C | 32,32,32,32,32,|
00002350: 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 00 82 |32,32,32,32,32..|
00002360: 2B C0 08 83 20 33 32 2C 33 32 2C 33 32 2C 33 32 |+... 32,32,32,32|
00002370: 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C 33 32 2C |,32,32,32,32,32,|
00002380: 33 32 00 AB 2B CA 08 83 20 32 32 34 2C 33 32 2C |32..+... 224,32,|
00002390: 33 32 2C 32 32 35 2C 39 37 2C 32 32 35 2C 32 32 |32,225,97,225,22|
000023A0: 34 2C 33 32 2C 32 32 34 2C 33 32 00 C7 2B D4 08 |4,32,224,32..+..|
000023B0: 83 20 32 32 35 2C 39 37 2C 32 32 35 2C 32 35 32 |. 225,97,225,252|
000023C0: 2C 39 38 2C 32 35 34 00 CD 2B DE 08 8E 00 D6 2B |,98,254..+.....+|
000023D0: B8 0B 99 22 01 22 00 00 00 |..."."... |
.......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.3.2..UI$:.UI$."".50.].7..UI$.G(1
3).C(UR$)..1..UC,1:." .";:.85.P.<..UI$.G
(20).105...>.. C(UR$)..UL.50...A..120:.
CHECK FOR VALID CHARACTER...F.UR$.UR$.UI
$.C.K..UI$;.K.P..50...U.. +++ CHECK FOR
HELP REQUEST +++...Z..UR$.UX$.195:. EXIT
TO HELP ROUTINE.'._..UF.1..240.4.D.UF.0
:.:..M.F.. ++ CHECK DELETE ++.^.I..C(UR$
).1.50.V.N.UR$.H(UR$,C(UR$).1)...S..".
..";:.50...X.. ++ CHECK FOR VALID CHARAC
TERS ++.A.}..C(US$).0.150.Q..US$.US$.UX
$......US.1.C(US$)......UI$.J(US$,US,1).
............UI$."":..'.... ** STANDARD I
NPUT **.8....F(UI$).46...I....UI$.G(32).
..F. ..F(UI$).48.F(UI$).57.170.L........
..F(UI$).65.F(UI$).90.180............F(U
I$).193.F(UI$).218.UI$."":..V....B(UT).U
U%.UI$.G(F(UI$).128):............UI$."":
....C.UF.1:. +++ HELP ROUTINE EXIT +++..
.E..250. .H..245.2.M..UQ.UB.UM.920.N.R.U
Q%(UQ.UB).B(UQ):.:.".".A.W.UZ.1:UV%.B(UT
).J.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:UP.U
J:UL.UK.F.Z..B(50003).0..53281,1:.".";:.
53281,6:.53280,14:.220.P....".";.....UT$
.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1%.U3%.3).
.....UQ,UQ%(UQ.UB):.. ....U1,U1%.,....U2
,U2%.8....U4,U4%.F....U3,U3%.1.N....35..
...UD%.((U2%.256.U1%.U3%).UB).40:.H(UD$,
UD%.1):.......H(UD$,24);"
. HELP COMING . ":......U1%.B(U1
):U2%.B(U2):U3%.B(U3):U4%.B(U4).....UJ$.
US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL.......&.
,.. ** MENU **.,.-.:.[....".":.UT,UU%:.B
(50003).0..53281,9:.53280,8.A./.:.~.1.."
. MENU"...6.." ----------
----------------------------".N.;.."..
1. MASTER MIND"...@..".. 2.
STUDENT INSTRUCTIONS".".E.."..
3. TEACHER INSTRUCTIONS".>.O.."..
4. QUIT..".M.T.." ------------------
--------------------"...Y..".. PRE
SS A NUMBER KEY (1-4) ";...^.UL.1:US$."1
234":.35:. INPUT ROUTINE.R._..C(UR$).1.3
00...`.US$.""...C..E(UR$).1000,400,500,3
96...H..300.*.... ** RE-ENABLE STOP KEY
AND END **.Y....B(50003)..1.B(50003)..16
0.B(50003)..0.399......UU.71:.B(50003).0
..53281,6:.53280,14......"..":.......875
:....... ** STUDENT INSTRUCTIONS **.....
.".":.UT,UU%:.B(50003).0..53281,0:.53280
,0.....UT$." MASTER MIND":UP.0:UG$."STUD
ENT INST":.850.E....". MASTER MIND
INSTRUCTIONS.L...." EEEEEEEEEEEEE
EEEEEEEEEEE"......" THE COMPUTER CHOOSES
A 4 DIGIT NUMBER.D....:." EACH DIGI
T CAN BE FROM 0 TO 9......:." DIG
ITS CAN BE REPEATED... ..:." YOU HAVE 10
TURNS TO GUESS THE NUMBER.D....:.:." TH
E COMPUTER SCORES EACH TURN:......:." Q
FOR EACH CORRECT DIGIT IN ITS
CORRECT POSITION.L....:." W FOR EACH COR
RECT DIGIT NOT IN ITS CORRECT POSI
TION......835:.".":.UT,UL%......UZ.1..UP
%:.217.....UG$."".......(.... ** TEACHER
INSTRUCTIONS **.X....".":.UT,UL%:.B(500
03).0..53281,2:.53280,10.....UT$." MASTE
R MIND":UP.0:UG$."TEACHER INST":.850....
..".. TO THE BEST OF OUR KNOWLEDGE,
."......" THIS PROGRAM IS IN THE PUBLI
C."......" DOMAIN. IF THIS IS NOT THE
CASE.".,...." PLEASE CONTACT:...".V..
.." COMMODORE BUSINESS MACHINES.".Y
...." 3370 PHARMACY AVE......."
AGINCOURT, ONTARIO"......"
CANADA M1W 2K4"......"
(416) 499-4292".....UP.1:. 835:. 850:...
..." ..PROGRAM NAME: MASTER MIND..C.
..." WRITTEN BY : NANCY ROPER..G...
." UPGRADED BY : ......."
.THIS PROGRAM WILL RUN ON ANY........
" PET 64 COMPUTER..W...."
COMMODORE 64 COMPUTER......835...N..UZ
.1..UP%:.217...W... .X.. ** PROGRAM MODI
FICATION INST **.1.Y..".":.UT,UL%.D.].UT
$." MASTER MIND":UP.0:UG$."PROGRAM MOD":
.850.M....835......UZ.1..UP%:.217.....UG
$.""............ ** TO USE 8032 LOAD CBM
4032 **...F..".....BEFORE RUNNING THIS P
ROGRAM ON AN 8032 ...#.P.." LOAD T
HE 'CBM 4032' PROGRAM............."...Z.
.UU.71.4.....Y.... ** TO USE 8032 LOAD C
BM4032 **......"....BEFORE RUNNING THIS
PROGRAM ON AN 8032 ..LOAD CBM 4032 PROG
RAM"......1093:..P. .. ** T I T L E P
A G E **...".."....";:.UT,UU%:.B(50003).
0..53280,14:.53281,6...$..I.1.38:."...";
:..2.&..I.1.22:.".....";:..J.(..I.1.37:.
".....";:..B.*..I.1.22:.".....";:....,..
"........................... ......."..
................. . . ...J.0.."........
........... . ......2.."...............
..... ....4.."..............C O M M O D
O R E...3.6.."...............EDUCATIONA
L...R.8.."................SOFTWARE.M.:..
** COMMODORE LOGO **...;..H(UD$,24);"..
........PRESS SPACE BAR OR WAIT.":I.0.G.
<..A$:.A$.." ".I.I.1:.I.250.828...>.T1$.
"":T2$."":T3$."":T4$."":I.0...@..300...C
.. ** SPACE BAR PRESS **.K.H..UO,0:.H(UD
$,24);".......PRESS SPACE BAR TO CONTINU
E.".B.L..UI$:.UI$.." ".844.H.N.....R.. *
* PAGE DESIGN ROUTINE **...T.UP.UP.1...W
.."."H(UT$.UP$,21);I(UP$.UG$.D(UP),18)..
.\.." ----------------------------------
----"...`..UH..0.870.0.A..H(UD$,24);H(UP
$,7);"HELP - PRESS H <RETURN>".G.F.UH.
0:.UO,0:."..":..F.K.. ** PLEASE WAIT REM
ARK **...P..H(UD$,24);" ONE MO
MENT PLEASE... "...U........ ** SET
UP VARIABLES **.....UX$."H":.UQ%(1000):U
B.32768:U1.196:U2.197:U3.198:U4.216:UC.1
67:UU.1024.H...UT.59468:UU%.12:UL%.14:UP
%.1146:UM.32768:UO.158:. 50003,0......B(
50003).0.UB.1024:U1.209:U2.210:U3.211:U4
.214:UC.204:UU.2048.J....B(50003).0.UT.5
3272:UU%.21:UL%.23:UP%.2139:UM.1024:UO.1
98.....UD$.".........................".
...UP$."
".G...UT$." MASTER MIND":. PROGRA
M TITLE.M.....G.... ** SET VARIABLES **.
P....900.V.....|...:...... ** CHECK FOR
8032 **......".":." ":. SHIFTED SPACE.L.
...B(UB.40)..96..700...... ** MEMORY CHE
CK **...... .(0).2000.937.'...."....THIS
MACHINE DOES NOT HAVE ENOUGH.".K...."ME
MORY TO RUN THIS PROGRAM !".V....UU.71.\
.....V...."..":.B(50003).0.962...... **
BASIC 2.0 OR 4.0 OR C-64 SETUP **...
...1075,133:.1076,144:.1077,234:.1079,4:
.1080,133:.1081,145......1091,155:.1098,
133:.1099,144:.1100,234:.1103,133.;....1
104,145:.1105,234:.1082,234.R....B(50003
)..160.955......1093,88:.1094,228:.1097,
85:.1102,228:.965......B(50003)..1.990.E
....1093,49:.1094,230:.1097,46:.1102,230
:.965...B..2099,141:.2100,20:.2101,3:.21
03,8:.2104,141:.2105,21.; C..2106,3:.211
5,145:.2117,52:.2118,234:.2121,49:.2122,
141.U D..2123,20:.2124,3:.2126,234:.2127
,141:.2128,21:.2129,3.. E..UU.48:. DISAB
LE STOP KEY.. J..800:. TITLE.. T..300:.
MENU.. ...".THE PGM WILL NOT WORK ON THI
S MACHINE!":...!...UZ.1..UP%:.UP%:UZ.0:.
** PROGRAM STARTS HERE **.F!..."..";:.:
.B(50003).0..53281,6:.53280,14.D!T.UT$."
MASTER MIND":. 1790.N!...2270..!... A.1
. 4:. CHOOSE RANDOM #..!..N$(A).D(.(10.
.(1)))..!..N$(A).J(N$(A),2,1).E!... A..!
D..".";.14);"MASTER MIND"..!N.. .14);"..
.........".."X.. .6);"GUESSES";.8);"SCOR
ING".L"...".";:. A.1 . 10:. SHOW GUESS O
PPORTUNITIES.R"....N"... .6);". . . . .
. . .".V"... A.."..."...";.."... A.1 . 1
0:. 10 GUESSES.."..."..."(.. B.1 . 4:. G
ET GUESS.."2...B.2.4);".";:UL.1:US$."012
3456789":.35:G$(B).UR$..#D.. B:..13);"."
;..#N.NC.0.1#X.. B.1 . 4:. FIND # CORREC
T.[#... G$(B).N$(B) . C(B).2:NC.NC.1:. 1
430.F#..C(B).0.N#... B.W# .NM.0..#... B.
1 . 4:. FIND # MISPLACED..#... C(B).1 .
1530..#... D.1 . 4.K#H.. D.B . 1520..#R.
. C(D).0 . 1520..#... G$(B)..N$(D) . 152
0..$..C(D).1:NM.NM.1:D.5..$... D. $... B
.0$...".......";.B$... NC.0 . 1590.C$...
B.1 . NC:. PRINT # CORRECT.N$"..".Q";.V
$,.. B..$6.. NM.0 . 1630..$@.. B.1 . NM:
. PRINT # MISPLACED..$J..".W";..$T.. B.G
$^.." "..%H..NC.4.."....................
... YOU WIN IN ONLY";A;"TRIES!";:A.11..%
R.. A.\%|..NC.4.." YOU LOSE! THE CORRECT
NUMBER IS ";N$(1);N$(2);N$(3);N$(4).U%.
..".....";G(13);:.835..%B.UH.1:. 850..%L
.ZF.1..%..:..%... PRINT TITLE..%...ZF.0.
UH.1:.850..%...ZF.1. ." THANKS FOR PLAY
ING. . .":ZF.0..%.....&... T.UM.204 . UM
.395..&... S:.T,S:..+&0.. T.UM.492 . UM.
667.:&:.. S:.T,S:..C&X..835.J&B.. 224,32
,32,225,97,32,32,225,32,32..&L.. 32,236,
226,226,251,97,225,236,251,226.B&V.. 224
,32,224,226,226,251,97,225,236,226..&...
226,98,32,32,32,32,32,32,32,32..'... 97
,97,32,97,97,32,32,97,97,32.1'... 32,225
,32,32,32,32,32,32,225,32.V'... 32,32,97
,32,32,32,32,225,32,32.{'... 32,254,32,3
2,32,32,32,32,32,32..'... 97,225,225,32,
97,32,225,32,225,32.K'... 32,32,226,252,
123,32,32,32,225,32..'F.. 32,32,236,226,
32,32,32,225,226,226..(P.. 251,32,32,32,
32,32,32,32,32,32.@(Z.. 97,32,97,32,97,3
2,236,226,226,97.F(... 32,32,32,32,225,3
2,32,32,225,32..(... 32,32,97,32,32,32,3
2,225,32,32..(... 32,97,32,32,32,32,32,3
2,32,32.W(... 224,32,32,225,97,225,97,32
,32,224..(... 32,224,98,98,98,97,32,32,2
24,97.$)... 32,32,224,98,98,254,97,225,9
7,32.1) .. 32,225.Z)*.. 224,32,32,225,97
,225,224,32,224,32..)4.. 225,97,225,236,
226,251,32,32,32,32..)>.. 32,32,32,32,32
,32,32,32,32,32.K)H.. 32,32,32,32,32,32,
32,32,32,32..)R.. 97,97,32,97,97,32,97,3
2,97,97..*\.. 32,97,225,32,32,32,97,32,3
2,32.8*F.. 32,32,32,32,32,32,32,32,32,32
.\*P.. 32,32,32,32,32,32,32,32,32,32..*Z
.. 97,225,225,32,97,32,97,32,97,225..*..
. 32,97,225,32,32,32,225,32,32,32.M*...
32,32,32,32,32,32,32,32,32,32..*... 32,3
2,32,32,32,32,32,32,32,32..+... 97,32,97
,32,97,32,97,32,97,32.:+... 97,97,225,32
,32,32,97,32,32,32.^+... 32,32,32,32,32,
32,32,32,32,32..+... 32,32,32,32,32,32,3
2,32,32,32..+J.. 224,32,32,225,97,225,22
4,32,224,32.G+T.. 225,97,225,252,98,254.
M+....V+..."."...
> CLICK IMAGE PREVIEW FOR FULL MODAL