TURTLE.C3
FILE INFORMATION
FILENAME(S): TURTLE.C3
FILE TYPE(S): DEL
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 01:08:28
APPEARS ON: 2 disk(s)
FILE HASH
917679d173e3c25f69d2bc2499e0d5d300c29c43b0842e4e693fe5a9afde5288
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT NR | TURTLE.C3 | DEL | Treasure Chest - Wolfgang Rauprich | 4 | 2 | DOWNLOAD FILE |
| PD DISK 17 | TURTLE.C3 | DEL | Treasure Chest - Wolfgang Rauprich | 4 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 32 38 31 2C 31 3A 99 22 93 22 3A 97 35 33 32 38 |281,1:.".":.5328| 00000010: 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 3A 89 31 |1,6:.53280,14:.1| 00000020: 32 32 37 00 EA 28 C6 04 99 22 93 22 00 F4 28 CB |227..(..."."..(.| 00000030: 04 8D 31 35 30 30 00 FE 28 CE 04 8D 32 34 36 30 |..1500..(...2460| 00000040: 00 09 29 D8 04 81 54 B2 31 A4 4E 00 3C 29 E2 04 |..)...T.1.N.<)..| 00000050: 91 20 41 28 54 29 8D 31 35 34 30 2C 31 36 30 30 |. A(T).1540,1600| 00000060: 2C 31 36 36 30 2C 31 37 31 30 2C 31 39 31 30 2C |,1660,1710,1910,| 00000070: 31 39 38 30 2C 32 30 35 30 2C 32 31 32 30 00 46 |1980,2050,2120.F| 00000080: 29 EC 04 82 3A 99 3A 99 00 80 29 F6 04 46 4C B2 |)...:.:...)..FL.| 00000090: 30 3A 99 22 20 C9 53 20 49 54 20 4F 4B 2E 3F 2E |0:." .S IT OK.?.| 000000A0: 2E 28 59 2F 4E 29 A0 22 3B 3A 55 53 24 B2 22 59 |.(Y/N).";:US$."Y| 000000B0: 4E 22 3A 55 4C B2 31 3A 8D 33 35 3A 41 24 B2 55 |N":UL.1:.35:A$.U| 000000C0: 52 24 00 8F 29 00 05 41 24 B2 C8 28 41 24 2C 31 |R$..)..A$..(A$,1| 000000D0: 29 00 A2 29 0A 05 8B 41 24 B3 B1 22 4E 22 A7 20 |)..)...A$.."N". | 000000E0: 31 33 35 30 00 E2 29 14 05 46 4C B2 30 3A 99 22 |1350..)..FL.0:."| 000000F0: 20 C4 4F 20 12 41 92 47 41 49 4E 20 4F 52 20 12 | .O .A.GAIN OR .| 00000100: 51 92 55 49 54 3F 2E 2E 20 22 3B 3A 55 53 24 B2 |Q.UIT?.. ";:US$.| 00000110: 22 41 51 22 3A 55 4C B2 31 3A 8D 33 35 3A 41 24 |"AQ":UL.1:.35:A$| 00000120: B2 55 52 24 00 F2 29 1E 05 41 24 B2 C8 28 41 24 |.UR$..)..A$..(A$| 00000130: 2C 31 29 3A 00 04 2A 28 05 8B 41 24 B2 22 41 22 |,1):..*(..A$."A"| 00000140: A7 20 31 31 31 30 00 1A 2A 32 05 8B 41 24 B2 22 |. 1110..*2..A$."| 00000150: 51 22 A7 20 99 22 93 22 3A 20 20 8E 00 24 2A 3C |Q". .".": ..$*<| 00000160: 05 89 31 33 30 30 00 38 2A 46 05 99 22 93 13 22 |..1300.8*F..".."| 00000170: 3A 20 20 20 20 8D 32 35 31 30 00 7D 2A 50 05 46 |: .2510.}*P.F| 00000180: 4C B2 30 3A 99 22 20 C4 52 41 57 20 12 41 92 4C |L.0:." .RAW .A.L| 00000190: 4C 2E 2E 20 4F 52 20 44 4F 20 12 4D 92 4F 52 45 |L.. OR DO .M.ORE| 000001A0: 3F 2E 2E 20 22 3B 3A 55 53 24 B2 22 41 4D 22 3A |?.. ";:US$."AM":| 000001B0: 55 4C B2 31 3A 8D 33 35 3A 41 24 B2 55 52 24 00 |UL.1:.35:A$.UR$.| 000001C0: 8C 2A 5A 05 41 24 B2 C8 28 41 24 2C 31 29 00 9D |.*Z.A$..(A$,1)..| 000001D0: 2A 64 05 8B 41 24 B2 22 41 22 A7 31 34 31 30 00 |*d..A$."A".1410.| 000001E0: AE 2A 6E 05 8B 41 24 B2 22 4D 22 A7 31 31 31 30 |.*n..A$."M".1110| 000001F0: 00 B8 2A 78 05 89 31 33 36 30 00 C8 2A 82 05 8D |..*x..1360..*...| 00000200: 20 32 35 37 30 3A 99 3A 99 3A 00 0A 2B 8C 05 46 | 2570:.:.:..+..F| 00000210: 4C B2 30 3A 99 22 20 C4 52 41 57 20 12 41 92 47 |L.0:." .RAW .A.G| 00000220: 41 49 4E 2C 44 4F 20 12 4D 92 4F 52 45 20 4F 52 |AIN,DO .M.ORE OR| 00000230: 20 12 51 92 55 49 54 3F 2E 2E A0 22 3B 3A 55 53 | .Q.UIT?...";:US| 00000240: 24 B2 22 41 4D 51 22 3A 55 4C B2 31 00 19 2B 8D |$."AMQ":UL.1..+.| 00000250: 05 8D 33 35 3A 41 24 B2 55 52 24 00 29 2B 96 05 |..35:A$.UR$.)+..| 00000260: 41 24 B2 C8 28 41 24 2C 31 29 3A 00 43 2B A0 05 |A$..(A$,1):.C+..| 00000270: 8B 41 24 B2 22 41 22 A7 20 99 22 93 13 22 3A 89 |.A$."A". ."..":.| 00000280: 20 31 34 31 30 00 59 2B AA 05 8B 41 24 B2 22 51 | 1410.Y+...A$."Q| 00000290: 22 A7 20 99 22 93 22 3A 20 20 8E 00 6A 2B B4 05 |". .".": ..j+..| 000002A0: 8B 41 24 B2 22 4D 22 A7 31 31 31 30 00 74 2B BE |.A$."M".1110.t+.| 000002B0: 05 89 31 34 32 30 00 91 2B C8 05 8F 20 3A 3A 3A |..1420..+... :::| 000002C0: 45 4E 44 20 4F 46 20 4D 41 49 4E 20 50 52 4F 47 |END OF MAIN PROG| 000002D0: 52 41 4D 00 AF 2B D2 05 8F 20 54 55 52 54 4C 45 |RAM..+... TURTLE| 000002E0: 20 49 4E 49 54 49 41 4C 20 50 4F 53 49 54 49 4F | INITIAL POSITIO| 000002F0: 4E 00 BD 2B DC 05 97 4C 28 30 29 2C 34 32 3A 00 |N..+...L(0),42:.| 00000300: F8 2B E6 05 97 55 4D AA 38 36 33 2C 38 34 3A 97 |.+...UM.863,84:.| 00000310: 55 4D AA 38 36 34 2C 38 35 3A 97 55 4D AA 38 36 |UM.864,85:.UM.86| 00000320: 35 2C 38 32 3A 97 55 4D AA 38 36 36 2C 38 34 3A |5,82:.UM.866,84:| 00000330: 97 55 4D AA 38 36 37 2C 37 36 00 07 2C F0 05 97 |.UM.867,76..,...| 00000340: 55 4D AA 38 36 38 2C 36 39 00 0D 2C FA 05 8E 00 |UM.868,69..,....| 00000350: 24 2C 04 06 4C 28 54 29 B2 4C 28 54 AB 31 29 20 |$,..L(T).L(T.1) | 00000360: 3A 20 8F 20 55 50 00 5A 2C 0E 06 81 49 B2 31 A4 |: . UP.Z,...I.1.| 00000370: 52 28 54 29 3A 8B 4C 28 54 29 AB 28 49 AC 34 30 |R(T):.L(T).(I.40| 00000380: 29 B3 55 4D B0 4C 28 54 29 AB 28 49 AC 34 30 29 |).UM.L(T).(I.40)| 00000390: B1 55 4D AA 39 39 39 A7 31 35 38 30 00 78 2C 18 |.UM.999.1580.x,.| 000003A0: 06 81 47 B2 31 A4 33 30 3A 97 4C 28 54 29 AB 28 |..G.1.30:.L(T).(| 000003B0: 49 AC 34 30 29 2C 33 32 3A 82 00 8C 2C 22 06 97 |I.40),32:...,"..| 000003C0: 4C 28 54 29 AB 28 49 AC 34 30 29 2C 34 32 00 A8 |L(T).(I.40),42..| 000003D0: 2C 2C 06 82 3A 20 20 4C 28 54 29 B2 4C 28 54 29 |,,..: L(T).L(T)| 000003E0: AB 28 52 28 54 29 AC 34 30 29 00 AE 2C 36 06 8E |.(R(T).40)..,6..| 000003F0: 00 C5 2C 40 06 4C 28 54 29 B2 4C 28 54 AB 31 29 |..,@.L(T).L(T.1)| 00000400: 3A 8F 20 44 4F 57 4E 00 FC 2C 4A 06 81 49 B2 31 |:. DOWN..,J..I.1| 00000410: A4 52 28 54 29 20 3A 8B 4C 28 54 29 AA 28 49 AC |.R(T) :.L(T).(I.| 00000420: 34 30 29 B1 55 4D AA 39 39 39 B0 4C 28 54 29 AA |40).UM.999.L(T).| 00000430: 28 49 AC 34 30 29 B3 55 4D A7 31 36 34 30 00 1A |(I.40).UM.1640..| 00000440: 2D 54 06 81 47 B2 31 A4 33 30 3A 97 4C 28 54 29 |-T..G.1.30:.L(T)| 00000450: AA 28 49 AC 34 30 29 2C 33 32 3A 82 00 2E 2D 5E |.(I.40),32:...-^| 00000460: 06 97 4C 28 54 29 AA 28 49 AC 34 30 29 2C 34 32 |..L(T).(I.40),42| 00000470: 00 4B 2D 68 06 82 20 20 20 3A 4C 28 54 29 B2 4C |.K-h.. :L(T).L| 00000480: 28 54 29 AA 28 52 28 54 29 AC 34 30 29 00 51 2D |(T).(R(T).40).Q-| 00000490: 72 06 8E 00 69 2D 7C 06 4C 28 54 29 B2 4C 28 54 |r...i-|.L(T).L(T| 000004A0: AB 31 29 3A 20 8F 20 4C 45 46 54 00 95 2D 86 06 |.1): . LEFT..-..| 000004B0: 81 49 B2 31 A4 52 28 54 29 3A 8B 4C 28 54 29 AB |.I.1.R(T):.L(T).| 000004C0: 49 B3 55 4D B0 4C 28 54 29 AB 49 B1 55 4D AA 39 |I.UM.L(T).I.UM.9| 000004D0: 39 39 A7 31 37 30 30 00 AE 2D 90 06 81 47 B2 31 |99.1700..-...G.1| 000004E0: A4 33 30 3A 97 4C 28 54 29 AB 49 2C 33 32 3A 82 |.30:.L(T).I,32:.| 000004F0: 00 BD 2D 9A 06 97 4C 28 54 29 AB 49 2C 34 32 00 |..-...L(T).I,42.| 00000500: D9 2D A4 06 82 3A 20 20 20 4C 28 54 29 B2 4C 28 |.-...: L(T).L(| 00000510: 54 29 AB 52 28 54 29 3A 20 20 8E 00 F1 2D AE 06 |T).R(T): ...-..| 00000520: 4C 28 54 29 B2 4C 28 54 AB 31 29 3A 8F 20 52 49 |L(T).L(T.1):. RI| 00000530: 47 48 54 00 1D 2E B8 06 81 49 B2 31 A4 52 28 54 |GHT......I.1.R(T| 00000540: 29 3A 8B 4C 28 54 29 AA 49 B3 55 4D B0 4C 28 54 |):.L(T).I.UM.L(T| 00000550: 29 AA 49 B1 55 4D AA 39 39 39 A7 31 37 35 30 00 |).I.UM.999.1750.| 00000560: 36 2E C2 06 81 47 B2 31 A4 33 30 3A 97 4C 28 54 |6....G.1.30:.L(T| 00000570: 29 AA 49 2C 33 32 3A 82 00 45 2E CC 06 97 4C 28 |).I,32:..E....L(| 00000580: 54 29 AA 49 2C 34 32 00 5C 2E D6 06 82 3A 4C 28 |T).I,42.\....:L(| 00000590: 54 29 B2 4C 28 54 29 AA 52 28 54 29 3A 8E 00 74 |T).L(T).R(T):..t| 000005A0: 2E E0 06 8F 20 53 55 42 20 46 4F 52 20 56 41 52 |.... SUB FOR VAR| 000005B0: 49 41 42 4C 45 53 00 86 2E EA 06 41 28 49 29 B2 |IABLES.....A(I).| 000005C0: 41 3A 52 28 49 29 B2 52 00 8C 2E F4 06 8E 00 D5 |A:R(I).R........| 000005D0: 2E FE 06 46 4C 41 47 B2 31 3A 99 22 11 20 C5 4E |...FLAG.1:.". .N| 000005E0: 54 45 52 20 44 49 52 45 43 54 49 4F 4E 53 3F 20 |TER DIRECTIONS? | 000005F0: 22 3B 3A 55 53 24 B2 22 4E 4F 52 54 48 53 55 44 |";:US$."NORTHSUD| 00000600: 45 41 57 22 3A 55 4C B2 35 3A 8D 33 35 3A 41 24 |EAW":UL.5:.35:A$| 00000610: 28 49 29 B2 55 52 24 00 EB 2E FF 06 8B 41 24 28 |(I).UR$......A$(| 00000620: 49 29 B2 C7 28 31 33 29 A7 31 37 39 30 00 F5 2E |I)..(13).1790...| 00000630: 02 07 89 31 38 30 30 00 00 2F 08 07 8D 20 32 34 |...1800../... 24| 00000640: 39 30 00 1A 2F 12 07 8B 20 41 24 28 49 29 B2 22 |90../... A$(I)."| 00000650: 4E 4F 52 54 48 22 A7 41 B2 31 3A 8E 00 34 2F 1C |NORTH".A.1:..4/.| 00000660: 07 8B 20 41 24 28 49 29 B2 22 53 4F 55 54 48 22 |.. A$(I)."SOUTH"| 00000670: A7 41 B2 32 3A 8E 00 5B 2F 26 07 8B 20 41 24 28 |.A.2:..[/&.. A$(| 00000680: 49 29 B2 22 57 45 53 54 22 B0 41 24 28 49 29 B2 |I)."WEST".A$(I).| 00000690: 22 57 45 53 54 20 22 A7 41 B2 33 3A 8E 00 82 2F |"WEST ".A.3:.../| 000006A0: 30 07 8B 20 41 24 28 49 29 B2 22 45 41 53 54 22 |0.. A$(I)."EAST"| 000006B0: B0 41 24 28 49 29 B2 22 45 41 53 54 20 22 A7 41 |.A$(I)."EAST ".A| 000006C0: B2 34 3A 8E 00 A7 2F 3A 07 8B 20 41 24 28 49 29 |.4:.../:.. A$(I)| 000006D0: B2 22 53 57 22 B0 41 24 28 49 29 B2 22 53 57 20 |."SW".A$(I)."SW | 000006E0: 20 20 22 A7 41 B2 35 3A 8E 00 CC 2F 44 07 8B 20 | ".A.5:.../D.. | 000006F0: 41 24 28 49 29 B2 22 53 45 22 B0 41 24 28 49 29 |A$(I)."SE".A$(I)| 00000700: B2 22 53 45 20 20 20 22 A7 41 B2 36 3A 8E 00 F1 |."SE ".A.6:...| 00000710: 2F 4E 07 8B 20 41 24 28 49 29 B2 22 4E 45 22 B0 |/N.. A$(I)."NE".| 00000720: 41 24 28 49 29 B2 22 4E 45 20 20 20 22 A7 41 B2 |A$(I)."NE ".A.| 00000730: 38 3A 8E 00 16 30 53 07 8B 20 41 24 28 49 29 B2 |8:...0S.. A$(I).| 00000740: 22 4E 57 22 B0 41 24 28 49 29 B2 22 4E 57 20 20 |"NW".A$(I)."NW | 00000750: 20 22 A7 41 B2 37 3A 8E 00 55 30 62 07 99 22 20 | ".A.7:..U0b.." | 00000760: CD 55 53 54 20 42 45 20 4E 4F 52 54 48 2D 53 4F |.UST BE NORTH-SO| 00000770: 55 54 48 2D 45 41 53 54 2D 57 45 53 54 20 20 20 |UTH-EAST-WEST | 00000780: 20 20 20 20 20 20 20 20 4F 52 20 53 45 2D 53 57 | OR SE-SW| 00000790: 2D 4E 45 2D 4E 57 22 00 66 30 64 07 81 54 54 B2 |-NE-NW".f0d..TT.| 000007A0: 31 A4 32 30 30 30 3A 82 00 95 30 67 07 99 22 91 |1.2000:...0g..".| 000007B0: 91 91 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 22 00 E1 30 6C 07 99 22 20 20 | "..0l.." | 000007E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000810: 20 20 20 20 20 20 20 91 91 91 91 91 22 3A 89 31 | .....":.1| 00000820: 37 39 30 00 FB 30 76 07 4C 28 54 29 B2 4C 28 54 |790..0v.L(T).L(T| 00000830: AB 31 29 3A 8F 20 54 55 52 4E 20 53 57 00 36 31 |.1):. TURN SW.61| 00000840: 80 07 81 20 49 B2 31 A4 52 28 54 29 3A 8B 4C 28 |... I.1.R(T):.L(| 00000850: 54 29 AA 28 49 AC 34 30 29 AB 49 B1 55 4D AA 39 |T).(I.40).I.UM.9| 00000860: 39 39 B0 4C 28 54 29 AA 28 49 AC 34 30 29 AB 49 |99.L(T).(I.40).I| 00000870: B3 55 4D A7 31 39 35 30 00 56 31 8A 07 81 47 B2 |.UM.1950.V1...G.| 00000880: 31 A4 33 30 3A 97 4C 28 54 29 AA 28 49 AC 34 30 |1.30:.L(T).(I.40| 00000890: 29 AB 49 2C 33 32 3A 82 00 6C 31 94 07 97 4C 28 |).I,32:..l1...L(| 000008A0: 54 29 AA 28 49 AC 34 30 29 AB 49 2C 34 32 00 72 |T).(I.40).I,42.r| 000008B0: 31 9E 07 82 00 8D 31 A8 07 4C 28 54 29 B2 4C 28 |1.....1..L(T).L(| 000008C0: 54 29 AA 52 28 54 29 AC 34 30 AB 52 28 54 29 00 |T).R(T).40.R(T).| 000008D0: 93 31 B2 07 8E 00 AF 31 BC 07 4C 28 54 29 B2 4C |.1.....1..L(T).L| 000008E0: 28 54 AB 31 29 3A 20 20 8F 20 54 55 52 4E 20 53 |(T.1): . TURN S| 000008F0: 45 00 EA 31 C6 07 81 20 49 B2 31 A4 52 28 54 29 |E..1... I.1.R(T)| 00000900: 3A 8B 4C 28 54 29 AA 28 49 AC 34 30 29 AA 49 B1 |:.L(T).(I.40).I.| 00000910: 55 4D AA 39 39 39 B0 4C 28 54 29 AA 28 49 AC 34 |UM.999.L(T).(I.4| 00000920: 30 29 AA 49 B3 55 4D A7 32 30 32 30 00 0A 32 D0 |0).I.UM.2020..2.| 00000930: 07 81 47 B2 31 A4 33 30 3A 97 4C 28 54 29 AA 28 |..G.1.30:.L(T).(| 00000940: 49 AC 34 30 29 AA 49 2C 33 32 3A 82 00 20 32 DA |I.40).I,32:.. 2.| 00000950: 07 97 4C 28 54 29 AA 28 49 AC 34 30 29 AA 49 2C |..L(T).(I.40).I,| 00000960: 34 32 00 26 32 E4 07 82 00 43 32 EE 07 4C 28 54 |42.&2....C2..L(T| 00000970: 29 B2 4C 28 54 29 AA 28 52 28 54 29 AC 34 30 29 |).L(T).(R(T).40)| 00000980: AA 52 28 54 29 00 49 32 F8 07 8E 00 65 32 02 08 |.R(T).I2....e2..| 00000990: 4C 28 54 29 B2 4C 28 54 AB 31 29 3A 20 20 8F 20 |L(T).L(T.1): . | 000009A0: 54 55 52 4E 20 4E 57 00 9F 32 0C 08 81 49 B2 31 |TURN NW..2...I.1| 000009B0: A4 52 28 54 29 3A 8B 4C 28 54 29 AB 28 49 AC 34 |.R(T):.L(T).(I.4| 000009C0: 30 29 AB 49 B3 55 4D B0 4C 28 54 29 AB 28 49 AC |0).I.UM.L(T).(I.| 000009D0: 34 30 29 AB 49 B1 55 4D AA 39 39 39 A7 32 30 39 |40).I.UM.999.209| 000009E0: 30 00 BF 32 16 08 81 47 B2 31 A4 33 30 3A 97 4C |0..2...G.1.30:.L| 000009F0: 28 54 29 AB 28 49 AC 34 30 29 AB 49 2C 33 32 3A |(T).(I.40).I,32:| 00000A00: 82 00 D5 32 20 08 97 4C 28 54 29 AB 28 49 AC 34 |...2 ..L(T).(I.4| 00000A10: 30 29 AB 49 2C 34 32 00 DB 32 2A 08 82 00 F6 32 |0).I,42..2*....2| 00000A20: 34 08 4C 28 54 29 B2 4C 28 54 29 AB 52 28 54 29 |4.L(T).L(T).R(T)| 00000A30: AC 34 30 AB 52 28 54 29 00 FC 32 3E 08 8E 00 16 |.40.R(T)..2>....| 00000A40: 33 48 08 4C 28 54 29 B2 4C 28 54 AB 31 29 3A 8F |3H.L(T).L(T.1):.| 00000A50: 20 54 55 52 4E 20 4E 45 00 50 33 52 08 81 49 B2 | TURN NE.P3R..I.| 00000A60: 31 A4 52 28 54 29 3A 8B 4C 28 54 29 AB 28 49 AC |1.R(T):.L(T).(I.| 00000A70: 34 30 29 AA 49 B3 55 4D B0 4C 28 54 29 AB 28 49 |40).I.UM.L(T).(I| 00000A80: AC 34 30 29 AA 49 B1 55 4D AA 39 39 39 A7 32 31 |.40).I.UM.999.21| 00000A90: 36 30 00 70 33 5C 08 81 47 B2 31 A4 33 30 3A 97 |60.p3\..G.1.30:.| 00000AA0: 4C 28 54 29 AB 28 49 AC 34 30 29 AA 49 2C 33 32 |L(T).(I.40).I,32| 00000AB0: 3A 82 00 86 33 66 08 97 4C 28 54 29 AB 28 49 AC |:...3f..L(T).(I.| 00000AC0: 34 30 29 AA 49 2C 34 32 00 8C 33 70 08 82 00 A7 |40).I,42..3p....| 00000AD0: 33 7A 08 4C 28 54 29 B2 4C 28 54 29 AB 52 28 54 |3z.L(T).L(T).R(T| 00000AE0: 29 AC 34 30 AA 52 28 54 29 00 AD 33 84 08 8E 00 |).40.R(T)..3....| 00000AF0: C4 33 8E 08 99 22 93 22 29 B2 C2 28 55 51 29 3A |.3...".")..(UQ):| 00000B00: 82 3A 99 22 93 22 00 CA 33 92 09 8E 00 E6 33 9C |.:."."..3.....3.| 00000B10: 09 81 49 B2 31 A4 4E 3A 99 41 24 28 49 29 22 2D |..I.1.N:.A$(I)"-| 00000B20: 22 3B 52 28 49 29 3A 82 00 F6 33 A6 09 81 4B B2 |";R(I):...3...K.| 00000B30: 4E A4 31 38 3A 99 3A 82 00 FC 33 B0 09 8E 00 11 |N.18:.:...3.....| 00000B40: 34 BA 09 41 24 28 49 29 B2 C8 28 41 24 28 49 29 |4..A$(I)..(A$(I)| 00000B50: 2C 35 29 00 17 34 C4 09 8E 00 5E 34 CE 09 5A B2 |,5)..4....^4..Z.| 00000B60: 5A AA 31 3A 8F 22 51 3D 50 41 54 48 20 4F 52 44 |Z.1:."Q=PATH ORD| 00000B70: 45 52 20 2C 50 3D 53 54 45 50 23 2D 2D 2D 2D 2D |ER ,P=STEP#-----| 00000B80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 4E 3D |--------------N=| 00000B90: 4E 55 4D 42 45 52 20 4F 46 20 50 41 54 48 53 22 |NUMBER OF PATHS"| 00000BA0: 00 69 34 D8 09 81 55 B2 31 A4 4E 00 85 34 E2 09 |.i4...U.1.N..4..| 00000BB0: 51 28 5A 2C 55 29 B2 41 28 55 29 3A 50 28 5A 2C |Q(Z,U).A(U):P(Z,| 00000BC0: 55 29 B2 52 28 55 29 00 90 34 EC 09 4E 28 5A 29 |U).R(U)..4..N(Z)| 00000BD0: B2 4E 00 96 34 F6 09 82 00 9C 34 00 0A 8E 00 D3 |.N..4.....4.....| 00000BE0: 34 0A 0A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |4....(50003).0..| 00000BF0: 35 33 32 38 31 2C 31 3A 99 22 93 22 3A 97 35 33 |53281,1:.".":.53| 00000C00: 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 3A |281,6:.53280,14:| 00000C10: 89 32 35 37 37 00 DC 34 0C 0A 99 22 93 22 00 F6 |.2577..4..."."..| 00000C20: 34 11 0A 8D 31 34 39 30 3A 8D 32 34 36 30 55 31 |4...1490:.2460U1| 00000C30: 25 AA 55 33 25 AB 33 29 00 02 35 14 0A 81 20 55 |%.U3%.3)..5... U| 00000C40: B2 31 A4 5A 00 11 35 1E 0A 81 20 54 B2 31 A4 4E |.1.Z..5... T.1.N| 00000C50: 28 55 29 00 21 35 28 0A 52 28 54 29 B2 50 28 55 |(U).!5(.R(T).P(U| 00000C60: 2C 54 29 00 55 35 32 0A 91 51 28 55 2C 54 29 8D |,T).U52..Q(U,T).| 00000C70: 31 35 34 30 2C 31 36 30 30 2C 31 36 36 30 2C 31 |1540,1600,1660,1| 00000C80: 37 31 30 2C 31 39 31 30 2C 31 39 38 30 2C 32 30 |710,1910,1980,20| 00000C90: 35 30 2C 32 31 32 30 00 5F 35 3C 0A 82 54 3A 82 |50,2120._5<..T:.| 00000CA0: 55 00 65 35 46 0A 8E 00 81 35 88 13 54 B2 31 30 |U.e5F....5..T.10| 00000CB0: 3A 81 49 B2 31 A4 54 3A 99 49 3A 54 B2 49 3A 82 |:.I.1.T:.I:T.I:.| 00000CC0: 3A 99 54 00 00 00 |:.T... |
281,1:.".":.53281,6:.53280,14:.1227..(F.
."."..(K..1500..(N..2460..)X..T.1.N.<)..
. A(T).1540,1600,1660,1710,1910,1980,205
0,2120.F)...:.:...)..FL.0:." IS IT OK.?.
.(Y/N) ";:US$."YN":UL.1:.35:A$.UR$..)..A
$.H(A$,1)..)...A$.."N". 1350..)..FL.0:."
DO .A.GAIN OR .Q.UIT?.. ";:US$."AQ":UL.
1:.35:A$.UR$..)..A$.H(A$,1):..*(..A$."A"
. 1110..*2..A$."Q". .".": ..$*<..1300.8
*F.."..": .2510.}*P.FL.0:." DRAW .A.L
L.. OR DO .M.ORE?.. ";:US$."AM":UL.1:.35
:A$.UR$..*Z.A$.H(A$,1)..*D..A$."A".1410.
.*N..A$."M".1110..*X..1360.H*... 2570:.:
.:..+..FL.0:." DRAW .A.GAIN,DO .M.ORE OR
.Q.UIT?.. ";:US$."AMQ":UL.1..+...35:A$.
UR$.)+..A$.H(A$,1):.C+ ..A$."A". ."..":.
1410.Y+...A$."Q". .".": ..J+...A$."M".
1110.T+...1420..+H.. :::END OF MAIN PROG
RAM..+R.. TURTLE INITIAL POSITION..+...L
(0),42:..+...UM.863,84:.UM.864,85:.UM.86
5,82:.UM.866,84:.UM.867,76..,...UM.868,6
9..,....$,..L(T).L(T.1) : . UP.Z,...I.1.
R(T):.L(T).(I.40).UM.L(T).(I.40).UM.999.
1580.X,...G.1.30:.L(T).(I.40),32:...,"..
L(T).(I.40),42..,,..: L(T).L(T).(R(T).4
0)..,6...E,@.L(T).L(T.1):. DOWN..,J..I.1
.R(T) :.L(T).(I.40).UM.999.L(T).(I.40).U
M.1640..-T..G.1.30:.L(T).(I.40),32:...-^
..L(T).(I.40),42.K-H.. :L(T).L(T).(R(T
).40).Q-R...I-|.L(T).L(T.1): . LEFT..-..
.I.1.R(T):.L(T).I.UM.L(T).I.UM.999.1700.
.-...G.1.30:.L(T).I,32:...-...L(T).I,42.
Y-...: L(T).L(T).R(T): ...-..L(T).L(T
.1):. RIGHT......I.1.R(T):.L(T).I.UM.L(T
).I.UM.999.1750.6.B..G.1.30:.L(T).I,32:.
.E.L..L(T).I,42.\.V..:L(T).L(T).R(T):..T
.... SUB FOR VARIABLES.....A(I).A:R(I).R
.......U...FLAG.1:.". ENTER DIRECTIONS?
";:US$."NORTHSUDEAW":UL.5:.35:A$(I).UR$.
.....A$(I).G(13).1790......1800../... 24
90../... A$(I)."NORTH".A.1:..4/... A$(I)
."SOUTH".A.2:..[/&.. A$(I)."WEST".A$(I).
"WEST ".A.3:.../0.. A$(I)."EAST".A$(I)."
EAST ".A.4:.../:.. A$(I)."SW".A$(I)."SW
".A.5:..L/D.. A$(I)."SE".A$(I)."SE "
.A.6:.../N.. A$(I)."NE".A$(I)."NE ".A.
8:...0S.. A$(I)."NW".A$(I)."NW ".A.7:.
.U0B.." MUST BE NORTH-SOUTH-EAST-WEST
OR SE-SW-NE-NW".F0D..TT.1.2000:.
..0G.."...
"..0L.."
.....":.1
790..0V.L(T).L(T.1):. TURN SW.61... I.1.
R(T):.L(T).(I.40).I.UM.999.L(T).(I.40).I
.UM.1950.V1...G.1.30:.L(T).(I.40).I,32:.
.L1...L(T).(I.40).I,42.R1.....1..L(T).L(
T).R(T).40.R(T)..1.....1..L(T).L(T.1):
. TURN SE..1F.. I.1.R(T):.L(T).(I.40).I.
UM.999.L(T).(I.40).I.UM.2020..2P..G.1.30
:.L(T).(I.40).I,32:.. 2Z..L(T).(I.40).I,
42.&2....C2..L(T).L(T).(R(T).40).R(T).I2
....E2..L(T).L(T.1): . TURN NW..2...I.1
.R(T):.L(T).(I.40).I.UM.L(T).(I.40).I.UM
.999.2090..2...G.1.30:.L(T).(I.40).I,32:
..U2 ..L(T).(I.40).I,42..2*....24.L(T).L
(T).R(T).40.R(T)..2>....3H.L(T).L(T.1):.
TURN NE.P3R..I.1.R(T):.L(T).(I.40).I.UM
.L(T).(I.40).I.UM.999.2160.P3\..G.1.30:.
L(T).(I.40).I,32:...3F..L(T).(I.40).I,42
..3P....3Z.L(T).L(T).R(T).40.R(T)..3....
D3...".").B(UQ):.:.".".J3.....3...I.1.N:
.A$(I)"-";R(I):...3...K.N.18:.:...3.....
4..A$(I).H(A$(I),5)..4D...^4N.Z.Z.1:."Q=
PATH ORDER ,P=STEP#-------------------N=
NUMBER OF PATHS".I4X..U.1.N..4..Q(Z,U).A
(U):P(Z,U).R(U)..4..N(Z).N..4.....4....S
4...B(50003).0..53281,1:.".":.53281,6:.5
3280,14:.2577..4..."."..4...1490:.2460U1
%.U3%.3)..5... U.1.Z..5... T.1.N(U).!5(.
R(T).P(U,T).U52..Q(U,T).1540,1600,1660,1
710,1910,1980,2050,2120._5<..T:.U.E5F...
.5..T.10:.I.1.T:.I:T.I:.:.T...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL