TUERME VON HANOI
FILE INFORMATION
FILENAME(S): TUERME VON HANOI
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-12-01 13:58:28
APPEARS ON: 1 disk(s)
FILE HASH
6abf1dec2ca1c4e182dc1e7b99dbed4803dbaea690fd09c5005ab2377d1f98fd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMMODORE 64 | TUERME VON HANOI | PRG | HOL2001, Misc | 6 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 44 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..D.d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000040: 2A 2A 2A 2A 00 87 08 6E 00 8F 20 2A 20 20 20 20 |****...n.. * |
00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000080: 20 20 20 20 20 20 2A 00 CA 08 78 00 8F 20 2A 20 | *...x.. * |
00000090: 50 52 4F 47 52 41 4D 20 20 20 20 20 20 20 20 20 |PROGRAM |
000000A0: 20 20 20 20 20 20 3A 20 54 55 45 52 4D 45 20 56 | : TUERME V|
000000B0: 4F 4E 20 48 41 4E 4F 49 20 20 20 20 20 20 20 20 |ON HANOI |
000000C0: 20 20 20 20 20 20 20 20 20 2A 00 0D 09 82 00 8F | *......|
000000D0: 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | * |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 50 09 | *.P.|
00000110: 8C 00 8F 20 2A 20 41 55 54 48 4F 52 20 20 20 20 |... * AUTHOR |
00000120: 20 20 20 20 20 20 20 20 20 20 20 20 3A 20 20 20 | : |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *|
00000150: 00 93 09 96 00 8F 20 2A 20 20 20 20 20 20 20 20 |...... * |
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000170: 20 20 20 20 20 20 42 59 20 45 4C 4B 45 20 20 20 | BY ELKE |
00000180: 20 53 41 4C 4C 45 52 20 20 20 20 20 20 20 20 20 | SALLER |
00000190: 20 20 2A 00 D6 09 A0 00 8F 20 2A 20 20 20 20 20 | *...... * |
000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 4D 45 44 49 | MEDI|
000001C0: 45 4E 50 52 4F 44 55 4B 54 45 20 20 20 20 20 20 |ENPRODUKTE |
000001D0: 20 20 20 20 20 2A 00 19 0A AA 00 8F 20 2A 20 20 | *...... * |
000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210: 20 20 20 20 20 20 20 20 2A 00 5C 0A B4 00 8F 20 | *.\.... |
00000220: 2A 20 49 4E 53 54 41 4C 4C 41 54 49 4F 4E 20 20 |* INSTALLATION |
00000230: 20 20 20 20 20 20 20 20 3A 20 20 20 20 20 20 20 | : |
00000240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000250: 20 20 20 20 20 20 20 20 20 20 20 2A 00 9F 0A BE | *....|
00000260: 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 |.. * |
00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.|
000002A0: E2 0A C8 00 8F 20 2A 20 44 41 54 45 2D 57 52 49 |..... * DATE-WRI|
000002B0: 54 54 45 4E 20 20 20 20 20 20 20 20 20 20 3A 20 |TTEN : |
000002C0: 32 30 2E 31 30 2E 38 33 20 20 56 45 52 53 49 4F |20.10.83 VERSIO|
000002D0: 4E 3A 20 30 31 20 20 20 20 20 20 20 20 20 20 20 |N: 01 |
000002E0: 20 2A 00 25 0B D2 00 8F 20 2A 20 20 20 20 20 20 | *.%.... * |
000002F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000320: 20 20 20 20 2A 00 68 0B DC 00 8F 20 2A 20 53 4F | *.h.... * SO|
00000330: 55 52 43 45 2F 4F 42 4A 45 43 54 2D 43 4F 4D 50 |URCE/OBJECT-COMP|
00000340: 55 54 45 52 3A 20 56 43 2D 36 34 20 2F 20 20 20 |UTER: VC-64 / |
00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000360: 20 20 20 20 20 20 20 2A 00 AB 0B E6 00 8F 20 2A | *...... *|
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
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 20 20 20 2A 00 EE 0B F0 00 | *.....|
000003B0: 8F 20 2A 20 4D 45 4D 4F 52 59 20 53 49 5A 45 20 |. * MEMORY SIZE |
000003C0: 20 20 20 20 20 20 20 20 20 20 3A 20 20 20 35 35 | : 55|
000003D0: 36 36 20 42 59 54 45 53 20 20 20 20 20 20 20 20 |66 BYTES |
000003E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 31 | *.1|
000003F0: 0C FA 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 |.... * |
00000400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000430: 2A 00 74 0C 04 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*.t.... ********|
00000440: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000450: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000470: 2A 2A 2A 2A 00 7A 0C 0E 01 8F 00 80 0C 18 01 8F |****.z..........|
00000480: 00 86 0C 22 01 8F 00 90 0C 2C 01 50 4B B2 31 32 |...".....,.PK.12|
00000490: 00 9A 0C 36 01 8D 31 37 32 30 00 B4 0C 40 01 54 |...6..1720...@.T|
000004A0: 24 B2 22 92 20 92 A4 92 AF 92 B9 92 A2 12 B8 12 |$.". ...........|
000004B0: B7 12 A3 22 00 CE 0C 4A 01 42 24 B2 22 12 A4 12 |..."...J.B$."...|
000004C0: AF 12 B9 12 A2 92 B8 92 B7 92 A3 92 20 22 00 F3 |............ "..|
000004D0: 0C 54 01 86 54 50 24 28 38 29 2C 54 24 28 38 29 |.T..TP$(8),T$(8)|
000004E0: 2C 42 54 24 28 38 29 2C 42 24 28 38 29 20 20 20 |,BT$(8),B$(8) |
000004F0: 20 20 20 00 FE 0C 5E 01 81 49 B2 31 A4 38 00 38 | ...^..I.1.8.8|
00000500: 0D 68 01 43 24 B2 CA 28 54 24 2C 32 AC 49 2C 31 |.h.C$..(T$,2.I,1|
00000510: 29 3A 43 24 B2 43 24 AA 43 24 AA 43 24 3A 43 24 |):C$.C$.C$.C$:C$|
00000520: B2 43 24 AA 43 24 AA 43 24 3A 43 24 B2 C8 28 43 |.C$.C$.C$:C$..(C|
00000530: 24 AA 43 24 2C 31 34 29 00 54 0D 72 01 54 50 24 |$.C$,14).T.r.TP$|
00000540: 28 49 29 B2 CA 28 54 24 2C 32 AC 49 AB 31 2C 31 |(I)..(T$,2.I.1,1|
00000550: 29 AA 43 24 00 8E 0D 7C 01 43 24 B2 CA 28 42 24 |).C$...|.C$..(B$|
00000560: 2C 32 AC 49 2C 31 29 3A 43 24 B2 43 24 AA 43 24 |,2.I,1):C$.C$.C$|
00000570: AA 43 24 3A 43 24 B2 43 24 AA 43 24 AA 43 24 3A |.C$:C$.C$.C$.C$:|
00000580: 43 24 B2 C8 28 43 24 AA 43 24 2C 31 34 29 00 AA |C$..(C$.C$,14)..|
00000590: 0D 86 01 42 54 24 28 49 29 B2 CA 28 42 24 2C 32 |...BT$(I)..(B$,2|
000005A0: AC 49 AB 31 2C 31 29 AA 43 24 00 B1 0D 90 01 82 |.I.1,1).C$......|
000005B0: 49 00 C5 0D 9A 01 4C 24 B2 22 12 20 12 B4 12 A1 |I.....L$.". ....|
000005C0: 92 AA 92 20 22 00 D9 0D A4 01 52 24 B2 22 92 20 |... ".....R$.". |
000005D0: 92 B4 92 A1 12 AA 12 20 22 00 EC 0D AE 01 86 4C |....... "......L|
000005E0: 46 24 28 35 29 2C 52 54 24 28 35 29 00 24 0E B8 |F$(5),RT$(5).$..|
000005F0: 01 81 49 B2 31 A4 35 3A 4C 46 24 28 49 29 B2 CA |..I.1.5:LF$(I)..|
00000600: 28 4C 24 2C 32 AC 49 AB 31 2C 32 29 3A 52 54 24 |(L$,2.I.1,2):RT$|
00000610: 28 49 29 B2 CA 28 52 24 2C 32 AC 49 AB 31 2C 32 |(I)..(R$,2.I.1,2|
00000620: 29 3A 82 49 00 32 0E C2 01 43 52 24 B2 C7 28 31 |):.I.2...CR$..(1|
00000630: 33 29 00 63 0E CC 01 99 22 11 12 57 49 45 20 56 |3).c...."..WIE V|
00000640: 49 45 4C 45 20 53 43 48 45 49 42 45 4E 28 42 49 |IELE SCHEIBEN(BI|
00000650: 53 20 20 20 37 29 20 3F 92 20 22 3B 3A 8D 20 31 |S 7) ?. ";:. 1|
00000660: 35 32 30 00 73 0E D6 01 8B 49 4E 24 B2 22 22 A7 |520.s....IN$."".|
00000670: 34 36 30 00 83 0E E0 01 81 49 B2 31 A4 C3 28 49 |460......I.1..(I|
00000680: 4E 24 29 00 AB 0E EA 01 3A 54 24 B2 CA 28 49 4E |N$).....:T$..(IN|
00000690: 24 2C 49 2C 31 29 3A 8B 54 24 B1 B2 22 30 22 AF |$,I,1):.T$.."0".|
000006A0: 54 24 B3 B2 22 39 22 A7 35 31 30 00 CC 0E F4 01 |T$.."9".510.....|
000006B0: 99 22 4E 45 49 4E 22 3B 54 24 3B 22 27 53 20 42 |."NEIN";T$;"'S B|
000006C0: 49 54 54 45 20 2E 22 3A 89 34 36 30 00 D3 0E FE |ITTE .":.460....|
000006D0: 01 82 49 00 01 0F 08 02 4E B2 C5 28 49 4E 24 29 |..I.....N..(IN$)|
000006E0: 3A 8B 4E B1 37 A7 99 22 49 43 48 20 4B 41 4E 4E |:.N.7.."ICH KANN|
000006F0: 20 4E 55 52 20 42 49 53 20 37 2E 22 3A 89 34 36 | NUR BIS 7.":.46|
00000700: 30 00 2D 0F 12 02 8B 4E B3 32 A7 99 22 53 45 49 |0.-....N.2.."SEI|
00000710: 20 4E 49 43 48 54 20 55 4E 56 45 52 53 43 48 41 | NICHT UNVERSCHA|
00000720: 45 52 45 4D 54 3A 47 4F 54 4F 35 30 30 00 4D 0F |EREMT:GOTO500.M.|
00000730: 1C 02 44 4E 24 B2 22 13 11 11 11 11 11 11 11 11 |..DN$.".........|
00000740: 11 11 11 11 11 11 11 11 11 11 11 11 22 00 66 0F |............".f.|
00000750: 26 02 52 54 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |&.RT$.".........|
00000760: 1D 1D 1D 1D 1D 22 00 87 0F 30 02 81 49 B2 31 A4 |....."...0..I.1.|
00000770: 33 3A 81 4A B2 30 A4 37 3A 50 28 49 2C 4A 29 B2 |3:.J.0.7:P(I,J).|
00000780: 30 3A 82 4A 3A 82 49 00 A3 0F 3A 02 99 22 93 22 |0:.J:.I...:.."."|
00000790: 3B 44 4E 24 3B 22 12 90 22 3B 3A 50 28 31 2C 30 |;DN$;"..";:P(1,0|
000007A0: 29 B2 4E 00 DE 0F 44 02 81 49 B2 31 A4 33 3A 99 |).N...D..I.1.3:.|
000007B0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000007C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007D0: 20 20 20 20 20 20 20 20 20 22 3B 3A 82 49 00 0F | ";:.I..|
000007E0: 10 4E 02 99 44 4E 24 3B 22 11 12 1D 1D 1D 1D 1D |.N..DN$;".......|
000007F0: 1D 23 31 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 23 32 |.#1...........#2|
00000800: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 23 33 1E 22 00 |...........#3.".|
00000810: 28 10 58 02 99 44 4E 24 3B C8 28 22 91 91 91 91 |(.X..DN$;.("....|
00000820: 91 91 91 22 2C 4E 29 3B 00 33 10 62 02 81 49 B2 |...",N);.3.b..I.|
00000830: 31 A4 4E 00 62 10 6C 02 99 C8 28 22 92 22 AA 52 |1.N.b.l...(".".R|
00000840: 54 24 2C 37 AB 49 AA 31 29 3B C8 28 22 12 CC 22 |T$,7.I.1);.(".."|
00000850: AA 42 54 24 28 31 29 2C 32 AC 49 AA 31 29 3B 22 |.BT$(1),2.I.1);"|
00000860: BA 22 00 75 10 76 02 50 28 31 2C 4E AB 49 AA 31 |.".u.v.P(1,N.I.1|
00000870: 29 B2 49 AC 32 00 7C 10 80 02 82 49 00 85 10 8A |).I.2.|....I....|
00000880: 02 4D 56 B2 30 00 92 10 94 02 54 4D B2 54 49 AA |.MV.0.....TM.TI.|
00000890: 36 30 00 A1 10 9E 02 8B 54 49 B3 54 4D A7 36 37 |60......TI.TM.67|
000008A0: 30 00 AB 10 A8 02 8D 31 34 37 30 00 DF 10 B2 02 |0......1470.....|
000008B0: 50 52 24 B2 22 9A 13 11 56 4F 4E 20 57 45 4C 43 |PR$."...VON WELC|
000008C0: 48 45 4D 20 53 54 41 50 45 4C 3F 1E 22 3A 8D 31 |HEM STAPEL?.":.1|
000008D0: 33 37 30 3A 8B 49 4E 24 B2 22 22 A7 36 38 30 00 |370:.IN$."".680.|
000008E0: EC 10 BC 02 46 B2 C5 28 49 4E 24 29 00 1E 11 C6 |....F..(IN$)....|
000008F0: 02 8B 50 28 46 2C 30 29 B3 31 A7 99 22 1C 12 44 |..P(F,0).1.."..D|
00000900: 49 45 53 45 52 20 53 54 41 50 45 4C 20 49 53 54 |IESER STAPEL IST|
00000910: 20 4C 45 45 52 21 92 1E 22 3A 89 36 36 30 00 50 | LEER!..":.660.P|
00000920: 11 D0 02 50 52 24 B2 22 9A 5A 55 20 57 45 4C 43 |...PR$.".ZU WELC|
00000930: 48 45 4D 20 53 54 41 50 45 4C 3F 20 1E 22 3A 8D |HEM STAPEL? .":.|
00000940: 31 33 37 30 3A 8B 49 4E 24 B2 22 22 A7 36 38 30 |1370:.IN$."".680|
00000950: 00 5D 11 DA 02 54 B2 C5 28 49 4E 24 29 00 8D 11 |.]...T..(IN$)...|
00000960: E4 02 8B 46 B2 54 A7 99 22 1C 12 44 49 45 53 45 |...F.T.."..DIESE|
00000970: 52 20 5A 55 47 20 42 45 57 49 52 4B 54 20 4E 49 |R ZUG BEWIRKT NI|
00000980: 43 48 54 53 2E 92 1E 22 3A 89 36 36 30 00 9F 11 |CHTS...":.660...|
00000990: EE 02 8B 50 28 54 2C 30 29 B2 30 A7 38 31 30 00 |...P(T,0).0.810.|
000009A0: D8 11 F8 02 8B 50 28 46 2C 50 28 46 2C 30 29 29 |.....P(F,P(F,0))|
000009B0: B1 50 28 54 2C 50 28 54 2C 30 29 29 A7 99 22 1C |.P(T,P(T,0))..".|
000009C0: 12 44 41 53 20 47 49 4C 54 20 4E 49 43 48 54 2E |.DAS GILT NICHT.|
000009D0: 92 1E 22 3A 89 36 36 30 00 E1 11 02 03 99 22 11 |..":.660......".|
000009E0: 11 00 E8 11 0C 03 99 22 00 EF 11 16 03 99 22 00 |......."......".|
000009F0: F6 11 20 03 99 22 00 2C 12 2A 03 46 43 B2 50 28 |.. ..".,.*.FC.P(|
00000A00: 46 2C 30 29 3A 46 57 B2 50 28 46 2C 46 43 29 3A |F,0):FW.P(F,FC):|
00000A10: 54 43 B2 50 28 54 2C 30 29 3A 54 57 B2 50 28 54 |TC.P(T,0):TW.P(T|
00000A20: 2C 54 43 29 3A 4D 56 B2 4D 56 AA 31 00 44 12 34 |,TC):MV.MV.1.D.4|
00000A30: 03 58 B2 31 AA 31 33 AC 28 46 AB 31 29 AA 37 AB |.X.1.13.(F.1).7.|
00000A40: 46 57 AD 32 00 78 12 3E 03 99 20 44 4E 24 3B C8 |FW.2.x.>.. DN$;.|
00000A50: 28 22 91 91 91 91 91 91 91 91 91 22 2C 46 43 AA |(".........",FC.|
00000A60: 31 29 3B C8 28 22 92 22 AA 52 54 24 AA 52 54 24 |1);.(".".RT$.RT$|
00000A70: AA 52 54 24 2C 58 29 3B 00 9A 12 48 03 4C 46 24 |.RT$,X);...H.LF$|
00000A80: B2 C8 28 22 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |..("............|
00000A90: 9D 9D 9D 22 2C 46 57 AA 31 29 00 D3 12 52 03 81 |...",FW.1)...R..|
00000AA0: 49 B2 31 A4 20 38 3A 54 24 28 49 29 B2 C8 28 54 |I.1. 8:T$(I)..(T|
00000AB0: 50 24 28 49 29 2C 31 AA 46 57 29 3A 42 24 28 49 |P$(I),1.FW):B$(I|
00000AC0: 29 B2 C8 28 42 54 24 28 49 29 2C 31 AA 46 57 29 |)..(BT$(I),1.FW)|
00000AD0: 3A 82 49 00 EA 12 5C 03 48 54 B2 30 3A 4A B2 31 |:.I...\.HT.0:J.1|
00000AE0: 3A 8B 46 B1 54 A7 4A B2 AB 31 00 F7 12 66 03 81 |:.F.T.J..1...f..|
00000AF0: 49 B2 46 A4 54 A9 4A 00 10 13 70 03 8B 50 28 49 |I.F.T.J...p..P(I|
00000B00: 2C 30 29 B1 48 54 A7 48 54 B2 50 28 49 2C 30 29 |,0).HT.HT.P(I,0)|
00000B10: 00 17 13 7A 03 82 49 00 33 13 84 03 8B 48 54 B2 |...z..I.3....HT.|
00000B20: 50 28 54 2C 30 29 A7 48 54 B2 48 54 AA 31 3A 89 |P(T,0).HT.HT.1:.|
00000B30: 39 32 30 00 54 13 8E 03 8B B6 28 46 AB 54 29 B1 |920.T.....(F.T).|
00000B40: 31 A7 8B 48 54 B2 50 28 32 2C 30 29 A7 48 54 B2 |1..HT.P(2,0).HT.|
00000B50: 48 54 AA 31 00 61 13 98 03 81 49 B2 46 43 A4 48 |HT.1.a....I.FC.H|
00000B60: 54 00 6E 13 A2 03 3A 81 20 4A B2 31 A4 38 00 8E |T.n...:. J.1.8..|
00000B70: 13 AC 03 3A 99 54 24 28 4A 29 3B 4C 46 24 3B 42 |...:.T$(J);LF$;B|
00000B80: 24 28 4A 29 3B 4C 46 24 3B 22 91 91 22 3B 00 96 |$(J);LF$;"..";..|
00000B90: 13 B6 03 3A 82 4A 00 A1 13 C0 03 3A 99 22 91 22 |...:.J.....:."."|
00000BA0: 3B 00 A8 13 CA 03 82 49 00 B2 13 D4 03 99 22 11 |;......I......".|
00000BB0: 22 3B 00 E3 13 DE 03 4C 24 B2 C8 28 22 9D 9D 9D |";.....L$..("...|
00000BC0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 2C 31 |.............",1|
00000BD0: AA 46 57 29 3A 52 24 B2 C8 28 52 54 24 2C 46 57 |.FW):R$..(RT$,FW|
00000BE0: AB 31 29 00 23 14 E8 03 99 22 12 22 3B C8 28 22 |.1).#....".";.("|
00000BF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C00: 22 2C 46 57 29 3B 22 92 22 3B C8 28 22 9D 9D 9D |",FW);".";.("...|
00000C10: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 2C 46 |.............",F|
00000C20: 57 29 3B 00 31 14 F2 03 8B 46 B1 54 A7 31 30 39 |W);.1....F.T.109|
00000C30: 30 00 44 14 FC 03 81 49 B2 46 AC 31 33 A4 54 AC |0.D....I.F.13.T.|
00000C40: 31 33 AB 31 00 50 14 06 04 3A 81 4A B2 31 A4 35 |13.1.P...:.J.1.5|
00000C50: 00 6A 14 10 04 99 4C 46 24 28 4A 29 3B 52 24 3B |.j....LF$(J);R$;|
00000C60: 52 54 24 28 4A 29 3B 4C 24 3B 00 71 14 1A 04 82 |RT$(J);L$;.q....|
00000C70: 4A 00 7B 14 24 04 99 22 1D 22 3B 00 82 14 2E 04 |J.{.$..".";.....|
00000C80: 82 49 00 8C 14 38 04 89 31 31 35 30 00 9F 14 42 |.I...8..1150...B|
00000C90: 04 81 49 B2 54 AC 31 33 A4 46 AC 31 33 AB 31 00 |..I.T.13.F.13.1.|
00000CA0: A9 14 4C 04 99 22 9D 22 3B 00 B8 14 56 04 3A 81 |..L..".";...V.:.|
00000CB0: 4A B2 35 A4 31 A9 AB 31 00 D4 14 60 04 3A 3A 99 |J.5.1..1...`.::.|
00000CC0: 4C 46 24 28 4A 29 3B 52 24 3B 52 54 24 28 4A 29 |LF$(J);R$;RT$(J)|
00000CD0: 3B 4C 24 3B 00 DC 14 6A 04 3A 82 4A 00 E3 14 74 |;L$;...j.:.J...t|
00000CE0: 04 82 49 00 F5 14 7E 04 81 49 B2 48 54 AB 31 A4 |..I...~..I.HT.1.|
00000CF0: 54 43 A9 AB 31 00 04 15 88 04 3A 81 4A B2 38 A4 |TC..1.....:.J.8.|
00000D00: 31 A9 AB 31 00 24 15 92 04 3A 99 54 24 28 4A 29 |1..1.$...:.T$(J)|
00000D10: 3B 4C 46 24 3B 42 24 28 4A 29 3B 4C 46 24 3B 22 |;LF$;B$(J);LF$;"|
00000D20: 91 91 22 3B 00 2C 15 9C 04 3A 82 4A 00 37 15 A6 |..";.,...:.J.7..|
00000D30: 04 3A 99 22 11 22 3B 00 3E 15 B0 04 82 49 00 5B |.:.".";.>....I.[|
00000D40: 15 BA 04 99 C8 28 22 12 CC 22 AA 42 54 24 28 31 |.....("..".BT$(1|
00000D50: 29 2C 46 57 AA 31 29 3B 22 BA 22 00 6F 15 C4 04 |),FW.1);".".o...|
00000D60: 50 28 54 2C 30 29 B2 50 28 54 2C 30 29 AA 31 00 |P(T,0).P(T,0).1.|
00000D70: 8B 15 CE 04 50 28 54 2C 50 28 54 2C 30 29 29 B2 |....P(T,P(T,0)).|
00000D80: 50 28 46 2C 50 28 46 2C 30 29 29 00 9F 15 D8 04 |P(F,P(F,0)).....|
00000D90: 50 28 46 2C 30 29 B2 50 28 46 2C 30 29 AB 31 00 |P(F,0).P(F,0).1.|
00000DA0: BC 15 E2 04 8B 50 28 32 2C 30 29 B3 B1 4E AF 50 |.....P(2,0)..N.P|
00000DB0: 28 33 2C 30 29 B3 B1 4E A7 36 36 30 00 C6 15 EC |(3,0)..N.660....|
00000DC0: 04 8D 31 34 37 30 00 E8 15 F6 04 99 22 11 11 11 |..1470......"...|
00000DD0: 9E 20 20 20 20 20 20 20 20 AC A2 A2 A2 A2 A2 A2 |. .......|
00000DE0: A2 A2 A2 A2 A2 A2 BB 22 00 08 16 00 05 99 22 20 |......."......" |
00000DF0: 20 20 20 20 20 20 20 12 A1 44 41 53 20 20 57 41 | ..DAS WA|
00000E00: 52 20 45 53 21 92 A1 22 00 28 16 0A 05 99 22 20 |R ES!..".(...." |
00000E10: 20 20 20 20 20 20 20 BC 12 A2 A2 A2 A2 A2 A2 A2 | .........|
00000E20: A2 A2 A2 A2 A2 92 BE 22 00 5D 16 14 05 99 22 9A |.......".]....".|
00000E30: 11 44 55 20 48 41 53 54 22 3B 4D 56 3B C8 28 22 |.DU HAST";MV;.("|
00000E40: 5A 55 45 47 45 22 2C 35 AA 28 4D 56 B2 31 29 29 |ZUEGE",5.(MV.1))|
00000E50: 3B 22 20 42 45 4E 4F 45 54 47 54 2E 22 00 83 16 |;" BENOETGT."...|
00000E60: 1E 05 54 B2 32 AE 4E AB 31 3A 99 22 11 44 49 45 |..T.2.N.1:.".DIE|
00000E70: 20 4B 55 45 52 5A 45 53 54 45 20 4C 4F 45 53 55 | KUERZESTE LOESU|
00000E80: 4E 47 22 00 AE 16 28 05 99 22 42 45 4E 4F 45 54 |NG"...(.."BENOET|
00000E90: 49 47 54 45 22 3B 54 3B C8 28 22 5A 55 45 47 45 |IGTE";T;.("ZUEGE|
00000EA0: 22 2C 35 AA 28 54 B2 31 29 29 3B 22 2E 22 00 C9 |",5.(T.1));"."..|
00000EB0: 16 32 05 99 22 11 4E 4F 43 48 4D 41 4C 20 3F 20 |.2..".NOCHMAL ? |
00000EC0: 1E 22 3B 3A 8D 31 35 32 30 00 DE 16 3C 05 8B C8 |.";:.1520...<...|
00000ED0: 28 49 4E 24 2C 31 29 B3 B1 22 4A 22 A7 80 00 E4 |(IN$,1).."J"....|
00000EE0: 16 46 05 8A 00 EA 16 50 05 80 00 F4 16 5A 05 99 |.F.....P.....Z..|
00000EF0: 50 52 24 3B 00 08 17 64 05 8D 31 35 32 30 3A 8B |PR$;...d..1520:.|
00000F00: 49 4E 24 B2 22 22 A7 8E 00 1C 17 6E 05 8B C8 28 |IN$."".....n...(|
00000F10: 49 4E 24 2C 31 29 B2 22 51 22 A7 80 00 2F 17 78 |IN$,1)."Q".../.x|
00000F20: 05 8B C3 28 49 4E 24 29 B1 31 A7 31 34 32 30 00 |...(IN$).1.1420.|
00000F30: 48 17 82 05 8B 49 4E 24 B1 B2 22 31 22 AF 49 4E |H....IN$.."1".IN|
00000F40: 24 B3 B2 22 33 22 A7 8E 00 6C 17 8C 05 99 22 81 |$.."3"...l....".|
00000F50: 44 49 45 53 45 4E 20 53 54 41 50 45 4C 20 47 49 |DIESEN STAPEL GI|
00000F60: 42 54 27 53 20 4E 49 43 48 54 1E 22 00 7C 17 96 |BT'S NICHT.".|..|
00000F70: 05 81 49 B2 31 A4 35 30 30 3A 82 49 00 9A 17 A0 |..I.1.500:.I....|
00000F80: 05 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00000F90: 20 20 20 20 20 20 20 20 20 22 00 DD 17 AA 05 99 | "......|
00000FA0: 22 91 91 22 3B 50 52 24 3B C8 28 22 20 20 20 20 |"..";PR$;.(" |
00000FB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FD0: 20 20 20 20 22 2C C3 28 49 4E 24 29 29 00 ED 17 | ",.(IN$))...|
00000FE0: B4 05 99 22 91 22 3B 3A 89 31 33 37 30 00 F7 17 |...".";:.1370...|
00000FF0: BE 05 99 22 13 22 3B 00 30 18 C8 05 81 49 B2 31 |...".";.0....I.1|
00001000: A4 34 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 |.4:." |
00001010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001020: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 49 | ":.I|
00001030: 00 3A 18 D2 05 99 22 13 22 3B 00 40 18 DC 05 8E |.:....".";.@....|
00001040: 00 49 18 E6 05 99 22 13 22 00 6A 18 F0 05 49 4E |.I....".".j...IN|
00001050: 24 B2 22 20 22 3A 5A 54 B2 54 49 3A 5A 43 B2 32 |$." ":ZT.TI:ZC.2|
00001060: 3A 5A 44 24 B2 C7 28 32 30 29 00 80 18 FA 05 A1 |:ZD$..(20)......|
00001070: 5A 24 3A 8B 20 5A 24 B3 B1 22 22 A7 31 35 36 30 |Z$:. Z$.."".1560|
00001080: 00 B0 18 04 06 8B 5A 54 B3 B2 54 49 A7 99 CA 28 |......ZT..TI...(|
00001090: 22 20 A6 22 2C 5A 43 2C 31 29 3B 22 9D 22 3B 3A |" .",ZC,1);".";:|
000010A0: 5A 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 AA 31 35 |ZC.3.ZC:ZT.TI.15|
000010B0: 00 BA 18 0E 06 89 31 35 33 30 00 E9 18 18 06 5A |......1530.....Z|
000010C0: B2 C6 28 5A 24 29 3A 5A 4C B2 C3 28 49 4E 24 29 |..(Z$):ZL..(IN$)|
000010D0: 3A 8B 28 5A AF 31 32 37 29 B3 33 32 A7 99 22 20 |:.(Z.127).32.." |
000010E0: 9D 22 3B 3A 89 31 36 30 30 00 19 19 22 06 8B 46 |.";:.1600..."..F|
000010F0: 4C AF 28 5A AF 31 32 37 29 B1 36 34 AF 28 5A AF |L.(Z.127).64.(Z.|
00001100: 31 32 37 29 B3 39 31 A7 5A 24 B2 C7 28 28 5A AA |127).91.Z$..((Z.|
00001110: 31 32 38 29 AF 32 35 35 29 00 2A 19 2C 06 8B 5A |128).255).*.,..Z|
00001120: 4C B1 32 35 34 A7 31 35 33 30 00 45 19 36 06 49 |L.254.1530.E.6.I|
00001130: 4E 24 B2 49 4E 24 AA 5A 24 3A 99 5A 24 3B 5A 44 |N$.IN$.Z$:.Z$;ZD|
00001140: 24 3B 5A 24 3B 00 64 19 40 06 8B 5A B2 31 33 A7 |$;Z$;.d.@..Z.13.|
00001150: 49 4E 24 B2 CA 28 49 4E 24 2C 32 29 3A 99 43 52 |IN$..(IN$,2):.CR|
00001160: 24 3B 3A 8E 00 8F 19 4A 06 8B 5A B2 32 30 AF 5A |$;:....J..Z.20.Z|
00001170: 4C B1 31 A7 49 4E 24 B2 C8 28 49 4E 24 2C 5A 4C |L.1.IN$..(IN$,ZL|
00001180: AB 31 29 3A 99 22 9D 22 3B 3A 89 31 35 33 30 00 |.1):.".";:.1530.|
00001190: C1 19 54 06 8B 5A B2 31 34 31 A7 5A 24 B2 C7 28 |..T..Z.141.Z$..(|
000011A0: AB 32 30 AC 28 5A 4C B1 31 29 29 3A 81 5A B2 32 |.20.(ZL.1)):.Z.2|
000011B0: A4 5A 4C 3A 99 5A 24 3B 3A 82 5A 3A 89 31 35 32 |.ZL:.Z$;:.Z:.152|
000011C0: 30 00 CB 19 5E 06 89 31 35 33 30 00 DB 19 68 06 |0...^..1530...h.|
000011D0: 8B 50 4E B2 30 A7 89 31 36 39 30 00 FA 19 72 06 |.PN.0..1690...r.|
000011E0: 99 22 11 44 52 55 45 43 4B 45 20 12 52 45 54 55 |.".DRUECKE .RETU|
000011F0: 52 4E 92 20 5A 55 4D 20 22 3B 00 19 1A 7C 06 8B |RN. ZUM ";...|..|
00001200: 50 4E B2 4C 50 A7 99 22 42 45 47 49 4E 4E 45 4E |PN.LP.."BEGINNEN|
00001210: 3A 22 3B 3A 89 31 36 38 30 00 2F 1A 86 06 99 22 |:";:.1680./...."|
00001220: 57 45 49 54 45 52 4D 41 43 48 45 4E 3A 22 3B 00 |WEITERMACHEN:";.|
00001230: 43 1A 90 06 A1 54 24 3A 8B 54 24 B2 22 22 A7 31 |C....T$:.T$."".1|
00001240: 36 38 30 00 5B 1A 9A 06 8B 50 4E B2 4C 50 A7 9C |680.[....PN.LP..|
00001250: 3A 99 22 93 22 3B 3A 89 33 32 30 00 7B 1A A4 06 |:.".";:.320.{...|
00001260: 50 4E B2 50 4E AA 31 3A 99 22 93 22 3B 50 47 24 |PN.PN.1:.".";PG$|
00001270: 3B 4E 4D 24 3B 50 4E 3B 22 51 22 00 81 1A AE 06 |;NM$;PN;"Q".....|
00001280: 8E 00 94 1A B8 06 4C 50 B2 31 3A 43 52 24 B2 C7 |......LP.1:CR$..|
00001290: 28 31 33 29 00 A2 1A C2 06 99 22 93 9A 12 11 11 |(13)......".....|
000012A0: 11 22 00 BE 1A CC 06 99 22 11 11 12 54 55 45 52 |."......"...TUER|
000012B0: 4D 45 20 56 4F 4E 20 48 41 4E 4F 49 92 22 00 DF |ME VON HANOI."..|
000012C0: 1A D6 06 99 22 11 53 50 49 45 4C 41 4E 4C 45 49 |....".SPIELANLEI|
000012D0: 54 55 4E 47 20 3F 20 22 3B 3A 8D 31 35 32 30 00 |TUNG ? ";:.1520.|
000012E0: F7 1A E0 06 8B C8 28 49 4E 24 2C 31 29 B2 22 4A |......(IN$,1)."J|
000012F0: 22 A7 89 31 37 38 30 00 05 1B EA 06 99 22 93 11 |"..1780......"..|
00001300: 11 11 22 3A 8E 00 0F 1B F4 06 8D 31 36 34 30 00 |..":.......1640.|
00001310: 3F 1B FE 06 99 22 93 22 3A 99 22 44 45 52 20 53 |?....".":."DER S|
00001320: 49 4E 4E 20 44 49 45 53 45 53 20 53 50 49 45 4C |INN DIESES SPIEL|
00001330: 45 53 20 49 53 54 20 45 53 20 45 49 4E 45 4E 00 |ES IST ES EINEN.|
00001340: 61 1B 08 07 99 22 53 54 41 50 45 4C 20 50 4C 41 |a...."STAPEL PLA|
00001350: 54 54 45 4E 20 5A 55 20 56 45 52 53 45 54 5A 45 |TTEN ZU VERSETZE|
00001360: 4E 00 84 1B 12 07 99 22 44 49 45 20 47 52 4F 53 |N......"DIE GROS|
00001370: 53 45 4E 20 53 43 48 45 49 42 45 4E 20 4D 55 45 |SEN SCHEIBEN MUE|
00001380: 53 53 45 4E 00 A0 1B 1C 07 99 22 49 4D 4D 45 52 |SSEN......"IMMER|
00001390: 20 55 4E 54 45 4E 20 4C 49 45 47 45 4E 21 21 22 | UNTEN LIEGEN!!"|
000013A0: 00 CB 1B 26 07 99 22 11 44 49 45 20 4D 41 53 43 |...&..".DIE MASC|
000013B0: 48 49 4E 45 20 46 52 41 47 54 20 4E 41 43 48 20 |HINE FRAGT NACH |
000013C0: 44 45 52 20 47 52 4F 45 53 53 45 00 FB 1B 30 07 |DER GROESSE...0.|
000013D0: 99 22 44 45 53 20 53 54 41 50 45 4C 53 2E 22 3A |."DES STAPELS.":|
000013E0: 99 22 41 4E 46 41 45 4E 47 45 52 20 53 4F 4C 4C |."ANFAENGER SOLL|
000013F0: 54 45 4E 20 33 20 4F 44 45 52 22 00 2F 1C 3A 07 |TEN 3 ODER"./.:.|
00001400: 99 22 34 20 56 45 52 53 55 43 48 45 4E 2E 22 3A |."4 VERSUCHEN.":|
00001410: 99 22 41 55 46 20 44 45 4D 20 42 49 4C 44 53 43 |."AUF DEM BILDSC|
00001420: 48 49 52 4D 20 45 52 53 43 48 45 49 4E 54 22 00 |HIRM ERSCHEINT".|
00001430: 52 1C 44 07 99 22 44 41 4E 4E 20 44 45 52 20 54 |R.D.."DANN DER T|
00001440: 55 52 4D 20 55 4E 44 20 44 49 45 20 46 52 41 47 |URM UND DIE FRAG|
00001450: 45 3A 00 83 1C 4E 07 99 22 12 27 56 4F 4E 20 57 |E:...N..".'VON W|
00001460: 45 4C 43 48 45 4D 20 53 54 41 50 45 4C 3F 27 22 |ELCHEM STAPEL?'"|
00001470: 3A 99 22 56 45 52 53 45 54 5A 45 20 4E 55 4E 20 |:."VERSETZE NUN |
00001480: 44 49 45 00 AC 1C 58 07 99 22 45 49 4E 5A 45 4C |DIE...X.."EINZEL|
00001490: 4E 45 4E 20 53 43 48 45 49 42 45 4E 20 56 4F 4E |NEN SCHEIBEN VON|
000014A0: 20 45 49 4E 45 4D 20 50 4C 41 54 5A 00 BE 1C 62 | EINEM PLATZ...b|
000014B0: 07 99 22 5A 55 4D 20 41 4E 44 45 52 4E 2E 00 EA |.."ZUM ANDERN...|
000014C0: 1C 6C 07 99 22 5A 42 2E 3A 20 31 20 4E 41 43 48 |.l.."ZB.: 1 NACH|
000014D0: 20 33 20 3B 20 31 12 52 45 54 55 52 4E 20 92 2F | 3 ; 1.RETURN ./|
000014E0: 33 12 52 45 54 55 52 4E 92 22 00 F1 1C 76 07 99 |3.RETURN."...v..|
000014F0: 22 00 17 1D 80 07 99 22 11 41 43 48 54 55 4E 47 |"......".ACHTUNG|
00001500: 2D 45 53 20 4B 41 4E 4E 20 49 4D 4D 45 52 20 4E |-ES KANN IMMER N|
00001510: 55 52 20 45 49 4E 45 00 39 1D 8A 07 99 22 53 43 |UR EINE.9...."SC|
00001520: 48 45 49 42 45 20 56 45 52 53 45 54 5A 54 20 57 |HEIBE VERSETZT W|
00001530: 45 52 44 45 4E 21 21 21 21 00 43 1D 94 07 8D 31 |ERDEN!!!!.C....1|
00001540: 36 34 30 00 00 00 52 FF 00 |640...R.. |
..D.D.. ********************************
****************************...N.. *
*.J.X.. * PROGRAM
: TUERME VON HANOI
*...... *
*.P.... * AU
THOR :
*...... *
BY ELKE SALLER
*.V. .. *
MEDIENPRODUKTE *...... *
*.\.... * INSTALLATION
:
*...... *
*...H.. *
DATE-WRITTEN : 20.10.83 VERSIO
N: 01 *.%.R.. *
*.H.... * SOURCE/OBJECT-COMPUTER: VC
-64 / *...... *
*...... * MEMORY SIZE
: 5566 BYTES
*.1.... *
*.T....
****************************************
********************.Z............."....
.,.PK.12...6..1720...@.T$.". ...........
...".N.J.B$."............... "...T..TP$(
8),T$(8),BT$(8),B$(8) ...^..I.1.8.8
.H.C$.J(T$,2.I,1):C$.C$.C$.C$:C$.C$.C$.C
$:C$.H(C$.C$,14).T.R.TP$(I).J(T$,2.I.1,1
).C$...|.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$......I.E...L$.". ....... ".Y.
..R$.". ....... "......LF$(5),RT$(5).$..
..I.1.5:LF$(I).J(L$,2.I.1,2):RT$(I).J(R$
,2.I.1,2):.I.2.B.CR$.G(13).C.L.."..WIE V
IELE SCHEIBEN(BIS 7) ?. ";:. 1520.S.V.
.IN$."".460......I.1.C(IN$).....:T$.J(IN
$,I,1):.T$.."0".T$.."9".510.L...."NEIN";
T$;"'S BITTE .":.460.S....I.....N.E(IN$)
:.N.7.."ICH KANN NUR BIS 7.":.460.-....N
.2.."SEI NICHT UNVERSCHAEREMT:GOTO500.M.
..DN$.".....................".F.&.RT$.".
............."...0..I.1.3:.J.0.7:P(I,J).
0:.J:.I...:..".";DN$;"..";:P(1,0).N...D.
.I.1.3:."
";:.I...N..DN$;"........#1.....
......#2...........#3.".(.X..DN$;H("....
...",N);.3.B..I.1.N.B.L..H(".".RT$,7.I.1
);H(".L".BT$(1),2.I.1);".".U.V.P(1,N.I.1
).I.2.|....I.....MV.0.....TM.TI.60......
TI.TM.670......1470.....PR$."...VON WELC
HEM STAPEL?.":.1370:.IN$."".680.....F.E(
IN$)...F..P(F,0).1.."..DIESER STAPEL IST
LEER!..":.660.P.P.PR$.".ZU WELCHEM STAP
EL? .":.1370:.IN$."".680.].Z.T.E(IN$)...
...F.T.."..DIESER ZUG BEWIRKT NICHTS..."
:.660......P(T,0).0.810.X....P(F,P(F,0))
.P(T,P(T,0)).."..DAS GILT NICHT...":.660
......"........"......"... ..".,.*.FC.P(
F,0):FW.P(F,FC):TC.P(T,0):TW.P(T,TC):MV.
MV.1.D.4.X.1.13.(F.1).7.FW.2.X.>.. DN$;H
(".........",FC.1);H(".".RT$.RT$.RT$,X);
...H.LF$.H("...............",FW.1).S.R..
I.1. 8:T$(I).H(TP$(I),1.FW):B$(I).H(BT$(
I),1.FW):.I...\.HT.0:J.1:.F.T.J..1...F..
I.F.T.J...P..P(I,0).HT.HT.P(I,0)...Z..I.
3....HT.P(T,0).HT.HT.1:.920.T.....(F.T).
1..HT.P(2,0).HT.HT.1.A....I.FC.HT.N...:.
J.1.8.....:.T$(J);LF$;B$(J);LF$;"..";..
...:.J.....:.".";...J..I...T..".";.....L
$.H("................",1.FW):R$.H(RT$,FW
.1).#....".";H(" ",FW);".
";H("................",FW);.1....F.T.109
0.D....I.F.13.T.13.1.P...:.J.1.5.J....LF
$(J);R$;RT$(J);L$;.Q....J.{.$..".";.....
.I...8..1150...B..I.T.13.F.13.1...L.."."
;...V.:.J.5.1..1.T.`.::.LF$(J);R$;RT$(J)
;L$;...J.:.J...T..I...~..I.HT.1.TC..1...
..:.J.8.1..1.$...:.T$(J);LF$;B$(J);LF$;"
..";.,...:.J.7...:.".";.>....I.[....H(".
L".BT$(1),FW.1);".".O.D.P(T,0).P(T,0).1.
..N.P(T,P(T,0)).P(F,P(F,0))...X.P(F,0).P
(F,0).1......P(2,0)..N.P(3,0)..N.660.F..
..1470......".... .............."
......" ..DAS WAR ES!..".(...."
................".]...."..DU HAST
";MV;H("ZUEGE",5.(MV.1));" BENOETGT."...
..T.2.N.1:.".DIE KUERZESTE LOESUNG"...(.
."BENOETIGTE";T;H("ZUEGE",5.(T.1));".".I
.2..".NOCHMAL ? .";:.1520...<..H(IN$,1).
."J".....F.....P.....Z..PR$;...D..1520:.
IN$."".....N..H(IN$,1)."Q".../.X..C(IN$)
.1.1420.H....IN$.."1".IN$.."3"...L....".
DIESEN STAPEL GIBT'S NICHT.".|....I.1.50
0:.I... ..". "......
"..";PR$;H("
",C(IN$))......".";:.1370...
...".";.0.H..I.1.4:."
":.I.:.R..".";.@....
.I....".".J...IN$." ":ZT.TI:ZC.2:ZD$.G(2
0)......Z$:. Z$.."".1560......ZT..TI..J(
" .",ZC,1);".";:ZC.3.ZC:ZT.TI.15......15
30.....Z.F(Z$):ZL.C(IN$):.(Z.127).32.."
.";:.1600..."..FL.(Z.127).64.(Z.127).91.
Z$.G((Z.128).255).*.,..ZL.254.1530.E.6.I
N$.IN$.Z$:.Z$;ZD$;Z$;.D.@..Z.13.IN$.J(IN
$,2):.CR$;:....J..Z.20.ZL.1.IN$.H(IN$,ZL
.1):.".";:.1530.A.T..Z.141.Z$.G(.20.(ZL.
1)):.Z.2.ZL:.Z$;:.Z:.1520.K.^..1530...H.
.PN.0..1690...R..".DRUECKE .RETURN. ZUM
";...|..PN.LP.."BEGINNEN:";:.1680./...."
WEITERMACHEN:";.C....T$:.T$."".1680.[...
.PN.LP..:.".";:.320.{...PN.PN.1:.".";PG$
;NM$;PN;"Q"...........LP.1:CR$.G(13)...B
.."......"...L.."...TUERME VON HANOI."..
.V..".SPIELANLEITUNG ? ";:.1520......H(I
N$,1)."J"..1780......"....":.......1640.
?....".":."DER SINN DIESES SPIELES IST E
S EINEN.A...."STAPEL PLATTEN ZU VERSETZE
N......"DIE GROSSEN SCHEIBEN MUESSEN. ..
.."IMMER UNTEN LIEGEN!!".K.&..".DIE MASC
HINE FRAGT NACH DER GROESSE...0.."DES ST
APELS.":."ANFAENGER SOLLTEN 3 ODER"./.:.
."4 VERSUCHEN.":."AUF DEM BILDSCHIRM ERS
CHEINT".R.D.."DANN DER TURM UND DIE FRAG
E:...N..".'VON WELCHEM STAPEL?'":."VERSE
TZE NUN DIE...X.."EINZELNEN SCHEIBEN VON
EINEM PLATZ...B.."ZUM ANDERN....L.."ZB.
: 1 NACH 3 ; 1.RETURN ./3.RETURN."...V..
"......".ACHTUNG-ES KANN IMMER NUR EINE.
9...."SCHEIBE VERSETZT WERDEN!!!!.C....1
640...R..
> CLICK IMAGE PREVIEW FOR FULL MODAL