CODES
FILE INFORMATION
FILENAME(S): CODES
FILE TYPE(S): PRG
FILE SIZE: 2.8K
FIRST SEEN: 2025-11-30 21:07:07
APPEARS ON: 1 disk(s)
FILE HASH
a253b54b1feabc3fc3263de70b61e9aff76bb0332bbfa1e9483e86ed14d87c1c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CS TAPES PET 14 | CODES | PRG | DuncanTwain | 16 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0D 04 14 00 86 41 24 28 32 30 29 00 22 04 |.......A$(20).".| 00000010: 1E 00 81 49 B2 30 A4 32 30 3A 87 41 24 28 49 29 |...I.0.20:.A$(I)| 00000020: 3A 82 00 44 04 5A 00 99 22 93 11 11 1D 1D 1D 1D |:..D.Z..".......| 00000030: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 4F 44 45 |............CODE| 00000040: 53 11 11 22 00 73 04 64 00 99 22 54 48 49 53 20 |S..".s.d.."THIS | 00000050: 49 53 20 41 20 47 41 4D 45 20 4F 46 20 4C 4F 47 |IS A GAME OF LOG| 00000060: 49 43 2E 20 20 49 20 53 48 41 4C 4C 20 46 49 52 |IC. I SHALL FIR| 00000070: 53 54 22 00 A3 04 78 00 99 22 53 45 4C 45 43 54 |ST"...x.."SELECT| 00000080: 20 36 20 4E 55 4D 42 45 52 53 20 41 4E 44 20 53 | 6 NUMBERS AND S| 00000090: 48 4F 57 20 54 48 45 4D 20 54 4F 20 59 4F 55 2E |HOW THEM TO YOU.| 000000A0: 22 3A 99 00 D1 04 8C 00 99 22 54 48 45 4E 20 49 |":......."THEN I| 000000B0: 20 53 48 41 4C 4C 20 53 45 4C 45 43 54 20 46 4F | SHALL SELECT FO| 000000C0: 55 52 20 4F 46 20 54 48 45 53 45 2C 20 42 55 54 |UR OF THESE, BUT| 000000D0: 22 00 FE 04 A0 00 99 22 49 20 57 4F 4E 27 54 20 |"......"I WON'T | 000000E0: 53 48 4F 57 20 54 48 45 53 45 20 34 2E 20 20 59 |SHOW THESE 4. Y| 000000F0: 4F 55 52 20 4A 4F 42 20 49 53 20 54 4F 22 00 2B |OUR JOB IS TO".+| 00000100: 05 AA 00 99 22 47 55 45 53 53 20 41 4C 4C 20 46 |...."GUESS ALL F| 00000110: 4F 55 52 20 4F 46 20 54 48 45 20 4E 55 4D 42 45 |OUR OF THE NUMBE| 00000120: 52 53 20 41 53 20 57 45 4C 4C 22 00 5D 05 B4 00 |RS AS WELL".]...| 00000130: 99 22 41 53 20 54 48 45 20 4F 52 44 45 52 20 49 |."AS THE ORDER I| 00000140: 4E 20 57 48 49 43 48 20 54 48 45 59 20 41 52 45 |N WHICH THEY ARE| 00000150: 20 53 45 4C 45 43 54 45 44 2E 22 3A 99 00 89 05 | SELECTED.":....| 00000160: BE 00 99 22 57 48 45 4E 20 59 4F 55 20 54 59 50 |..."WHEN YOU TYP| 00000170: 45 20 49 4E 20 54 48 45 20 4E 55 4D 42 45 52 53 |E IN THE NUMBERS| 00000180: 2C 20 50 4C 45 41 53 45 22 00 B3 05 C8 00 99 22 |, PLEASE"......"| 00000190: 53 45 50 41 52 41 54 45 20 45 41 43 48 20 4E 55 |SEPARATE EACH NU| 000001A0: 4D 42 45 52 20 46 52 4F 4D 20 54 48 45 20 52 45 |MBER FROM THE RE| 000001B0: 53 54 22 00 C7 05 D2 00 99 22 57 49 54 48 20 43 |ST"......"WITH C| 000001C0: 4F 4D 4D 41 53 2E 22 00 F1 05 DC 00 99 3A 99 22 |OMMAS."......:."| 000001D0: 49 20 57 49 4C 4C 20 47 49 56 45 20 59 4F 55 20 |I WILL GIVE YOU | 000001E0: 43 4C 55 45 53 20 41 46 54 45 52 20 45 41 43 48 |CLUES AFTER EACH| 000001F0: 22 00 15 06 E6 00 99 22 52 45 53 50 4F 4E 53 45 |"......"RESPONSE| 00000200: 2E 20 20 57 48 45 4E 20 59 4F 55 20 47 49 56 45 |. WHEN YOU GIVE| 00000210: 20 55 50 2C 22 00 32 06 EB 00 99 22 50 4C 45 41 | UP,".2...."PLEA| 00000220: 53 45 20 54 59 50 45 20 27 30 2C 30 2C 30 2C 30 |SE TYPE '0,0,0,0| 00000230: 27 2E 00 3C 06 EC 00 8D 37 30 30 30 00 68 06 F0 |'..<....7000.h..| 00000240: 00 99 3A 85 22 57 4F 55 4C 44 20 59 4F 55 20 4C |..:."WOULD YOU L| 00000250: 49 4B 45 20 54 4F 20 53 45 45 20 54 48 45 20 43 |IKE TO SEE THE C| 00000260: 4C 55 45 53 22 3B 41 24 00 81 06 FA 00 8B C8 28 |LUES";A$.......(| 00000270: 41 24 2C 31 29 B3 B1 22 59 22 A7 99 3A 89 35 36 |A$,1).."Y"..:.56| 00000280: 30 00 8A 06 FF 00 99 22 93 22 00 B1 06 01 01 99 |0......"."......| 00000290: 22 20 20 20 20 20 20 20 20 2A 20 2A 20 2A 20 20 |" * * * | 000002A0: 43 4C 55 45 53 20 20 2A 20 2A 20 2A 22 3B 22 11 |CLUES * * *";".| 000002B0: 22 00 CE 06 04 01 83 22 2D 20 2D 20 2D 20 2D 20 |"......"- - - - | 000002C0: 20 20 20 4E 4F 4E 45 20 52 49 47 48 54 22 00 D4 | NONE RIGHT"..| 000002D0: 06 09 01 99 00 FD 06 0E 01 83 22 2D 20 2D 20 2D |.........."- - -| 000002E0: 20 D8 20 20 31 20 52 49 47 48 54 20 2D 20 57 52 | . 1 RIGHT - WR| 000002F0: 4F 4E 47 20 50 4F 53 49 54 49 4F 4E 22 00 25 07 |ONG POSITION".%.| 00000300: 18 01 83 22 2D 20 2D 20 D8 A0 D8 20 20 32 20 52 |..."- - ... 2 R| 00000310: 49 47 48 54 20 2D 20 57 52 4F 4E 47 20 50 4F 53 |IGHT - WRONG POS| 00000320: 49 54 49 4F 4E 00 4D 07 22 01 83 22 2D 20 D8 A0 |ITION.M.".."- ..| 00000330: D8 A0 D8 20 20 33 20 52 49 47 48 54 20 2D 20 57 |... 3 RIGHT - W| 00000340: 52 4F 4E 47 20 50 4F 53 49 54 49 4F 4E 00 75 07 |RONG POSITION.u.| 00000350: 2C 01 83 22 D8 A0 D8 A0 D8 A0 D8 20 20 34 20 52 |,.."....... 4 R| 00000360: 49 47 48 54 20 2D 20 57 52 4F 4E 47 20 50 4F 53 |IGHT - WRONG POS| 00000370: 49 54 49 4F 4E 00 A3 07 40 01 83 22 2D 20 2D 20 |ITION...@.."- - | 00000380: 2D 20 DA 20 20 31 20 52 49 47 48 54 20 2D 20 31 |- . 1 RIGHT - 1| 00000390: 20 49 4E 20 52 49 47 48 54 20 50 4F 53 49 54 49 | IN RIGHT POSITI| 000003A0: 4F 4E 22 00 D1 07 4A 01 83 22 2D 20 2D 20 D8 20 |ON"...J.."- - . | 000003B0: DA 20 20 32 20 52 49 47 48 54 20 2D 20 31 20 49 |. 2 RIGHT - 1 I| 000003C0: 4E 20 52 49 47 48 54 20 50 4F 53 49 54 49 4F 4E |N RIGHT POSITION| 000003D0: 22 00 FF 07 54 01 83 22 2D 20 D8 A0 D8 20 DA 20 |"...T.."- ... . | 000003E0: 20 33 20 52 49 47 48 54 20 2D 20 31 20 49 4E 20 | 3 RIGHT - 1 IN | 000003F0: 52 49 47 48 54 20 50 4F 53 49 54 49 4F 4E 22 00 |RIGHT POSITION".| 00000400: 2D 08 5E 01 83 22 D8 20 D8 20 D8 20 DA 20 20 34 |-.^..". . . . 4| 00000410: 20 52 49 47 48 54 20 2D 20 31 20 49 4E 20 52 49 | RIGHT - 1 IN RI| 00000420: 47 48 54 20 50 4F 53 49 54 49 4F 4E 22 00 39 08 |GHT POSITION".9.| 00000430: 5F 01 83 22 20 20 20 20 22 00 67 08 72 01 83 22 |_.." ".g.r.."| 00000440: 2D 20 2D 20 DA 20 D3 20 20 32 20 52 49 47 48 54 |- - . . 2 RIGHT| 00000450: 20 2D 20 32 20 49 4E 20 52 49 47 48 54 20 50 4F | - 2 IN RIGHT PO| 00000460: 53 49 54 49 4F 4E 22 00 95 08 7C 01 83 22 2D 20 |SITION"...|.."- | 00000470: D8 20 DA 20 D3 20 20 33 20 52 49 47 48 54 20 2D |. . . 3 RIGHT -| 00000480: 20 32 20 49 4E 20 52 49 47 48 54 20 50 4F 53 49 | 2 IN RIGHT POSI| 00000490: 54 49 4F 4E 22 00 C3 08 86 01 83 22 D8 20 D8 20 |TION"......". . | 000004A0: DA 20 D3 20 20 34 20 52 49 47 48 54 20 2D 20 32 |. . 4 RIGHT - 2| 000004B0: 20 49 4E 20 52 49 47 48 54 20 50 4F 53 49 54 49 | IN RIGHT POSITI| 000004C0: 4F 4E 22 00 CD 08 87 01 83 22 20 20 22 00 D7 08 |ON"......" "...| 000004D0: 88 01 83 22 20 20 22 00 05 09 90 01 83 22 2D 20 |..." "......"- | 000004E0: DA 20 D3 20 C1 20 20 33 20 52 49 47 48 54 20 2D |. . . 3 RIGHT -| 000004F0: 20 33 20 49 4E 20 52 49 47 48 54 20 50 4F 53 49 | 3 IN RIGHT POSI| 00000500: 54 49 4F 4E 22 00 0F 09 91 01 83 22 20 20 22 00 |TION"......" ".| 00000510: 19 09 92 01 83 22 20 20 22 00 23 09 93 01 83 22 |....." ".#...."| 00000520: 20 20 22 00 2D 09 94 01 83 22 20 20 22 00 5B 09 | ".-...." ".[.| 00000530: 9A 01 83 22 D8 20 DA 20 D3 20 C1 20 20 34 20 52 |...". . . . 4 R| 00000540: 49 47 48 54 20 2D 20 34 20 49 4E 20 52 49 47 48 |IGHT - 4 IN RIGH| 00000550: 54 20 50 4F 53 49 54 49 4F 4E 22 00 67 09 F4 01 |T POSITION".g...| 00000560: 81 49 B2 30 A4 32 30 00 80 09 08 02 8B C8 28 41 |.I.0.20.......(A| 00000570: 24 28 49 29 2C 32 29 B2 22 20 20 22 A7 35 35 30 |$(I),2)." ".550| 00000580: 00 8B 09 12 02 99 41 24 28 49 29 00 92 09 26 02 |......A$(I)...&.| 00000590: 82 49 00 A8 09 30 02 99 3A 85 22 52 45 41 44 59 |.I...0..:."READY| 000005A0: 20 4E 4F 57 22 3B 42 24 00 BD 09 3A 02 8B C8 28 | NOW";B$...:...(| 000005B0: 42 24 2C 31 29 B3 B1 22 59 22 A7 39 30 00 C5 09 |B$,1).."Y".90...| 000005C0: 44 02 4D B2 30 00 DD 09 E8 03 8F 20 2A 2A 2A 2A |D.M.0...... ****| 000005D0: 53 45 4C 45 43 54 20 36 20 2A 2A 2A 2A 00 E8 09 |SELECT 6 ****...| 000005E0: FC 03 81 49 B2 31 A4 36 00 02 0A 06 04 59 28 49 |...I.1.6.....Y(I| 000005F0: 29 B2 31 30 30 AA B5 28 BB 28 31 29 AC 31 30 30 |).100..(.(1).100| 00000600: 30 29 00 09 0A 10 04 82 49 00 14 0A 1A 04 81 49 |0)......I......I| 00000610: B2 31 A4 36 00 1F 0A 24 04 81 4B B2 31 A4 36 00 |.1.6...$..K.1.6.| 00000620: 2D 0A 2E 04 8B 49 B2 4B A7 31 30 39 30 00 51 0A |-....I.K.1090.Q.| 00000630: 38 04 8B 59 28 49 29 B2 59 28 4B 29 A7 59 28 49 |8..Y(I).Y(K).Y(I| 00000640: 29 B2 59 28 49 29 AA B5 28 BB 28 31 29 AC 35 30 |).Y(I)..(.(1).50| 00000650: 29 00 58 0A 42 04 82 4B 00 5F 0A D0 07 82 49 00 |).X.B..K._....I.| 00000660: 76 0A E4 07 8F 20 2A 2A 2A 20 53 45 4C 45 43 54 |v.... *** SELECT| 00000670: 20 34 20 2A 2A 2A 00 81 0A EE 07 81 49 B2 31 A4 | 4 ***......I.1.| 00000680: 34 00 96 0A F8 07 58 28 49 29 B2 B5 28 31 AA BB |4.....X(I)..(1..| 00000690: 28 31 29 AC 36 29 00 9D 0A 02 08 82 49 00 A8 0A |(1).6)......I...| 000006A0: 0C 08 81 49 B2 31 A4 34 00 B3 0A 20 08 81 4B B2 |...I.1.4... ..K.| 000006B0: 31 A4 34 00 C1 0A 2A 08 8B 49 B2 4B A7 32 31 33 |1.4...*..I.K.213| 000006C0: 30 00 E1 0A 3E 08 8B 58 28 4B 29 B2 58 28 49 29 |0...>..X(K).X(I)| 000006D0: A7 58 28 4B 29 B2 31 AA B5 28 BB 28 31 29 AC 36 |.X(K).1..(.(1).6| 000006E0: 29 00 F5 0A 48 08 8B 58 28 4B 29 B2 58 28 49 29 |)...H..X(K).X(I)| 000006F0: A7 32 31 31 30 00 FC 0A 52 08 82 4B 00 03 0B 5C |.2110...R..K...\| 00000700: 08 82 49 00 0E 0B 7A 08 81 49 B2 31 A4 34 00 1F |..I...z..I.1.4..| 00000710: 0B 84 08 5A 28 49 29 B2 59 28 58 28 49 29 29 00 |...Z(I).Y(X(I)).| 00000720: 26 0B 8E 08 82 49 00 53 0B A2 08 99 22 91 54 48 |&....I.S....".TH| 00000730: 45 53 45 20 41 52 45 20 54 48 45 20 53 49 58 20 |ESE ARE THE SIX | 00000740: 4E 55 4D 42 45 52 53 20 46 52 4F 4D 20 57 48 49 |NUMBERS FROM WHI| 00000750: 43 48 22 00 76 0B AC 08 99 22 20 20 20 20 20 20 |CH".v...." | 00000760: 59 4F 55 20 4D 55 53 54 20 43 48 4F 4F 53 45 20 |YOU MUST CHOOSE | 00000770: 46 4F 55 52 3A 22 00 8E 0B B6 08 99 3A 81 49 B2 |FOUR:"......:.I.| 00000780: 31 A4 36 3A 99 59 28 49 29 3B 3A 82 3A 99 00 A3 |1.6:.Y(I);:.:...| 00000790: 0B C0 08 8F 20 2A 2A 2A 20 55 53 45 52 20 49 4E |.... *** USER IN| 000007A0: 50 55 54 00 AB 0B CA 08 56 B2 31 00 B6 0B D4 08 |PUT.....V.1.....| 000007B0: 8B 56 B2 31 A7 99 00 CF 0B DE 08 85 44 28 31 29 |.V.1........D(1)| 000007C0: 2C 44 28 32 29 2C 44 28 33 29 2C 44 28 34 29 00 |,D(2),D(3),D(4).| 000007D0: E9 0B F2 08 45 B2 44 28 31 29 AA 44 28 32 29 AA |....E.D(1).D(2).| 000007E0: 44 28 33 29 AA 44 28 34 29 00 F7 0B FC 08 8B 45 |D(3).D(4)......E| 000007F0: B2 30 A7 35 30 30 30 00 02 0C EE 0C 81 49 B2 31 |.0.5000......I.1| 00000800: A4 34 00 0D 0C F8 0C 81 4B B2 31 A4 34 00 2A 0C |.4......K.1.4.*.| 00000810: 02 0D 8B 28 49 B2 4B 29 AF 28 5A 28 49 29 B2 44 |...(I.K).(Z(I).D| 00000820: 28 4B 29 29 A7 4D B2 4D AA 35 00 48 0C 16 0D 8B |(K)).M.M.5.H....| 00000830: 28 49 B3 B1 4B 29 AF 28 5A 28 49 29 B2 44 28 4B |(I..K).(Z(I).D(K| 00000840: 29 29 A7 4D B2 4D AA 31 00 4F 0C 34 0D 82 4B 00 |)).M.M.1.O.4..K.| 00000850: 56 0C 3E 0D 82 49 00 82 0C 48 0D 99 22 91 1D 1D |V.>..I...H.."...| 00000860: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000870: 1D 1D 1D 1D 1D 1D 22 3B C8 28 41 24 28 4D 29 2C |......";.(A$(M),| 00000880: 38 29 00 91 0C AC 0D 8B 4D B2 32 30 A7 35 35 30 |8)......M.20.550| 00000890: 30 00 9F 0C B6 0D 4D B2 30 3A 56 B2 56 AA 31 00 |0.....M.0:V.V.1.| 000008A0: A9 0C A0 0F 89 32 32 36 30 00 BF 0C 88 13 81 49 |.....2260......I| 000008B0: B2 31 A4 34 3A 99 5A 28 49 29 3B 3A 82 3A 99 00 |.1.4:.Z(I);:.:..| 000008C0: C9 0C 50 14 89 36 30 31 35 00 F3 0C 7C 15 99 3A |..P..6015...|..:| 000008D0: 99 22 57 41 49 54 20 41 20 4D 49 4E 55 54 45 21 |."WAIT A MINUTE!| 000008E0: 20 49 20 54 48 49 4E 4B 20 59 4F 55 20 57 4F 4E | I THINK YOU WON| 000008F0: 21 22 22 00 03 0D E0 15 81 49 B2 31 A4 32 30 30 |!""......I.1.200| 00000900: 30 3A 82 00 11 0D 6F 17 99 22 93 11 11 11 11 11 |0:....o.."......| 00000910: 22 00 3F 0D 70 17 99 22 43 4F 4E 47 52 41 54 55 |".?.p.."CONGRATU| 00000920: 4C 41 54 49 4F 4E 53 21 20 59 4F 55 20 53 55 43 |LATIONS! YOU SUC| 00000930: 43 45 45 44 45 44 20 49 4E 20 4F 4E 4C 59 22 00 |CEEDED IN ONLY".| 00000940: 45 0D 75 17 99 00 61 0D 7A 17 99 22 20 20 20 20 |E.u...a.z.." | 00000950: 20 20 20 20 22 3B 56 3B 22 20 54 52 49 45 53 21 | ";V;" TRIES!| 00000960: 22 00 67 0D 7F 17 99 00 8D 0D 84 17 85 22 57 4F |".g.........."WO| 00000970: 55 4C 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F 20 |ULD YOU LIKE TO | 00000980: 54 52 59 20 41 47 41 49 4E 22 3B 42 24 00 A2 0D |TRY AGAIN";B$...| 00000990: 8E 17 8B C8 28 42 24 2C 31 29 B2 22 59 22 A7 32 |....(B$,1)."Y".2| 000009A0: 34 30 00 D5 0D 98 17 99 3A 99 22 4F 4B 41 59 2C |40......:."OKAY,| 000009B0: 54 48 45 4E 2E 20 4C 45 54 27 53 20 44 4F 20 53 |THEN. LET'S DO S| 000009C0: 4F 4D 45 54 48 49 4E 47 20 45 4C 53 45 2E 20 20 |OMETHING ELSE. | 000009D0: 49 27 4D 22 3B 00 DB 0D A2 17 80 00 F3 0D 58 1B |I'M";.........X.| 000009E0: 8F 20 4D 4F 52 45 20 49 4E 53 54 52 55 43 54 49 |. MORE INSTRUCTI| 000009F0: 4F 4E 53 00 F9 0D 5D 1B 99 00 14 0E 62 1B 85 22 |ONS...].....b.."| 00000A00: 52 45 41 44 59 20 54 4F 20 52 45 41 44 20 4F 4E |READY TO READ ON| 00000A10: 22 3B 41 24 00 28 0E 6C 1B 8B C8 28 41 24 2C 31 |";A$.(.l...(A$,1| 00000A20: 29 B2 22 4E 22 A7 39 30 00 36 0E 76 1B 99 22 93 |)."N".90.6.v..".| 00000A30: 11 1D 1D 1D 1D 22 00 64 0E 80 1B 99 22 49 20 57 |.....".d...."I W| 00000A40: 49 4C 4C 20 4E 4F 54 20 53 45 4C 45 43 54 20 44 |ILL NOT SELECT D| 00000A50: 55 50 4C 49 43 41 54 45 20 4E 55 4D 42 45 52 53 |UPLICATE NUMBERS| 00000A60: 20 4F 52 22 00 8E 0E 8A 1B 99 22 5A 45 52 4F 2C | OR"......"ZERO,| 00000A70: 20 53 49 4E 43 45 20 54 48 41 54 20 4D 41 59 20 | SINCE THAT MAY | 00000A80: 42 45 20 43 4F 4E 46 55 53 49 4E 47 2E 22 00 BC |BE CONFUSING."..| 00000A90: 0E 94 1B 99 3A 99 22 50 4C 45 41 53 45 20 44 4F |....:."PLEASE DO| 00000AA0: 4E 27 54 20 47 49 56 45 20 44 55 50 4C 49 43 41 |N'T GIVE DUPLICA| 00000AB0: 54 45 20 41 4E 53 57 45 52 53 2C 22 00 EA 0E 9E |TE ANSWERS,"....| 00000AC0: 1B 99 22 53 49 4E 43 45 20 49 20 57 49 4C 4C 20 |.."SINCE I WILL | 00000AD0: 47 49 56 45 20 59 4F 55 20 49 4E 43 4F 52 52 45 |GIVE YOU INCORRE| 00000AE0: 43 54 20 43 4C 55 45 53 2E 22 00 15 0F A8 1B 99 |CT CLUES."......| 00000AF0: 3A 99 22 52 45 4D 45 4D 42 45 52 2C 20 49 20 57 |:."REMEMBER, I W| 00000B00: 49 4C 4C 20 43 4F 55 4E 54 20 54 48 45 20 4E 55 |ILL COUNT THE NU| 00000B10: 4D 42 45 52 22 00 43 0F B2 1B 99 22 4F 46 20 41 |MBER".C...."OF A| 00000B20: 54 54 45 4D 50 54 53 20 59 4F 55 20 4D 41 4B 45 |TTEMPTS YOU MAKE| 00000B30: 20 54 4F 20 46 49 4E 44 20 54 48 45 20 52 49 47 | TO FIND THE RIG| 00000B40: 48 54 22 00 52 0F BC 1B 99 22 41 4E 53 57 45 52 |HT".R...."ANSWER| 00000B50: 2E 22 00 58 0F C6 1B 8E 00 00 00 01 |.".X........ |
.......A$(20)."....I.0.20:.A$(I):..D.Z.. "...................CODES..".S.D.."THIS IS A GAME OF LOGIC. I SHALL FIRST"...X. ."SELECT 6 NUMBERS AND SHOW THEM TO YOU. ":..Q...."THEN I SHALL SELECT FOUR OF TH ESE, BUT"... .."I WON'T SHOW THESE 4. Y OUR JOB IS TO".+...."GUESS ALL FOUR OF T HE NUMBERS AS WELL".]...."AS THE ORDER I N WHICH THEY ARE SELECTED.":......."WHEN YOU TYPE IN THE NUMBERS, PLEASE"...H.." SEPARATE EACH NUMBER FROM THE REST".G.R. ."WITH COMMAS."......:."I WILL GIVE YOU CLUES AFTER EACH"......"RESPONSE. WHEN YOU GIVE UP,".2...."PLEASE TYPE '0,0,0,0 '..<....7000.H....:."WOULD YOU LIKE TO S EE THE CLUES";A$......H(A$,1).."Y"..:.56 0......"."......" * * * CLUES * * *";".".N...."- - - - NONE RIGHT".T .........."- - - X 1 RIGHT - WRONG POSI TION".%...."- - X X 2 RIGHT - WRONG POS ITION.M.".."- X X X 3 RIGHT - WRONG POS ITION.U.,.."X X X X 4 RIGHT - WRONG POS ITION...@.."- - - Z 1 RIGHT - 1 IN RIGH T POSITION".Q.J.."- - X Z 2 RIGHT - 1 I N RIGHT POSITION"...T.."- X X Z 3 RIGHT - 1 IN RIGHT POSITION".-.^.."X X X Z 4 RIGHT - 1 IN RIGHT POSITION".9._.." ".G.R.."- - Z S 2 RIGHT - 2 IN RIGHT PO SITION"...|.."- X Z S 3 RIGHT - 2 IN RI GHT POSITION".C...."X X Z S 4 RIGHT - 2 IN RIGHT POSITION".M...." ".W...." ". ....."- Z S A 3 RIGHT - 3 IN RIGHT POSI TION"......" "......" ".#...." ".-... ." ".[...."X Z S A 4 RIGHT - 4 IN RIGH T POSITION".G....I.0.20......H(A$(I),2). " ".550......A$(I)...&..I...0..:."READY NOW";B$...:..H(B$,1).."Y".90.E.D.M.0... ... ****SELECT 6 ****......I.1.6.....Y(I ).100..(.(1).1000)......I......I.1.6...$ ..K.1.6.-....I.K.1090.Q.8..Y(I).Y(K).Y(I ).Y(I)..(.(1).50).X.B..K._.P..I.V.... ** * SELECT 4 ***......I.1.4.....X(I)..(1.. (1).6)......I......I.1.4... ..K.1.4.A.*. .I.K.2130...>..X(K).X(I).X(K).1..(.(1).6 )...H..X(K).X(I).2110...R..K...\..I...Z. .I.1.4.....Z(I).Y(X(I)).&....I.S....".TH ESE ARE THE SIX NUMBERS FROM WHICH".V... ." YOU MUST CHOOSE FOUR:"......:.I. 1.6:.Y(I);:.:....... *** USER INPUT...J. V.1...T..V.1...O....D(1),D(2),D(3),D(4). ....E.D(1).D(2).D(3).D(4)......E.0.5000. .....I.1.4......K.1.4.*....(I.K).(Z(I).D (K)).M.M.5.H....(I..K).(Z(I).D(K)).M.M.1 .O.4..K.V.>..I...H.."................... ......";H(A$(M),8)......M.20.5500.....M. 0:V.V.1... ..2260......I.1.4:.Z(I);:.:.. I.P..6015...|..:."WAIT A MINUTE! I THINK YOU WON!""......I.1.2000:....O.."...... ".?.P.."CONGRATULATIONS! YOU SUCCEEDED I N ONLY".E.U...A.Z.." ";V;" TRIES! ".G........."WOULD YOU LIKE TO TRY AGAI N";B$......H(B$,1)."Y".240.U....:."OKAY, THEN. LET'S DO SOMETHING ELSE. I'M";... ......X.. MORE INSTRUCTIONS...].....B.." READY TO READ ON";A$.(.L..H(A$,1)."N".90 .6.V.."......".D...."I WILL NOT SELECT D UPLICATE NUMBERS OR"......"ZERO, SINCE T HAT MAY BE CONFUSING."......:."PLEASE DO N'T GIVE DUPLICATE ANSWERS,"......"SINCE I WILL GIVE YOU INCORRECT CLUES."...... :."REMEMBER, I WILL COUNT THE NUMBER".C. ..."OF ATTEMPTS YOU MAKE TO FIND THE RIG HT".R...."ANSWER.".X.F......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL