STACK16'D
FILE INFORMATION
FILENAME(S): STACK16'D
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-11-30 21:11:26
APPEARS ON: 1 disk(s)
FILE HASH
0d5d4c383b68d71eb1794260a178e8e0eb3d1107eaa30c0fe214b9fe6e3e9cff
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C16 KINGSIZED | STACK16'D | PRG | DuncanTwain | 15 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 10 19 10 C8 00 E7 30 2C 38 2C 35 3A E7 34 2C |.......0,8,5:.4,|
00000010: 38 2C 35 3A 8D 31 35 32 30 00 2B 10 D2 00 E7 30 |8,5:.1520.+....0|
00000020: 2C 37 2C 35 3A E7 34 2C 37 2C 35 00 45 10 DC 00 |,7,5:.4,7,5.E...|
00000030: 54 24 B2 22 92 20 92 A4 92 AF 92 B9 92 A2 12 B8 |T$.". ..........|
00000040: 12 B7 12 A3 22 00 5F 10 E6 00 42 24 B2 22 12 A4 |...."._...B$."..|
00000050: 12 AF 12 B9 12 A2 92 B8 92 B7 92 A3 92 20 22 00 |............. ".|
00000060: 86 10 F0 00 86 54 50 24 28 38 29 2C 54 24 28 38 |.....TP$(8),T$(8|
00000070: 29 2C 42 54 24 28 38 29 2C 42 24 28 38 29 2C 43 |),BT$(8),B$(8),C|
00000080: 53 24 28 32 30 29 00 AD 10 FA 00 43 53 24 28 32 |S$(20).....CS$(2|
00000090: 29 B2 22 90 22 3A 43 53 24 28 30 34 29 B2 22 9A |).".":CS$(04).".|
000000A0: 22 3A 43 53 24 28 30 36 29 B2 22 1C 22 00 D4 10 |":CS$(06)."."...|
000000B0: 04 01 43 53 24 28 38 29 B2 22 9F 22 3A 43 53 24 |..CS$(8).".":CS$|
000000C0: 28 31 30 29 B2 22 9C 22 3A 43 53 24 28 31 32 29 |(10).".":CS$(12)|
000000D0: B2 22 1E 22 00 E4 10 0E 01 43 53 24 28 31 34 29 |.".".....CS$(14)|
000000E0: B2 22 95 22 00 EF 10 18 01 81 49 B2 31 A4 38 00 |."."......I.1.8.|
000000F0: 29 11 22 01 43 24 B2 CA 28 54 24 2C 32 AC 49 2C |).".C$..(T$,2.I,|
00000100: 31 29 3A 43 24 B2 43 24 AA 43 24 AA 43 24 3A 43 |1):C$.C$.C$.C$:C|
00000110: 24 B2 43 24 AA 43 24 AA 43 24 3A 43 24 B2 C8 28 |$.C$.C$.C$:C$..(|
00000120: 43 24 AA 43 24 2C 31 34 29 00 45 11 2C 01 54 50 |C$.C$,14).E.,.TP|
00000130: 24 28 49 29 B2 CA 28 54 24 2C 32 AC 49 AB 31 2C |$(I)..(T$,2.I.1,|
00000140: 31 29 AA 43 24 00 7F 11 36 01 43 24 B2 CA 28 42 |1).C$...6.C$..(B|
00000150: 24 2C 32 AC 49 2C 31 29 3A 43 24 B2 43 24 AA 43 |$,2.I,1):C$.C$.C|
00000160: 24 AA 43 24 3A 43 24 B2 43 24 AA 43 24 AA 43 24 |$.C$:C$.C$.C$.C$|
00000170: 3A 43 24 B2 C8 28 43 24 AA 43 24 2C 31 34 29 00 |:C$..(C$.C$,14).|
00000180: 9B 11 40 01 42 54 24 28 49 29 B2 CA 28 42 24 2C |..@.BT$(I)..(B$,|
00000190: 32 AC 49 AB 31 2C 31 29 AA 43 24 00 A2 11 4A 01 |2.I.1,1).C$...J.|
000001A0: 82 49 00 B6 11 54 01 4C 24 B2 22 12 20 12 B4 12 |.I...T.L$.". ...|
000001B0: A1 92 AA 92 20 22 00 CA 11 5E 01 52 24 B2 22 92 |.... "...^.R$.".|
000001C0: 20 92 B4 92 A1 12 AA 12 20 22 00 DD 11 68 01 86 | ....... "...h..|
000001D0: 4C 46 24 28 35 29 2C 52 54 24 28 35 29 00 15 12 |LF$(5),RT$(5)...|
000001E0: 72 01 81 49 B2 31 A4 35 3A 4C 46 24 28 49 29 B2 |r..I.1.5:LF$(I).|
000001F0: CA 28 4C 24 2C 32 AC 49 AB 31 2C 32 29 3A 52 54 |.(L$,2.I.1,2):RT|
00000200: 24 28 49 29 B2 CA 28 52 24 2C 32 AC 49 AB 31 2C |$(I)..(R$,2.I.1,|
00000210: 32 29 3A 82 49 00 23 12 7C 01 43 52 24 B2 C7 28 |2):.I.#.|.CR$..(|
00000220: 31 33 29 00 52 12 86 01 99 22 93 11 11 81 48 4F |13).R...."....HO|
00000230: 57 20 4D 41 4E 59 20 42 4C 4F 43 4B 53 20 20 28 |W MANY BLOCKS (|
00000240: 32 20 2D 20 37 29 20 3F 20 22 3B 3A 8D 20 31 34 |2 - 7) ? ";:. 14|
00000250: 30 30 00 62 12 90 01 8B 49 4E 24 B2 22 22 A7 33 |00.b....IN$."".3|
00000260: 39 30 00 72 12 9A 01 81 49 B2 31 A4 C3 28 49 4E |90.r....I.1..(IN|
00000270: 24 29 00 9A 12 A4 01 3A 54 24 B2 CA 28 49 4E 24 |$).....:T$..(IN$|
00000280: 2C 49 2C 31 29 3A 8B 54 24 B1 B2 22 30 22 AF 54 |,I,1):.T$.."0".T|
00000290: 24 B3 B2 22 39 22 A7 34 34 30 00 AA 12 AE 01 99 |$.."9".440......|
000002A0: 22 91 91 91 22 3A 89 33 39 30 00 B1 12 B8 01 82 |"...":.390......|
000002B0: 49 00 E6 12 C2 01 4E B2 C5 28 49 4E 24 29 3A 8B |I.....N..(IN$):.|
000002C0: 4E B1 37 A7 99 22 11 81 37 20 49 53 20 54 48 45 |N.7.."..7 IS THE|
000002D0: 20 4D 41 58 49 4D 55 4D 20 2E 91 91 91 91 91 91 | MAXIMUM .......|
000002E0: 22 3A 89 33 39 30 00 FB 12 CC 01 8B 4E B3 32 A7 |":.390......N.2.|
000002F0: 99 22 91 91 91 22 3A 89 33 39 30 00 1B 13 D6 01 |."...":.390.....|
00000300: 44 4E 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |DN$."...........|
00000310: 11 11 11 11 11 11 11 11 11 11 22 00 34 13 E0 01 |..........".4...|
00000320: 52 54 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |RT$."...........|
00000330: 1D 1D 1D 22 00 55 13 EA 01 81 49 B2 31 A4 33 3A |...".U....I.1.3:|
00000340: 81 4A B2 30 A4 37 3A 50 28 49 2C 4A 29 B2 30 3A |.J.0.7:P(I,J).0:|
00000350: 82 4A 3A 82 49 00 70 13 F4 01 99 22 93 22 3B 44 |.J:.I.p....".";D|
00000360: 4E 24 3B 22 12 22 3B 3A 50 28 31 2C 30 29 B2 4E |N$;".";:P(1,0).N|
00000370: 00 AC 13 FE 01 81 49 B2 31 A4 33 3A 99 22 81 20 |......I.1.3:.". |
00000380: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003A0: 20 20 20 20 20 20 20 22 3B 3A 82 49 00 DD 13 08 | ";:.I....|
000003B0: 02 99 44 4E 24 3B 22 81 11 12 1D 1D 1D 1D 1D 1D |..DN$;".........|
000003C0: 23 31 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 23 32 1D |#1...........#2.|
000003D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 23 33 22 00 F6 13 |..........#3"...|
000003E0: 12 02 99 44 4E 24 3B C8 28 22 91 91 91 91 91 91 |...DN$;.("......|
000003F0: 91 22 2C 4E 29 3B 00 0C 14 1C 02 81 49 B2 31 A4 |.",N);......I.1.|
00000400: 4E 3A 99 43 53 24 28 49 AC 32 29 3B 00 3B 14 26 |N:.CS$(I.2);.;.&|
00000410: 02 99 C8 28 22 92 22 AA 52 54 24 2C 37 AB 49 AA |...(".".RT$,7.I.|
00000420: 31 29 3B C8 28 22 12 A4 22 AA 42 54 24 28 31 29 |1);.("..".BT$(1)|
00000430: 2C 32 AC 49 AA 31 29 3B 22 A4 22 00 4E 14 30 02 |,2.I.1);".".N.0.|
00000440: 50 28 31 2C 4E AB 49 AA 31 29 B2 49 AC 32 00 55 |P(1,N.I.1).I.2.U|
00000450: 14 3A 02 82 49 00 5E 14 44 02 4D 56 B2 30 00 6B |.:..I.^.D.MV.0.k|
00000460: 14 4E 02 54 4D B2 54 49 AA 36 30 00 7A 14 58 02 |.N.TM.TI.60.z.X.|
00000470: 8B 54 49 B3 54 4D A7 36 30 30 00 84 14 62 02 8D |.TI.TM.600...b..|
00000480: 31 33 35 30 00 B6 14 6C 02 50 52 24 B2 22 13 1E |1350...l.PR$."..|
00000490: 46 52 4F 4D 20 57 48 41 54 20 50 4C 41 43 45 20 |FROM WHAT PLACE |
000004A0: 20 3F 20 22 3A 8D 31 32 35 30 3A 8B 49 4E 24 B2 | ? ":.1250:.IN$.|
000004B0: 22 22 A7 36 31 30 00 C3 14 76 02 46 B2 C5 28 49 |"".610...v.F..(I|
000004C0: 4E 24 29 00 EC 14 80 02 8B 50 28 46 2C 30 29 B3 |N$)......P(F,0).|
000004D0: 31 A7 99 22 54 48 45 20 50 4C 41 43 45 20 49 53 |1.."THE PLACE IS|
000004E0: 20 45 4D 50 54 59 22 3A 89 35 39 30 00 1A 15 8A | EMPTY":.590....|
000004F0: 02 50 52 24 B2 22 9C 54 4F 20 57 48 41 54 20 50 |.PR$.".TO WHAT P|
00000500: 4C 41 43 45 20 3F 20 22 3A 8D 31 32 35 30 3A 8B |LACE ? ":.1250:.|
00000510: 49 4E 24 B2 22 22 A7 36 31 30 00 27 15 94 02 54 |IN$."".610.'...T|
00000520: B2 C5 28 49 4E 24 29 00 47 15 9E 02 8B 46 B2 54 |..(IN$).G....F.T|
00000530: A7 99 22 4E 4F 54 20 50 4F 53 53 49 42 4C 45 20 |.."NOT POSSIBLE |
00000540: 2E 22 3A 89 35 39 30 00 59 15 A8 02 8B 50 28 54 |.":.590.Y....P(T|
00000550: 2C 30 29 B2 30 A7 37 30 30 00 8D 15 B2 02 8B 50 |,0).0.700......P|
00000560: 28 46 2C 50 28 46 2C 30 29 29 B1 50 28 54 2C 50 |(F,P(F,0)).P(T,P|
00000570: 28 54 2C 30 29 29 A7 99 22 44 49 54 20 47 41 41 |(T,0)).."DIT GAA|
00000580: 54 20 4E 49 45 54 2E 22 3A 89 35 39 30 00 C3 15 |T NIET.":.590...|
00000590: BC 02 46 43 B2 50 28 46 2C 30 29 3A 46 57 B2 50 |..FC.P(F,0):FW.P|
000005A0: 28 46 2C 46 43 29 3A 54 43 B2 50 28 54 2C 30 29 |(F,FC):TC.P(T,0)|
000005B0: 3A 54 57 B2 50 28 54 2C 54 43 29 3A 4D 56 B2 4D |:TW.P(T,TC):MV.M|
000005C0: 56 AA 31 00 E7 15 C6 02 58 B2 31 AA 31 33 AC 28 |V.1.....X.1.13.(|
000005D0: 46 AB 31 29 AA 37 AB 46 57 AD 32 3A 99 22 13 22 |F.1).7.FW.2:."."|
000005E0: 43 53 24 28 46 57 29 00 1B 16 D0 02 99 20 44 4E |CS$(FW)...... DN|
000005F0: 24 3B C8 28 22 91 91 91 91 91 91 91 91 91 22 2C |$;.(".........",|
00000600: 46 43 AA 31 29 3B C8 28 22 92 22 AA 52 54 24 AA |FC.1);.(".".RT$.|
00000610: 52 54 24 AA 52 54 24 2C 58 29 3B 00 3D 16 DA 02 |RT$.RT$,X);.=...|
00000620: 4C 46 24 B2 C8 28 22 11 9D 9D 9D 9D 9D 9D 9D 9D |LF$..(".........|
00000630: 9D 9D 9D 9D 9D 9D 22 2C 46 57 AA 31 29 00 76 16 |......",FW.1).v.|
00000640: E4 02 81 49 B2 31 A4 20 38 3A 54 24 28 49 29 B2 |...I.1. 8:T$(I).|
00000650: C8 28 54 50 24 28 49 29 2C 31 AA 46 57 29 3A 42 |.(TP$(I),1.FW):B|
00000660: 24 28 49 29 B2 C8 28 42 54 24 28 49 29 2C 31 AA |$(I)..(BT$(I),1.|
00000670: 46 57 29 3A 82 49 00 8D 16 EE 02 48 54 B2 30 3A |FW):.I.....HT.0:|
00000680: 4A B2 31 3A 8B 46 B1 54 A7 4A B2 AB 31 00 9A 16 |J.1:.F.T.J..1...|
00000690: F8 02 81 49 B2 46 A4 54 A9 4A 00 B3 16 02 03 8B |...I.F.T.J......|
000006A0: 50 28 49 2C 30 29 B1 48 54 A7 48 54 B2 50 28 49 |P(I,0).HT.HT.P(I|
000006B0: 2C 30 29 00 BA 16 0C 03 82 49 00 D6 16 16 03 8B |,0)......I......|
000006C0: 48 54 B2 50 28 54 2C 30 29 A7 48 54 B2 48 54 AA |HT.P(T,0).HT.HT.|
000006D0: 31 3A 89 38 31 30 00 F7 16 20 03 8B B6 28 46 AB |1:.810... ...(F.|
000006E0: 54 29 B1 31 A7 8B 48 54 B2 50 28 32 2C 30 29 A7 |T).1..HT.P(2,0).|
000006F0: 48 54 B2 48 54 AA 31 00 04 17 2A 03 81 49 B2 46 |HT.HT.1...*..I.F|
00000700: 43 A4 48 54 00 11 17 34 03 3A 81 20 4A B2 31 A4 |C.HT...4.:. J.1.|
00000710: 38 00 31 17 3E 03 3A 99 54 24 28 4A 29 3B 4C 46 |8.1.>.:.T$(J);LF|
00000720: 24 3B 42 24 28 4A 29 3B 4C 46 24 3B 22 91 91 22 |$;B$(J);LF$;".."|
00000730: 3B 00 39 17 48 03 3A 82 4A 00 44 17 52 03 3A 99 |;.9.H.:.J.D.R.:.|
00000740: 22 91 22 3B 00 4B 17 5C 03 82 49 00 55 17 66 03 |".";.K.\..I.U.f.|
00000750: 99 22 11 22 3B 00 86 17 70 03 4C 24 B2 C8 28 22 |.".";...p.L$..("|
00000760: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000770: 22 2C 31 AA 46 57 29 3A 52 24 B2 C8 28 52 54 24 |",1.FW):R$..(RT$|
00000780: 2C 46 57 AB 31 29 00 C6 17 7A 03 99 22 12 22 3B |,FW.1)...z..".";|
00000790: C8 28 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.(" |
000007A0: 20 20 20 22 2C 46 57 29 3B 22 92 22 3B C8 28 22 | ",FW);".";.("|
000007B0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
000007C0: 22 2C 46 57 29 3B 00 D3 17 84 03 8B 46 B1 54 A7 |",FW);......F.T.|
000007D0: 39 38 30 00 E6 17 8E 03 81 49 B2 46 AC 31 33 A4 |980......I.F.13.|
000007E0: 54 AC 31 33 AB 31 00 F2 17 98 03 3A 81 4A B2 31 |T.13.1.....:.J.1|
000007F0: A4 35 00 0C 18 A2 03 99 4C 46 24 28 4A 29 3B 52 |.5......LF$(J);R|
00000800: 24 3B 52 54 24 28 4A 29 3B 4C 24 3B 00 13 18 AC |$;RT$(J);L$;....|
00000810: 03 82 4A 00 1D 18 B6 03 99 22 1D 22 3B 00 24 18 |..J......".";.$.|
00000820: C0 03 82 49 00 2E 18 CA 03 89 31 30 34 30 00 41 |...I......1040.A|
00000830: 18 D4 03 81 49 B2 54 AC 31 33 A4 46 AC 31 33 AB |....I.T.13.F.13.|
00000840: 31 00 4B 18 DE 03 99 22 9D 22 3B 00 5A 18 E8 03 |1.K....".";.Z...|
00000850: 3A 81 4A B2 35 A4 31 A9 AB 31 00 76 18 F2 03 3A |:.J.5.1..1.v...:|
00000860: 3A 99 4C 46 24 28 4A 29 3B 52 24 3B 52 54 24 28 |:.LF$(J);R$;RT$(|
00000870: 4A 29 3B 4C 24 3B 00 7E 18 FC 03 3A 82 4A 00 85 |J);L$;.~...:.J..|
00000880: 18 06 04 82 49 00 97 18 10 04 81 49 B2 48 54 AB |....I......I.HT.|
00000890: 31 A4 54 43 A9 AB 31 00 A6 18 1A 04 3A 81 4A B2 |1.TC..1.....:.J.|
000008A0: 38 A4 31 A9 AB 31 00 C6 18 24 04 3A 99 54 24 28 |8.1..1...$.:.T$(|
000008B0: 4A 29 3B 4C 46 24 3B 42 24 28 4A 29 3B 4C 46 24 |J);LF$;B$(J);LF$|
000008C0: 3B 22 91 91 22 3B 00 CE 18 2E 04 3A 82 4A 00 D9 |;"..";.....:.J..|
000008D0: 18 38 04 3A 99 22 11 22 3B 00 E0 18 42 04 82 49 |.8.:.".";...B..I|
000008E0: 00 FD 18 4C 04 99 C8 28 22 12 A4 22 AA 42 54 24 |...L...("..".BT$|
000008F0: 28 31 29 2C 46 57 AA 31 29 3B 22 A4 22 00 11 19 |(1),FW.1);"."...|
00000900: 56 04 50 28 54 2C 30 29 B2 50 28 54 2C 30 29 AA |V.P(T,0).P(T,0).|
00000910: 31 00 2D 19 60 04 50 28 54 2C 50 28 54 2C 30 29 |1.-.`.P(T,P(T,0)|
00000920: 29 B2 50 28 46 2C 50 28 46 2C 30 29 29 00 41 19 |).P(F,P(F,0)).A.|
00000930: 6A 04 50 28 46 2C 30 29 B2 50 28 46 2C 30 29 AB |j.P(F,0).P(F,0).|
00000940: 31 00 5E 19 74 04 8B 50 28 32 2C 30 29 B3 B1 4E |1.^.t..P(2,0)..N|
00000950: AF 50 28 33 2C 30 29 B3 B1 4E A7 35 39 30 00 68 |.P(3,0)..N.590.h|
00000960: 19 7E 04 8D 31 33 35 30 00 8A 19 88 04 99 22 11 |.~..1350......".|
00000970: 11 11 90 20 20 20 20 20 20 20 20 AC A2 A2 A2 A2 |... .....|
00000980: A2 A2 A2 A2 A2 A2 A2 A2 BB 22 00 AA 19 92 04 99 |........."......|
00000990: 22 20 20 20 20 20 20 20 20 12 A1 20 57 45 4C 4C |" .. WELL|
000009A0: 20 44 4F 4E 45 20 20 92 A1 22 00 CA 19 9C 04 99 | DONE .."......|
000009B0: 22 20 20 20 20 20 20 20 20 BC 12 A2 A2 A2 A2 A2 |" .......|
000009C0: A2 A2 A2 A2 A2 A2 A2 92 BE 22 00 01 1A A6 04 99 |........."......|
000009D0: 22 11 9E 59 4F 55 20 4E 45 45 44 45 44 22 3B 4D |"..YOU NEEDED";M|
000009E0: 56 3B 22 4D 4F 56 45 53 20 54 4F 20 53 4F 4C 56 |V;"MOVES TO SOLV|
000009F0: 45 20 54 48 45 22 3A 99 22 50 52 4F 42 4C 45 4D |E THE":."PROBLEM|
00000A00: 2E 00 2E 1A B0 04 54 B2 32 AE 4E AB 31 3A 99 22 |......T.2.N.1:."|
00000A10: 11 9F 54 48 45 20 42 45 53 54 20 57 41 59 20 57 |..THE BEST WAY W|
00000A20: 41 53 20 49 4E 22 54 22 4D 4F 56 45 53 2E 00 49 |AS IN"T"MOVES..I|
00000A30: 1A BA 04 99 22 11 11 9C 20 41 47 41 49 4E 20 3F |...."... AGAIN ?|
00000A40: 20 22 3B 3A 8D 31 34 30 30 00 5E 1A C4 04 8B C8 | ";:.1400.^.....|
00000A50: 28 49 4E 24 2C 31 29 B3 B1 22 59 22 A7 80 00 64 |(IN$,1).."Y"...d|
00000A60: 1A CE 04 8A 00 6A 1A D8 04 80 00 74 1A E2 04 99 |.....j.....t....|
00000A70: 50 52 24 3B 00 88 1A EC 04 8D 31 34 30 30 3A 8B |PR$;......1400:.|
00000A80: 49 4E 24 B2 22 22 A7 8E 00 9C 1A F6 04 8B C8 28 |IN$."".........(|
00000A90: 49 4E 24 2C 31 29 B2 22 51 22 A7 80 00 AF 1A 00 |IN$,1)."Q"......|
00000AA0: 05 8B C3 28 49 4E 24 29 B1 31 A7 31 33 30 30 00 |...(IN$).1.1300.|
00000AB0: C8 1A 0A 05 8B 49 4E 24 B1 B2 22 31 22 AF 49 4E |.....IN$.."1".IN|
00000AC0: 24 B3 B2 22 33 22 A7 8E 00 E8 1A 14 05 99 22 54 |$.."3"........"T|
00000AD0: 48 45 52 53 20 49 53 20 4E 4F 20 42 4C 4F 43 4B |HERS IS NO BLOCK|
00000AE0: 20 54 48 45 52 45 2E 22 00 F8 1A 1E 05 81 49 B2 | THERE."......I.|
00000AF0: 31 A4 35 30 30 3A 82 49 00 17 1B 28 05 99 22 91 |1.500:.I...(..".|
00000B00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B10: 20 20 20 20 20 20 22 00 5A 1B 32 05 99 22 91 91 | ".Z.2.."..|
00000B20: 22 3B 50 52 24 3B C8 28 22 20 20 20 20 20 20 20 |";PR$;.(" |
00000B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B50: 20 22 2C C3 28 49 4E 24 29 29 00 6A 1B 3C 05 99 | ",.(IN$)).j.<..|
00000B60: 22 91 22 3B 3A 89 31 32 35 30 00 74 1B 46 05 99 |".";:.1250.t.F..|
00000B70: 22 13 22 3B 00 AD 1B 50 05 81 49 B2 31 A4 35 3A |".";...P..I.1.5:|
00000B80: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00000B90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000BA0: 20 20 20 20 20 20 20 20 20 22 3A 82 49 00 B7 1B | ":.I...|
00000BB0: 5A 05 99 22 13 22 3B 00 BD 1B 64 05 8E 00 C6 1B |Z..".";...d.....|
00000BC0: 6E 05 99 22 13 22 00 E7 1B 78 05 49 4E 24 B2 22 |n.."."...x.IN$."|
00000BD0: 20 22 3A 5A 54 B2 54 49 3A 5A 43 B2 32 3A 5A 44 | ":ZT.TI:ZC.2:ZD|
00000BE0: 24 B2 C7 28 32 30 29 00 FD 1B 82 05 A1 5A 24 3A |$..(20)......Z$:|
00000BF0: 8B 20 5A 24 B3 B1 22 22 A7 31 34 34 30 00 2D 1C |. Z$.."".1440.-.|
00000C00: 8C 05 8B 5A 54 B3 B2 54 49 A7 99 CA 28 22 20 A6 |...ZT..TI...(" .|
00000C10: 22 2C 5A 43 2C 31 29 3B 22 9D 22 3B 3A 5A 43 B2 |",ZC,1);".";:ZC.|
00000C20: 33 AB 5A 43 3A 5A 54 B2 54 49 AA 31 35 00 37 1C |3.ZC:ZT.TI.15.7.|
00000C30: 96 05 89 31 34 31 30 00 66 1C A0 05 5A B2 C6 28 |...1410.f...Z..(|
00000C40: 5A 24 29 3A 5A 4C B2 C3 28 49 4E 24 29 3A 8B 28 |Z$):ZL..(IN$):.(|
00000C50: 5A AF 31 32 37 29 B3 33 32 A7 99 22 20 9D 22 3B |Z.127).32.." .";|
00000C60: 3A 89 31 34 38 30 00 96 1C AA 05 8B 46 4C AF 28 |:.1480......FL.(|
00000C70: 5A AF 31 32 37 29 B1 36 34 AF 28 5A AF 31 32 37 |Z.127).64.(Z.127|
00000C80: 29 B3 39 31 A7 5A 24 B2 C7 28 28 5A AA 31 32 38 |).91.Z$..((Z.128|
00000C90: 29 AF 32 35 35 29 00 A7 1C B4 05 8B 5A 4C B1 32 |).255)......ZL.2|
00000CA0: 35 34 A7 31 34 31 30 00 C2 1C BE 05 49 4E 24 B2 |54.1410.....IN$.|
00000CB0: 49 4E 24 AA 5A 24 3A 99 5A 24 3B 5A 44 24 3B 5A |IN$.Z$:.Z$;ZD$;Z|
00000CC0: 24 3B 00 E1 1C C8 05 8B 5A B2 31 33 A7 49 4E 24 |$;......Z.13.IN$|
00000CD0: B2 CA 28 49 4E 24 2C 32 29 3A 99 43 52 24 3B 3A |..(IN$,2):.CR$;:|
00000CE0: 8E 00 0C 1D D2 05 8B 5A B2 32 30 AF 5A 4C B1 31 |.......Z.20.ZL.1|
00000CF0: A7 49 4E 24 B2 C8 28 49 4E 24 2C 5A 4C AB 31 29 |.IN$..(IN$,ZL.1)|
00000D00: 3A 99 22 9D 22 3B 3A 89 31 34 31 30 00 3E 1D DC |:.".";:.1410.>..|
00000D10: 05 8B 5A B2 31 34 31 A7 5A 24 B2 C7 28 AB 32 30 |..Z.141.Z$..(.20|
00000D20: AC 28 5A 4C B1 31 29 29 3A 81 5A B2 32 A4 5A 4C |.(ZL.1)):.Z.2.ZL|
00000D30: 3A 99 5A 24 3B 3A 82 5A 3A 89 31 34 30 30 00 48 |:.Z$;:.Z:.1400.H|
00000D40: 1D E6 05 89 31 34 31 30 00 88 1D F0 05 99 22 93 |....1410......".|
00000D50: 1E 2A 2A 2A 20 81 43 4F 4D 4D 4F 44 4F 52 45 20 |.*** .COMMODORE |
00000D60: 43 31 36 20 1E 2A 2A 20 81 20 53 20 54 20 41 20 |C16 .** . S T A |
00000D70: 43 20 4B 20 20 31 20 36 20 1E 2A 2A 2A 22 C7 28 |C K 1 6 .***".(|
00000D80: 31 34 32 29 C7 28 38 29 00 B5 1D FA 05 99 22 90 |142).(8)......".|
00000D90: 11 54 48 45 52 45 20 41 52 45 20 33 20 50 49 4E |.THERE ARE 3 PIN|
00000DA0: 53 20 57 49 54 48 20 42 4C 4F 43 4B 53 2C 20 54 |S WITH BLOCKS, T|
00000DB0: 52 59 20 54 4F 00 E2 1D 04 06 99 22 11 20 41 52 |RY TO......". AR|
00000DC0: 52 41 4E 47 45 20 54 48 45 20 42 4C 4F 43 4B 53 |RANGE THE BLOCKS|
00000DD0: 20 4F 4E 20 54 48 45 20 4F 54 48 45 52 20 53 49 | ON THE OTHER SI|
00000DE0: 44 45 00 FD 1D 0E 06 99 22 11 20 49 4E 20 54 48 |DE......". IN TH|
00000DF0: 45 20 53 41 4D 45 20 4F 52 44 45 52 2E 00 06 1E |E SAME ORDER....|
00000E00: 18 06 99 22 11 22 00 33 1E 22 06 99 22 11 11 4D |...".".3.".."..M|
00000E10: 4F 56 45 20 54 48 45 20 42 4C 4F 43 4B 53 20 4F |OVE THE BLOCKS O|
00000E20: 4E 45 20 46 4F 52 20 4F 4E 45 2C 20 41 20 4C 41 |NE FOR ONE, A LA|
00000E30: 52 47 45 00 60 1E 2C 06 99 22 11 20 42 4C 4F 43 |RGE.`.,..". BLOC|
00000E40: 4B 20 49 53 20 4E 4F 54 20 41 4C 4C 4F 57 45 44 |K IS NOT ALLOWED|
00000E50: 20 4F 4E 20 41 20 53 4D 41 4C 4C 20 4F 4E 45 2E | ON A SMALL ONE.|
00000E60: 00 69 1E 36 06 99 22 11 22 00 94 1E 40 06 99 22 |.i.6.."."...@.."|
00000E70: 11 11 54 52 59 20 54 4F 20 53 4F 4C 56 45 20 49 |..TRY TO SOLVE I|
00000E80: 54 20 49 4E 20 41 53 20 46 45 57 20 4D 4F 56 45 |T IN AS FEW MOVE|
00000E90: 53 20 41 53 00 A6 1E 4A 06 99 22 11 20 50 4F 53 |S AS...J..". POS|
00000EA0: 53 49 42 4C 45 2E 00 B0 1E 54 06 8D 31 36 34 30 |SIBLE....T..1640|
00000EB0: 00 B6 1E 5E 06 8E 00 FD 1E 68 06 99 22 13 11 11 |...^.....h.."...|
00000EC0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000ED0: 11 11 11 11 11 11 1C 20 20 20 50 52 45 53 53 20 |....... PRESS |
00000EE0: 53 50 41 43 45 42 41 52 20 54 4F 20 43 4F 4E 54 |SPACEBAR TO CONT|
00000EF0: 49 4E 55 45 20 20 20 20 20 20 20 20 13 00 0C 1F |INUE ....|
00000F00: 72 06 81 49 B2 31 A4 32 35 30 3A 82 00 53 1F 7C |r..I.1.250:..S.||
00000F10: 06 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000F20: 11 11 11 11 11 11 11 11 11 11 11 11 1C 20 20 20 |............. |
00000F30: 50 52 45 53 53 20 53 50 41 43 45 42 41 52 20 54 |PRESS SPACEBAR T|
00000F40: 4F 20 43 4F 4E 54 49 4E 55 45 20 20 20 20 20 20 |O CONTINUE |
00000F50: 20 20 13 00 62 1F 86 06 81 49 B2 31 A4 32 35 30 | ..b....I.1.250|
00000F60: 3A 82 00 74 1F 90 06 A1 41 24 3A 8B 41 24 B2 22 |:..t....A$:.A$."|
00000F70: 20 22 A7 8E 00 7E 1F 9A 06 89 31 36 34 30 00 00 | "...~....1640..|
00000F80: 00 |. |
....H..0,8,5:.4,8,5:.1520.+.R..0,7,5:.4,
7,5.E...T$.". .............."._...B$."..
............. "......TP$(8),T$(8),BT$(8)
,B$(8),CS$(20).....CS$(2).".":CS$(04).".
":CS$(06).".".T...CS$(8).".":CS$(10)."."
:CS$(12).".".....CS$(14)."."......I.1.8.
).".C$.J(T$,2.I,1):C$.C$.C$.C$:C$.C$.C$.
C$:C$.H(C$.C$,14).E.,.TP$(I).J(T$,2.I.1,
1).C$..6.C$.J(B$,2.I,1):C$.C$.C$.C$:C$.
C$.C$.C$:C$.H(C$.C$,14)...@.BT$(I).J(B$,
2.I.1,1).C$...J..I...T.L$.". ....... ".J
.^.R$.". ....... "...H..LF$(5),RT$(5)...
R..I.1.5:LF$(I).J(L$,2.I.1,2):RT$(I).J(R
$,2.I.1,2):.I.#.|.CR$.G(13).R...."....HO
W MANY BLOCKS (2 - 7) ? ";:. 1400.B....
IN$."".390.R....I.1.C(IN$).....:T$.J(IN$
,I,1):.T$.."0".T$.."9".440......"...":.3
90......I...B.N.E(IN$):.N.7.."..7 IS THE
MAXIMUM .......":.390...L..N.2.."...":.
390...V.DN$.".....................".4...
RT$."..............".U....I.1.3:.J.0.7:P
(I,J).0:.J:.I.P....".";DN$;".";:P(1,0).N
......I.1.3:.".
";:.I......DN$;".........
#1...........#2...........#3"......DN$;H
(".......",N);......I.1.N:.CS$(I.2);.;.&
..H(".".RT$,7.I.1);H("..".BT$(1),2.I.1);
".".N.0.P(1,N.I.1).I.2.U.:..I.^.D.MV.0.K
.N.TM.TI.60.Z.X..TI.TM.600...B..1350...L
.PR$."..FROM WHAT PLACE ? ":.1250:.IN$.
"".610.C.V.F.E(IN$)......P(F,0).1.."THE
PLACE IS EMPTY":.590.....PR$.".TO WHAT P
LACE ? ":.1250:.IN$."".610.'...T.E(IN$).
G....F.T.."NOT POSSIBLE .":.590.Y....P(T
,0).0.700......P(F,P(F,0)).P(T,P(T,0))..
"DIT GAAT NIET.":.590.C...FC.P(F,0):FW.P
(F,FC):TC.P(T,0):TW.P(T,TC):MV.MV.1...F.
X.1.13.(F.1).7.FW.2:."."CS$(FW)...P.. DN
$;H(".........",FC.1);H(".".RT$.RT$.RT$,
X);.=.Z.LF$.H("...............",FW.1).V.
...I.1. 8:T$(I).H(TP$(I),1.FW):B$(I).H(B
T$(I),1.FW):.I.....HT.0:J.1:.F.T.J..1...
...I.F.T.J......P(I,0).HT.HT.P(I,0).....
.I.V....HT.P(T,0).HT.HT.1:.810... ...(F.
T).1..HT.P(2,0).HT.HT.1...*..I.FC.HT...4
.:. J.1.8.1.>.:.T$(J);LF$;B$(J);LF$;".."
;.9.H.:.J.D.R.:.".";.K.\..I.U.F..".";...
P.L$.H("................",1.FW):R$.H(RT$
,FW.1).F.Z..".";H(" ",FW)
;".";H("................",FW);.S....F.T.
980......I.F.13.T.13.1.....:.J.1.5......
LF$(J);R$;RT$(J);L$;......J......".";.$.
...I...J..1040.A.T..I.T.13.F.13.1.K...."
.";.Z...:.J.5.1..1.V...::.LF$(J);R$;RT$(
J);L$;.~...:.J......I......I.HT.1.TC..1.
....:.J.8.1..1.F.$.:.T$(J);LF$;B$(J);LF$
;"..";.N...:.J.Y.8.:.".";...B..I...L..H(
"..".BT$(1),FW.1);"."...V.P(T,0).P(T,0).
1.-.`.P(T,P(T,0)).P(F,P(F,0)).A.J.P(F,0)
.P(F,0).1.^.T..P(2,0)..N.P(3,0)..N.590.H
.~..1350......".... .............
."......" .. WELL DONE ..".J....
" ................"......"..YOU N
EEDED";MV;"MOVES TO SOLVE THE":."PROBLEM
......T.2.N.1:."..THE BEST WAY WAS IN"T"
MOVES..I...."... AGAIN ? ";:.1400.^.D..H
(IN$,1).."Y"...D.N...J.X...T....PR$;....
..1400:.IN$.""........H(IN$,1)."Q"......
..C(IN$).1.1300.H....IN$.."1".IN$.."3"..
......"THERS IS NO BLOCK THERE."......I.
1.500:.I...(..". ".
Z.2.."..";PR$;H("
",C(IN$)).J.<..".";:.12
50.T.F..".";...P..I.1.5:."
":.I...Z..".";.
..D...F.N.."."...X.IN$." ":ZT.TI:ZC.2:ZD
$.G(20)......Z$:. Z$.."".1440.-....ZT..T
I..J(" .",ZC,1);".";:ZC.3.ZC:ZT.TI.15.7.
...1410.F. .Z.F(Z$):ZL.C(IN$):.(Z.127).3
2.." .";:.1480......FL.(Z.127).64.(Z.127
).91.Z$.G((Z.128).255)......ZL.254.1410.
B...IN$.IN$.Z$:.Z$;ZD$;Z$;...H..Z.13.IN$
.J(IN$,2):.CR$;:....R..Z.20.ZL.1.IN$.H(I
N$,ZL.1):.".";:.1410.>....Z.141.Z$.G(.20
.(ZL.1)):.Z.2.ZL:.Z$;:.Z:.1400.H....1410
......"..*** .COMMODORE C16 .** . S T A
C K 1 6 .***"G(142)G(8)......"..THERE A
RE 3 PINS WITH BLOCKS, TRY TO......". AR
RANGE THE BLOCKS ON THE OTHER SIDE......
". IN THE SAME ORDER.......".".3.".."..M
OVE THE BLOCKS ONE FOR ONE, A LARGE.`.,.
.". BLOCK IS NOT ALLOWED ON A SMALL ONE.
.I.6.."."...@.."..TRY TO SOLVE IT IN AS
FEW MOVES AS...J..". POSSIBLE....T..1640
...^.....H.."..........................
PRESS SPACEBAR TO CONTINUE ....
R..I.1.250:..S.|..".....................
..... PRESS SPACEBAR TO CONTINUE
..B....I.1.250:..T....A$:.A$." "...~..
..1640...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL