> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 05 00 8F 20 4D 20 52 49 43 48 54 45 |....... M RICHTE|
00000010: 52 20 39 30 30 36 34 20 46 45 42 20 37 39 00 35 |R 90064 FEB 79.5|
00000020: 08 0A 00 97 35 39 34 36 38 2C 31 32 3A 49 B2 BB |....59468,12:I..|
00000030: 28 AB 54 49 29 00 4F 08 14 00 86 4E 25 28 31 35 |(.TI).O....N%(15|
00000040: 29 2C 4E 4E 25 28 31 35 29 2C 4B 24 28 38 29 00 |),NN%(15),K$(8).|
00000050: 7A 08 1E 00 4B 24 28 38 29 B2 22 91 22 3A 4B 24 |z...K$(8).".":K$|
00000060: 28 35 29 B2 22 9D 22 3A 4B 24 28 33 29 B2 22 1D |(5).".":K$(3).".|
00000070: 22 3A 4B 24 28 30 29 B2 22 11 00 98 08 28 00 44 |":K$(0)."....(.D|
00000080: 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |$.".............|
00000090: 11 11 11 11 11 11 11 11 00 C1 08 32 00 99 22 93 |...........2..".|
000000A0: 11 11 20 20 20 20 20 20 20 20 20 20 20 12 20 4C |.. . L|
000000B0: 45 54 54 45 52 20 53 51 55 41 52 45 53 20 11 11 |ETTER SQUARES ..|
000000C0: 11 00 F7 08 3C 00 99 22 44 4F 20 59 4F 55 20 57 |....<.."DO YOU W|
000000D0: 41 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ANT INSTRUCTIONS|
000000E0: 3F 20 22 3B 3A 8D 32 35 30 30 3A 8B 43 24 B2 22 |? ";:.2500:.C$."|
000000F0: 4E 22 89 31 30 30 30 00 22 09 64 00 99 22 93 4C |N".1000.".d..".L|
00000100: 45 54 54 45 52 20 53 51 55 41 52 45 53 20 49 53 |ETTER SQUARES IS|
00000110: 20 54 48 45 20 47 41 4D 45 20 4F 46 20 27 31 35 | THE GAME OF '15|
00000120: 27 2C 00 50 09 6E 00 99 22 11 50 4C 41 59 45 44 |',.P.n..".PLAYED|
00000130: 20 57 49 54 48 20 54 48 45 20 4C 45 54 54 45 52 | WITH THE LETTER|
00000140: 53 20 41 2D 4F 20 49 4E 53 54 45 41 44 20 4F 46 |S A-O INSTEAD OF|
00000150: 00 80 09 78 00 99 22 11 57 49 54 48 20 4E 55 4D |...x..".WITH NUM|
00000160: 42 45 52 53 2E 20 20 54 48 45 20 4F 42 4A 45 43 |BERS. THE OBJEC|
00000170: 54 20 49 53 20 54 4F 20 4D 4F 56 45 20 54 48 45 |T IS TO MOVE THE|
00000180: 00 AB 09 82 00 99 22 4C 45 54 54 45 52 53 20 49 |......"LETTERS I|
00000190: 4E 54 4F 20 41 53 43 45 4E 44 49 4E 47 20 4F 52 |NTO ASCENDING OR|
000001A0: 20 44 45 53 43 45 4E 44 49 4E 47 00 D7 09 8C 00 | DESCENDING.....|
000001B0: 99 22 11 4F 52 44 45 52 20 42 59 20 53 4C 49 44 |.".ORDER BY SLID|
000001C0: 49 4E 47 20 54 48 45 4D 20 41 43 52 4F 53 53 20 |ING THEM ACROSS |
000001D0: 4F 52 20 44 4F 57 4E 00 06 0A 96 00 99 22 11 49 |OR DOWN......".I|
000001E0: 4E 54 4F 20 54 48 45 20 4F 50 45 4E 20 53 50 41 |NTO THE OPEN SPA|
000001F0: 43 45 2E 20 20 4F 4E 20 45 41 43 48 20 54 55 52 |CE. ON EACH TUR|
00000200: 4E 2C 20 59 4F 55 00 34 0A A0 00 99 22 11 4D 41 |N, YOU.4....".MA|
00000210: 59 20 4D 4F 56 45 20 4F 4E 4C 59 20 41 20 4C 45 |Y MOVE ONLY A LE|
00000220: 54 54 45 52 20 41 44 4A 41 43 45 4E 54 20 54 4F |TTER ADJACENT TO|
00000230: 20 54 48 45 00 5E 0A AA 00 99 22 11 4F 50 45 4E | THE.^....".OPEN|
00000240: 20 53 50 41 43 45 20 2D 20 4F 52 20 59 4F 55 20 | SPACE - OR YOU |
00000250: 4D 41 59 20 4B 45 59 20 27 40 27 20 54 4F 00 8D |MAY KEY '@' TO..|
00000260: 0A B4 00 99 22 11 53 54 41 52 54 20 4F 56 45 52 |....".START OVER|
00000270: 20 57 49 54 48 20 54 48 45 20 53 41 4D 45 20 50 | WITH THE SAME P|
00000280: 41 54 54 45 52 4E 2E 22 3A 8D 39 30 30 00 AF 0A |ATTERN.":.900...|
00000290: C8 00 99 22 54 48 45 20 57 49 4E 4E 49 4E 47 20 |..."THE WINNING |
000002A0: 50 4F 53 49 54 49 4F 4E 53 20 41 52 45 3A 11 00 |POSITIONS ARE:..|
000002B0: C8 0A D2 00 99 A6 39 29 22 41 42 43 44 20 20 20 |......9)"ABCD |
000002C0: 20 20 20 20 4F 4E 4D 4C 00 E1 0A DC 00 99 A6 39 | ONML.......9|
000002D0: 29 22 45 46 47 48 20 20 20 20 20 20 20 4B 4A 49 |)"EFGH KJI|
000002E0: 48 00 FA 0A E6 00 99 A6 39 29 22 49 4A 4B 4C 20 |H.......9)"IJKL |
000002F0: 20 41 4E 44 20 20 47 46 45 44 00 15 0B F0 00 99 | AND GFED......|
00000300: A6 39 29 22 4D 4E 4F 20 20 20 20 20 20 20 20 43 |.9)"MNO C|
00000310: 42 41 20 11 11 00 44 0B FA 00 99 22 28 4F 4E 4C |BA ...D...."(ONL|
00000320: 59 20 4F 4E 45 20 4F 46 20 54 48 45 4D 20 57 4F |Y ONE OF THEM WO|
00000330: 52 4B 53 20 46 4F 52 20 41 4E 59 20 50 41 54 54 |RKS FOR ANY PATT|
00000340: 45 52 4E 29 00 53 0B 5E 01 8D 39 30 30 3A 89 31 |ERN).S.^..900:.1|
00000350: 30 30 30 00 74 0B 84 03 99 22 11 12 20 48 49 54 |000.t....".. HIT|
00000360: 20 41 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E | A KEY TO CONTIN|
00000370: 55 45 20 22 00 87 0B 8E 03 A1 43 24 3A 8B 43 24 |UE "......C$:.C$|
00000380: B1 22 22 89 39 31 30 00 9A 0B 98 03 A1 43 24 3A |."".910......C$:|
00000390: 8B 43 24 B2 22 22 89 39 32 30 00 A5 0B A2 03 99 |.C$."".920......|
000003A0: 22 93 22 3A 8E 00 B0 0B E8 03 8F 20 50 4C 41 59 |".":....... PLAY|
000003B0: 00 C7 0B F2 03 81 49 B2 30 A4 31 35 3A 4E 25 28 |......I.0.15:N%(|
000003C0: 49 29 B2 49 3A 82 49 00 04 0C FC 03 81 49 B2 30 |I).I:.I......I.0|
000003D0: A4 31 34 3A 4A B2 28 31 36 AB 49 29 AC BB 28 31 |.14:J.(16.I)..(1|
000003E0: 29 3A 58 B2 4E 25 28 49 29 3A 4E 25 28 49 29 B2 |):X.N%(I):N%(I).|
000003F0: 4E 25 28 49 AA 4A 29 3A 4E 25 28 49 AA 4A 29 B2 |N%(I.J):N%(I.J).|
00000400: 58 3A 82 49 00 20 0C 06 04 81 49 B2 30 A4 31 35 |X:.I. ....I.0.15|
00000410: 3A 4E 4E 25 28 49 29 B2 4E 25 28 49 29 3A 82 49 |:NN%(I).N%(I):.I|
00000420: 00 49 0C 4C 04 4E 4D B2 30 3A 99 22 93 20 20 20 |.I.L.NM.0:.". |
00000430: 20 20 20 20 20 20 20 12 20 4C 45 54 54 45 52 20 | . LETTER |
00000440: 53 51 55 41 52 45 20 11 11 00 64 0C 56 04 99 A6 |SQUARE ...d.V...|
00000450: 39 29 22 B0 C0 C0 C0 B2 C0 C0 C0 B2 C0 C0 C0 B2 |9)".............|
00000460: C0 C0 C0 AE 00 7D 0C 60 04 81 49 B2 30 A4 32 3A |.....}.`..I.0.2:|
00000470: 99 A6 39 29 22 DD 22 A3 32 35 29 22 DD 00 8F 0C |..9)".".25)"....|
00000480: 6A 04 99 A6 39 29 22 DD 22 A3 32 35 29 22 DD 00 |j...9)".".25)"..|
00000490: AE 0C 74 04 99 A6 39 29 22 DD 20 20 20 DB 20 20 |..t...9)". . |
000004A0: 20 DB 20 20 20 DB 20 20 20 DD 22 3A 82 49 00 C0 | . . .":.I..|
000004B0: 0C 7E 04 99 A6 39 29 22 DD 22 A3 32 35 29 22 DD |.~...9)".".25)".|
000004C0: 00 EA 0C 88 04 99 A6 39 29 22 DD 22 A3 32 35 29 |.......9)".".25)|
000004D0: 22 DD 22 3A 99 A6 39 29 22 AD C0 C0 C0 B1 C0 C0 |".":..9)".......|
000004E0: C0 B1 C0 C0 C0 B1 C0 C0 C0 BD 00 1A 0D B0 04 99 |................|
000004F0: 22 13 11 22 3A 81 49 B2 30 A4 33 3A 99 3A 99 22 |"..":.I.0.3:.:."|
00000500: 11 11 22 A6 38 29 3B 3A 81 4A B2 30 A4 33 3A 55 |..".8);:.J.0.3:U|
00000510: B2 4E 25 28 4A AA 34 AC 49 29 00 3A 0D BA 04 99 |.N%(J.4.I).:....|
00000520: A6 33 29 C7 28 36 34 AA 55 AA 33 32 AC 28 55 B2 |.3).(64.U.32.(U.|
00000530: 30 29 29 3B 3A 82 4A 3A 82 49 00 5A 0D 14 05 81 |0));:.J:.I.Z....|
00000540: 49 B2 30 A4 31 34 3A 8B 4E 25 28 49 29 B2 49 AA |I.0.14:.N%(I).I.|
00000550: 31 A7 82 49 3A 89 32 30 30 30 00 7B 0D 1E 05 81 |1..I:.2000.{....|
00000560: 49 B2 30 A4 31 34 3A 8B 4E 25 28 49 29 B2 31 35 |I.0.14:.N%(I).15|
00000570: AB 49 A7 82 49 3A 89 32 30 30 30 00 91 0D 28 05 |.I..I:.2000...(.|
00000580: 81 49 B2 30 A4 31 34 3A 8B 4E 25 28 49 29 A7 82 |.I.0.14:.N%(I)..|
00000590: 49 00 CA 0D 32 05 58 B2 49 3A 49 B2 30 3A 99 3A |I...2.X.I:I.0:.:|
000005A0: 99 44 24 22 57 48 49 43 48 20 4C 45 54 54 45 52 |.D$"WHICH LETTER|
000005B0: 20 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 | DO YOU WANT TO |
000005C0: 4D 4F 56 45 3F 20 20 9D 22 3B 00 DE 0D 46 05 A1 |MOVE? .";...F..|
000005D0: 43 24 3A 8B 43 24 B1 22 22 89 31 33 35 30 00 FA |C$:.C$."".1350..|
000005E0: 0D 50 05 A1 43 24 3A 8B 43 24 B3 22 40 22 B0 43 |.P..C$:.C$."@".C|
000005F0: 24 B1 22 4F 22 89 31 33 36 30 00 0B 0E 55 05 8B |$."O".1360...U..|
00000600: 43 24 B2 22 40 22 89 32 30 36 30 00 35 0E 5A 05 |C$."@".2060.5.Z.|
00000610: 55 B2 C6 28 43 24 29 AB 36 34 3A 81 49 B2 30 A4 |U..(C$).64:.I.0.|
00000620: 31 35 3A 8B 4E 25 28 49 29 B3 B1 55 A7 82 49 3A |15:.N%(I)..U..I:|
00000630: 89 31 33 35 30 00 5C 0E 64 05 4A B2 49 3A 49 B2 |.1350.\.d.J.I:I.|
00000640: 30 3A 56 B2 4A AB 58 3A 8B B6 28 32 AC B6 28 56 |0:V.J.X:..(2..(V|
00000650: 29 AB 35 29 B3 B1 33 89 31 33 35 30 00 7C 0E 6E |).5)..3.1350.|.n|
00000660: 05 8B B6 28 56 29 B2 31 AF B5 28 4A AD 34 29 B3 |...(V).1..(J.4).|
00000670: B1 B5 28 58 AD 34 29 89 31 33 35 30 00 97 0E DC |..(X.4).1350....|
00000680: 05 8F 20 4D 4F 56 45 20 4C 45 54 54 45 52 20 54 |.. MOVE LETTER T|
00000690: 4F 20 42 4C 41 4E 4B 00 CA 0E E6 05 4E 4D B2 4E |O BLANK.....NM.N|
000006A0: 4D AA 31 3A 99 43 24 3A 4E 25 28 58 29 B2 55 3A |M.1:.C$:N%(X).U:|
000006B0: 4E 25 28 4A 29 B2 30 3A 58 24 B2 22 20 9D 22 AA |N%(J).0:X$." .".|
000006C0: 4B 24 28 56 AA 34 29 AA 43 24 00 E0 0E F0 05 99 |K$(V.4).C$......|
000006D0: C8 28 44 24 2C 35 AA 33 AC B5 28 4A AD 34 29 29 |.(D$,5.3..(J.4))|
000006E0: 00 FA 0E FA 05 99 A3 31 32 AA 34 AC 28 4A AB 34 |.......12.4.(J.4|
000006F0: AC B5 28 4A AD 34 29 29 29 3B 00 28 0F 0E 06 81 |..(J.4)));.(....|
00000700: 49 B2 30 A4 32 AB 28 B6 28 56 29 B2 31 29 3A 99 |I.0.2.(.(V).1):.|
00000710: 22 9D 20 9D 22 4B 24 28 56 AA 34 29 43 24 3B 3A |". ."K$(V.4)C$;:|
00000720: 82 49 3A 89 31 33 30 30 00 34 0F D0 07 8F 20 57 |.I:.1300.4.... W|
00000730: 49 4E 21 21 00 52 0F DA 07 99 22 93 11 11 11 43 |IN!!.R...."....C|
00000740: 4F 4E 47 52 41 54 55 4C 41 54 49 4F 4E 53 21 21 |ONGRATULATIONS!!|
00000750: 11 11 00 7D 0F E4 07 99 22 59 4F 55 20 50 55 54 |...}...."YOU PUT|
00000760: 20 54 48 45 4D 20 49 4E 20 4F 52 44 45 52 20 49 | THEM IN ORDER I|
00000770: 4E 22 4E 4D 22 4D 4F 56 45 53 2E 11 11 00 B4 0F |N"NM"MOVES......|
00000780: EE 07 99 22 44 4F 20 59 4F 55 20 57 41 4E 54 20 |..."DO YOU WANT |
00000790: 54 4F 20 50 4C 41 59 20 41 47 41 49 4E 3F 20 22 |TO PLAY AGAIN? "|
000007A0: 3B 3A 8D 32 35 30 30 3A 8B 43 24 B2 22 4E 22 89 |;:.2500:.C$."N".|
000007B0: 32 31 30 30 00 F0 0F 02 08 99 22 11 11 44 4F 20 |2100......"..DO |
000007C0: 59 4F 55 20 57 41 4E 54 20 54 48 45 20 53 41 4D |YOU WANT THE SAM|
000007D0: 45 20 50 41 54 54 45 52 4E 3F 20 22 3B 3A 8D 32 |E PATTERN? ";:.2|
000007E0: 35 30 30 3A 8B 43 24 B2 22 4E 22 89 31 30 30 30 |500:.C$."N".1000|
000007F0: 00 12 10 0C 08 81 49 B2 30 A4 31 35 3A 4E 25 28 |......I.0.15:N%(|
00000800: 49 29 B2 4E 4E 25 28 49 29 3A 82 49 3A 89 31 31 |I).NN%(I):.I:.11|
00000810: 30 30 00 47 10 34 08 99 22 11 11 4F 4B 41 59 2C |00.G.4.."..OKAY,|
00000820: 20 54 59 50 45 20 27 52 55 4E 27 20 46 4F 52 20 | TYPE 'RUN' FOR |
00000830: 41 4E 4F 54 48 45 52 20 57 48 45 4E 20 59 4F 55 |ANOTHER WHEN YOU|
00000840: 27 52 45 22 3B 3A 80 00 5B 10 C4 09 A1 43 24 3A |'RE";:..[....C$:|
00000850: 8B 43 24 B1 22 22 89 32 35 30 30 00 78 10 CE 09 |.C$."".2500.x...|
00000860: A1 43 24 3A 8B 43 24 B2 22 59 22 B0 43 24 B2 22 |.C$:.C$."Y".C$."|
00000870: 4E 22 A7 99 43 24 3A 8E 00 82 10 D8 09 89 32 35 |N"..C$:.......25|
00000880: 31 30 00 00 00 24 |10...$ |
....... M RICHTER 90064 FEB 79.5....5946
8,12:I..(.TI).O....N%(15),NN%(15),K$(8).
Z...K$(8).".":K$(5).".":K$(3).".":K$(0).
"....(.D$."......................A.2..".
.. . LETTER SQUARES ......<.."
DO YOU WANT INSTRUCTIONS? ";:.2500:.C$."
N".1000.".D..".LETTER SQUARES IS THE GAM
E OF '15',.P.N..".PLAYED WITH THE LETTER
S A-O INSTEAD OF...X..".WITH NUMBERS. T
HE OBJECT IS TO MOVE THE......"LETTERS I
NTO ASCENDING OR DESCENDING.W....".ORDER
BY SLIDING THEM ACROSS OR DOWN......".I
NTO THE OPEN SPACE. ON EACH TURN, YOU.4
. ..".MAY MOVE ONLY A LETTER ADJACENT TO
THE.^....".OPEN SPACE - OR YOU MAY KEY
'@' TO......".START OVER WITH THE SAME P
ATTERN.":.900...H.."THE WINNING POSITION
S ARE:..H.R...9)"ABCD ONML.......9
)"EFGH KJIH.......9)"IJKL AND GF
ED.......9)"MNO CBA ...D...."(ONL
Y ONE OF THEM WORKS FOR ANY PATTERN).S.^
..900:.1000.T....".. HIT A KEY TO CONTIN
UE "......C$:.C$."".910......C$:.C$."".9
20......".":....... PLAY.G....I.0.15:N%(
I).I:.I......I.0.14:J.(16.I)..(1):X.N%(I
):N%(I).N%(I.J):N%(I.J).X:.I. ....I.0.15
:NN%(I).N%(I):.I.I.L.NM.0:.". .
LETTER SQUARE ...D.V...9)".............
.....}.`..I.0.2:..9)".".25)"....J...9)".
".25)"....T...9)". . . . .":.I..
.~...9)".".25)"........9)".".25)".":..9)
"......................."..":.I.0.3:.:."
..".8);:.J.0.3:U.N%(J.4.I).:.....3)G(64.
U.32.(U.0));:.J:.I.Z....I.0.14:.N%(I).I.
1..I:.2000.{....I.0.14:.N%(I).15.I..I:.2
000...(..I.0.14:.N%(I)..I.J.2.X.I:I.0:.:
.D$"WHICH LETTER DO YOU WANT TO MOVE? .
";...F..C$:.C$."".1350...P..C$:.C$."@".C
$."O".1360...U..C$."@".2060.5.Z.U.F(C$).
64:.I.0.15:.N%(I)..U..I:.1350.\.D.J.I:I.
0:V.J.X:..(2..(V).5)..3.1350.|.N...(V).1
..(J.4)...(X.4).1350...... MOVE LETTER T
O BLANK.J...NM.NM.1:.C$:N%(X).U:N%(J).0:
X$." .".K$(V.4).C$......H(D$,5.3..(J.4))
.......12.4.(J.4..(J.4)));.(....I.0.2.(.
(V).1):.". ."K$(V.4)C$;:.I:.1300.4.P.. W
IN!!.R.Z.."....CONGRATULATIONS!!...}....
"YOU PUT THEM IN ORDER IN"NM"MOVES......
..."DO YOU WANT TO PLAY AGAIN? ";:.2500:
.C$."N".2100......"..DO YOU WANT THE SAM
E PATTERN? ";:.2500:.C$."N".1000......I.
0.15:N%(I).NN%(I):.I:.1100.G.4.."..OKAY,
TYPE 'RUN' FOR ANOTHER WHEN YOU'RE";:..
[.D..C$:.C$."".2500.X.N..C$:.C$."Y".C$."
N"..C$:....X..2510...$
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL