00000000: 01 04 09 04 05 00 89 35 30 00 25 04 0A 00 41 30 |.......50.%...A0|
00000010: 24 B2 22 12 20 92 22 3A 41 31 24 B2 22 20 22 3A |$.". .":A1$." ":|
00000020: 42 24 B2 22 22 00 61 04 0F 00 99 41 30 24 22 9D |B$."".a....A0$".|
00000030: 22 3B 3A 81 41 B2 31 A4 36 30 3A A1 41 24 3A 8B |";:.A.1.60:.A$:.|
00000040: 41 24 B2 22 22 A7 82 3A 41 24 B2 41 30 24 3A 41 |A$.""..:A$.A0$:A|
00000050: 30 24 B2 41 31 24 3A 41 31 24 B2 41 24 3A 89 31 |0$.A1$:A1$.A$:.1|
00000060: 35 00 85 04 14 00 41 B2 36 30 3A 82 3A 41 B2 C6 |5.....A.60:.:A..|
00000070: 28 41 24 29 AF 31 32 37 3A 8B 41 B2 31 33 A7 99 |(A$).127:.A.13..|
00000080: 22 20 22 3A 8E 00 A8 04 19 00 8B 41 B2 31 39 B0 |" ":.......A.19.|
00000090: 41 B2 31 37 B0 41 B2 32 39 B0 41 B2 33 34 B0 41 |A.17.A.29.A.34.A|
000000A0: 24 B2 22 94 22 A7 31 35 00 BD 04 1E 00 8B 41 B2 |$.".".15......A.|
000000B0: 32 30 AF C3 28 42 24 29 B3 31 A7 31 30 00 D8 04 |20..(B$).1.10...|
000000C0: 23 00 8B 41 B2 32 30 AF C3 28 42 24 29 B2 31 A7 |#..A.20..(B$).1.|
000000D0: 99 41 24 3B 3A 89 31 30 00 FC 04 28 00 42 24 B2 |.A$;:.10...(.B$.|
000000E0: 42 24 AA 41 24 3A 8B 41 B2 32 30 A7 42 24 B2 C8 |B$.A$:.A.20.B$..|
000000F0: 28 42 24 2C C3 28 42 24 29 AB 32 29 00 09 05 2D |(B$,.(B$).2)...-|
00000100: 00 99 41 24 3B 3A 89 31 35 00 37 05 32 00 86 41 |..A$;:.15.7.2..A|
00000110: 31 28 36 29 2C 41 28 33 29 2C 42 28 33 29 3A 59 |1(6),A(3),B(3):Y|
00000120: B2 30 3A 99 22 93 22 A3 37 29 C7 28 31 34 29 22 |.0:.".".7).(14)"|
00000130: 12 C2 C1 C7 C5 CC D3 00 72 05 37 00 99 22 11 D7 |........r.7.."..|
00000140: 4F 55 4C 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F |OULD YOU LIKE TO|
00000150: 20 53 45 45 20 54 48 45 20 52 55 4C 45 53 20 28 | SEE THE RULES (|
00000160: D9 C5 D3 20 4F 52 20 20 20 20 20 CE CF 29 3F 20 |... OR ..)? |
00000170: 22 3B 00 84 05 3C 00 8D 31 30 3A 8B 42 24 B2 22 |";...<..10:.B$."|
00000180: 22 A7 35 35 00 9F 05 41 00 8B C8 28 42 24 2C 31 |".55...A...(B$,1|
00000190: 29 B2 22 4E 22 A7 99 22 93 22 3A 89 31 30 30 00 |)."N"..".":.100.|
000001A0: D1 05 46 00 99 3A 99 22 C9 20 41 4D 20 54 48 49 |..F..:.". AM THI|
000001B0: 4E 4B 49 4E 47 20 4F 46 20 41 20 20 20 20 54 48 |NKING OF A TH|
000001C0: 52 45 45 2D 44 49 47 49 54 20 4E 55 4D 42 45 52 |REE-DIGIT NUMBER|
000001D0: 2E 00 02 06 4B 00 99 22 D4 52 59 20 54 4F 20 47 |....K..".RY TO G|
000001E0: 55 45 53 53 20 4D 59 20 4E 55 4D 2D 20 20 42 45 |UESS MY NUM- BE|
000001F0: 52 2E 20 C9 20 57 49 4C 4C 20 47 49 56 45 20 59 |R. . WILL GIVE Y|
00000200: 4F 55 00 1A 06 50 00 99 22 43 4C 55 45 53 20 41 |OU...P.."CLUES A|
00000210: 53 20 46 4F 4C 4C 4F 57 53 3A 00 45 06 55 00 99 |S FOLLOWS:.E.U..|
00000220: 3A 99 22 12 1C C2 C1 C7 C5 CC D3 1F 92 20 2D 20 |:.".......... - |
00000230: CE 4F 20 44 49 47 49 54 53 20 20 20 20 43 4F 52 |.O DIGITS COR|
00000240: 52 45 43 54 2E 00 8B 06 5A 00 99 22 12 1E D0 C9 |RECT....Z.."....|
00000250: C3 CF 1F 92 20 20 2D 20 20 CF 4E 45 20 44 49 47 |.... - .NE DIG|
00000260: 49 54 20 20 20 20 43 4F 52 52 45 43 54 20 42 55 |IT CORRECT BU|
00000270: 54 20 49 4E 20 54 48 45 20 20 20 20 57 52 4F 4E |T IN THE WRON|
00000280: 47 20 50 4F 53 49 54 49 4F 4E 2E 00 D3 06 5F 00 |G POSITION...._.|
00000290: 99 22 12 9E C6 C5 D2 CD C9 1F 92 20 2D 20 20 CF |."......... - .|
000002A0: 4E 45 20 44 49 47 49 54 20 20 20 20 43 4F 52 52 |NE DIGIT CORR|
000002B0: 45 43 54 20 41 4E 44 20 49 4E 20 54 48 45 20 20 |ECT AND IN THE |
000002C0: 20 20 52 49 47 48 54 20 50 4F 53 49 54 49 4F 4E | RIGHT POSITION|
000002D0: 2E 11 11 00 DE 06 64 00 81 49 B2 31 A4 33 00 02 |......d..I.1.3..|
000002E0: 07 69 00 41 28 49 29 B2 B5 28 31 30 AC BB 28 31 |.i.A(I)..(10..(1|
000002F0: 29 29 3A 8B 49 B2 31 AF 41 28 49 29 B2 30 A7 31 |)):.I.1.A(I).0.1|
00000300: 30 35 00 0F 07 6E 00 8B 49 B2 31 A7 31 32 35 00 |05...n..I.1.125.|
00000310: 2B 07 73 00 81 4A B2 31 A4 49 AB 31 3A 8B 41 28 |+.s..J.1.I.1:.A(|
00000320: 49 29 B2 41 28 4A 29 A7 31 30 35 00 32 07 78 00 |I).A(J).105.2.x.|
00000330: 82 4A 00 78 07 7D 00 82 49 3A 99 22 CF 4B 41 59 |.J.x.}..I:.".KAY|
00000340: 2C 20 C9 20 48 41 56 45 20 41 20 4E 55 4D 42 45 |, . HAVE A NUMBE|
00000350: 52 20 49 4E 20 4D 49 4E 44 2E 20 D7 48 41 54 20 |R IN MIND. .HAT |
00000360: 49 53 20 59 4F 55 52 20 47 55 45 53 53 3F 11 22 |IS YOUR GUESS?."|
00000370: 3A 81 49 B2 31 A4 32 30 00 9E 07 82 00 99 22 3F |:.I.1.20......"?|
00000380: 20 22 3B 3A 8D 31 30 3A 99 22 91 22 A3 36 29 3B | ";:.10:.".".6);|
00000390: 3A 8B C3 28 42 24 29 B3 B1 33 A7 32 34 35 00 D4 |:..(B$)..3.245..|
000003A0: 07 87 00 81 5A B2 31 A4 33 3A 41 31 28 5A 29 B2 |....Z.1.3:A1(Z).|
000003B0: C6 28 CA 28 42 24 2C 5A 2C 31 29 29 3A 82 5A 3A |.(.(B$,Z,1)):.Z:|
000003C0: 81 4A B2 31 A4 33 3A 8B 41 31 28 4A 29 B3 34 38 |.J.1.3:.A1(J).48|
000003D0: A7 31 35 30 00 E6 07 8C 00 8B 41 31 28 4A 29 B1 |.150......A1(J).|
000003E0: 35 37 A7 31 35 30 00 FF 07 91 00 42 28 4A 29 B2 |57.150.....B(J).|
000003F0: 41 31 28 4A 29 AB 34 38 3A 82 3A 89 31 35 35 00 |A1(J).48:.:.155.|
00000400: 11 08 96 00 99 22 D7 48 41 54 3F 22 3A 89 31 33 |.....".HAT?":.13|
00000410: 30 00 24 08 9B 00 8B 42 28 31 29 B2 42 28 32 29 |0.$....B(1).B(2)|
00000420: A7 32 35 30 00 37 08 A0 00 8B 42 28 32 29 B2 42 |.250.7....B(2).B|
00000430: 28 33 29 A7 32 35 30 00 4A 08 A5 00 8B 42 28 33 |(3).250.J....B(3|
00000440: 29 B2 42 28 31 29 A7 32 35 30 00 70 08 AA 00 43 |).B(1).250.p...C|
00000450: B2 30 3A 44 B2 30 3A 81 4A B2 31 A4 32 3A 8B 41 |.0:D.0:.J.1.2:.A|
00000460: 28 4A 29 B2 42 28 4A AA 31 29 A7 43 B2 43 AA 31 |(J).B(J.1).C.C.1|
00000470: 00 87 08 AF 00 8B 41 28 4A AA 31 29 B2 42 28 4A |......A(J.1).B(J|
00000480: 29 A7 43 B2 43 AA 31 00 9E 08 B4 00 82 3A 8B 41 |).C.C.1......:.A|
00000490: 28 31 29 B2 42 28 33 29 A7 43 B2 43 AA 31 00 B3 |(1).B(3).C.C.1..|
000004A0: 08 B9 00 8B 41 28 33 29 B2 42 28 31 29 A7 43 B2 |....A(3).B(1).C.|
000004B0: 43 AA 31 00 CF 08 BE 00 81 4A B2 31 A4 33 3A 8B |C.1......J.1.3:.|
000004C0: 41 28 4A 29 B2 42 28 4A 29 A7 44 B2 44 AA 31 00 |A(J).B(J).D.D.1.|
000004D0: DE 08 C3 00 82 3A 8B 44 B2 33 A7 32 36 30 00 EB |.....:.D.3.260..|
000004E0: 08 C8 00 8B 43 B2 30 A7 32 31 30 00 05 09 CD 00 |....C.0.210.....|
000004F0: 81 4A B2 31 A4 43 3A 99 22 12 1E D0 C9 C3 CF 1F |.J.1.C:.".......|
00000500: 1D 22 3B 3A 82 00 12 09 D2 00 8B 44 B2 30 A7 32 |.";:.......D.0.2|
00000510: 32 35 00 2D 09 D7 00 81 4A B2 31 A4 44 3A 99 22 |25.-....J.1.D:."|
00000520: 12 9E C6 C5 D2 CD C9 1F 1D 22 3B 3A 82 00 3F 09 |.........";:..?.|
00000530: DC 00 8B B9 28 30 29 B2 30 A7 99 22 9D 22 3B 00 |....(0).0..".";.|
00000540: 4C 09 E1 00 8B 43 AA 44 A7 32 33 35 00 5E 09 E6 |L....C.D.235.^..|
00000550: 00 99 22 12 1C C2 C1 C7 C5 CC D3 1F 22 3B 00 79 |..".........";.y|
00000560: 09 EB 00 99 3A 82 3A 99 22 CF 48 2C 20 57 45 4C |....:.:.".H, WEL|
00000570: 4C 2C 20 54 48 41 54 27 53 00 BA 09 F0 00 99 22 |L, THAT'S......"|
00000580: 32 30 20 47 55 45 53 53 45 53 2E 20 20 CD 59 20 |20 GUESSES. .Y |
00000590: 4E 55 4D 42 45 52 57 41 53 22 3B 31 30 30 AC 41 |NUMBERWAS";100.A|
000005A0: 28 31 29 AA 31 30 AC 41 28 32 29 AA 41 28 33 29 |(1).10.A(2).A(3)|
000005B0: 22 9D 2E 11 22 3A 89 32 38 30 00 EB 09 F5 00 99 |"...":.280......|
000005C0: 3A 99 22 D4 52 59 20 47 55 45 53 53 49 4E 47 20 |:.".RY GUESSING |
000005D0: 41 20 54 48 52 45 45 2D 20 44 49 47 49 54 20 4E |A THREE- DIGIT N|
000005E0: 55 4D 42 45 52 22 3A 89 31 33 30 00 32 0A FA 00 |UMBER":.130.2...|
000005F0: 99 3A 99 22 C9 20 46 4F 52 47 4F 54 20 54 4F 20 |.:.". FORGOT TO |
00000600: 54 45 4C 4C 20 59 4F 55 20 20 54 48 41 54 20 54 |TELL YOU THAT T|
00000610: 48 45 20 4E 55 4D 42 45 52 20 C9 20 48 41 56 45 |HE NUMBER . HAVE|
00000620: 49 4E 20 4D 49 4E 44 20 48 41 53 20 4E 4F 20 54 |IN MIND HAS NO T|
00000630: 57 4F 00 4F 0A FF 00 99 22 44 49 47 49 54 53 20 |WO.O...."DIGITS |
00000640: 54 48 45 20 53 41 4D 45 2E 22 3A 89 31 33 30 00 |THE SAME.":.130.|
00000650: 66 0A 04 01 99 22 12 D9 4F 55 20 47 4F 54 20 49 |f...."..OU GOT I|
00000660: 54 21 92 22 3A 99 00 7F 0A 09 01 59 B2 59 AA 31 |T!.":......Y.Y.1|
00000670: 3A 45 B2 45 AA 49 3A 8B 59 B2 31 A7 32 38 30 00 |:E.E.I:.Y.1.280.|
00000680: AE 0A 0E 01 99 22 D9 4F 55 20 48 41 56 45 20 50 |.....".OU HAVE P|
00000690: 4C 41 59 45 44 22 59 22 20 20 20 20 47 41 4D 45 |LAYED"Y" GAME|
000006A0: 53 2C 20 41 4E 44 20 59 4F 55 20 41 52 45 00 ED |S, AND YOU ARE..|
000006B0: 0A 13 01 99 22 41 56 45 52 41 47 49 4E 47 22 B5 |...."AVERAGING".|
000006C0: 28 28 45 AD 59 29 AC 31 30 30 30 30 AA 2E 35 29 |((E.Y).10000..5)|
000006D0: AD 31 30 30 30 30 3A 99 22 47 55 45 53 53 45 53 |.10000:."GUESSES|
000006E0: 20 50 45 52 20 47 41 4D 45 2E 22 3A 99 00 0C 0B | PER GAME.":....|
000006F0: 18 01 99 22 C1 47 41 49 4E 3F 20 22 3B 3A 8D 31 |...".GAIN? ";:.1|
00000700: 30 3A 8B 42 24 B2 22 22 A7 32 38 30 00 24 0B 1D |0:.B$."".280.$..|
00000710: 01 8B C8 28 42 24 2C 31 29 B2 22 59 22 A7 99 3A |...(B$,1)."Y"..:|
00000720: 89 31 30 30 00 47 0B 22 01 99 3A 99 22 C8 4F 50 |.100.G."..:.".OP|
00000730: 45 20 59 4F 55 20 48 41 44 20 46 55 4E 2E 20 20 |E YOU HAD FUN. |
00000740: 20 20 20 C2 59 45 2E 00 00 00 | .YE.... |
.......50.%...A0$.". .":A1$." ":B$."".A.
...A0$".";:.A.1.60:.A$:.A$.""..:A$.A0$:A
0$.A1$:A1$.A$:.15.....A.60:.:A.F(A$).127
:.A.13.." ":.......A.19.A.17.A.29.A.34.A
$.".".15......A.20.C(B$).1.10.X.#..A.20.
C(B$).1..A$;:.10...(.B$.B$.A$:.A.20.B$.H
(B$,C(B$).2)...-..A$;:.15.7.2..A1(6),A(3
),B(3):Y.0:.".".7)G(14)".BAGELS.R.7..".W
OULD YOU LIKE TO SEE THE RULES (YES OR
NO)? ";...<..10:.B$."".55...A..H(B$,1
)."N"..".":.100.Q.F..:."I AM THINKING OF
A THREE-DIGIT NUMBER....K.."TRY TO G
UESS MY NUM- BER. I WILL GIVE YOU...P..
"CLUES AS FOLLOWS:.E.U..:."..BAGELS.. -
NO DIGITS CORRECT....Z.."..PICO.. -
ONE DIGIT CORRECT BUT IN THE WRON
G POSITION..S._.."..FERMI.. - ONE DIGIT
CORRECT AND IN THE RIGHT POSITION
......D..I.1.3...I.A(I)..(10..(1)):.I.1.
A(I).0.105...N..I.1.125.+.S..J.1.I.1:.A(
I).A(J).105.2.X..J.X.}..I:."OKAY, I HAVE
A NUMBER IN MIND. WHAT IS YOUR GUESS?."
:.I.1.20......"? ";:.10:.".".6);:.C(B$).
.3.245.T....Z.1.3:A1(Z).F(J(B$,Z,1)):.Z:
.J.1.3:.A1(J).48.150......A1(J).57.150..
...B(J).A1(J).48:.:.155......"WHAT?":.13
0.$....B(1).B(2).250.7. ..B(2).B(3).250.
J....B(3).B(1).250.P...C.0:D.0:.J.1.2:.A
(J).B(J.1).C.C.1......A(J.1).B(J).C.C.1.
.....:.A(1).B(3).C.C.1......A(3).B(1).C.
C.1.O....J.1.3:.A(J).B(J).D.D.1...C..:.D
.3.260...H..C.0.210...M..J.1.C:."..PICO.
.";:....R..D.0.225.-.W..J.1.D:."..FERMI.
.";:..?.....(0).0..".";.L....C.D.235.^..
.."..BAGELS.";.Y....:.:."OH, WELL, THAT'
S......"20 GUESSES. MY NUMBERWAS";100.A
(1).10.A(2).A(3)"...":.280......:."TRY G
UESSING A THREE- DIGIT NUMBER":.130.2...
.:."I FORGOT TO TELL YOU THAT THE NUMBE
R I HAVEIN MIND HAS NO TWO.O...."DIGITS
THE SAME.":.130.F....".YOU GOT IT!.":..
...Y.Y.1:E.E.I:.Y.1.280......"YOU HAVE P
LAYED"Y" GAMES, AND YOU ARE......"AVE
RAGING".((E.Y).10000..5).10000:."GUESSES
PER GAME.":......."AGAIN? ";:.10:.B$.""
.280.$....H(B$,1)."Y"..:.100.G."..:."HOP
E YOU HAD FUN. BYE....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL