BAGELSX2        
FILE INFORMATION
FILENAME(S): BAGELSX2        
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-02 22:11:33
APPEARS ON: 1 disk(s)
FILE HASH
e394680987563cc13729774106bfca81db25b044b25f0e1b83ffd092115bc6ff
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PUBLIC DOMAIN | BAGELSX2         | PRG | Treasure Chest - ToGuMi | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 29 04 64 00 99 22 93 20 42 41 47 45 4C 53 |..).d..". BAGELS| 00000010: 20 20 20 20 20 20 20 12 4A 49 4D 20 42 55 54 54 | .JIM BUTT| 00000020: 45 52 46 49 45 4C 44 11 22 00 53 04 6E 00 85 22 |ERFIELD.".S.n.."| 00000030: 57 41 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E |WANT INSTRUCTION| 00000040: 53 22 3B 5A 24 3A 8B C6 28 5A 24 29 B2 37 38 89 |S";Z$:..(Z$).78.| 00000050: 32 38 30 00 82 04 78 00 99 22 11 41 20 47 55 45 |280...x..".A GUE| 00000060: 53 53 49 4E 47 20 47 41 4D 45 20 42 41 53 45 44 |SSING GAME BASED| 00000070: 20 4F 4E 20 53 45 43 52 45 54 20 43 4F 44 45 53 | ON SECRET CODES| 00000080: 3A 22 00 A9 04 82 00 99 22 20 20 59 4F 55 20 54 |:"......" YOU T| 00000090: 48 49 4E 4B 20 55 50 20 41 20 53 45 43 52 45 54 |HINK UP A SECRET| 000000A0: 20 43 4F 44 45 20 4F 46 22 00 D2 04 8C 00 99 22 | CODE OF"......"| 000000B0: 20 20 20 20 34 20 4C 45 54 54 45 52 53 2C 20 45 | 4 LETTERS, E| 000000C0: 41 43 48 20 12 41 92 20 54 4F 20 12 46 92 2E 2E |ACH .A. TO .F...| 000000D0: 2E 22 00 F9 04 96 00 99 22 20 20 2E 2E 41 4E 44 |."......" ..AND| 000000E0: 20 49 27 4C 4C 20 54 48 49 4E 4B 20 4F 46 20 4F | I'LL THINK OF O| 000000F0: 4E 45 2C 20 54 4F 4F 11 22 00 28 05 A0 00 99 22 |NE, TOO.".(...."| 00000100: 57 45 20 45 41 43 48 20 54 41 4B 45 20 54 55 52 |WE EACH TAKE TUR| 00000110: 4E 53 20 47 55 45 53 53 49 4E 47 20 54 48 45 20 |NS GUESSING THE | 00000120: 4F 54 48 45 52 27 53 22 00 53 05 AA 00 99 22 43 |OTHER'S".S...."C| 00000130: 4F 44 45 2E 20 20 4F 4E 20 45 41 43 48 20 47 55 |ODE. ON EACH GU| 00000140: 45 53 53 20 57 45 27 4C 4C 20 42 45 20 54 4F 4C |ESS WE'LL BE TOL| 00000150: 44 3A 22 00 80 05 B4 00 99 22 20 20 2D 2D 45 58 |D:"......" --EX| 00000160: 41 43 54 20 4D 41 54 43 48 45 53 3B 20 47 55 45 |ACT MATCHES; GUE| 00000170: 53 53 49 4E 47 20 54 48 45 20 52 49 47 48 54 22 |SSING THE RIGHT"| 00000180: 00 A5 05 BE 00 99 22 20 20 20 20 4C 45 54 54 45 |......" LETTE| 00000190: 52 20 49 4E 20 54 48 45 20 52 49 47 48 54 20 50 |R IN THE RIGHT P| 000001A0: 4C 41 43 45 3B 00 D1 05 C8 00 99 22 20 20 2D 2D |LACE;......" --| 000001B0: 4F 54 48 45 52 20 4D 41 54 43 48 45 53 3B 20 54 |OTHER MATCHES; T| 000001C0: 48 45 20 52 49 47 48 54 20 4C 45 54 54 45 52 2C |HE RIGHT LETTER,| 000001D0: 22 00 F3 05 D2 00 99 22 20 20 20 20 42 55 54 20 |"......" BUT | 000001E0: 49 4E 20 54 48 45 20 57 52 4F 4E 47 20 50 4C 41 |IN THE WRONG PLA| 000001F0: 43 45 2E 00 20 06 DC 00 99 22 11 43 4F 55 4E 54 |CE.. ....".COUNT| 00000200: 20 43 41 52 45 46 55 4C 4C 59 2C 20 41 4E 44 20 | CAREFULLY, AND | 00000210: 44 4F 4E 27 54 20 46 4F 52 47 45 54 20 54 4F 22 |DON'T FORGET TO"| 00000220: 00 44 06 E6 00 99 22 41 4C 4C 4F 57 20 46 4F 52 |.D...."ALLOW FOR| 00000230: 20 44 55 50 4C 49 43 41 54 45 20 4C 45 54 54 45 | DUPLICATE LETTE| 00000240: 52 53 3A 22 00 72 06 F0 00 99 22 20 20 45 2E 47 |RS:".r...." E.G| 00000250: 2E 2C 20 49 46 20 4D 59 20 53 45 43 52 45 54 20 |., IF MY SECRET | 00000260: 43 4F 44 45 20 49 53 20 27 46 41 46 44 27 41 4E |CODE IS 'FAFD'AN| 00000270: 44 22 00 9A 06 FA 00 99 22 20 20 20 20 59 4F 55 |D"......" YOU| 00000280: 20 47 55 45 53 53 20 27 46 41 44 45 27 2C 20 59 | GUESS 'FADE', Y| 00000290: 4F 55 27 4C 4C 20 47 45 54 22 00 C1 06 04 01 99 |OU'LL GET"......| 000002A0: 22 20 20 20 20 20 20 32 20 45 58 41 43 54 20 28 |" 2 EXACT (| 000002B0: 54 48 45 20 46 20 41 4E 44 20 54 48 45 20 41 29 |THE F AND THE A)| 000002C0: 22 00 E0 06 0E 01 99 22 20 20 20 20 20 20 31 20 |"......" 1 | 000002D0: 4D 41 54 43 48 20 28 54 48 45 20 44 29 2E 11 22 |MATCH (THE D).."| 000002E0: 00 11 07 18 01 86 43 24 28 36 29 2C 4D 28 34 2C |......C$(6),M(4,| 000002F0: 31 30 29 2C 52 28 32 2C 31 30 29 2C 54 28 34 29 |10),R(2,10),T(4)| 00000300: 2C 5A 28 31 2C 34 29 2C 47 28 34 29 2C 53 28 34 |,Z(1,4),G(4),S(4| 00000310: 29 00 1E 07 22 01 4A B2 BB 28 AB 54 49 29 00 43 |)...".J..(.TI).C| 00000320: 07 2C 01 81 4A B2 31 A4 34 3A 54 28 4A 29 B2 31 |.,..J.1.4:T(J).1| 00000330: 3A 53 28 4A 29 B2 B5 28 BB 28 31 29 AC 36 AA 31 |:S(J)..(.(1).6.1| 00000340: 29 3A 82 00 6F 07 36 01 85 22 48 41 56 45 20 59 |):..o.6.."HAVE Y| 00000350: 4F 55 20 54 48 4F 55 47 48 54 20 4F 46 20 41 20 |OU THOUGHT OF A | 00000360: 53 45 43 52 45 54 20 43 4F 44 45 22 3B 5A 24 00 |SECRET CODE";Z$.| 00000370: 8A 07 40 01 81 4A B2 31 A4 36 3A 43 24 28 4A 29 |..@..J.1.6:C$(J)| 00000380: B2 C7 28 4A AA 36 34 29 3A 82 00 C4 07 4A 01 81 |..(J.64):....J..| 00000390: 4A B2 31 A4 36 3A 4B B2 B5 28 BB 28 31 29 AC 36 |J.1.6:K..(.(1).6| 000003A0: 29 AA 31 3A 43 24 B2 43 24 28 4A 29 3A 43 24 28 |).1:C$.C$(J):C$(| 000003B0: 4A 29 B2 43 24 28 4B 29 3A 43 24 28 4B 29 B2 43 |J).C$(K):C$(K).C| 000003C0: 24 3A 82 4A 00 F1 07 54 01 99 22 93 2D 2D 2D 2D |$:.J...T..".----| 000003D0: 2D 20 59 4F 55 52 20 2D 2D 2D 2D 2D 2D 2D 20 20 |- YOUR ------- | 000003E0: 20 20 20 20 2D 2D 2D 20 4D 59 20 2D 2D 2D 2D 2D | --- MY -----| 000003F0: 22 00 1E 08 5E 01 99 22 47 55 45 53 53 20 20 45 |"...^.."GUESS E| 00000400: 58 41 43 54 20 4D 41 54 43 48 20 20 20 20 20 47 |XACT MATCH G| 00000410: 55 45 53 53 20 45 58 41 20 4D 41 54 11 22 00 2A |UESS EXA MAT.".*| 00000420: 08 68 01 81 4A B2 31 A4 31 30 00 3D 08 72 01 81 |.h..J.1.10.=.r..| 00000430: 4A 31 B2 31 A4 34 3A 99 22 A6 9D 22 3B 00 50 08 |J1.1.4:."..";.P.| 00000440: 7C 01 A1 5A 24 3A 8B 5A 24 B2 22 22 89 33 38 30 ||..Z$:.Z$."".380| 00000450: 00 6B 08 86 01 5A B2 C6 28 5A 24 29 3A 8B 5A B3 |.k...Z..(Z$):.Z.| 00000460: 36 35 B0 5A B1 37 30 89 33 38 30 00 83 08 90 01 |65.Z.70.380.....| 00000470: 99 5A 24 3B 3A 47 28 4A 31 29 B2 5A AB 36 34 3A |.Z$;:G(J1).Z.64:| 00000480: 82 4A 31 00 C3 08 9A 01 47 31 B2 30 3A 81 4A 31 |.J1.....G1.0:.J1| 00000490: B2 31 A4 34 3A 5A 28 30 2C 4A 31 29 B2 30 3A 5A |.1.4:Z(0,J1).0:Z| 000004A0: 28 31 2C 4A 31 29 B2 AB 31 3A 8B 47 28 4A 31 29 |(1,J1)..1:.G(J1)| 000004B0: B2 53 28 4A 31 29 A7 47 31 B2 47 31 AA 31 3A 89 |.S(J1).G1.G1.1:.| 000004C0: 34 33 30 00 E3 08 A4 01 5A 28 30 2C 4A 31 29 B2 |430.....Z(0,J1).| 000004D0: 47 28 4A 31 29 3A 5A 28 31 2C 4A 31 29 B2 53 28 |G(J1):Z(1,J1).S(| 000004E0: 4A 31 29 00 03 09 AE 01 82 4A 31 3A 99 22 20 20 |J1)......J1:." | 000004F0: 20 22 3B 47 31 3B 3A 8B 47 31 B2 34 A7 99 3A 89 | ";G1;:.G1.4..:.| 00000500: 37 37 30 00 1C 09 B8 01 47 31 B2 30 3A 81 4A 31 |770.....G1.0:.J1| 00000510: B2 31 A4 34 3A 81 4B 31 B2 31 A4 34 00 4F 09 C2 |.1.4:.K1.1.4.O..| 00000520: 01 8B 5A 28 30 2C 4A 31 29 B2 5A 28 31 2C 4B 31 |..Z(0,J1).Z(1,K1| 00000530: 29 A7 5A 28 30 2C 4A 31 29 B2 2E 31 3A 5A 28 31 |).Z(0,J1)..1:Z(1| 00000540: 2C 4B 31 29 B2 2E 32 3A 47 31 B2 47 31 AA 31 00 |,K1)..2:G1.G1.1.| 00000550: 6E 09 CC 01 82 4B 31 2C 4A 31 3A 99 22 20 20 20 |n....K1,J1:." | 00000560: 22 3B 47 31 3B 22 12 22 3B A3 32 33 29 3B 00 9A |";G1;".";.23);..| 00000570: 09 D6 01 8B 4A B2 31 A7 81 4B B2 31 A4 34 3A 4D |....J.1..K.1.4:M| 00000580: 28 4B 2C 4A 29 B2 4B AB 31 3A 82 4B 3A 4D 28 31 |(K,J).K.1:.K:M(1| 00000590: 2C 31 29 B2 31 3A 89 36 34 30 00 AB 09 E0 01 81 |,1).1:.640......| 000005A0: 4A 31 B2 4A AB 31 A4 31 A9 AB 31 00 BF 09 EA 01 |J1.J.1.1..1.....| 000005B0: 47 31 B2 52 28 31 2C 4A 31 29 3A 47 32 B2 30 00 |G1.R(1,J1):G2.0.| 000005C0: CB 09 F4 01 81 4B 31 B2 31 A4 34 00 F3 09 FE 01 |.....K1.1.4.....| 000005D0: 8B 54 28 4B 31 29 B2 4D 28 4B 31 2C 4A 31 29 A7 |.T(K1).M(K1,J1).| 000005E0: 47 32 B2 47 32 AA 31 3A 8B 47 32 B1 47 31 89 20 |G2.G2.1:.G2.G1. | 000005F0: 37 33 30 00 10 0A 08 02 82 4B 31 3A 4B 31 B2 4B |730......K1:K1.K| 00000600: 31 AB 31 3A 8B 47 32 B3 B1 47 31 89 20 37 33 30 |1.1:.G2..G1. 730| 00000610: 00 18 0A 12 02 82 4A 31 00 29 0A 1C 02 81 4A 31 |......J1.)....J1| 00000620: B2 4A AB 31 A4 31 A9 AB 31 00 38 0A 26 02 47 31 |.J.1.1..1.8.&.G1| 00000630: B2 52 28 32 2C 4A 31 29 00 43 0A 30 02 81 58 B2 |.R(2,J1).C.0..X.| 00000640: 31 A4 34 00 84 0A 3A 02 5A 28 30 2C 58 29 B2 30 |1.4...:.Z(0,X).0| 00000650: 3A 5A 28 31 2C 58 29 B2 AB 31 3A 8B 54 28 58 29 |:Z(1,X)..1:.T(X)| 00000660: B3 B1 4D 28 58 2C 4A 31 29 A7 5A 28 30 2C 58 29 |..M(X,J1).Z(0,X)| 00000670: B2 54 28 58 29 3A 5A 28 31 2C 58 29 B2 4D 28 58 |.T(X):Z(1,X).M(X| 00000680: 2C 4A 31 29 00 8B 0A 44 02 82 58 00 B6 0A 4E 02 |,J1)...D..X...N.| 00000690: 47 32 B2 30 3A 81 58 B2 31 A4 34 3A 81 59 B2 31 |G2.0:.X.1.4:.Y.1| 000006A0: A4 34 3A 8B 5A 28 30 2C 58 29 B3 B1 5A 28 31 2C |.4:.Z(0,X)..Z(1,| 000006B0: 59 29 89 36 32 30 00 CE 0A 58 02 47 32 B2 47 32 |Y).620...X.G2.G2| 000006C0: AA 31 3A 8B 47 32 B1 47 31 89 20 37 33 30 00 E6 |.1:.G2.G1. 730..| 000006D0: 0A 62 02 5A 28 30 2C 58 29 B2 2E 35 3A 5A 28 31 |.b.Z(0,X)..5:Z(1| 000006E0: 2C 59 29 B2 2E 39 00 FC 0A 6C 02 82 59 2C 58 3A |,Y)..9...l..Y,X:| 000006F0: 8B 47 31 B3 B1 47 32 89 20 37 33 30 00 19 0B 76 |.G1..G2. 730...v| 00000700: 02 82 4A 31 3A 81 58 B2 31 A4 34 3A 4D 28 58 2C |..J1:.X.1.4:M(X,| 00000710: 4A 29 B2 54 28 58 29 3A 82 00 3F 0B 80 02 81 4B |J).T(X):..?....K| 00000720: B2 31 A4 34 3A 99 43 24 28 4D 28 4B 2C 4A 29 29 |.1.4:.C$(M(K,J))| 00000730: 3B 3A 82 4B 3A 99 22 92 20 20 20 A6 9D 22 3B 00 |;:.K:.". ..";.| 00000740: 52 0B 8A 02 A1 5A 24 3A 8B 5A 24 B2 22 22 89 36 |R....Z$:.Z$."".6| 00000750: 35 30 00 6D 0B 94 02 5A B2 C6 28 5A 24 29 3A 8B |50.m...Z..(Z$):.| 00000760: 5A B3 34 38 B0 5A B1 35 32 89 36 35 30 00 A1 0B |Z.48.Z.52.650...| 00000770: 9E 02 52 28 32 2C 4A 29 B2 30 3A 52 28 31 2C 4A |..R(2,J).0:R(1,J| 00000780: 29 B2 5A AB 34 38 3A 99 5A 24 3B 22 20 20 20 A6 |).Z.48:.Z$;" .| 00000790: 9D 22 3B 3A 8B 52 28 31 2C 4A 29 B2 34 89 39 37 |.";:.R(1,J).4.97| 000007A0: 30 00 B4 0B A8 02 8B 52 28 31 2C 4A 29 B2 33 A7 |0......R(1,J).3.| 000007B0: 89 37 31 30 00 C7 0B B2 02 A1 5A 24 3A 8B 5A 24 |.710......Z$:.Z$| 000007C0: B2 22 22 89 36 39 30 00 EE 0B BC 02 5A B2 C6 28 |."".690.....Z..(| 000007D0: 5A 24 29 3A 52 28 32 2C 4A 29 B2 5A AB 34 38 3A |Z$):R(2,J).Z.48:| 000007E0: 8B 5A B3 34 38 B0 5A B1 35 32 89 36 39 30 00 00 |.Z.48.Z.52.690..| 000007F0: 0C C6 02 99 C7 28 52 28 32 2C 4A 29 AA 34 38 29 |.....(R(2,J).48)| 00000800: 00 07 0C D0 02 82 4A 00 29 0C DA 02 8B 4B 31 B3 |......J.)....K1.| 00000810: B1 34 A7 81 4B 32 B2 4B 31 AA 31 A4 34 3A 54 28 |.4..K2.K1.1.4:T(| 00000820: 4B 32 29 B2 31 3A 82 4B 32 00 69 0C E4 02 54 28 |K2).1:.K2.i...T(| 00000830: 4B 31 29 B2 54 28 4B 31 29 AA 31 3A 8B 54 28 4B |K1).T(K1).1:.T(K| 00000840: 31 29 B1 36 A7 54 28 4B 31 29 B2 31 3A 4B 31 B2 |1).6.T(K1).1:K1.| 00000850: 4B 31 AB 31 3A 99 C7 28 4B 31 AA 35 38 29 3B 22 |K1.1:..(K1.58);"| 00000860: 9D 22 3B 3A 89 20 37 34 30 00 78 0C EE 02 8B 4B |.";:. 740.x....K| 00000870: 31 B3 B1 30 89 34 38 30 00 8F 0C F8 02 99 3A 99 |1..0.480......:.| 00000880: 22 49 20 47 49 56 45 20 55 50 21 20 20 22 3B 00 |"I GIVE UP! ";.| 00000890: AC 0C 02 03 85 22 57 48 41 54 20 57 41 53 20 59 |....."WHAT WAS Y| 000008A0: 4F 55 52 20 43 4F 44 45 22 3B 5A 24 00 DD 0C 0C |OUR CODE";Z$....| 000008B0: 03 8B C3 28 5A 24 29 B3 B1 34 A7 5A 24 B2 5A 24 |...(Z$)..4.Z$.Z$| 000008C0: AA 22 20 49 53 4E 27 54 20 34 20 43 48 41 52 41 |." ISN'T 4 CHARA| 000008D0: 43 54 45 52 53 21 22 3A 89 20 39 36 30 00 0D 0D |CTERS!":. 960...| 000008E0: 16 03 81 4A 31 B2 31 A4 34 3A 58 24 B2 CA 28 5A |...J1.1.4:X$..(Z| 000008F0: 24 2C 4A 31 2C 31 29 3A 81 4B B2 31 A4 36 3A 8B |$,J1,1):.K.1.6:.| 00000900: 58 24 B2 43 24 28 4B 29 89 20 38 31 30 00 39 0D |X$.C$(K). 810.9.| 00000910: 20 03 82 4B 3A 5A 24 B2 58 24 AA 22 20 49 53 4E | ..K:Z$.X$." ISN| 00000920: 27 54 20 41 20 4C 45 47 41 4C 20 4C 45 54 54 45 |'T A LEGAL LETTE| 00000930: 52 21 22 3A 89 20 39 36 30 00 49 0D 2A 03 54 28 |R!":. 960.I.*.T(| 00000940: 4A 31 29 B2 4B 3A 82 4A 31 00 57 0D 34 03 81 4A |J1).K:.J1.W.4..J| 00000950: 31 B2 31 A4 4A AB 31 00 6C 0D 3E 03 47 31 B2 30 |1.1.J.1.l.>.G1.0| 00000960: 3A 47 32 B2 30 3A 81 4B B2 31 A4 34 00 9F 0D 48 |:G2.0:.K.1.4...H| 00000970: 03 5A 28 30 2C 4B 29 B2 30 3A 5A 28 31 2C 4B 29 |.Z(0,K).0:Z(1,K)| 00000980: B2 AB 31 3A 8B 54 28 4B 29 B2 4D 28 4B 2C 4A 31 |..1:.T(K).M(K,J1| 00000990: 29 A7 47 31 B2 47 31 AA 31 3A 89 20 38 36 30 00 |).G1.G1.1:. 860.| 000009A0: BE 0D 52 03 5A 28 30 2C 4B 29 B2 54 28 4B 29 3A |..R.Z(0,K).T(K):| 000009B0: 5A 28 31 2C 4B 29 B2 4D 28 4B 2C 4A 31 29 00 FD |Z(1,K).M(K,J1)..| 000009C0: 0D 5C 03 82 4B 3A 81 4B B2 31 A4 34 3A 81 58 B2 |.\..K:.K.1.4:.X.| 000009D0: 31 A4 34 3A 8B 5A 28 30 2C 4B 29 B2 5A 28 31 2C |1.4:.Z(0,K).Z(1,| 000009E0: 58 29 A7 47 32 B2 47 32 AA 31 3A 5A 28 30 2C 4B |X).G2.G2.1:Z(0,K| 000009F0: 29 B2 30 3A 5A 28 31 2C 58 29 B2 AB 31 00 06 0E |).0:Z(1,X)..1...| 00000A00: 66 03 82 58 2C 4B 00 28 0E 70 03 8B 47 31 B3 B1 |f..X,K.(.p..G1..| 00000A10: 52 28 31 2C 4A 31 29 B0 47 32 B3 B1 52 28 32 2C |R(1,J1).G2..R(2,| 00000A20: 4A 31 29 89 20 39 30 30 00 36 0E 7A 03 82 4A 31 |J1). 900.6.z..J1| 00000A30: 3A 89 31 30 32 30 00 56 0E 84 03 99 22 12 20 4A |:.1020.V....". J| 00000A40: 55 53 54 20 41 20 44 41 52 4E 45 44 20 4D 49 4E |UST A DARNED MIN| 00000A50: 55 54 45 21 20 22 00 7E 0E 8E 03 99 22 4F 4E 20 |UTE! ".~...."ON | 00000A60: 47 55 45 53 53 20 23 22 3B 4A 31 3B 22 59 4F 55 |GUESS #";J1;"YOU| 00000A70: 20 53 41 49 44 20 54 48 41 54 20 4D 59 22 00 A0 | SAID THAT MY"..| 00000A80: 0E 98 03 99 22 27 22 3B 3A 81 4B B2 31 A4 34 3A |...."'";:.K.1.4:| 00000A90: 99 43 24 28 4D 28 4B 2C 4A 31 29 29 3B 3A 82 4B |.C$(M(K,J1));:.K| 00000AA0: 00 C7 0E A2 03 99 22 27 20 43 4F 55 4E 54 45 44 |......"' COUNTED| 00000AB0: 22 3B 52 28 31 2C 4A 31 29 3B 22 41 4E 44 22 3B |";R(1,J1);"AND";| 00000AC0: 52 28 32 2C 4A 31 29 00 E3 0E AC 03 99 22 12 49 |R(2,J1)......".I| 00000AD0: 20 47 45 54 22 3B 47 31 3B 22 9D 20 41 4E 44 22 | GET";G1;". AND"| 00000AE0: 3B 47 32 00 ED 0E B6 03 89 20 39 39 30 00 03 0F |;G2...... 990...| 00000AF0: C0 03 99 22 48 45 59 2D 2D 22 3B 5A 24 3A 89 20 |..."HEY--";Z$:. | 00000B00: 39 39 30 00 13 0F CA 03 99 20 22 48 4F 4F 52 41 |990...... "HOORA| 00000B10: 59 21 22 00 47 0F D4 03 99 22 11 4D 59 20 43 4F |Y!".G....".MY CO| 00000B20: 44 45 20 57 41 53 20 27 22 3B 3A 81 4A B2 31 A4 |DE WAS '";:.J.1.| 00000B30: 34 3A 99 C7 28 53 28 4A 29 AA 36 34 29 3B 3A 82 |4:..(S(J).64);:.| 00000B40: 4A 3A 99 22 27 11 22 00 5D 0F DE 03 85 22 41 4E |J:."'.".]...."AN| 00000B50: 4F 54 48 45 52 20 4F 4E 45 22 3B 5A 24 00 70 0F |OTHER ONE";Z$.p.| 00000B60: E8 03 8B C6 28 5A 24 29 B3 B1 37 38 89 33 30 30 |....(Z$)..78.300| 00000B70: 00 76 0F F2 03 80 00 9B 0F FC 03 99 22 2A 2A 2A |.v.........."***| 00000B80: 20 59 4F 55 20 57 49 4E 20 54 48 49 53 20 4F 4E | YOU WIN THIS ON| 00000B90: 45 20 2A 2A 2A 22 3A 89 39 39 30 00 00 00 60 |E ***":.990...` |
..).D..". BAGELS .JIM BUTTERFIELD. ".S.N.."WANT INSTRUCTIONS";Z$:.F(Z$).78. 280...X..".A GUESSING GAME BASED ON SECR ET CODES:"......" YOU THINK UP A SECRET CODE OF".R...." 4 LETTERS, EACH .A. TO .F...."......" ..AND I'LL THINK OF O NE, TOO.".(. .."WE EACH TAKE TURNS GUESS ING THE OTHER'S".S...."CODE. ON EACH GU ESS WE'LL BE TOLD:"......" --EXACT MATC HES; GUESSING THE RIGHT"......" LETTE R IN THE RIGHT PLACE;.Q.H.." --OTHER MA TCHES; THE RIGHT LETTER,"...R.." BUT IN THE WRONG PLACE.. ....".COUNT CAREFUL LY, AND DON'T FORGET TO".D...."ALLOW FOR DUPLICATE LETTERS:".R...." E.G., IF MY SECRET CODE IS 'FAFD'AND"......" YOU GUESS 'FADE', YOU'LL GET".A...." 2 EXACT (THE F AND THE A)"......" 1 MATCH (THE D).."......C$(6),M(4,10),R(2, 10),T(4),Z(1,4),G(4),S(4)...".J..(.TI).C .,..J.1.4:T(J).1:S(J)..(.(1).6.1):..O.6. ."HAVE YOU THOUGHT OF A SECRET CODE";Z$. ..@..J.1.6:C$(J).G(J.64):..D.J..J.1.6:K. .(.(1).6).1:C$.C$(J):C$(J).C$(K):C$(K).C $:.J...T..".----- YOUR ------- --- MY -----"...^.."GUESS EXACT MATCH G UESS EXA MAT.".*.H..J.1.10.=.R..J1.1.4:. "..";.P.|..Z$:.Z$."".380.K...Z.F(Z$):.Z. 65.Z.70.380......Z$;:G(J1).Z.64:.J1.C... G1.0:.J1.1.4:Z(0,J1).0:Z(1,J1)..1:.G(J1) .S(J1).G1.G1.1:.430.....Z(0,J1).G(J1):Z( 1,J1).S(J1)......J1:." ";G1;:.G1.4..:. 770.....G1.0:.J1.1.4:.K1.1.4.O.B..Z(0,J1 ).Z(1,K1).Z(0,J1)..1:Z(1,K1)..2:G1.G1.1. N.L..K1,J1:." ";G1;".";.23);...V..J.1. .K.1.4:M(K,J).K.1:.K:M(1,1).1:.640...... J1.J.1.1..1.....G1.R(1,J1):G2.0.K....K1. 1.4......T(K1).M(K1,J1).G2.G2.1:.G2.G1. 730......K1:K1.K1.1:.G2..G1. 730......J1 .)....J1.J.1.1..1.8.&.G1.R(2,J1).C.0..X. 1.4...:.Z(0,X).0:Z(1,X)..1:.T(X)..M(X,J1 ).Z(0,X).T(X):Z(1,X).M(X,J1)...D..X...N. G2.0:.X.1.4:.Y.1.4:.Z(0,X)..Z(1,Y).620.N .X.G2.G2.1:.G2.G1. 730...B.Z(0,X)..5:Z(1 ,Y)..9...L..Y,X:.G1..G2. 730...V..J1:.X. 1.4:M(X,J).T(X):..?....K.1.4:.C$(M(K,J)) ;:.K:.". ..";.R....Z$:.Z$."".650.M...Z .F(Z$):.Z.48.Z.52.650.....R(2,J).0:R(1,J ).Z.48:.Z$;" ..";:.R(1,J).4.970......R (1,J).3..710.G....Z$:.Z$."".690.....Z.F( Z$):R(2,J).Z.48:.Z.48.Z.52.690...F..G(R( 2,J).48)...P..J.).Z..K1..4..K2.K1.1.4:T( K2).1:.K2.I...T(K1).T(K1).1:.T(K1).6.T(K 1).1:K1.K1.1:.G(K1.58);".";:. 740.X....K 1..0.480......:."I GIVE UP! ";......"WH AT WAS YOUR CODE";Z$......C(Z$)..4.Z$.Z$ ." ISN'T 4 CHARACTERS!":. 960......J1.1. 4:X$.J(Z$,J1,1):.K.1.6:.X$.C$(K). 810.9. ..K:Z$.X$." ISN'T A LEGAL LETTER!":. 96 0.I.*.T(J1).K:.J1.W.4..J1.1.J.1.L.>.G1.0 :G2.0:.K.1.4...H.Z(0,K).0:Z(1,K)..1:.T(K ).M(K,J1).G1.G1.1:. 860...R.Z(0,K).T(K): Z(1,K).M(K,J1)...\..K:.K.1.4:.X.1.4:.Z(0 ,K).Z(1,X).G2.G2.1:Z(0,K).0:Z(1,X)..1... F..X,K.(.P..G1..R(1,J1).G2..R(2,J1). 900 .6.Z..J1:.1020.V....". JUST A DARNED MIN UTE! ".~...."ON GUESS #";J1;"YOU SAID TH AT MY". ...."'";:.K.1.4:.C$(M(K,J1));:.K .G...."' COUNTED";R(1,J1);"AND";R(2,J1). .....".I GET";G1;". AND";G2...... 990... ..."HEY--";Z$:. 990...J.. "HOORAY!".G.T. .".MY CODE WAS '";:.J.1.4:.G(S(J).64);:. J:."'.".]...."ANOTHER ONE";Z$.P....F(Z$) ..78.300.V.........."*** YOU WIN THIS ON E ***":.990...`
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL