TOWERS OF HANOI
FILE INFORMATION
FILENAME(S): TOWERS OF HANOI
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 21:28:27
APPEARS ON: 1 disk(s)
FILE HASH
58f159a60cdb5f5e8d7f70c54dee045c58b89a99e18689069beb6d54e90ed379
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPELEN DEEL 5 | TOWERS OF HANOI | PRG | DuncanTwain | 34 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 05 00 99 22 93 05 22 00 20 08 0A 00 |......."..". ...|
00000010: 99 A3 31 36 29 3B 22 54 4F 57 45 52 53 22 3A 99 |..16);"TOWERS":.|
00000020: 00 50 08 14 00 99 22 43 52 45 41 54 49 56 45 20 |.P...."CREATIVE |
00000030: 43 4F 4D 50 55 54 49 4E 47 20 4D 4F 52 52 49 53 |COMPUTING MORRIS|
00000040: 54 4F 57 4E 2C 4E 45 57 20 4A 45 52 53 45 59 22 |TOWN,NEW JERSEY"|
00000050: 00 5A 08 1E 00 99 3A 99 3A 99 00 60 08 5A 00 99 |.Z....:.:..`.Z..|
00000060: 00 74 08 64 00 8F 2A 2A 2A 20 49 4E 49 54 49 41 |.t.d..*** INITIA|
00000070: 4C 49 5A 45 00 80 08 6E 00 86 54 28 37 2C 33 29 |LIZE...n..T(7,3)|
00000080: 00 88 08 78 00 45 B2 30 00 93 08 82 00 81 44 B2 |...x.E.0......D.|
00000090: 31 A4 37 00 9E 08 8C 00 81 4E B2 31 A4 33 00 AB |1.7......N.1.3..|
000000A0: 08 96 00 54 28 44 2C 4E 29 B2 30 00 B2 08 A0 00 |...T(D,N).0.....|
000000B0: 82 4E 00 B9 08 AA 00 82 44 00 E1 08 B4 00 99 22 |.N......D......"|
000000C0: 20 20 20 20 20 20 20 20 54 4F 57 45 52 53 20 4F | TOWERS O|
000000D0: 46 20 48 41 4E 4F 49 20 50 55 5A 5A 4C 45 22 3A |F HANOI PUZZLE":|
000000E0: 99 00 25 09 C8 00 99 22 59 4F 55 20 4D 55 53 54 |..%...."YOU MUST|
000000F0: 20 54 52 41 4E 53 46 45 52 20 54 48 45 20 44 49 | TRANSFER THE DI|
00000100: 53 4B 53 20 46 52 4F 4D 20 54 48 45 20 11 20 20 |SKS FROM THE . |
00000110: 20 4C 45 46 54 20 54 4F 20 54 48 45 20 52 49 47 | LEFT TO THE RIG|
00000120: 48 54 20 22 3B 00 66 09 CD 00 99 22 54 4F 57 45 |HT ";.f...."TOWE|
00000130: 52 2C 20 4F 4E 45 20 41 54 20 41 20 54 49 4D 45 |R, ONE AT A TIME|
00000140: 2C 20 11 4E 45 56 45 52 20 50 55 54 54 49 4E 47 |, .NEVER PUTTING|
00000150: 20 41 20 4C 41 52 47 45 52 20 44 49 53 4B 20 4F | A LARGER DISK O|
00000160: 4E 20 41 20 22 3B 00 7D 09 D2 00 99 22 53 4D 41 |N A ";.}...."SMA|
00000170: 4C 4C 45 52 11 44 49 53 4B 2E 22 3A 99 00 B1 09 |LLER.DISK.":....|
00000180: D7 00 99 22 48 4F 57 20 4D 41 4E 59 20 44 49 53 |..."HOW MANY DIS|
00000190: 4B 53 20 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 |KS DO YOU WANT T|
000001A0: 4F 20 4D 4F 56 45 20 28 37 20 49 53 4D 41 58 29 |O MOVE (7 ISMAX)|
000001B0: 22 00 BC 09 DC 00 85 22 20 22 3B 53 00 C4 09 E6 |"......" ";S....|
000001C0: 00 4D B2 30 00 CF 09 F0 00 81 51 B2 31 A4 37 00 |.M.0......Q.1.7.|
000001D0: DD 09 FA 00 8B 51 B2 53 20 A7 33 35 30 00 E4 09 |.....Q.S .350...|
000001E0: 04 01 82 51 00 EE 09 0E 01 45 B2 45 AA 31 00 FB |...Q.....E.E.1..|
000001F0: 09 18 01 8B 45 B1 32 A7 33 31 30 00 2F 0A 22 01 |....E.2.310./.".|
00000200: 99 22 53 4F 52 52 59 2C 20 42 55 54 20 49 20 43 |."SORRY, BUT I C|
00000210: 41 4E 27 54 20 44 4F 20 54 48 41 54 20 4A 4F 42 |AN'T DO THAT JOB|
00000220: 20 46 4F 52 20 59 4F 55 2E 22 3A 89 32 31 35 00 | FOR YOU.":.215.|
00000230: 72 0A 36 01 99 22 41 4C 4C 20 52 49 47 48 54 2C |r.6.."ALL RIGHT,|
00000240: 20 57 49 53 45 20 47 55 59 2C 20 49 46 20 59 4F | WISE GUY, IF YO|
00000250: 55 20 43 41 4E 27 54 20 50 4C 41 59 20 54 48 45 |U CAN'T PLAY THE|
00000260: 20 47 41 4D 45 20 52 49 47 48 54 2C 20 49 27 4C | GAME RIGHT, I'L|
00000270: 4C 22 00 A5 0A 40 01 99 22 4A 55 53 54 20 54 41 |L"...@.."JUST TA|
00000280: 4B 45 20 4D 59 20 50 55 5A 5A 4C 45 20 41 4E 44 |KE MY PUZZLE AND|
00000290: 20 47 4F 20 48 4F 4D 45 2E 20 53 4F 20 4C 4F 4E | GO HOME. SO LON|
000002A0: 47 2E 22 3A 90 00 D4 0A 54 01 8F 20 2A 2A 2A 20 |G.":....T.. *** |
000002B0: 53 54 4F 52 45 20 44 49 53 4B 53 20 46 52 4F 4D |STORE DISKS FROM|
000002C0: 20 53 4D 41 4C 4C 45 53 54 20 54 4F 20 4C 41 52 | SMALLEST TO LAR|
000002D0: 47 45 53 54 00 19 0B 5E 01 99 22 93 49 4E 20 54 |GEST...^..".IN T|
000002E0: 48 49 53 20 50 52 4F 47 52 41 4D 2C 20 57 45 20 |HIS PROGRAM, WE |
000002F0: 53 48 41 4C 4C 20 52 45 46 45 52 20 54 4F 20 44 |SHALL REFER TO D|
00000300: 49 53 4B 53 42 59 20 4E 55 4D 45 52 49 43 41 4C |ISKSBY NUMERICAL|
00000310: 20 43 4F 44 45 2E 22 3A 99 00 54 0B 63 01 99 22 | CODE.":..T.c.."|
00000320: 31 20 57 49 4C 4C 20 52 45 50 52 45 53 45 4E 54 |1 WILL REPRESENT|
00000330: 20 54 48 45 20 53 4D 41 4C 4C 45 53 54 20 44 49 | THE SMALLEST DI|
00000340: 53 4B 2C 33 20 54 48 45 4E 45 58 54 20 53 49 5A |SK,3 THENEXT SIZ|
00000350: 45 2C 22 3B 00 98 0B 68 01 99 22 20 35 20 54 48 |E,";...h.." 5 TH|
00000360: 45 20 4E 45 58 54 2C 20 41 4E 44 20 53 4F 20 4F |E NEXT, AND SO O|
00000370: 4E 2C 20 55 50 20 54 4F 20 31 33 2E 20 49 46 20 |N, UP TO 13. IF |
00000380: 59 4F 55 20 44 4F 20 54 48 45 20 50 55 5A 5A 4C |YOU DO THE PUZZL|
00000390: 45 20 57 49 54 48 22 3B 00 DB 0B 6D 01 99 22 20 |E WITH";...m.." |
000003A0: 32 20 44 49 53 4B 53 2C 20 20 54 48 45 49 52 20 |2 DISKS, THEIR |
000003B0: 43 4F 44 45 20 4E 41 4D 45 53 20 57 4F 55 4C 44 |CODE NAMES WOULD|
000003C0: 20 42 45 20 31 31 20 41 4E 44 20 31 33 2E 57 49 | BE 11 AND 13.WI|
000003D0: 54 48 33 20 44 49 53 4B 53 22 3B 00 0C 0C 72 01 |TH3 DISKS";...r.|
000003E0: 99 22 20 54 48 45 20 43 4F 44 45 20 4E 41 4D 45 |." THE CODE NAME|
000003F0: 53 20 57 4F 55 4C 44 20 42 45 20 39 2C 31 31 20 |S WOULD BE 9,11 |
00000400: 41 4E 44 31 33 2C 20 45 54 43 2E 22 00 54 0C 77 |AND13, ETC.".T.w|
00000410: 01 99 22 54 48 45 20 4E 45 45 44 4C 45 53 20 41 |.."THE NEEDLES A|
00000420: 52 45 20 4E 55 4D 42 45 52 45 44 20 46 52 4F 4D |RE NUMBERED FROM|
00000430: 20 4C 45 46 54 20 54 4F 20 20 20 52 49 47 48 54 | LEFT TO RIGHT|
00000440: 2C 20 31 20 54 4F 20 33 2E 20 57 45 20 57 49 4C |, 1 TO 3. WE WIL|
00000450: 4C 20 22 3B 00 9B 0C 7C 01 99 22 53 54 41 52 54 |L ";...|.."START|
00000460: 20 57 49 54 48 20 54 48 45 20 20 20 44 49 53 4B | WITH THE DISK|
00000470: 53 20 4F 4E 20 4E 45 45 44 4C 45 20 31 2C 20 41 |S ON NEEDLE 1, A|
00000480: 4E 44 20 41 54 54 45 4D 50 54 20 54 4F 20 4D 4F |ND ATTEMPT TO MO|
00000490: 56 45 20 20 54 48 45 4D 20 22 3B 00 AF 0C 81 01 |VE THEM ";.....|
000004A0: 99 22 54 4F 20 4E 45 45 44 4C 45 20 33 2E 22 00 |."TO NEEDLE 3.".|
000004B0: C5 0C 86 01 99 3A 99 22 47 4F 4F 44 20 4C 55 43 |.....:."GOOD LUC|
000004C0: 4B 21 22 3A 99 00 D2 0C 90 01 59 B2 37 3A 44 B2 |K!":......Y.7:D.|
000004D0: 31 33 00 E0 0C A4 01 81 58 B2 53 A4 31 A9 AB 31 |13......X.S.1..1|
000004E0: 00 F9 0C AE 01 54 28 59 2C 31 29 B2 44 3A 44 B2 |.....T(Y,1).D:D.|
000004F0: 44 AB 32 3A 59 B2 59 AB 31 00 00 0D CC 01 82 58 |D.2:Y.Y.1......X|
00000500: 00 0A 0D D6 01 8D 31 32 33 30 00 37 0D E0 01 99 |......1230.7....|
00000510: 22 57 48 49 43 48 20 44 49 53 4B 20 57 4F 55 4C |"WHICH DISK WOUL|
00000520: 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F 20 4D 4F |D YOU LIKE TO MO|
00000530: 56 45 22 3A 45 B2 30 00 3E 0D F4 01 85 44 00 75 |VE":E.0.>....D.u|
00000540: 0D FE 01 8B 28 44 AB 31 29 AC 28 44 AB 33 29 AC |....(D.1).(D.3).|
00000550: 28 44 AB 35 29 AC 28 44 AB 37 29 AC 28 44 AB 39 |(D.5).(D.7).(D.9|
00000560: 29 AC 28 44 AB 31 31 29 AC 28 44 AB 31 33 29 B2 |).(D.11).(D.13).|
00000570: 30 A7 35 38 30 00 B2 0D 08 02 99 22 49 4C 4C 45 |0.580......"ILLE|
00000580: 47 41 4C 20 45 4E 54 52 59 2E 2E 2E 20 59 4F 55 |GAL ENTRY... YOU|
00000590: 20 4D 41 59 20 4F 4E 4C 59 20 54 59 50 45 20 31 | MAY ONLY TYPE 1|
000005A0: 2C 33 2C 35 2C 37 2C 39 2C 31 31 20 4F 52 20 31 |,3,5,7,9,11 OR 1|
000005B0: 33 22 00 C5 0D 12 02 45 B2 45 AA 31 3A 8B 45 B1 |3".....E.E.1:.E.|
000005C0: 31 A7 35 36 30 00 CE 0D 26 02 89 35 30 30 00 08 |1.560...&..500..|
000005D0: 0E 30 02 99 22 53 54 4F 50 20 57 41 53 54 49 4E |.0.."STOP WASTIN|
000005E0: 47 20 4D 59 20 54 49 4D 45 2E 20 47 4F 20 42 4F |G MY TIME. GO BO|
000005F0: 54 48 45 52 20 53 4F 4D 45 4F 4E 45 20 45 4C 53 |THER SOMEONE ELS|
00000600: 45 2E 22 22 53 54 4F 50 00 3B 0E 44 02 8F 20 2A |E.""STOP.;.D.. *|
00000610: 2A 2A 20 43 48 45 43 4B 20 49 46 20 52 45 51 55 |** CHECK IF REQU|
00000620: 45 53 54 45 44 20 44 49 53 4B 20 49 53 20 42 45 |ESTED DISK IS BE|
00000630: 4C 4F 57 20 41 4E 4F 54 48 45 52 00 46 0E 4E 02 |LOW ANOTHER.F.N.|
00000640: 81 52 B2 31 A4 37 00 51 0E 58 02 81 43 B2 31 A4 |.R.1.7.Q.X..C.1.|
00000650: 33 00 63 0E 62 02 8B 54 28 52 2C 43 29 B2 44 A7 |3.c.b..T(R,C).D.|
00000660: 36 34 30 00 6D 0E 6C 02 82 43 3A 82 52 00 7B 0E |640.m.l..C:.R.{.|
00000670: 80 02 81 51 B2 52 A4 31 A9 AB 31 00 8D 0E 85 02 |...Q.R.1..1.....|
00000680: 8B 54 28 51 2C 43 29 B2 30 A7 36 36 30 00 9F 0E |.T(Q,C).0.660...|
00000690: 8A 02 8B 54 28 51 2C 43 29 B3 44 A7 36 38 30 00 |...T(Q,C).D.680.|
000006A0: A6 0E 94 02 82 51 00 AF 0E 9E 02 89 37 30 30 00 |.....Q......700.|
000006B0: EB 0E A8 02 99 22 54 48 41 54 20 44 49 53 4B 20 |....."THAT DISK |
000006C0: 49 53 20 42 45 4C 4F 57 20 41 4E 4F 54 48 45 52 |IS BELOW ANOTHER|
000006D0: 20 4F 4E 45 2E 20 4D 41 4B 45 20 41 4E 4F 54 48 | ONE. MAKE ANOTH|
000006E0: 45 52 20 43 48 4F 49 43 45 2E 22 00 F4 0E B2 02 |ER CHOICE.".....|
000006F0: 89 34 38 30 00 FC 0E BC 02 45 B2 30 00 1E 0F C1 |.480.....E.0....|
00000700: 02 99 22 50 4C 41 43 45 20 44 49 53 4B 20 4F 4E |.."PLACE DISK ON|
00000710: 20 57 48 49 43 48 20 4E 45 45 44 4C 45 22 00 25 | WHICH NEEDLE".%|
00000720: 0F C6 02 85 4E 00 42 0F DA 02 8B 28 4E AB 31 29 |....N.B....(N.1)|
00000730: AC 28 4E AB 32 29 AC 28 4E AB 33 29 B2 30 A7 38 |.(N.2).(N.3).0.8|
00000740: 30 30 00 4C 0F DF 02 45 B2 45 AA 31 00 59 0F E4 |00.L...E.E.1.Y..|
00000750: 02 8B 45 B1 31 A7 37 38 30 00 9B 0F EE 02 99 22 |..E.1.780......"|
00000760: 49 27 4C 4C 20 41 53 53 55 4D 45 20 59 4F 55 20 |I'LL ASSUME YOU |
00000770: 48 49 54 20 54 48 45 20 57 52 4F 4E 47 20 4B 45 |HIT THE WRONG KE|
00000780: 59 20 54 48 49 53 20 54 49 4D 45 2E 20 42 55 54 |Y THIS TIME. BUT|
00000790: 20 57 41 54 43 48 20 49 54 2C 22 00 C1 0F F8 02 | WATCH IT,".....|
000007A0: 99 22 49 20 4F 4E 4C 59 20 41 4C 4C 4F 57 20 4F |."I ONLY ALLOW O|
000007B0: 4E 45 20 4D 49 53 54 41 4B 45 2E 22 3A 89 37 30 |NE MISTAKE.":.70|
000007C0: 35 00 F6 0F 0C 03 99 22 49 20 54 52 49 45 44 20 |5......"I TRIED |
000007D0: 54 4F 20 57 41 52 4E 20 59 4F 55 2C 20 42 55 54 |TO WARN YOU, BUT|
000007E0: 20 59 4F 55 20 57 4F 55 4C 44 4E 27 54 20 4C 49 | YOU WOULDN'T LI|
000007F0: 53 54 45 4E 2E 22 00 12 10 16 03 99 22 42 59 45 |STEN."......"BYE|
00000800: 20 42 59 45 2C 20 42 49 47 20 53 48 4F 54 2E 22 | BYE, BIG SHOT."|
00000810: 3A 90 00 1D 10 20 03 81 52 B2 31 A4 37 00 30 10 |:.... ..R.1.7.0.|
00000820: 2A 03 8B 54 28 52 2C 4E 29 B3 B1 30 A7 38 34 30 |*..T(R,N)..0.840|
00000830: 00 37 10 34 03 82 52 00 40 10 3E 03 89 38 38 30 |.7.4..R.@.>..880|
00000840: 00 75 10 43 03 8F 20 2A 2A 2A 20 43 48 45 43 4B |.u.C.. *** CHECK|
00000850: 20 49 46 20 44 49 53 4B 20 54 4F 20 42 45 20 50 | IF DISK TO BE P|
00000860: 4C 41 43 45 44 20 4F 4E 20 41 20 4C 41 52 47 45 |LACED ON A LARGE|
00000870: 52 20 4F 4E 45 00 87 10 48 03 8B 44 B3 54 28 52 |R ONE...H..D.T(R|
00000880: 2C 4E 29 A7 38 38 30 00 C5 10 52 03 99 22 59 4F |,N).880...R.."YO|
00000890: 55 20 43 41 4E 27 54 20 50 4C 41 43 45 20 41 20 |U CAN'T PLACE A |
000008A0: 4C 41 52 47 45 52 20 44 49 53 4B 20 4F 4E 20 54 |LARGER DISK ON T|
000008B0: 4F 50 20 4F 46 20 41 20 53 4D 41 4C 4C 45 52 20 |OP OF A SMALLER |
000008C0: 4F 4E 45 2C 22 00 F1 10 5C 03 99 22 49 54 20 4D |ONE,"...\.."IT M|
000008D0: 49 47 48 54 20 43 52 55 53 48 20 49 54 21 22 3A |IGHT CRUSH IT!":|
000008E0: 99 22 4E 4F 57 20 54 48 45 4E 2C 22 3A 89 34 38 |."NOW THEN,":.48|
000008F0: 30 00 0F 11 6B 03 8F 20 2A 2A 2A 20 4D 4F 56 45 |0...k.. *** MOVE|
00000900: 20 52 45 4C 4F 43 41 54 45 44 20 44 49 53 4B 00 | RELOCATED DISK.|
00000910: 21 11 70 03 81 56 B2 31 A4 37 3A 81 57 B2 31 A4 |!.p..V.1.7:.W.1.|
00000920: 33 00 33 11 84 03 8B 54 28 56 2C 57 29 B2 44 A7 |3.3....T(V,W).D.|
00000930: 39 33 30 00 3D 11 8E 03 82 57 3A 82 56 00 65 11 |930.=....W:.V.e.|
00000940: 9D 03 8F 2A 2A 2A 20 4C 4F 43 41 54 45 20 45 4D |...*** LOCATE EM|
00000950: 50 54 59 20 53 50 41 43 45 20 4F 4E 20 4E 45 45 |PTY SPACE ON NEE|
00000960: 44 4C 45 20 4E 00 70 11 A2 03 81 55 B2 31 A4 37 |DLE N.p....U.1.7|
00000970: 00 83 11 AC 03 8B 54 28 55 2C 4E 29 B3 B1 30 A7 |......T(U,N)..0.|
00000980: 39 37 30 00 8A 11 B6 03 82 55 00 97 11 C0 03 55 |970......U.....U|
00000990: B2 37 3A 89 39 38 30 00 C5 11 C5 03 8F 20 2A 2A |.7:.980...... **|
000009A0: 2A 20 4D 4F 56 45 20 44 49 53 4B 20 41 4E 44 20 |* MOVE DISK AND |
000009B0: 53 45 54 20 4F 4C 44 20 4C 4F 43 41 54 49 4F 4E |SET OLD LOCATION|
000009C0: 20 54 4F 20 30 00 CF 11 CA 03 55 B2 55 AB 31 00 | TO 0.....U.U.1.|
000009D0: EA 11 D4 03 54 28 55 2C 4E 29 B2 54 28 56 2C 57 |....T(U,N).T(V,W|
000009E0: 29 3A 54 28 56 2C 57 29 B2 30 00 0D 12 E3 03 8F |):T(V,W).0......|
000009F0: 20 2A 2A 2A 20 50 52 49 4E 54 20 4F 55 54 20 43 | *** PRINT OUT C|
00000A00: 55 52 52 45 4E 54 20 53 54 41 54 55 53 00 1C 12 |URRENT STATUS...|
00000A10: E8 03 99 22 93 22 3A 8D 31 32 33 30 00 34 12 FA |...".":.1230.4..|
00000A20: 03 8F 20 2A 2A 2A 20 43 48 45 43 4B 20 49 46 20 |.. *** CHECK IF |
00000A30: 44 4F 4E 45 00 3E 12 FC 03 4D B2 4D AA 31 00 50 |DONE.>...M.M.1.P|
00000A40: 12 06 04 81 52 B2 31 A4 37 3A 81 43 B2 31 A4 32 |....R.1.7:.C.1.2|
00000A50: 00 64 12 1A 04 8B 54 28 52 2C 43 29 B3 B1 30 A7 |.d....T(R,C)..0.|
00000A60: 31 30 39 30 00 6E 12 24 04 82 43 3A 82 52 00 78 |1090.n.$..C:.R.x|
00000A70: 12 38 04 89 31 31 32 30 00 88 12 42 04 8B 4D B3 |.8..1120...B..M.|
00000A80: B2 31 32 38 A7 34 38 30 00 CA 12 4C 04 99 22 53 |.128.480...L.."S|
00000A90: 4F 52 52 59 2C 20 42 55 54 20 49 20 48 41 56 45 |ORRY, BUT I HAVE|
00000AA0: 20 4F 52 44 45 52 53 20 54 4F 20 53 54 4F 50 20 | ORDERS TO STOP |
00000AB0: 59 4F 55 20 49 46 20 59 4F 55 20 4D 41 4B 45 20 |YOU IF YOU MAKE |
00000AC0: 4D 4F 52 45 20 54 48 41 4E 22 00 DE 12 56 04 99 |MORE THAN"...V..|
00000AD0: 22 31 32 38 20 4D 4F 56 45 53 2E 22 3A 90 00 F1 |"128 MOVES.":...|
00000AE0: 12 60 04 8B 4D B3 B1 32 AE 53 AB 31 A7 31 31 34 |.`..M..2.S.1.114|
00000AF0: 30 00 0A 13 6A 04 99 22 43 4F 4E 47 52 41 54 55 |0...j.."CONGRATU|
00000B00: 4C 41 54 49 4F 4E 53 21 21 22 00 3B 13 74 04 99 |LATIONS!!".;.t..|
00000B10: 22 59 4F 55 20 48 41 56 45 20 50 45 52 46 4F 52 |"YOU HAVE PERFOR|
00000B20: 4D 45 44 20 54 48 45 20 54 41 53 4B 20 49 4E 22 |MED THE TASK IN"|
00000B30: 3B 4D 3B 22 4D 4F 56 45 53 2E 22 00 5F 13 7E 04 |;M;"MOVES."._.~.|
00000B40: 99 3A 99 22 54 52 59 20 41 47 41 49 4E 20 28 59 |.:."TRY AGAIN (Y|
00000B50: 45 53 20 4F 52 20 4E 4F 29 22 3B 3A 85 41 24 00 |ES OR NO)";:.A$.|
00000B60: 71 13 88 04 8B 41 24 B2 22 4E 4F 22 A7 31 33 39 |q....A$."NO".139|
00000B70: 30 00 84 13 92 04 8B 41 24 B2 22 59 45 53 22 A7 |0......A$."YES".|
00000B80: 9C 3A 89 35 00 AD 13 9C 04 99 3A 99 22 27 59 45 |.:.5......:."'YE|
00000B90: 53 27 20 4F 52 20 27 4E 4F 27 20 50 4C 45 41 53 |S' OR 'NO' PLEAS|
00000BA0: 45 22 3B 3A 85 41 24 3A 89 31 31 36 30 00 C8 13 |E";:.A$:.1160...|
00000BB0: CE 04 8F 20 2A 2A 2A 20 50 52 49 4E 54 20 53 55 |... *** PRINT SU|
00000BC0: 42 52 4F 55 54 49 4E 45 00 D3 13 D8 04 81 4B B2 |BROUTINE......K.|
00000BD0: 31 A4 37 00 DB 13 E2 04 5A B2 36 00 E6 13 EC 04 |1.7.....Z.6.....|
00000BE0: 81 4A B2 31 A4 33 00 F9 13 F6 04 8B 54 28 4B 2C |.J.1.3......T(K,|
00000BF0: 4A 29 B2 30 A7 31 33 33 30 00 0F 14 00 05 99 A3 |J).0.1330.......|
00000C00: 5A AB B5 28 54 28 4B 2C 4A 29 AD 32 29 29 3B 00 |Z..(T(K,J).2));.|
00000C10: 1F 14 0A 05 81 56 B2 31 A4 54 28 4B 2C 4A 29 00 |.....V.1.T(K,J).|
00000C20: 29 14 14 05 99 22 2A 22 3B 00 30 14 1E 05 82 56 |)...."*";.0....V|
00000C30: 00 3A 14 28 05 89 31 33 34 30 00 48 14 32 05 99 |.:.(..1340.H.2..|
00000C40: A3 5A 29 3B 22 DD 22 3B 00 53 14 3C 05 5A B2 5A |.Z);".";.S.<.Z.Z|
00000C50: AA 31 33 00 5A 14 46 05 82 4A 00 60 14 50 05 99 |.13.Z.F..J.`.P..|
00000C60: 00 67 14 5A 05 82 4B 00 6D 14 64 05 8E 00 8F 14 |.g.Z..K.m.d.....|
00000C70: 6E 05 99 3A 99 22 54 48 41 4E 4B 53 20 46 4F 52 |n..:."THANKS FOR|
00000C80: 20 54 48 45 20 47 41 4D 45 21 22 3A 99 3A 80 00 | THE GAME!":.:..|
00000C90: 00 00 |.. |
......."..". .....16);"TOWERS":..P...."C
REATIVE COMPUTING MORRISTOWN,NEW JERSEY"
.Z....:.:..`.Z...T.D..*** INITIALIZE...N
..T(7,3)...X.E.0......D.1.7......N.1.3..
...T(D,N).0... ..N......D......"
TOWERS OF HANOI PUZZLE":..%.H.."YOU MUST
TRANSFER THE DISKS FROM THE . LEFT TO
THE RIGHT ";.F.M.."TOWER, ONE AT A TIME
, .NEVER PUTTING A LARGER DISK ON A ";.}
.R.."SMALLER.DISK.":....W.."HOW MANY DIS
KS DO YOU WANT TO MOVE (7 ISMAX)"......"
";S.D...M.0.O....Q.1.7......Q.S .350...
...Q.....E.E.1......E.2.310./.".."SORRY,
BUT I CAN'T DO THAT JOB FOR YOU.":.215.
R.6.."ALL RIGHT, WISE GUY, IF YOU CAN'T
PLAY THE GAME RIGHT, I'LL"...@.."JUST TA
KE MY PUZZLE AND GO HOME. SO LONG.":..T.
T.. *** STORE DISKS FROM SMALLEST TO LAR
GEST...^..".IN THIS PROGRAM, WE SHALL RE
FER TO DISKSBY NUMERICAL CODE.":..T.C.."
1 WILL REPRESENT THE SMALLEST DISK,3 THE
NEXT SIZE,";...H.." 5 THE NEXT, AND SO O
N, UP TO 13. IF YOU DO THE PUZZLE WITH";
...M.." 2 DISKS, THEIR CODE NAMES WOULD
BE 11 AND 13.WITH3 DISKS";...R.." THE C
ODE NAMES WOULD BE 9,11 AND13, ETC.".T.W
.."THE NEEDLES ARE NUMBERED FROM LEFT TO
RIGHT, 1 TO 3. WE WILL ";...|.."START
WITH THE DISKS ON NEEDLE 1, AND ATTEM
PT TO MOVE THEM ";......"TO NEEDLE 3.".
E....:."GOOD LUCK!":..R...Y.7:D.13......
X.S.1..1.....T(Y,1).D:D.D.2:Y.Y.1...L..X
...V..1230.7...."WHICH DISK WOULD YOU LI
KE TO MOVE":E.0.>....D.U....(D.1).(D.3).
(D.5).(D.7).(D.9).(D.11).(D.13).0.580...
..."ILLEGAL ENTRY... YOU MAY ONLY TYPE 1
,3,5,7,9,11 OR 13".E...E.E.1:.E.1.560.N.
&..500...0.."STOP WASTING MY TIME. GO BO
THER SOMEONE ELSE.""STOP.;.D.. *** CHECK
IF REQUESTED DISK IS BELOW ANOTHER.F.N.
.R.1.7.Q.X..C.1.3.C.B..T(R,C).D.640.M.L.
.C:.R.{....Q.R.1..1......T(Q,C).0.660...
...T(Q,C).D.680......Q......700......"TH
AT DISK IS BELOW ANOTHER ONE. MAKE ANOTH
ER CHOICE."......480.....E.0...A.."PLACE
DISK ON WHICH NEEDLE".%.F..N.B.Z..(N.1)
.(N.2).(N.3).0.800.L...E.E.1.Y....E.1.78
0......"I'LL ASSUME YOU HIT THE WRONG KE
Y THIS TIME. BUT WATCH IT,".A...."I ONLY
ALLOW ONE MISTAKE.":.705......"I TRIED
TO WARN YOU, BUT YOU WOULDN'T LISTEN."..
...."BYE BYE, BIG SHOT.":.... ..R.1.7.0.
*..T(R,N)..0.840.7.4..R.@.>..880.U.C.. *
** CHECK IF DISK TO BE PLACED ON A LARGE
R ONE...H..D.T(R,N).880.E.R.."YOU CAN'T
PLACE A LARGER DISK ON TOP OF A SMALLER
ONE,"...\.."IT MIGHT CRUSH IT!":."NOW TH
EN,":.480...K.. *** MOVE RELOCATED DISK.
!.P..V.1.7:.W.1.3.3....T(V,W).D.930.=...
.W:.V.E....*** LOCATE EMPTY SPACE ON NEE
DLE N.P....U.1.7......T(U,N)..0.970.....
.U.....U.7:.980.E.E.. *** MOVE DISK AND
SET OLD LOCATION TO 0.O.J.U.U.1...T.T(U,
N).T(V,W):T(V,W).0...... *** PRINT OUT C
URRENT STATUS......".":.1230.4.... *** C
HECK IF DONE.>...M.M.1.P....R.1.7:.C.1.2
.D....T(R,C)..0.1090.N.$..C:.R.X.8..1120
...B..M..128.480.J.L.."SORRY, BUT I HAVE
ORDERS TO STOP YOU IF YOU MAKE MORE THA
N"...V.."128 MOVES.":....`..M..2.S.1.114
0...J.."CONGRATULATIONS!!".;.T.."YOU HAV
E PERFORMED THE TASK IN";M;"MOVES."._.~.
.:."TRY AGAIN (YES OR NO)";:.A$.Q....A$.
"NO".1390......A$."YES"..:.5......:."'YE
S' OR 'NO' PLEASE";:.A$:.1160.H.N.. ***
PRINT SUBROUTINE.S.X..K.1.7.....Z.6.....
.J.1.3......T(K,J).0.1330.......Z..(T(K,
J).2));......V.1.T(K,J).)...."*";.0....V
.:.(..1340.H.2...Z);".";.S.<.Z.Z.13.Z.F.
.J.`.P...G.Z..K.M.D.....N..:."THANKS FOR
THE GAME!":.:....
> CLICK IMAGE PREVIEW FOR FULL MODAL