TURTLE.C3

00000000: 01 08 0A 08 01 00 89 39  31 30 00 2A 08 02 00 8F  |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53  54 4F 50 20 4B 45 59 20  | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20  2A 2A 00 55 08 03 00 99  |DISABLE **.U....|
00000030: 22 78 A9 3D 8D 14 03 A9  08 8D 15 03 58 60 20 EA  |"x.=........X` .|
00000040: FF A9 FF 85 91 4C 34 EA  78 A9 31 8D 14 03 A9 EA  |.....L4.x.1.....|
00000050: 8D 15 03 58 60 00 74 08  04 00 99 22 78 68 68 68  |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68  68 68 98 48 8A 48 58 60  |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05  00 99 22 68 68 68 68 68  |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08  06 00 8F 20 2A 2A 20 34  |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D  4C 20 53 55 42 52 4F 55  | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00  C8 08 0A 00 8F 20 2A 2A  |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20  49 4E 50 55 54 20 52 4F  |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A  00 CE 08 0F 00 3A 00 D4  |UTINE **.....:..|
000000D0: 08 1E 00 3A 00 F0 08 23  00 8F 20 2B 2B 2B 20 49  |...:...#.. +++ I|
000000E0: 4E 50 55 54 20 53 45 43  54 49 4F 4E 20 2B 2B 2B  |NPUT SECTION +++|
000000F0: 00 08 09 28 00 97 55 4F  2C 30 3A 55 52 24 B2 22  |...(..UO,0:UR$."|
00000100: 22 3A 55 49 24 B2 22 22  00 18 09 2A 00 8B 55 4C  |":UI$.""...*..UL|
00000110: B2 30 A7 55 4C B2 38 30  00 2B 09 2D 00 99 22 20  |.0.UL.80.+.-.." |
00000120: 20 9D 9D 22 3B 3A 97 55  43 2C 30 00 3F 09 32 00  | ..";:.UC,0.?.2.|
00000130: A1 55 49 24 3A 8B 55 49  24 B2 22 22 A7 35 30 00  |.UI$:.UI$."".50.|
00000140: 69 09 37 00 8B 55 49 24  B2 C7 28 31 33 29 AF C3  |i.7..UI$..(13)..|
00000150: 28 55 52 24 29 B1 B2 31  A7 97 55 43 2C 31 3A 99  |(UR$)..1..UC,1:.|
00000160: 22 20 9D 22 3B 3A 89 38  35 00 7C 09 3C 00 8B 55  |" .";:.85.|.<..U|
00000170: 49 24 B2 C7 28 32 30 29  A7 31 30 35 00 90 09 3E  |I$..(20).105...>|
00000180: 00 8B 20 C3 28 55 52 24  29 B2 B1 55 4C A7 35 30  |.. .(UR$)..UL.50|
00000190: 00 B5 09 41 00 8D 31 32  30 3A 8F 20 43 48 45 43  |...A..120:. CHEC|
000001A0: 4B 20 46 4F 52 20 56 41  4C 49 44 20 43 48 41 52  |K FOR VALID CHAR|
000001B0: 41 43 54 45 52 00 C5 09  46 00 55 52 24 B2 55 52  |ACTER...F.UR$.UR|
000001C0: 24 AA 55 49 24 00 CF 09  4B 00 99 55 49 24 3B 00  |$.UI$...K..UI$;.|
000001D0: D7 09 50 00 89 35 30 00  FC 09 55 00 8F 20 2B 2B  |..P..50...U.. ++|
000001E0: 2B 20 43 48 45 43 4B 20  46 4F 52 20 48 45 4C 50  |+ CHECK FOR HELP|
000001F0: 20 52 45 51 55 45 53 54  20 2B 2B 2B 00 24 0A 5A  | REQUEST +++.$.Z|
00000200: 00 8B 55 52 24 B2 55 58  24 A7 31 39 35 3A 8F 20  |..UR$.UX$.195:. |
00000210: 45 58 49 54 20 54 4F 20  48 45 4C 50 20 52 4F 55  |EXIT TO HELP ROU|
00000220: 54 49 4E 45 00 33 0A 5F  00 8B 55 46 B2 31 A7 8D  |TINE.3._..UF.1..|
00000230: 32 34 30 00 40 0A 64 00  55 46 B2 30 3A 99 3A 8E  |240.@.d.UF.0:.:.|
00000240: 00 59 0A 66 00 8F 20 2B  2B 20 43 48 45 43 4B 20  |.Y.f.. ++ CHECK |
00000250: 44 45 4C 45 54 45 20 2B  2B 00 6A 0A 69 00 8B C3  |DELETE ++.j.i...|
00000260: 28 55 52 24 29 B3 31 A7  35 30 00 82 0A 6E 00 55  |(UR$).1.50...n.U|
00000270: 52 24 B2 C8 28 55 52 24  2C C3 28 55 52 24 29 AB  |R$..(UR$,.(UR$).|
00000280: 31 29 00 94 0A 73 00 99  22 9D 20 20 9D 9D 22 3B  |1)...s..".  ..";|
00000290: 3A 89 35 30 00 BB 0A 78  00 8F 20 2B 2B 20 43 48  |:.50...x.. ++ CH|
000002A0: 45 43 4B 20 46 4F 52 20  56 41 4C 49 44 20 43 48  |ECK FOR VALID CH|
000002B0: 41 52 41 43 54 45 52 53  20 2B 2B 00 CD 0A 7D 00  |ARACTERS ++...}.|
000002C0: 8B C3 28 55 53 24 29 B2  30 A7 31 35 30 00 DE 0A  |..(US$).0.150...|
000002D0: 82 00 81 55 53 B2 31 A4  C3 28 55 53 24 29 00 F5  |...US.1..(US$)..|
000002E0: 0A 87 00 8B 55 49 24 B2  CA 28 55 53 24 2C 55 53  |....UI$..(US$,US|
000002F0: 2C 31 29 A7 8E 00 FB 0A  8C 00 82 00 08 0B 91 00  |,1).............|
00000300: 55 49 24 B2 22 22 3A 8E  00 23 0B 96 00 8F 20 2A  |UI$."":..#.... *|
00000310: 2A 20 53 54 41 4E 44 41  52 44 20 49 4E 50 55 54  |* STANDARD INPUT|
00000320: 20 2A 2A 00 34 0B 98 00  8B C6 28 55 49 24 29 B2  | **.4.....(UI$).|
00000330: 34 36 A7 8E 00 45 0B 9B  00 8B 55 49 24 B2 C7 28  |46...E....UI$..(|
00000340: 33 32 29 A7 8E 00 62 0B  A0 00 8B C6 28 55 49 24  |32)...b.....(UI$|
00000350: 29 B3 34 38 B0 C6 28 55  49 24 29 B1 35 37 A7 31  |).48..(UI$).57.1|
00000360: 37 30 00 68 0B A5 00 8E  00 85 0B AA 00 8B C6 28  |70.h...........(|
00000370: 55 49 24 29 B3 36 35 B0  C6 28 55 49 24 29 B1 39  |UI$).65..(UI$).9|
00000380: 30 A7 31 38 30 00 8B 0B  AF 00 8E 00 AF 0B B4 00  |0.180...........|
00000390: 8B C6 28 55 49 24 29 B3  31 39 33 B0 C6 28 55 49  |..(UI$).193..(UI|
000003A0: 24 29 B1 32 31 38 A7 55  49 24 B2 22 22 3A 8E 00  |$).218.UI$."":..|
000003B0: D2 0B B9 00 8B C2 28 55  54 29 B2 55 55 25 A7 55  |......(UT).UU%.U|
000003C0: 49 24 B2 C7 28 C6 28 55  49 24 29 AB 31 32 38 29  |I$..(.(UI$).128)|
000003D0: 3A 8E 00 D8 0B BB 00 8E  00 E5 0B BE 00 55 49 24  |:............UI$|
000003E0: B2 22 22 3A 8E 00 0A 0C  C3 00 55 46 B2 31 3A 8F  |."":......UF.1:.|
000003F0: 20 2B 2B 2B 20 48 45 4C  50 20 52 4F 55 54 49 4E  | +++ HELP ROUTIN|
00000400: 45 20 45 58 49 54 20 2B  2B 2B 00 13 0C C5 00 8D  |E EXIT +++......|
00000410: 32 35 30 00 1C 0C C8 00  8D 32 34 35 00 3B 0C CD  |250......245.;..|
00000420: 00 81 55 51 B2 55 42 A4  28 55 32 25 AC 32 35 36  |..UQ.UB.(U2%.256|
00000430: AA 55 31 25 AA 55 33 25  AB 32 29 00 57 0C D2 00  |.U1%.U3%.2).W...|
00000440: 55 51 25 28 55 51 AB 55  42 29 B2 C2 28 55 51 29  |UQ%(UQ.UB)..(UQ)|
00000450: 3A 82 3A 99 22 93 22 00  6A 0C D7 00 55 5A B2 31  |:.:.".".j...UZ.1|
00000460: 3A 55 56 25 B2 C2 28 55  54 29 00 73 0C D8 00 89  |:UV%..(UT).s....|
00000470: 33 30 30 00 98 0C D9 00  55 5A B2 30 3A 55 53 24  |300.....UZ.0:US$|
00000480: B2 55 4A 24 3A 55 47 24  B2 55 4B 24 3A 55 50 B2  |.UJ$:UG$.UK$:UP.|
00000490: 55 4A 3A 55 4C B2 55 4B  00 CF 0C DA 00 8B C2 28  |UJ:UL.UK.......(|
000004A0: 35 30 30 30 33 29 B2 30  A7 97 35 33 32 38 31 2C  |50003).0..53281,|
000004B0: 31 3A 99 22 93 22 3B 3A  97 35 33 32 38 31 2C 36  |1:.".";:.53281,6|
000004C0: 3A 97 35 33 32 38 30 2C  31 34 3A 89 32 32 30 00  |:.53280,14:.220.|
000004D0: D9 0C DB 00 99 22 93 22  3B 00 08 0D DC 00 55 54  |.....".";.....UT|
000004E0: 24 B2 55 4C 24 3A 97 55  54 2C 55 56 25 3A 81 55  |$.UL$:.UT,UV%:.U|
000004F0: 51 B2 55 42 A4 28 55 32  25 AC 32 35 36 AA 55 31  |Q.UB.(U2%.256.U1|
00000500: 25 AA 55 33 25 AB 33 29  00 1D 0D E1 00 97 55 51  |%.U3%.3)......UQ|
00000510: 2C 55 51 25 28 55 51 AB  55 42 29 3A 82 00 29 0D  |,UQ%(UQ.UB):..).|
00000520: E6 00 97 55 31 2C 55 31  25 00 35 0D E8 00 97 55  |...U1,U1%.5....U|
00000530: 32 2C 55 32 25 00 41 0D  E9 00 97 55 34 2C 55 34  |2,U2%.A....U4,U4|
00000540: 25 00 4F 0D EA 00 97 55  33 2C 55 33 25 AB 31 00  |%.O....U3,U3%.1.|
00000550: 57 0D EB 00 89 33 35 00  89 0D F0 00 55 44 25 B2  |W....35.....UD%.|
00000560: 28 28 55 32 25 AC 32 35  36 AA 55 31 25 AA 55 33  |((U2%.256.U1%.U3|
00000570: 25 29 AB 55 42 29 AD 34  30 3A 99 C8 28 55 44 24  |%).UB).40:..(UD$|
00000580: 2C 55 44 25 AA 31 29 3A  8E 00 C4 0D F5 00 99 C8  |,UD%.1):........|
00000590: 28 55 44 24 2C 32 34 29  3B 22 20 20 20 20 20 20  |(UD$,24);"      |
000005A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000005B0: 12 20 48 45 4C 50 20 43  4F 4D 49 4E 47 20 92 20  |. HELP COMING . |
000005C0: 20 22 3A 8E 00 F0 0D FA  00 55 31 25 B2 C2 28 55  | ":......U1%..(U|
000005D0: 31 29 3A 55 32 25 B2 C2  28 55 32 29 3A 55 33 25  |1):U2%..(U2):U3%|
000005E0: B2 C2 28 55 33 29 3A 55  34 25 B2 C2 28 55 34 29  |..(U3):U4%..(U4)|
000005F0: 00 18 0E FB 00 55 4A 24  B2 55 53 24 3A 55 4B 24  |.....UJ$.US$:UK$|
00000600: B2 55 47 24 3A 55 4C 24  B2 55 54 24 3A 55 4A B2  |.UG$:UL$.UT$:UJ.|
00000610: 55 50 3A 55 4B B2 55 4C  00 1E 0E FF 00 8E 00 2F  |UP:UK.UL......./|
00000620: 0E 2C 01 8F 20 2A 2A 20  4D 45 4E 55 20 2A 2A 00  |.,.. ** MENU **.|
00000630: 35 0E 2D 01 3A 00 64 0E  2E 01 99 22 93 22 3A 97  |5.-.:.d....".":.|
00000640: 55 54 2C 55 55 25 3A 8B  C2 28 35 30 30 30 33 29  |UT,UU%:..(50003)|
00000650: B2 30 A7 97 35 33 32 38  31 2C 39 3A 97 35 33 32  |.0..53281,9:.532|
00000660: 38 30 2C 38 00 6A 0E 2F  01 3A 00 87 0E 31 01 99  |80,8.j./.:...1..|
00000670: 22 13 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000680: 20 20 4D 45 4E 55 22 00  B6 0E 36 01 99 22 20 2D  |  MENU"...6.." -|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000006B0: 2D 2D 2D 2D 2D 22 00 DA  0E 3B 01 99 22 11 11 20  |-----"...;..".. |
000006C0: 20 20 20 20 20 20 31 2E  20 20 20 42 45 47 49 4E  |      1.   BEGIN|
000006D0: 20 54 55 52 54 4C 45 20  31 22 00 04 0F 40 01 99  | TURTLE 1"...@..|
000006E0: 22 11 11 20 20 20 20 20  20 20 32 2E 20 20 20 53  |"..       2.   S|
000006F0: 54 55 44 45 4E 54 20 49  4E 53 54 52 55 43 54 49  |TUDENT INSTRUCTI|
00000700: 4F 4E 53 22 00 2E 0F 45  01 99 22 11 11 20 20 20  |ONS"...E.."..   |
00000710: 20 20 20 20 33 2E 20 20  20 54 45 41 43 48 45 52  |    3.   TEACHER|
00000720: 20 49 4E 53 54 52 55 43  54 49 4F 4E 53 22 00 4A  | INSTRUCTIONS".J|
00000730: 0F 4F 01 99 22 11 11 20  20 20 20 20 20 20 34 2E  |.O.."..       4.|
00000740: 20 20 20 51 55 49 54 11  11 22 00 79 0F 54 01 99  |   QUIT..".y.T..|
00000750: 22 20 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |" --------------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D  22 00 A4 0F 59 01 99 22  |--------"...Y.."|
00000780: 11 11 20 20 20 20 20 20  20 50 52 45 53 53 20 41  |..       PRESS A|
00000790: 20 4E 55 4D 42 45 52 20  4B 45 59 20 28 31 2D 34  | NUMBER KEY (1-4|
000007A0: 29 20 22 3B 00 CC 0F 5E  01 55 4C B2 31 3A 55 53  |) ";...^.UL.1:US|
000007B0: 24 B2 22 31 32 33 34 22  3A 8D 33 35 3A 8F 20 49  |$."1234":.35:. I|
000007C0: 4E 50 55 54 20 52 4F 55  54 49 4E 45 00 D7 0F 60  |NPUT ROUTINE...`|
000007D0: 01 55 53 24 B2 22 22 00  F4 0F 63 01 91 C5 28 55  |.US$.""...c...(U|
000007E0: 52 24 29 8D 31 30 30 30  2C 34 30 30 2C 35 30 30  |R$).1000,400,500|
000007F0: 2C 33 39 36 00 FD 0F 68  01 89 33 30 30 00 24 10  |,396...h..300.$.|
00000800: 8B 01 8F 20 2A 2A 20 52  45 2D 45 4E 41 42 4C 45  |... ** RE-ENABLE|
00000810: 20 53 54 4F 50 20 4B 45  59 20 41 4E 44 20 45 4E  | STOP KEY AND EN|
00000820: 44 20 2A 2A 00 53 10 8C  01 8B C2 28 35 30 30 30  |D **.S.....(5000|
00000830: 33 29 B3 B1 31 AF C2 28  35 30 30 30 33 29 B3 B1  |3)..1..(50003)..|
00000840: 31 36 30 AF C2 28 35 30  30 30 33 29 B3 B1 30 A7  |160..(50003)..0.|
00000850: 33 39 39 00 7D 10 8D 01  9E 55 55 AA 37 31 3A 8B  |399.}....UU.71:.|
00000860: C2 28 35 30 30 30 33 29  B2 30 A7 97 35 33 32 38  |.(50003).0..5328|
00000870: 31 2C 36 3A 97 35 33 32  38 30 2C 31 34 00 89 10  |1,6:.53280,14...|
00000880: 8E 01 99 22 9A 93 22 3A  80 00 94 10 8F 01 8D 38  |..."..":.......8|
00000890: 37 35 3A 8E 00 B5 10 90  01 8F 20 2A 2A 20 53 54  |75:....... ** ST|
000008A0: 55 44 45 4E 54 20 49 4E  53 54 52 55 43 54 49 4F  |UDENT INSTRUCTIO|
000008B0: 4E 53 20 2A 2A 00 E4 10  95 01 99 22 93 22 3A 97  |NS **......".":.|
000008C0: 55 54 2C 55 4C 25 3A 8B  C2 28 35 30 30 30 33 29  |UT,UL%:..(50003)|
000008D0: B2 30 A7 97 35 33 32 38  31 2C 30 3A 97 35 33 32  |.0..53281,0:.532|
000008E0: 38 30 2C 30 00 0A 11 9A  01 55 48 B2 31 3A 55 50  |80,0.....UH.1:UP|
000008F0: B2 30 3A 55 47 24 B2 22  D3 54 55 44 45 4E 54 20  |.0:UG$.".TUDENT |
00000900: C9 4E 53 54 22 3A 8D 38  35 30 00 3C 11 9B 01 99  |.NST":.850.<....|
00000910: 22 11 11 11 20 20 D4 48  45 20 54 55 52 54 4C 45  |"...  .HE TURTLE|
00000920: 20 43 41 4E 20 42 45 20  4D 41 44 45 20 54 4F 20  | CAN BE MADE TO |
00000930: 57 41 4C 4B 20 41 20 50  41 54 48 22 00 56 11 9C  |WALK A PATH".V..|
00000940: 01 99 3A 99 22 20 4F 4E  20 54 48 45 20 53 43 52  |..:." ON THE SCR|
00000950: 45 45 4E 2E 22 3B 00 79  11 9F 01 99 22 20 C6 49  |EEN.";.y...." .I|
00000960: 52 53 54 20 44 45 43 49  44 45 20 57 48 41 54 20  |RST DECIDE WHAT |
00000970: 53 48 41 50 45 22 20 3A  99 00 A8 11 A0 01 99 22  |SHAPE" :......."|
00000980: 20 59 4F 55 20 57 41 4E  54 20 54 48 45 20 54 55  | YOU WANT THE TU|
00000990: 52 54 4C 45 20 54 4F 20  46 4F 4C 4C 4F 57 2E 20  |RTLE TO FOLLOW. |
000009A0: 20 C4 52 41 57 22 3A 99  00 D5 11 A2 01 99 22 20  | .RAW":......." |
000009B0: 54 48 45 20 53 48 41 50  45 20 41 4E 44 20 53 45  |THE SHAPE AND SE|
000009C0: 45 20 48 4F 57 20 4D 41  4E 59 20 53 49 44 45 53  |E HOW MANY SIDES|
000009D0: 20 4F 52 20 22 00 0B 12  A3 01 99 3A 20 20 99 22  | OR "......:  ."|
000009E0: 20 12 50 41 54 48 53 92  20 54 48 45 52 45 20 41  | .PATHS. THERE A|
000009F0: 52 45 20 54 4F 20 57 41  4C 4B 2E 20 C1 20 53 51  |RE TO WALK. . SQ|
00000A00: 55 41 52 45 20 46 4F 52  22 3A 99 00 39 12 A7 01  |UARE FOR":..9...|
00000A10: 99 22 20 45 58 41 4D 50  4C 45 20 48 41 53 20 46  |." EXAMPLE HAS F|
00000A20: 4F 55 52 20 53 49 44 45  53 20 41 4E 44 20 54 48  |OUR SIDES AND TH|
00000A30: 45 20 54 55 52 54 4C 45  22 00 69 12 A8 01 99 3A  |E TURTLE".i....:|
00000A40: 99 22 20 4D 55 53 54 20  57 41 4C 4B 20 12 46 4F  |." MUST WALK .FO|
00000A50: 55 52 92 20 44 49 46 46  45 52 45 4E 54 20 12 50  |UR. DIFFERENT .P|
00000A60: 41 54 48 53 92 20 54 4F  22 00 86 12 A9 01 99 3A  |ATHS. TO"......:|
00000A70: 99 22 20 46 4F 4C 4C 4F  57 20 54 48 45 20 53 51  |." FOLLOW THE SQ|
00000A80: 55 41 52 45 2E 22 00 9E  12 AA 01 55 50 B2 31 3A  |UARE.".....UP.1:|
00000A90: 55 48 B2 31 3A 8D 38 33  35 3A 8D 38 35 30 00 CE  |UH.1:.835:.850..|
00000AA0: 12 AB 01 99 22 20 20 20  D2 45 50 4C 59 20 54 4F  |...."   .EPLY TO|
00000AB0: 20 51 55 45 53 54 49 4F  4E 20 12 48 4F 57 20 4D  | QUESTION .HOW M|
00000AC0: 41 4E 59 20 50 41 54 48  53 92 20 42 59 22 00 D5  |ANY PATHS. BY"..|
00000AD0: 12 AC 01 99 3A 00 04 13  AD 01 99 22 20 54 59 50  |....:......" TYP|
00000AE0: 49 4E 47 20 41 20 4E 55  4D 42 45 52 20 46 52 4F  |ING A NUMBER FRO|
00000AF0: 4D 20 31 20 54 4F 20 31  35 2E 20 CE 45 58 54 20  |M 1 TO 15. .EXT |
00000B00: 59 4F 55 22 00 39 13 B0  01 99 3A 99 22 20 41 52  |YOU".9....:." AR|
00000B10: 45 20 41 53 4B 45 44 20  54 4F 20 12 45 4E 54 45  |E ASKED TO .ENTE|
00000B20: 52 20 44 49 52 45 43 54  49 4F 4E 53 92 2E 20 D4  |R DIRECTIONS.. .|
00000B30: 59 50 45 20 49 4E 22 3A  99 00 64 13 B1 01 99 22  |YPE IN":..d...."|
00000B40: 20 27 4E 4F 52 54 48 27  20 4F 52 20 27 53 4F 55  | 'NORTH' OR 'SOU|
00000B50: 54 48 27 20 4F 52 20 27  53 45 27 20 45 54 43 2E  |TH' OR 'SE' ETC.|
00000B60: 20 41 53 22 00 94 13 B2  01 99 22 11 20 53 48 4F  | AS"......". SHO|
00000B70: 57 4E 2E 20 CE 4F 57 20  59 4F 55 20 4D 55 53 54  |WN. .OW YOU MUST|
00000B80: 20 54 59 50 45 20 49 4E  20 54 48 45 20 4E 55 4D  | TYPE IN THE NUM|
00000B90: 42 45 52 22 00 C3 13 B4  01 99 3A 20 99 22 20 4F  |BER"......: ." O|
00000BA0: 46 20 53 54 45 50 53 20  54 48 41 54 20 54 55 52  |F STEPS THAT TUR|
00000BB0: 54 4C 45 20 54 41 4B 45  53 2C 20 52 45 50 4C 59  |TLE TAKES, REPLY|
00000BC0: 22 3A 99 00 F3 13 B6 01  99 22 20 54 4F 20 54 48  |":......." TO TH|
00000BD0: 45 20 51 55 45 53 54 49  4F 4E 20 12 48 4F 57 20  |E QUESTION .HOW |
00000BE0: 46 41 52 92 20 42 59 20  54 59 50 49 4E 47 20 41  |FAR. BY TYPING A|
00000BF0: 22 3A 99 00 22 14 B7 01  99 22 20 4E 55 4D 42 45  |":.."...." NUMBE|
00000C00: 52 20 46 52 4F 4D 20 31  20 54 4F 20 31 35 2E 20  |R FROM 1 TO 15. |
00000C10: D9 4F 55 20 57 49 4C 4C  20 42 45 20 41 53 4B 45  |.OU WILL BE ASKE|
00000C20: 44 22 00 53 14 B8 01 99  3A 99 22 20 54 48 45 20  |D".S....:." THE |
00000C30: 54 57 4F 20 51 55 45 53  54 49 4F 4E 53 20 27 45  |TWO QUESTIONS 'E|
00000C40: 4E 54 45 52 20 44 49 52  45 43 54 49 4F 4E 53 27  |NTER DIRECTIONS'|
00000C50: 22 3A 99 00 81 14 B9 01  99 22 20 41 4E 44 20 27  |":......." AND '|
00000C60: 48 4F 57 20 46 41 52 27  20 46 4F 52 20 45 41 43  |HOW FAR' FOR EAC|
00000C70: 48 20 4F 46 20 54 48 45  20 50 41 54 48 53 22 3A  |H OF THE PATHS":|
00000C80: 99 00 9F 14 BA 01 99 22  20 54 48 45 20 54 55 52  |......." THE TUR|
00000C90: 54 4C 45 20 4D 55 53 54  20 57 41 4C 4B 2E 22 00  |TLE MUST WALK.".|
00000CA0: AD 14 C7 01 8D 38 33 35  3A 89 34 39 30 00 E0 14  |.....835:.490...|
00000CB0: CC 01 99 22 93 22 3A 99  22 11 11 CE 4F 54 45 3A  |...".":."...OTE:|
00000CC0: 11 11 11 D4 4F 20 41 44  56 41 4E 43 45 20 46 52  |....O ADVANCE FR|
00000CD0: 4F 4D 20 4F 4E 45 20 51  55 45 53 54 49 4F 4E 22  |OM ONE QUESTION"|
00000CE0: 00 08 15 D6 01 99 22 11  54 4F 20 54 48 45 20 4E  |......".TO THE N|
00000CF0: 45 58 54 20 50 52 45 53  53 20 54 48 45 20 D3 D0  |EXT PRESS THE ..|
00000D00: C1 C3 C5 20 42 41 52 22  00 38 15 DB 01 99 22 11  |... BAR".8....".|
00000D10: 11 1D 1D 1D 1D 1D C9 46  20 41 54 20 41 4E 59 20  |.......F AT ANY |
00000D20: 54 49 4D 45 20 59 4F 55  20 57 49 53 48 20 54 4F  |TIME YOU WISH TO|
00000D30: 20 52 45 54 55 52 4E 22  00 5B 15 E0 01 99 22 11  | RETURN".[....".|
00000D40: 54 4F 20 54 48 45 20 CD  C5 CE D5 20 50 52 45 53  |TO THE .... PRES|
00000D50: 53 20 48 20 D2 C5 D4 D5  D2 CE 22 00 64 15 E5 01  |S H ......".d...|
00000D60: 8D 38 33 35 00 78 15 EA  01 8B 55 5A B2 31 A7 9E  |.835.x....UZ.1..|
00000D70: 55 50 25 3A 89 32 31 37  00 7E 15 F3 01 8E 00 9F  |UP%:.217.~......|
00000D80: 15 F4 01 8F 20 2A 2A 20  54 45 41 43 48 45 52 20  |.... ** TEACHER |
00000D90: 49 4E 53 54 52 55 43 54  49 4F 4E 53 20 2A 2A 00  |INSTRUCTIONS **.|
00000DA0: CF 15 F5 01 99 22 93 22  3A 97 55 54 2C 55 4C 25  |.....".":.UT,UL%|
00000DB0: 3A 8B C2 28 35 30 30 30  33 29 B2 30 A7 97 35 33  |:..(50003).0..53|
00000DC0: 32 38 31 2C 32 3A 97 35  33 32 38 30 2C 31 30 00  |281,2:.53280,10.|
00000DD0: F0 15 F6 01 55 50 B2 30  3A 55 47 24 B2 22 D4 45  |....UP.0:UG$.".E|
00000DE0: 41 43 48 45 52 20 C9 4E  53 54 22 3A 8D 38 35 30  |ACHER .NST":.850|
00000DF0: 00 1E 16 F7 01 99 22 11  11 20 20 20 20 20 20 D4  |......"..      .|
00000E00: 4F 20 54 48 45 20 42 45  53 54 20 4F 46 20 4F 55  |O THE BEST OF OU|
00000E10: 52 20 4B 4E 4F 57 4C 45  44 47 45 2C 11 22 00 47  |R KNOWLEDGE,.".G|
00000E20: 16 F8 01 99 22 20 20 20  54 48 49 53 20 50 52 4F  |...."   THIS PRO|
00000E30: 47 52 41 4D 20 49 53 20  49 4E 20 54 48 45 20 50  |GRAM IS IN THE P|
00000E40: 55 42 4C 49 43 11 22 00  73 16 F9 01 99 22 20 20  |UBLIC.".s...."  |
00000E50: 20 44 4F 4D 41 49 4E 2E  20 20 C9 46 20 54 48 49  | DOMAIN.  .F THI|
00000E60: 53 20 49 53 20 4E 4F 54  20 54 48 45 20 43 41 53  |S IS NOT THE CAS|
00000E70: 45 11 22 00 90 16 FA 01  99 22 20 20 20 50 4C 45  |E."......"   PLE|
00000E80: 41 53 45 20 43 4F 4E 54  41 43 54 3A 11 11 11 22  |ASE CONTACT:..."|
00000E90: 00 BA 16 FB 01 99 22 20  20 20 20 20 20 C3 4F 4D  |......"      .OM|
00000EA0: 4D 4F 44 4F 52 45 20 C2  55 53 49 4E 45 53 53 20  |MODORE .USINESS |
00000EB0: CD 41 43 48 49 4E 45 53  11 22 00 DD 16 FC 01 99  |.ACHINES."......|
00000EC0: 22 20 20 20 20 20 20 20  20 20 20 33 33 37 30 20  |"          3370 |
00000ED0: D0 48 41 52 4D 41 43 59  20 C1 56 45 2E 00 01 17  |.HARMACY .VE....|
00000EE0: FD 01 99 22 20 20 20 20  20 20 20 20 20 20 C1 47  |..."          .G|
00000EF0: 49 4E 43 4F 55 52 54 2C  20 CF 4E 54 41 52 49 4F  |INCOURT, .NTARIO|
00000F00: 22 00 23 17 FE 01 99 22  20 20 20 20 20 20 20 20  |".#...."        |
00000F10: 20 20 C3 41 4E 41 44 41  20 20 20 CD 31 D7 20 32  |  .ANADA   .1. 2|
00000F20: CB 34 22 00 43 17 FF 01  99 22 20 20 20 20 20 20  |.4".C...."      |
00000F30: 20 20 20 20 28 34 31 36  29 20 34 39 39 2D 34 32  |    (416) 499-42|
00000F40: 39 32 22 00 59 17 00 02  55 50 B2 31 3A 8D 20 38  |92".Y...UP.1:. 8|
00000F50: 33 35 3A 8D 20 38 35 30  3A 00 7E 17 01 02 99 22  |35:. 850:.~...."|
00000F60: 20 20 20 20 20 11 11 D0  52 4F 47 52 41 4D 20 CE  |     ...ROGRAM .|
00000F70: 41 4D 45 3A 20 D4 55 52  54 4C 45 20 31 11 00 A7  |AME: .URTLE 1...|
00000F80: 17 02 02 99 22 20 20 20  20 20 D7 52 49 54 54 45  |...."     .RITTE|
00000F90: 4E 20 C2 59 20 20 3A 20  D2 2E 20 CA 2E 20 CD 49  |N .Y  : .. .. .I|
00000FA0: 54 43 48 45 4C 4C 11 00  CB 17 03 02 99 22 20 20  |TCHELL......."  |
00000FB0: 20 20 20 D5 50 47 52 41  44 45 44 20 C2 59 20 3A  |   .PGRADED .Y :|
00000FC0: 20 20 20 20 20 20 20 20  20 20 11 00 F6 17 04 02  |          ......|
00000FD0: 99 22 20 20 20 20 20 11  D4 48 49 53 20 50 52 4F  |."     ..HIS PRO|
00000FE0: 47 52 41 4D 20 57 49 4C  4C 20 52 55 4E 20 4F 4E  |GRAM WILL RUN ON|
00000FF0: 20 41 4E 59 11 11 00 15  18 07 02 99 22 20 20 20  | ANY........"   |
00001000: 20 20 20 20 20 20 D0 C5  D4 20 36 34 20 C3 CF CD  |      ... 64 ...|
00001010: D0 D5 D4 C5 D2 00 3A 18  08 02 99 22 20 20 20 20  |......:...."    |
00001020: 20 20 20 20 20 C3 CF CD  CD CF C4 CF D2 C5 20 36  |     ......... 6|
00001030: 34 20 C3 CF CD D0 D5 D4  C5 D2 00 4D 18 09 02 8D  |4 .........M....|
00001040: 38 33 35 3A 55 48 B2 31  3A 8D 38 35 30 00 7D 18  |835:UH.1:.850.}.|
00001050: 22 02 99 22 11 20 D0 52  4F 47 52 41 4D 20 43 4C  |"..". .ROGRAM CL|
00001060: 41 53 53 49 46 49 43 41  54 49 4F 4E 3A 20 20 C1  |ASSIFICATION:  .|
00001070: 52 54 2C 20 C7 45 4F 4D  45 54 52 59 22 00 AE 18  |RT, .EOMETRY"...|
00001080: 25 02 99 22 11 11 20 C1  4E 43 49 4C 4C 41 52 59  |%..".. .NCILLARY|
00001090: 20 4D 41 54 45 52 49 41  4C 20 4E 45 45 44 45 44  | MATERIAL NEEDED|
000010A0: 3A 20 D0 45 4E 20 26 20  50 41 50 45 52 22 00 DD  |: .EN & PAPER"..|
000010B0: 18 28 02 99 22 11 11 20  CF 42 4A 45 43 54 49 56  |.(..".. .BJECTIV|
000010C0: 45 20 4F 46 20 54 48 45  20 50 52 4F 47 52 41 4D  |E OF THE PROGRAM|
000010D0: 3A 20 D4 4F 20 47 49 56  45 20 54 48 45 00 2A 19  |: .O GIVE THE.*.|
000010E0: 2A 02 99 22 11 20 45 58  50 45 52 49 45 4E 43 45  |*..". EXPERIENCE|
000010F0: 20 57 49 54 48 20 43 4F  4D 50 55 54 45 52 20 41  | WITH COMPUTER A|
00001100: 52 54 20 4F 52 22 3A 99  22 11 20 47 45 4F 4D 45  |RT OR":.". GEOME|
00001110: 54 52 59 20 55 53 49 4E  47 20 54 55 52 54 4C 45  |TRY USING TURTLE|
00001120: 20 47 45 4F 4D 45 54 52  59 22 00 55 19 2B 02 99  | GEOMETRY".U.+..|
00001130: 22 11 11 20 C4 45 53 43  52 49 50 54 49 4F 4E 20  |".. .ESCRIPTION |
00001140: 4F 46 20 53 54 55 44 45  4E 54 20 41 43 54 49 56  |OF STUDENT ACTIV|
00001150: 49 54 59 3A 22 00 86 19  2C 02 99 3A 99 22 20 D4  |ITY:"...,..:." .|
00001160: 48 45 20 53 54 55 44 45  4E 54 20 44 45 53 49 47  |HE STUDENT DESIG|
00001170: 4E 53 20 41 4E 44 20 48  41 53 20 54 48 45 20 54  |NS AND HAS THE T|
00001180: 55 52 54 4C 45 22 00 B0  19 2D 02 99 3A 99 22 20  |URTLE"...-..:." |
00001190: 45 58 45 43 55 54 45 20  54 48 4F 53 45 20 44 45  |EXECUTE THOSE DE|
000011A0: 53 49 47 4E 53 2E 20 20  20 20 20 22 3A 99 3A 99  |SIGNS.     ":.:.|
000011B0: 00 C4 19 2E 02 55 48 B2  31 3A 8D 38 33 35 3A 8D  |.....UH.1:.835:.|
000011C0: 20 38 35 30 00 05 1A 2F  02 3A 99 22 11 11 11 20  | 850.../.:."... |
000011D0: D0 4C 41 43 45 4D 45 4E  54 20 57 49 54 48 49 4E  |.LACEMENT WITHIN|
000011E0: 20 53 54 55 44 45 4E 54  20 43 55 52 52 49 43 55  | STUDENT CURRICU|
000011F0: 4C 55 4D 3A 22 3A 99 22  11 20 C1 4C 4C 20 47 52  |LUM:":.". .LL GR|
00001200: 41 44 45 53 22 00 47 1A  30 02 99 22 11 11 20 D3  |ADES".G.0..".. .|
00001210: 55 47 47 45 53 54 49 4F  4E 53 20 46 4F 52 20 53  |UGGESTIONS FOR S|
00001220: 54 55 44 45 4E 54 20 55  53 41 47 45 3A 22 3A 99  |TUDENT USAGE:":.|
00001230: 3A 99 22 20 D3 49 4E 47  4C 59 20 4F 52 20 49 4E  |:." .INGLY OR IN|
00001240: 20 50 41 49 52 53 2E 00  78 1A 32 02 99 22 11 11  | PAIRS..x.2.."..|
00001250: 20 D0 52 45 52 45 51 55  49 53 49 54 45 53 20 2F  | .REREQUISITES /|
00001260: 20 42 41 43 4B 47 52 4F  55 4E 44 20 49 4E 46 4F  | BACKGROUND INFO|
00001270: 52 4D 41 54 49 4F 4E 22  00 A4 1A 33 02 3A 99 22  |RMATION"...3.:."|
00001280: 11 20 4E 45 45 44 45 44  3A 20 D4 48 45 20 53 54  |. NEEDED: .HE ST|
00001290: 55 44 45 4E 54 20 4D 55  53 54 20 4B 4E 4F 57 20  |UDENT MUST KNOW |
000012A0: 54 48 45 22 00 CE 1A 34  02 99 3A 99 22 20 43 41  |THE"...4..:." CA|
000012B0: 52 44 49 4E 41 4C 20 50  4F 49 4E 54 53 20 4F 46  |RDINAL POINTS OF|
000012C0: 20 54 48 45 20 43 4F 4D  50 41 53 53 2E 22 00 D7  | THE COMPASS."..|
000012D0: 1A 35 02 8D 38 33 35 00  EB 1A 4E 02 8B 55 5A B2  |.5..835...N..UZ.|
000012E0: 31 A7 9E 55 50 25 3A 89  32 31 37 00 F1 1A 57 02  |1..UP%:.217...W.|
000012F0: 8E 00 17 1B 58 02 8F 20  2A 2A 20 50 52 4F 47 52  |....X.. ** PROGR|
00001300: 41 4D 20 4D 4F 44 49 46  49 43 41 54 49 4F 4E 20  |AM MODIFICATION |
00001310: 49 4E 53 54 20 2A 2A 00  28 1B 59 02 99 22 93 22  |INST **.(.Y.."."|
00001320: 3A 97 55 54 2C 55 4C 25  00 48 1B 5D 02 55 50 B2  |:.UT,UL%.H.].UP.|
00001330: 30 3A 55 47 24 B2 22 D0  52 4F 47 52 41 4D 20 CD  |0:UG$.".ROGRAM .|
00001340: 4F 44 22 3A 8D 38 35 30  00 51 1B 94 02 8D 38 33  |OD":.850.Q....83|
00001350: 35 00 65 1B B2 02 8B 55  5A B2 31 A7 9E 55 50 25  |5.e....UZ.1..UP%|
00001360: 3A 89 32 31 37 00 6B 1B  BB 02 8E 00 90 1B BC 02  |:.217.k.........|
00001370: 8F 20 2A 2A 20 54 4F 20  55 53 45 20 38 30 33 32  |. ** TO USE 8032|
00001380: 20 4C 4F 41 44 20 43 42  4D 34 30 33 32 20 2A 2A  | LOAD CBM4032 **|
00001390: 00 C6 1B C6 02 99 22 93  11 11 11 05 42 45 46 4F  |......".....BEFO|
000013A0: 52 45 20 52 55 4E 4E 49  4E 47 20 54 48 49 53 20  |RE RUNNING THIS |
000013B0: 50 52 4F 47 52 41 4D 20  4F 4E 20 41 4E 20 38 30  |PROGRAM ON AN 80|
000013C0: 33 32 20 20 11 11 00 FC  1B D0 02 99 22 20 20 20  |32  ........"   |
000013D0: 20 20 20 4C 4F 41 44 20  54 48 45 20 27 43 42 4D  |   LOAD THE 'CBM|
000013E0: 20 34 30 33 32 27 20 50  52 4F 47 52 41 4D 11 11  | 4032' PROGRAM..|
000013F0: 11 11 11 11 11 11 11 11  11 11 11 22 00 07 1C DA  |..........."....|
00001400: 02 9E 55 55 AA 37 31 00  0D 1C E4 02 80 00 2D 1C  |..UU.71.......-.|
00001410: 20 03 8F 20 2A 2A 20 54  20 49 20 54 20 4C 20 45  | .. ** T I T L E|
00001420: 20 20 20 50 20 41 20 47  20 45 20 2A 2A 00 61 1C  |   P A G E **.a.|
00001430: 22 03 99 22 93 11 1D 05  22 3B 3A 97 55 54 2C 55  |".."....";:.UT,U|
00001440: 55 25 3A 8B C2 28 35 30  30 30 33 29 B2 30 A7 97  |U%:..(50003).0..|
00001450: 35 33 32 38 30 2C 31 34  3A 97 35 33 32 38 31 2C  |53280,14:.53281,|
00001460: 36 00 77 1C 24 03 81 49  B2 31 A4 33 38 3A 99 22  |6.w.$..I.1.38:."|
00001470: 12 A6 92 22 3B 3A 82 00  8F 1C 26 03 81 49 B2 31  |...";:....&..I.1|
00001480: A4 32 32 3A 99 22 11 9D  12 A6 92 22 3B 3A 82 00  |.22:.".....";:..|
00001490: A7 1C 28 03 81 49 B2 31  A4 33 37 3A 99 22 9D 9D  |..(..I.1.37:."..|
000014A0: 12 A6 92 22 3B 3A 82 00  BF 1C 2A 03 81 49 B2 31  |...";:....*..I.1|
000014B0: A4 32 32 3A 99 22 91 9D  12 A6 92 22 3B 3A 82 00  |.22:.".....";:..|
000014C0: E4 1C 2C 03 99 22 13 11  11 11 11 11 11 1D 1D 1D  |..,.."..........|
000014D0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 12  |................|
000014E0: A9 20 20 92 00 06 1D 2E  03 99 22 1D 1D 1D 1D 1D  |.  .......".....|
000014F0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 12 20 92  |.............. .|
00001500: 20 20 12 20 92 A9 00 27  1D 30 03 99 22 1D 1D 1D  |  . ...'.0.."...|
00001510: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 12  |................|
00001520: 20 92 20 20 12 A3 DF 00  45 1D 32 03 99 22 1D 1D  | .  ....E.2.."..|
00001530: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00001540: DF 12 20 20 92 00 6D 1D  34 03 99 22 11 11 1D 1D  |..  ..m.4.."....|
00001550: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 43 20 4F 20 4D 20  |..........C O M |
00001560: 4D 20 4F 20 44 20 4F 20  52 20 45 11 11 00 90 1D  |M O D O R E.....|
00001570: 36 03 99 22 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |6.."............|
00001580: 1D 1D 1D 45 44 55 43 41  54 49 4F 4E 41 4C 11 11  |...EDUCATIONAL..|
00001590: 00 AF 1D 38 03 99 22 1D  1D 1D 1D 1D 1D 1D 1D 1D  |...8..".........|
000015A0: 1D 1D 1D 1D 1D 1D 1D 53  4F 46 54 57 41 52 45 00  |.......SOFTWARE.|
000015B0: CA 1D 3A 03 8F 20 2A 2A  20 43 4F 4D 4D 4F 44 4F  |..:.. ** COMMODO|
000015C0: 52 45 20 4C 4F 47 4F 20  2A 2A 00 02 1E 3B 03 99  |RE LOGO **...;..|
000015D0: C8 28 55 44 24 2C 32 34  29 3B 22 1D 1D 1D 1D 1D  |.(UD$,24);".....|
000015E0: 1D 1D 1D 1D 12 50 52 45  53 53 20 53 50 41 43 45  |.....PRESS SPACE|
000015F0: 20 42 41 52 20 4F 52 20  57 41 49 54 92 22 3A 49  | BAR OR WAIT.":I|
00001600: B2 30 00 24 1E 3C 03 A1  41 24 3A 8B 41 24 B3 B1  |.0.$.<..A$:.A$..|
00001610: 22 20 22 A7 49 B2 49 AA  31 3A 8B 49 B3 32 35 30  |" ".I.I.1:.I.250|
00001620: A7 38 32 38 00 48 1E 3E  03 54 31 24 B2 22 22 3A  |.828.H.>.T1$."":|
00001630: 54 32 24 B2 22 22 3A 54  33 24 B2 22 22 3A 54 34  |T2$."":T3$."":T4|
00001640: 24 B2 22 22 3A 49 B2 30  00 51 1E 40 03 89 33 30  |$."":I.0.Q.@..30|
00001650: 30 00 6D 1E 43 03 8F 20  2A 2A 20 53 50 41 43 45  |0.m.C.. ** SPACE|
00001660: 20 42 41 52 20 50 52 45  53 53 20 2A 2A 00 A8 1E  | BAR PRESS **...|
00001670: 48 03 97 55 4F 2C 30 3A  99 C8 28 55 44 24 2C 32  |H..UO,0:..(UD$,2|
00001680: 34 29 3B 22 1D 1D 1D 1D  1D 1D 12 50 52 45 53 53  |4);".......PRESS|
00001690: 20 53 50 41 43 45 20 42  41 52 20 54 4F 20 43 4F  | SPACE BAR TO CO|
000016A0: 4E 54 49 4E 55 45 92 22  00 BF 1E 4C 03 A1 55 49  |NTINUE."...L..UI|
000016B0: 24 3A 8B 55 49 24 B3 B1  22 20 22 A7 38 34 34 00  |$:.UI$.." ".844.|
000016C0: C5 1E 4E 03 8E 00 E5 1E  52 03 8F 20 2A 2A 20 50  |..N.....R.. ** P|
000016D0: 41 47 45 20 44 45 53 49  47 4E 20 52 4F 55 54 49  |AGE DESIGN ROUTI|
000016E0: 4E 45 20 2A 2A 00 F1 1E  54 03 55 50 B2 55 50 AA  |NE **...T.UP.UP.|
000016F0: 31 00 1B 1F 57 03 99 22  93 22 C8 28 55 54 24 AA  |1...W..".".(UT$.|
00001700: 55 50 24 2C 32 31 29 3B  C9 28 55 50 24 AA 55 47  |UP$,21);.(UP$.UG|
00001710: 24 AA C4 28 55 50 29 2C  31 38 29 00 4A 1F 5C 03  |$..(UP),18).J.\.|
00001720: 99 22 20 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |." -------------|
00001730: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001740: 2D 2D 2D 2D 2D 2D 2D 2D  2D 22 00 59 1F 60 03 8B  |---------".Y.`..|
00001750: 55 48 B3 B1 30 A7 38 37  30 00 8D 1F 61 03 99 C8  |UH..0.870...a...|
00001760: 28 55 44 24 2C 32 34 29  3B C8 28 55 50 24 2C 37  |(UD$,24);.(UP$,7|
00001770: 29 3B 22 48 45 4C 50 20  2D 20 50 52 45 53 53 20  |);"HELP - PRESS |
00001780: 20 20 48 20 3C 52 45 54  55 52 4E 3E 22 00 9E 1F  |  H <RETURN>"...|
00001790: 66 03 55 48 B2 30 3A 99  22 13 11 22 3A 8E 00 BD  |f.UH.0:."..":...|
000017A0: 1F 6B 03 8F 20 2A 2A 20  50 4C 45 41 53 45 20 57  |.k.. ** PLEASE W|
000017B0: 41 49 54 20 52 45 4D 41  52 4B 20 2A 2A 00 F3 1F  |AIT REMARK **...|
000017C0: 70 03 99 C8 28 55 44 24  2C 32 34 29 3B 22 20 20  |p...(UD$,24);"  |
000017D0: 20 20 20 20 20 20 20 20  20 4F 4E 45 20 4D 4F 4D  |         ONE MOM|
000017E0: 45 4E 54 20 50 4C 45 41  53 45 2E 2E 2E 20 20 20  |ENT PLEASE...   |
000017F0: 20 20 22 00 F9 1F 75 03  8E 00 16 20 84 03 8F 20  |  "...u.... ... |
00001800: 2A 2A 20 53 45 54 20 55  50 20 56 41 52 49 41 42  |** SET UP VARIAB|
00001810: 4C 45 53 20 2A 2A 00 61  20 85 03 55 58 24 B2 22  |LES **.a ..UX$."|
00001820: 48 22 3A 86 55 51 25 28  31 30 30 30 29 3A 55 42  |H":.UQ%(1000):UB|
00001830: B2 33 32 37 36 38 3A 55  31 B2 31 39 36 3A 55 32  |.32768:U1.196:U2|
00001840: B2 31 39 37 3A 55 33 B2  31 39 38 3A 55 34 B2 32  |.197:U3.198:U4.2|
00001850: 31 36 3A 55 43 B2 31 36  37 3A 55 55 B2 31 30 32  |16:UC.167:UU.102|
00001860: 34 00 9F 20 86 03 55 54  B2 35 39 34 36 38 3A 55  |4.. ..UT.59468:U|
00001870: 55 25 B2 31 32 3A 55 4C  25 B2 31 34 3A 55 50 25  |U%.12:UL%.14:UP%|
00001880: B2 31 31 34 36 3A 55 4D  B2 33 32 37 36 38 3A 55  |.1146:UM.32768:U|
00001890: 4F B2 31 35 38 3A 97 20  35 30 30 30 33 2C 30 00  |O.158:. 50003,0.|
000018A0: E2 20 87 03 8B C2 28 35  30 30 30 33 29 B2 30 A7  |. ....(50003).0.|
000018B0: 55 42 B2 31 30 32 34 3A  55 31 B2 32 30 39 3A 55  |UB.1024:U1.209:U|
000018C0: 32 B2 32 31 30 3A 55 33  B2 32 31 31 3A 55 34 B2  |2.210:U3.211:U4.|
000018D0: 32 31 34 3A 55 43 B2 32  30 34 3A 55 55 B2 32 30  |214:UC.204:UU.20|
000018E0: 34 38 00 21 21 88 03 8B  C2 28 35 30 30 30 33 29  |48.!!....(50003)|
000018F0: B2 30 A7 55 54 B2 35 33  32 37 32 3A 55 55 25 B2  |.0.UT.53272:UU%.|
00001900: 32 31 3A 55 4C 25 B2 32  33 3A 55 50 25 B2 32 31  |21:UL%.23:UP%.21|
00001910: 33 39 3A 55 4D B2 31 30  32 34 3A 55 4F B2 31 39  |39:UM.1024:UO.19|
00001920: 38 00 45 21 89 03 55 44  24 B2 22 13 11 11 11 11  |8.E!..UD$.".....|
00001930: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001940: 11 11 11 11 22 00 77 21  8A 03 55 50 24 B2 22 20  |....".w!..UP$." |
00001950: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001960: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001970: 20 20 20 20 20 20 22 00  C5 21 8B 03 55 54 24 B2  |      "..!..UT$.|
00001980: 22 20 D4 D5 D2 D4 CC C5  20 31 20 20 20 20 A0 A0  |" ...... 1    ..|
00001990: A0 A0 A0 A0 22 3A 8F 20  50 4C 41 43 45 20 50 52  |....":. PLACE PR|
000019A0: 4F 47 52 41 4D 20 54 49  54 4C 45 20 48 45 52 45  |OGRAM TITLE HERE|
000019B0: 20 21 21 21 21 21 21 21  21 21 21 21 21 21 21 21  | !!!!!!!!!!!!!!!|
000019C0: 21 21 2A 2A 2A 00 CB 21  8C 03 8E 00 E5 21 8E 03  |!!***..!.....!..|
000019D0: 8F 20 2A 2A 20 53 45 54  20 56 41 52 49 41 42 4C  |. ** SET VARIABL|
000019E0: 45 53 20 2A 2A 00 EE 21  93 03 8D 39 30 30 00 12  |ES **..!...900..|
000019F0: 22 94 03 86 41 24 28 32  30 29 2C 41 28 32 30 29  |"...A$(20),A(20)|
00001A00: 2C 52 28 32 30 29 2C 4C  28 32 30 29 2C 4E 28 32  |,R(20),L(20),N(2|
00001A10: 30 29 00 29 22 95 03 86  51 28 32 30 2C 32 30 29  |0).)"...Q(20,20)|
00001A20: 2C 50 28 32 30 2C 32 30  29 00 44 22 98 03 8F 20  |,P(20,20).D"... |
00001A30: 2A 2A 20 43 48 45 43 4B  20 46 4F 52 20 38 30 33  |** CHECK FOR 803|
00001A40: 32 20 2A 2A 00 62 22 9D  03 99 22 93 22 3A 99 22  |2 **.b"...".":."|
00001A50: A0 22 3A 8F 20 53 48 49  46 54 45 44 20 53 50 41  |.":. SHIFTED SPA|
00001A60: 43 45 00 79 22 A2 03 8B  C2 28 55 42 AA 34 30 29  |CE.y"....(UB.40)|
00001A70: B3 B1 39 36 A7 8D 37 30  30 00 92 22 A3 03 8F 20  |..96..700.."... |
00001A80: 2A 2A 20 4D 45 4D 4F 52  59 20 43 48 45 43 4B 20  |** MEMORY CHECK |
00001A90: 2A 2A 00 A6 22 A4 03 8B  20 B8 28 30 29 B1 32 30  |**.."... .(0).20|
00001AA0: 30 30 A7 39 33 37 00 D4  22 A5 03 99 22 93 11 11  |00.937.."..."...|
00001AB0: 05 54 48 49 53 20 4D 41  43 48 49 4E 45 20 44 4F  |.THIS MACHINE DO|
00001AC0: 45 53 20 4E 4F 54 20 48  41 56 45 20 45 4E 4F 55  |ES NOT HAVE ENOU|
00001AD0: 47 48 11 22 00 F8 22 A6  03 99 22 4D 45 4D 4F 52  |GH.".."..."MEMOR|
00001AE0: 59 20 54 4F 20 52 55 4E  20 54 48 49 53 20 50 52  |Y TO RUN THIS PR|
00001AF0: 4F 47 52 41 4D 20 21 22  00 03 23 A7 03 9E 55 55  |OGRAM !"..#...UU|
00001B00: AA 37 31 00 09 23 A8 03  80 00 23 23 A9 03 99 22  |.71..#....##..."|
00001B10: 93 05 22 3A 8B C2 28 35  30 30 30 33 29 B2 30 A7  |..":..(50003).0.|
00001B20: 39 36 32 00 52 23 AC 03  8F 20 2A 2A 20 42 41 53  |962.R#... ** BAS|
00001B30: 49 43 20 32 2E 30 20 20  4F 52 20 20 34 2E 30 20  |IC 2.0  OR  4.0 |
00001B40: 20 4F 52 20 20 43 2D 36  34 20 53 45 54 55 50 20  | OR  C-64 SETUP |
00001B50: 2A 2A 00 90 23 AD 03 97  31 30 37 35 2C 31 33 33  |**..#...1075,133|
00001B60: 3A 97 31 30 37 36 2C 31  34 34 3A 97 31 30 37 37  |:.1076,144:.1077|
00001B70: 2C 32 33 34 3A 97 31 30  37 39 2C 34 3A 97 31 30  |,234:.1079,4:.10|
00001B80: 38 30 2C 31 33 33 3A 97  31 30 38 31 2C 31 34 35  |80,133:.1081,145|
00001B90: 00 C6 23 AE 03 97 31 30  39 31 2C 31 35 35 3A 97  |..#...1091,155:.|
00001BA0: 31 30 39 38 2C 31 33 33  3A 97 31 30 39 39 2C 31  |1098,133:.1099,1|
00001BB0: 34 34 3A 97 31 31 30 30  2C 32 33 34 3A 97 31 31  |44:.1100,234:.11|
00001BC0: 30 33 2C 31 33 33 00 E8  23 AF 03 97 31 31 30 34  |03,133..#...1104|
00001BD0: 2C 31 34 35 3A 97 31 31  30 35 2C 32 33 34 3A 97  |,145:.1105,234:.|
00001BE0: 31 30 38 32 2C 32 33 34  00 FF 23 B1 03 8B C2 28  |1082,234..#....(|
00001BF0: 35 30 30 30 33 29 B3 B1  31 36 30 A7 39 35 35 00  |50003)..160.955.|
00001C00: 2E 24 B6 03 97 31 30 39  33 2C 38 38 3A 97 31 30  |.$...1093,88:.10|
00001C10: 39 34 2C 32 32 38 3A 97  31 30 39 37 2C 38 35 3A  |94,228:.1097,85:|
00001C20: 97 31 31 30 32 2C 32 32  38 3A 89 39 36 35 00 43  |.1102,228:.965.C|
00001C30: 24 BB 03 8B C2 28 35 30  30 30 33 29 B3 B1 31 A7  |$....(50003)..1.|
00001C40: 39 39 30 00 72 24 C0 03  97 31 30 39 33 2C 34 39  |990.r$...1093,49|
00001C50: 3A 97 31 30 39 34 2C 32  33 30 3A 97 31 30 39 37  |:.1094,230:.1097|
00001C60: 2C 34 36 3A 97 31 31 30  32 2C 32 33 30 3A 89 39  |,46:.1102,230:.9|
00001C70: 36 35 00 AC 24 C2 03 97  32 30 39 39 2C 31 34 31  |65..$...2099,141|
00001C80: 3A 97 32 31 30 30 2C 32  30 3A 97 32 31 30 31 2C  |:.2100,20:.2101,|
00001C90: 33 3A 97 32 31 30 33 2C  38 3A 97 32 31 30 34 2C  |3:.2103,8:.2104,|
00001CA0: 31 34 31 3A 97 32 31 30  35 2C 32 31 00 E8 24 C3  |141:.2105,21..$.|
00001CB0: 03 97 32 31 30 36 2C 33  3A 97 32 31 31 35 2C 31  |..2106,3:.2115,1|
00001CC0: 34 35 3A 97 32 31 31 37  2C 35 32 3A 97 32 31 31  |45:.2117,52:.211|
00001CD0: 38 2C 32 33 34 3A 97 32  31 32 31 2C 34 39 3A 97  |8,234:.2121,49:.|
00001CE0: 32 31 32 32 2C 31 34 31  00 22 25 C4 03 97 32 31  |2122,141."%...21|
00001CF0: 32 33 2C 32 30 3A 97 32  31 32 34 2C 33 3A 97 32  |23,20:.2124,3:.2|
00001D00: 31 32 36 2C 32 33 34 3A  97 32 31 32 37 2C 31 34  |126,234:.2127,14|
00001D10: 31 3A 97 32 31 32 38 2C  32 31 3A 97 32 31 32 39  |1:.2128,21:.2129|
00001D20: 2C 33 00 40 25 C5 03 9E  55 55 AA 34 38 3A 8F 20  |,3.@%...UU.48:. |
00001D30: 44 49 53 41 42 4C 45 20  53 54 4F 50 20 4B 45 59  |DISABLE STOP KEY|
00001D40: 00 51 25 CA 03 8D 38 30  30 3A 8F 20 54 49 54 4C  |.Q%...800:. TITL|
00001D50: 45 00 61 25 D4 03 89 33  30 30 3A 8F 20 4D 45 4E  |E.a%...300:. MEN|
00001D60: 55 00 92 25 DE 03 99 22  93 54 48 45 20 50 47 4D  |U..%...".THE PGM|
00001D70: 20 57 49 4C 4C 20 4E 4F  54 20 57 4F 52 4B 20 4F  | WILL NOT WORK O|
00001D80: 4E 20 54 48 49 53 20 4D  41 43 48 49 4E 45 21 22  |N THIS MACHINE!"|
00001D90: 3A 80 00 C7 25 E8 03 8B  55 5A B2 31 A7 9E 55 50  |:...%...UZ.1..UP|
00001DA0: 25 3A 9E 55 50 25 3A 55  5A B2 30 3A 8F 20 2A 2A  |%:.UP%:UZ.0:. **|
00001DB0: 20 50 52 4F 47 52 41 4D  20 53 54 41 52 54 53 20  | PROGRAM STARTS |
00001DC0: 48 45 52 45 20 2A 2A 00  F3 25 E9 03 99 22 93 05  |HERE **..%..."..|
00001DD0: 22 3B 3A 8C 3A 8B C2 28  35 30 30 30 33 29 B2 30  |";:.:..(50003).0|
00001DE0: A7 97 35 33 32 38 31 2C  36 3A 97 35 33 32 38 30  |..53281,6:.53280|
00001DF0: 2C 31 34 00 FE 25 ED 03  46 4C 41 47 B2 30 00 2E  |,14..%..FLAG.0..|
00001E00: 26 F2 03 8F 20 22 54 55  52 54 4C 45 31 22 56 45  |&... "TURTLE1"VE|
00001E10: 52 53 49 4F 4E 20 49 53  20 46 4F 52 20 45 4C 45  |RSION IS FOR ELE|
00001E20: 4D 45 4E 54 41 52 59 20  41 50 50 4C 49 43 00 40  |MENTARY APPLIC.@|
00001E30: 26 FC 03 99 22 13 93 22  3A 97 55 54 2C 55 4C 25  |&..."..":.UT,UL%|
00001E40: 00 7F 26 1A 04 8F 20 42  59 2A 2A 52 2E 4A 2E 4D  |..&... BY**R.J.M|
00001E50: 49 54 43 48 45 4C 4C 2A  2A 20 42 41 53 45 44 20  |ITCHELL** BASED |
00001E60: 4F 4E 20 53 45 59 4D 4F  55 52 20 50 41 50 45 52  |ON SEYMOUR PAPER|
00001E70: 54 53 20 4C 4F 47 4F 20  43 4F 4E 43 45 50 54 00  |TS LOGO CONCEPT.|
00001E80: A8 26 24 04 4C 28 30 29  B2 55 4D AA 38 33 32 3A  |.&$.L(0).UM.832:|
00001E90: 8F 20 53 43 52 45 45 4E  20 50 4F 53 49 54 20 4F  |. SCREEN POSIT O|
00001EA0: 46 20 54 55 52 54 4C 45  00 E4 26 2E 04 99 22 93  |F TURTLE..&...".|
00001EB0: 11 11 11 11 11 11 11 11  11 11 11 11 20 20 20 20  |............    |
00001EC0: 20 D4 48 49 53 20 49 53  20 54 48 45 20 12 D4 D5  | .HIS IS THE ...|
00001ED0: D2 D4 CC C5 92 20 50 52  4F 47 52 41 4D 2E 22 3A  |..... PROGRAM.":|
00001EE0: 8D 38 33 35 00 EA 26 42  04 99 00 FA 26 56 04 99  |.835..&B....&V..|
00001EF0: 22 93 13 22 3A 8D 31 34  39 30 00 00 27 60 04 99  |"..":.1490..'`..|
00001F00: 00 45 27 6A 04 46 4C B2  30 3A 99 22 20 C8 4F 57  |.E'j.FL.0:." .OW|
00001F10: 20 4D 41 4E 59 20 50 41  54 48 53 3F 2E 2E 28 31  | MANY PATHS?..(1|
00001F20: 20 54 4F 20 31 35 29 20  22 3B 3A 55 53 24 B2 22  | TO 15) ";:US$."|
00001F30: 30 31 32 33 34 35 36 37  38 39 48 22 3A 55 4C B2  |0123456789H":UL.|
00001F40: 32 3A 8D 33 35 00 68 27  6B 04 4E 24 B2 55 52 24  |2:.35.h'k.N$.UR$|
00001F50: 3A 4E B2 C5 28 4E 24 29  3A 8B 4E B2 B3 30 B0 4E  |:N..(N$):.N..0.N|
00001F60: B1 31 35 A7 31 31 31 30  00 76 27 74 04 81 20 49  |.15.1110.v't.. I|
00001F70: B2 31 20 A4 20 4E 00 91  27 79 04 55 47 24 B2 22  |.1 . N..'y.UG$."|
00001F80: D0 41 54 48 22 3A 55 50  B2 49 AB 31 3A 8D 38 35  |.ATH":UP.I.1:.85|
00001F90: 30 00 C2 27 7E 04 99 22  11 20 12 D4 55 52 54 4C  |0..'~..". ..URTL|
00001FA0: 45 20 44 49 52 45 43 54  49 4F 4E 53 3D 20 4E 4F  |E DIRECTIONS= NO|
00001FB0: 52 54 48 2D 53 4F 55 54  48 2D 45 41 53 54 2D 92  |RTH-SOUTH-EAST-.|
00001FC0: 22 3B 00 F4 27 88 04 99  22 11 20 20 20 20 20 20  |";..'...".      |
00001FD0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001FE0: 20 12 20 57 45 53 54 2D  53 45 2D 53 57 2D 4E 45  | . WEST-SE-SW-NE|
00001FF0: 2D 4E 57 22 00 FF 27 92  04 3A 8D 31 37 39 30 00  |-NW"..'..:.1790.|
00002000: 0C 28 97 04 46 4C 41 47  20 B2 20 30 00 54 28 9C  |.(..FLAG . 0.T(.|
00002010: 04 46 4C B2 30 3A 99 22  11 20 C8 4F 57 20 46 41  |.FL.0:.". .OW FA|
00002020: 52 3F 2E 2E 28 31 20 54  4F 20 31 35 29 A0 A0 A0  |R?..(1 TO 15)...|
00002030: 22 3B 3A 55 53 24 B2 22  30 31 32 33 34 35 36 37  |";:US$."01234567|
00002040: 38 39 48 22 3A 55 4C B2  32 3A 8D 33 35 3A 52 24  |89H":UL.2:.35:R$|
00002050: B2 55 52 24 00 99 28 A6  04 52 B2 C5 28 52 24 29  |.UR$..(..R..(R$)|
00002060: 3A 8B 52 B2 B3 30 B0 52  B1 31 35 A7 99 22 91 20  |:.R..0.R.15..". |
00002070: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002080: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002090: 91 91 22 3A 89 31 31 38  30 00 A4 28 B0 04 8D 20  |..":.1180..(... |
000020A0: 31 37 36 30 00 AA 28 BA  04 82 00 E1 28 C4 04 8B  |1760..(.....(...|
000020B0: C2 28 35 30 30 30 33 29  B2 30 A7 97 35 33 32 38  |.(50003).0..5328|
000020C0: 31 2C 31 3A 99 22 93 22  3A 97 35 33 32 38 31 2C  |1,1:.".":.53281,|
000020D0: 36 3A 97 35 33 32 38 30  2C 31 34 3A 89 31 32 32  |6:.53280,14:.122|
000020E0: 37 00 EA 28 C6 04 99 22  93 22 00 F4 28 CB 04 8D  |7..(..."."..(...|
000020F0: 31 35 30 30 00 FE 28 CE  04 8D 32 34 36 30 00 09  |1500..(...2460..|
00002100: 29 D8 04 81 54 B2 31 A4  4E 00 3C 29 E2 04 91 20  |)...T.1.N.<)... |
00002110: 41 28 54 29 8D 31 35 34  30 2C 31 36 30 30 2C 31  |A(T).1540,1600,1|
00002120: 36 36 30 2C 31 37 31 30  2C 31 39 31 30 2C 31 39  |660,1710,1910,19|
00002130: 38 30 2C 32 30 35 30 2C  32 31 32 30 00 46 29 EC  |80,2050,2120.F).|
00002140: 04 82 3A 99 3A 99 00 80  29 F6 04 46 4C B2 30 3A  |..:.:...)..FL.0:|
00002150: 99 22 20 C9 53 20 49 54  20 4F 4B 2E 3F 2E 2E 28  |." .S IT OK.?..(|
00002160: 59 2F 4E 29 A0 22 3B 3A  55 53 24 B2 22 59 4E 22  |Y/N).";:US$."YN"|
00002170: 3A 55 4C B2 31 3A 8D 33  35 3A 41 24 B2 55 52 24  |:UL.1:.35:A$.UR$|
00002180: 00 8F 29 00 05 41 24 B2  C8 28 41 24 2C 31 29 00  |..)..A$..(A$,1).|
00002190: A2 29 0A 05 8B 41 24 B3  B1 22 4E 22 A7 20 31 33  |.)...A$.."N". 13|
000021A0: 35 30 00 E2 29 14 05 46  4C B2 30 3A 99 22 20 C4  |50..)..FL.0:." .|
000021B0: 4F 20 12 41 92 47 41 49  4E 20 4F 52 20 12 51 92  |O .A.GAIN OR .Q.|
000021C0: 55 49 54 3F 2E 2E 20 22  3B 3A 55 53 24 B2 22 41  |UIT?.. ";:US$."A|
000021D0: 51 22 3A 55 4C B2 31 3A  8D 33 35 3A 41 24 B2 55  |Q":UL.1:.35:A$.U|
000021E0: 52 24 00 F2 29 1E 05 41  24 B2 C8 28 41 24 2C 31  |R$..)..A$..(A$,1|
000021F0: 29 3A 00 04 2A 28 05 8B  41 24 B2 22 41 22 A7 20  |):..*(..A$."A". |
00002200: 31 31 31 30 00 1A 2A 32  05 8B 41 24 B2 22 51 22  |1110..*2..A$."Q"|
00002210: A7 20 99 22 93 22 3A 20  20 8E 00 24 2A 3C 05 89  |. .".":  ..$*<..|
00002220: 31 33 30 30 00 38 2A 46  05 99 22 93 13 22 3A 20  |1300.8*F.."..": |
00002230: 20 20 20 8D 32 35 31 30  00 7D 2A 50 05 46 4C B2  |   .2510.}*P.FL.|
00002240: 30 3A 99 22 20 C4 52 41  57 20 12 41 92 4C 4C 2E  |0:." .RAW .A.LL.|
00002250: 2E 20 4F 52 20 44 4F 20  12 4D 92 4F 52 45 3F 2E  |. OR DO .M.ORE?.|
00002260: 2E 20 22 3B 3A 55 53 24  B2 22 41 4D 22 3A 55 4C  |. ";:US$."AM":UL|
00002270: B2 31 3A 8D 33 35 3A 41  24 B2 55 52 24 00 8C 2A  |.1:.35:A$.UR$..*|
00002280: 5A 05 41 24 B2 C8 28 41  24 2C 31 29 00 9D 2A 64  |Z.A$..(A$,1)..*d|
00002290: 05 8B 41 24 B2 22 41 22  A7 31 34 31 30 00 AE 2A  |..A$."A".1410..*|
000022A0: 6E 05 8B 41 24 B2 22 4D  22 A7 31 31 31 30 00 B8  |n..A$."M".1110..|
000022B0: 2A 78 05 89 31 33 36 30  00 C8 2A 82 05 8D 20 32  |*x..1360..*... 2|
000022C0: 35 37 30 3A 99 3A 99 3A  00 0A 2B 8C 05 46 4C B2  |570:.:.:..+..FL.|
000022D0: 30 3A 99 22 20 C4 52 41  57 20 12 41 92 47 41 49  |0:." .RAW .A.GAI|
000022E0: 4E 2C 44 4F 20 12 4D 92  4F 52 45 20 4F 52 20 12  |N,DO .M.ORE OR .|
000022F0: 51 92 55 49 54 3F 2E 2E  A0 22 3B 3A 55 53 24 B2  |Q.UIT?...";:US$.|
00002300: 22 41 4D 51 22 3A 55 4C  B2 31 00 19 2B 8D 05 8D  |"AMQ":UL.1..+...|
00002310: 33 35 3A 41 24 B2 55 52  24 00 29 2B 96 05 41 24  |35:A$.UR$.)+..A$|
00002320: B2 C8 28 41 24 2C 31 29  3A 00 43 2B A0 05 8B 41  |..(A$,1):.C+...A|
00002330: 24 B2 22 41 22 A7 20 99  22 93 13 22 3A 89 20 31  |$."A". ."..":. 1|
00002340: 34 31 30 00 59 2B AA 05  8B 41 24 B2 22 51 22 A7  |410.Y+...A$."Q".|
00002350: 20 99 22 93 22 3A 20 20  8E 00 6A 2B B4 05 8B 41  | .".":  ..j+...A|
00002360: 24 B2 22 4D 22 A7 31 31  31 30 00 74 2B BE 05 89  |$."M".1110.t+...|
00002370: 31 34 32 30 00 91 2B C8  05 8F 20 3A 3A 3A 45 4E  |1420..+... :::EN|
00002380: 44 20 4F 46 20 4D 41 49  4E 20 50 52 4F 47 52 41  |D OF MAIN PROGRA|
00002390: 4D 00 AF 2B D2 05 8F 20  54 55 52 54 4C 45 20 49  |M..+... TURTLE I|
000023A0: 4E 49 54 49 41 4C 20 50  4F 53 49 54 49 4F 4E 00  |NITIAL POSITION.|
000023B0: BD 2B DC 05 97 4C 28 30  29 2C 34 32 3A 00 F8 2B  |.+...L(0),42:..+|
000023C0: E6 05 97 55 4D AA 38 36  33 2C 38 34 3A 97 55 4D  |...UM.863,84:.UM|
000023D0: AA 38 36 34 2C 38 35 3A  97 55 4D AA 38 36 35 2C  |.864,85:.UM.865,|
000023E0: 38 32 3A 97 55 4D AA 38  36 36 2C 38 34 3A 97 55  |82:.UM.866,84:.U|
000023F0: 4D AA 38 36 37 2C 37 36  00 07 2C F0 05 97 55 4D  |M.867,76..,...UM|
00002400: AA 38 36 38 2C 36 39 00  0D 2C FA 05 8E 00 24 2C  |.868,69..,....$,|
00002410: 04 06 4C 28 54 29 B2 4C  28 54 AB 31 29 20 3A 20  |..L(T).L(T.1) : |
00002420: 8F 20 55 50 00 5A 2C 0E  06 81 49 B2 31 A4 52 28  |. UP.Z,...I.1.R(|
00002430: 54 29 3A 8B 4C 28 54 29  AB 28 49 AC 34 30 29 B3  |T):.L(T).(I.40).|
00002440: 55 4D B0 4C 28 54 29 AB  28 49 AC 34 30 29 B1 55  |UM.L(T).(I.40).U|
00002450: 4D AA 39 39 39 A7 31 35  38 30 00 78 2C 18 06 81  |M.999.1580.x,...|
00002460: 47 B2 31 A4 33 30 3A 97  4C 28 54 29 AB 28 49 AC  |G.1.30:.L(T).(I.|
00002470: 34 30 29 2C 33 32 3A 82  00 8C 2C 22 06 97 4C 28  |40),32:...,"..L(|
00002480: 54 29 AB 28 49 AC 34 30  29 2C 34 32 00 A8 2C 2C  |T).(I.40),42..,,|
00002490: 06 82 3A 20 20 4C 28 54  29 B2 4C 28 54 29 AB 28  |..:  L(T).L(T).(|
000024A0: 52 28 54 29 AC 34 30 29  00 AE 2C 36 06 8E 00 C5  |R(T).40)..,6....|
000024B0: 2C 40 06 4C 28 54 29 B2  4C 28 54 AB 31 29 3A 8F  |,@.L(T).L(T.1):.|
000024C0: 20 44 4F 57 4E 00 FC 2C  4A 06 81 49 B2 31 A4 52  | DOWN..,J..I.1.R|
000024D0: 28 54 29 20 3A 8B 4C 28  54 29 AA 28 49 AC 34 30  |(T) :.L(T).(I.40|
000024E0: 29 B1 55 4D AA 39 39 39  B0 4C 28 54 29 AA 28 49  |).UM.999.L(T).(I|
000024F0: AC 34 30 29 B3 55 4D A7  31 36 34 30 00 1A 2D 54  |.40).UM.1640..-T|
00002500: 06 81 47 B2 31 A4 33 30  3A 97 4C 28 54 29 AA 28  |..G.1.30:.L(T).(|
00002510: 49 AC 34 30 29 2C 33 32  3A 82 00 2E 2D 5E 06 97  |I.40),32:...-^..|
00002520: 4C 28 54 29 AA 28 49 AC  34 30 29 2C 34 32 00 4B  |L(T).(I.40),42.K|
00002530: 2D 68 06 82 20 20 20 3A  4C 28 54 29 B2 4C 28 54  |-h..   :L(T).L(T|
00002540: 29 AA 28 52 28 54 29 AC  34 30 29 00 51 2D 72 06  |).(R(T).40).Q-r.|
00002550: 8E 00 69 2D 7C 06 4C 28  54 29 B2 4C 28 54 AB 31  |..i-|.L(T).L(T.1|
00002560: 29 3A 20 8F 20 4C 45 46  54 00 95 2D 86 06 81 49  |): . LEFT..-...I|
00002570: B2 31 A4 52 28 54 29 3A  8B 4C 28 54 29 AB 49 B3  |.1.R(T):.L(T).I.|
00002580: 55 4D B0 4C 28 54 29 AB  49 B1 55 4D AA 39 39 39  |UM.L(T).I.UM.999|
00002590: A7 31 37 30 30 00 AE 2D  90 06 81 47 B2 31 A4 33  |.1700..-...G.1.3|
000025A0: 30 3A 97 4C 28 54 29 AB  49 2C 33 32 3A 82 00 BD  |0:.L(T).I,32:...|
000025B0: 2D 9A 06 97 4C 28 54 29  AB 49 2C 34 32 00 D9 2D  |-...L(T).I,42..-|
000025C0: A4 06 82 3A 20 20 20 4C  28 54 29 B2 4C 28 54 29  |...:   L(T).L(T)|
000025D0: AB 52 28 54 29 3A 20 20  8E 00 F1 2D AE 06 4C 28  |.R(T):  ...-..L(|
000025E0: 54 29 B2 4C 28 54 AB 31  29 3A 8F 20 52 49 47 48  |T).L(T.1):. RIGH|
000025F0: 54 00 1D 2E B8 06 81 49  B2 31 A4 52 28 54 29 3A  |T......I.1.R(T):|
00002600: 8B 4C 28 54 29 AA 49 B3  55 4D B0 4C 28 54 29 AA  |.L(T).I.UM.L(T).|
00002610: 49 B1 55 4D AA 39 39 39  A7 31 37 35 30 00 36 2E  |I.UM.999.1750.6.|
00002620: C2 06 81 47 B2 31 A4 33  30 3A 97 4C 28 54 29 AA  |...G.1.30:.L(T).|
00002630: 49 2C 33 32 3A 82 00 45  2E CC 06 97 4C 28 54 29  |I,32:..E....L(T)|
00002640: AA 49 2C 34 32 00 5C 2E  D6 06 82 3A 4C 28 54 29  |.I,42.\....:L(T)|
00002650: B2 4C 28 54 29 AA 52 28  54 29 3A 8E 00 74 2E E0  |.L(T).R(T):..t..|
00002660: 06 8F 20 53 55 42 20 46  4F 52 20 56 41 52 49 41  |.. SUB FOR VARIA|
00002670: 42 4C 45 53 00 86 2E EA  06 41 28 49 29 B2 41 3A  |BLES.....A(I).A:|
00002680: 52 28 49 29 B2 52 00 8C  2E F4 06 8E 00 D5 2E FE  |R(I).R..........|
00002690: 06 46 4C 41 47 B2 31 3A  99 22 11 20 C5 4E 54 45  |.FLAG.1:.". .NTE|
000026A0: 52 20 44 49 52 45 43 54  49 4F 4E 53 3F 20 22 3B  |R DIRECTIONS? ";|
000026B0: 3A 55 53 24 B2 22 4E 4F  52 54 48 53 55 44 45 41  |:US$."NORTHSUDEA|
000026C0: 57 22 3A 55 4C B2 35 3A  8D 33 35 3A 41 24 28 49  |W":UL.5:.35:A$(I|
000026D0: 29 B2 55 52 24 00 EB 2E  FF 06 8B 41 24 28 49 29  |).UR$......A$(I)|
000026E0: B2 C7 28 31 33 29 A7 31  37 39 30 00 F5 2E 02 07  |..(13).1790.....|
000026F0: 89 31 38 30 30 00 00 2F  08 07 8D 20 32 34 39 30  |.1800../... 2490|
00002700: 00 1A 2F 12 07 8B 20 41  24 28 49 29 B2 22 4E 4F  |../... A$(I)."NO|
00002710: 52 54 48 22 A7 41 B2 31  3A 8E 00 34 2F 1C 07 8B  |RTH".A.1:..4/...|
00002720: 20 41 24 28 49 29 B2 22  53 4F 55 54 48 22 A7 41  | A$(I)."SOUTH".A|
00002730: B2 32 3A 8E 00 5B 2F 26  07 8B 20 41 24 28 49 29  |.2:..[/&.. A$(I)|
00002740: B2 22 57 45 53 54 22 B0  41 24 28 49 29 B2 22 57  |."WEST".A$(I)."W|
00002750: 45 53 54 20 22 A7 41 B2  33 3A 8E 00 82 2F 30 07  |EST ".A.3:.../0.|
00002760: 8B 20 41 24 28 49 29 B2  22 45 41 53 54 22 B0 41  |. A$(I)."EAST".A|
00002770: 24 28 49 29 B2 22 45 41  53 54 20 22 A7 41 B2 34  |$(I)."EAST ".A.4|
00002780: 3A 8E 00 A7 2F 3A 07 8B  20 41 24 28 49 29 B2 22  |:.../:.. A$(I)."|
00002790: 53 57 22 B0 41 24 28 49  29 B2 22 53 57 20 20 20  |SW".A$(I)."SW   |
000027A0: 22 A7 41 B2 35 3A 8E 00  CC 2F 44 07 8B 20 41 24  |".A.5:.../D.. A$|
000027B0: 28 49 29 B2 22 53 45 22  B0 41 24 28 49 29 B2 22  |(I)."SE".A$(I)."|
000027C0: 53 45 20 20 20 22 A7 41  B2 36 3A 8E 00 F1 2F 4E  |SE   ".A.6:.../N|
000027D0: 07 8B 20 41 24 28 49 29  B2 22 4E 45 22 B0 41 24  |.. A$(I)."NE".A$|
000027E0: 28 49 29 B2 22 4E 45 20  20 20 22 A7 41 B2 38 3A  |(I)."NE   ".A.8:|
000027F0: 8E 00 16 30 53 07 8B 20  41 24 28 49 29 B2 22 4E  |...0S.. A$(I)."N|
00002800: 57 22 B0 41 24 28 49 29  B2 22 4E 57 20 20 20 22  |W".A$(I)."NW   "|
00002810: A7 41 B2 37 3A 8E 00 55  30 62 07 99 22 20 CD 55  |.A.7:..U0b.." .U|
00002820: 53 54 20 42 45 20 4E 4F  52 54 48 2D 53 4F 55 54  |ST BE NORTH-SOUT|
00002830: 48 2D 45 41 53 54 2D 57  45 53 54 20 20 20 20 20  |H-EAST-WEST     |
00002840: 20 20 20 20 20 20 4F 52  20 53 45 2D 53 57 2D 4E  |      OR SE-SW-N|
00002850: 45 2D 4E 57 22 00 66 30  64 07 81 54 54 B2 31 A4  |E-NW".f0d..TT.1.|
00002860: 32 30 30 30 3A 82 00 95  30 67 07 99 22 91 91 91  |2000:...0g.."...|
00002870: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002880: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002890: 20 20 20 20 22 00 E1 30  6C 07 99 22 20 20 20 20  |    "..0l.."    |
000028A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000028B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000028C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000028D0: 20 20 20 20 20 91 91 91  91 91 22 3A 89 31 37 39  |     .....":.179|
000028E0: 30 00 FB 30 76 07 4C 28  54 29 B2 4C 28 54 AB 31  |0..0v.L(T).L(T.1|
000028F0: 29 3A 8F 20 54 55 52 4E  20 53 57 00 36 31 80 07  |):. TURN SW.61..|
00002900: 81 20 49 B2 31 A4 52 28  54 29 3A 8B 4C 28 54 29  |. I.1.R(T):.L(T)|
00002910: AA 28 49 AC 34 30 29 AB  49 B1 55 4D AA 39 39 39  |.(I.40).I.UM.999|
00002920: B0 4C 28 54 29 AA 28 49  AC 34 30 29 AB 49 B3 55  |.L(T).(I.40).I.U|
00002930: 4D A7 31 39 35 30 00 56  31 8A 07 81 47 B2 31 A4  |M.1950.V1...G.1.|
00002940: 33 30 3A 97 4C 28 54 29  AA 28 49 AC 34 30 29 AB  |30:.L(T).(I.40).|
00002950: 49 2C 33 32 3A 82 00 6C  31 94 07 97 4C 28 54 29  |I,32:..l1...L(T)|
00002960: AA 28 49 AC 34 30 29 AB  49 2C 34 32 00 72 31 9E  |.(I.40).I,42.r1.|
00002970: 07 82 00 8D 31 A8 07 4C  28 54 29 B2 4C 28 54 29  |....1..L(T).L(T)|
00002980: AA 52 28 54 29 AC 34 30  AB 52 28 54 29 00 93 31  |.R(T).40.R(T)..1|
00002990: B2 07 8E 00 AF 31 BC 07  4C 28 54 29 B2 4C 28 54  |.....1..L(T).L(T|
000029A0: AB 31 29 3A 20 20 8F 20  54 55 52 4E 20 53 45 00  |.1):  . TURN SE.|
000029B0: EA 31 C6 07 81 20 49 B2  31 A4 52 28 54 29 3A 8B  |.1... I.1.R(T):.|
000029C0: 4C 28 54 29 AA 28 49 AC  34 30 29 AA 49 B1 55 4D  |L(T).(I.40).I.UM|
000029D0: AA 39 39 39 B0 4C 28 54  29 AA 28 49 AC 34 30 29  |.999.L(T).(I.40)|
000029E0: AA 49 B3 55 4D A7 32 30  32 30 00 0A 32 D0 07 81  |.I.UM.2020..2...|
000029F0: 47 B2 31 A4 33 30 3A 97  4C 28 54 29 AA 28 49 AC  |G.1.30:.L(T).(I.|
00002A00: 34 30 29 AA 49 2C 33 32  3A 82 00 20 32 DA 07 97  |40).I,32:.. 2...|
00002A10: 4C 28 54 29 AA 28 49 AC  34 30 29 AA 49 2C 34 32  |L(T).(I.40).I,42|
00002A20: 00 26 32 E4 07 82 00 43  32 EE 07 4C 28 54 29 B2  |.&2....C2..L(T).|
00002A30: 4C 28 54 29 AA 28 52 28  54 29 AC 34 30 29 AA 52  |L(T).(R(T).40).R|
00002A40: 28 54 29 00 49 32 F8 07  8E 00 65 32 02 08 4C 28  |(T).I2....e2..L(|
00002A50: 54 29 B2 4C 28 54 AB 31  29 3A 20 20 8F 20 54 55  |T).L(T.1):  . TU|
00002A60: 52 4E 20 4E 57 00 9F 32  0C 08 81 49 B2 31 A4 52  |RN NW..2...I.1.R|
00002A70: 28 54 29 3A 8B 4C 28 54  29 AB 28 49 AC 34 30 29  |(T):.L(T).(I.40)|
00002A80: AB 49 B3 55 4D B0 4C 28  54 29 AB 28 49 AC 34 30  |.I.UM.L(T).(I.40|
00002A90: 29 AB 49 B1 55 4D AA 39  39 39 A7 32 30 39 30 00  |).I.UM.999.2090.|
00002AA0: BF 32 16 08 81 47 B2 31  A4 33 30 3A 97 4C 28 54  |.2...G.1.30:.L(T|
00002AB0: 29 AB 28 49 AC 34 30 29  AB 49 2C 33 32 3A 82 00  |).(I.40).I,32:..|
00002AC0: D5 32 20 08 97 4C 28 54  29 AB 28 49 AC 34 30 29  |.2 ..L(T).(I.40)|
00002AD0: AB 49 2C 34 32 00 DB 32  2A 08 82 00 F6 32 34 08  |.I,42..2*....24.|
00002AE0: 4C 28 54 29 B2 4C 28 54  29 AB 52 28 54 29 AC 34  |L(T).L(T).R(T).4|
00002AF0: 30 AB 52 28 54 29 00 FC  32 3E 08 8E 00 16 33 48  |0.R(T)..2>....3H|
00002B00: 08 4C 28 54 29 B2 4C 28  54 AB 31 29 3A 8F 20 54  |.L(T).L(T.1):. T|
00002B10: 55 52 4E 20 4E 45 00 50  33 52 08 81 49 B2 31 A4  |URN NE.P3R..I.1.|
00002B20: 52 28 54 29 3A 8B 4C 28  54 29 AB 28 49 AC 34 30  |R(T):.L(T).(I.40|
00002B30: 29 AA 49 B3 55 4D B0 4C  28 54 29 AB 28 49 AC 34  |).I.UM.L(T).(I.4|
00002B40: 30 29 AA 49 B1 55 4D AA  39 39 39 A7 32 31 36 30  |0).I.UM.999.2160|
00002B50: 00 70 33 5C 08 81 47 B2  31 A4 33 30 3A 97 4C 28  |.p3\..G.1.30:.L(|
00002B60: 54 29 AB 28 49 AC 34 30  29 AA 49 2C 33 32 3A 82  |T).(I.40).I,32:.|
00002B70: 00 86 33 66 08 97 4C 28  54 29 AB 28 49 AC 34 30  |..3f..L(T).(I.40|
00002B80: 29 AA 49 2C 34 32 00 8C  33 70 08 82 00 A7 33 7A  |).I,42..3p....3z|
00002B90: 08 4C 28 54 29 B2 4C 28  54 29 AB 52 28 54 29 AC  |.L(T).L(T).R(T).|
00002BA0: 34 30 AA 52 28 54 29 00  AD 33 84 08 8E 00 C4 33  |40.R(T)..3.....3|
00002BB0: 8E 08 99 22 93 22 29 B2  C2 28 55 51 29 3A 82 3A  |...".")..(UQ):.:|
00002BC0: 99 22 93 22 00 CA 33 92  09 8E 00 E6 33 9C 09 81  |."."..3.....3...|
00002BD0: 49 B2 31 A4 4E 3A 99 41  24 28 49 29 22 2D 22 3B  |I.1.N:.A$(I)"-";|
00002BE0: 52 28 49 29 3A 82 00 F6  33 A6 09 81 4B B2 4E A4  |R(I):...3...K.N.|
00002BF0: 31 38 3A 99 3A 82 00 FC  33 B0 09 8E 00 11 34 BA  |18:.:...3.....4.|
00002C00: 09 41 24 28 49 29 B2 C8  28 41 24 28 49 29 2C 35  |.A$(I)..(A$(I),5|
00002C10: 29 00 17 34 C4 09 8E 00  5E 34 CE 09 5A B2 5A AA  |)..4....^4..Z.Z.|
00002C20: 31 3A 8F 22 51 3D 50 41  54 48 20 4F 52 44 45 52  |1:."Q=PATH ORDER|
00002C30: 20 2C 50 3D 53 54 45 50  23 2D 2D 2D 2D 2D 2D 2D  | ,P=STEP#-------|
00002C40: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 4E 3D 4E 55  |------------N=NU|
00002C50: 4D 42 45 52 20 4F 46 20  50 41 54 48 53 22 00 69  |MBER OF PATHS".i|
00002C60: 34 D8 09 81 55 B2 31 A4  4E 00 85 34 E2 09 51 28  |4...U.1.N..4..Q(|
00002C70: 5A 2C 55 29 B2 41 28 55  29 3A 50 28 5A 2C 55 29  |Z,U).A(U):P(Z,U)|
00002C80: B2 52 28 55 29 00 90 34  EC 09 4E 28 5A 29 B2 4E  |.R(U)..4..N(Z).N|
00002C90: 00 96 34 F6 09 82 00 9C  34 00 0A 8E 00 D3 34 0A  |..4.....4.....4.|
00002CA0: 0A 8B C2 28 35 30 30 30  33 29 B2 30 A7 97 35 33  |...(50003).0..53|
00002CB0: 32 38 31 2C 31 3A 99 22  93 22 3A 97 35 33 32 38  |281,1:.".":.5328|
00002CC0: 31 2C 36 3A 97 35 33 32  38 30 2C 31 34 3A 89 32  |1,6:.53280,14:.2|
00002CD0: 35 37 37 00 DC 34 0C 0A  99 22 93 22 00 F6 34 11  |577..4..."."..4.|
00002CE0: 0A 8D 31 34 39 30 3A 8D  32 34 36 30 55 31 25 AA  |..1490:.2460U1%.|
00002CF0: 55 33 25 AB 33 29 00 02  35 14 0A 81 20 55 B2 31  |U3%.3)..5... U.1|
00002D00: A4 5A 00 11 35 1E 0A 81  20 54 B2 31 A4 4E 28 55  |.Z..5... T.1.N(U|
00002D10: 29 00 21 35 28 0A 52 28  54 29 B2 50 28 55 2C 54  |).!5(.R(T).P(U,T|
00002D20: 29 00 55 35 32 0A 91 51  28 55 2C 54 29 8D 31 35  |).U52..Q(U,T).15|
00002D30: 34 30 2C 31 36 30 30 2C  31 36 36 30 2C 31 37 31  |40,1600,1660,171|
00002D40: 30 2C 31 39 31 30 2C 31  39 38 30 2C 32 30 35 30  |0,1910,1980,2050|
00002D50: 2C 32 31 32 30 00 5F 35  3C 0A 82 54 3A 82 55 00  |,2120._5<..T:.U.|
00002D60: 65 35 46 0A 8E 00 81 35  88 13 54 B2 31 30 3A 81  |e5F....5..T.10:.|
00002D70: 49 B2 31 A4 54 3A 99 49  3A 54 B2 49 3A 82 3A 99  |I.1.T:.I:T.I:.:.|
00002D80: 54 00 00 00                                       |T...            |

.......910.*.... ** ML STOP KEY DISABLE 
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(..UO,0:UR$."":UI$.""...*..UL.0.UL.80
.+.-.."  ..";:.UC,0.?.2..UI$:.UI$."".50.
I.7..UI$.G(13).C(UR$)..1..UC,1:." .";:.8
5.|.<..UI$.G(20).105...>.. C(UR$)..UL.50
...A..120:. CHECK FOR VALID CHARACTER.E.
F.UR$.UR$.UI$.O.K..UI$;.W.P..50...U.. ++
+ CHECK FOR HELP REQUEST +++.$.Z..UR$.UX
$.195:. EXIT TO HELP ROUTINE.3._..UF.1..
240.@.D.UF.0:.:..Y.F.. ++ CHECK DELETE +
+.J.I..C(UR$).1.50...N.UR$.H(UR$,C(UR$).
1)...S..".  ..";:.50...X.. ++ CHECK FOR 
VALID CHARACTERS ++.M.}..C(US$).0.150...
...US.1.C(US$)......UI$.J(US$,US,1).....
........UI$."":..#.... ** STANDARD INPUT
 **.4....F(UI$).46...E....UI$.G(32)...B.
 ..F(UI$).48.F(UI$).57.170.H..........F(
UI$).65.F(UI$).90.180............F(UI$).
193.F(UI$).218.UI$."":..R....B(UT).UU%.U
I$.G(F(UI$).128):..X.........UI$."":....
C.UF.1:. +++ HELP ROUTINE EXIT +++...E..
250...H..245.;.M..UQ.UB.(U2%.256.U1%.U3%
.2).W.R.UQ%(UQ.UB).B(UQ):.:.".".J.W.UZ.1
:UV%.B(UT).S.X..300...Y.UZ.0:US$.UJ$:UG$
.UK$:UP.UJ:UL.UK.O.Z..B(50003).0..53281,
1:.".";:.53281,6:.53280,14:.220.Y...."."
;.....UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1
%.U3%.3)......UQ,UQ%(UQ.UB):..)....U1,U1
%.5....U2,U2%.A....U4,U4%.O....U3,U3%.1.
W....35.....UD%.((U2%.256.U1%.U3%).UB).4
0:.H(UD$,UD%.1):..D....H(UD$,24);"      
                . HELP COMING .  ":.....
.U1%.B(U1):U2%.B(U2):U3%.B(U3):U4%.B(U4)
.....UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL
......./.,.. ** MENU **.5.-.:.D....".":.
UT,UU%:.B(50003).0..53281,9:.53280,8.J./
.:...1..".                MENU"...6.." -
-------------------------------------".Z
.;.."..       1.   BEGIN TURTLE 1"...@..
"..       2.   STUDENT INSTRUCTIONS"...E
.."..       3.   TEACHER INSTRUCTIONS".J
.O.."..       4.   QUIT..".Y.T.." ------
--------------------------------"...Y.."
..       PRESS A NUMBER KEY (1-4) ";.L.^
.UL.1:US$."1234":.35:. INPUT ROUTINE.W.`
.US$.""...C..E(UR$).1000,400,500,396...H
..300.$.... ** RE-ENABLE STOP KEY AND EN
D **.S....B(50003)..1.B(50003)..160.B(50
003)..0.399.}....UU.71:.B(50003).0..5328
1,6:.53280,14......"..":.......875:.....
.. ** STUDENT INSTRUCTIONS **......".":.
UT,UL%:.B(50003).0..53281,0:.53280,0....
.UH.1:UP.0:UG$."STUDENT INST":.850.<....
"...  THE TURTLE CAN BE MADE TO WALK A P
ATH".V....:." ON THE SCREEN.";.Y...." FI
RST DECIDE WHAT SHAPE" :.... .." YOU WAN
T THE TURTLE TO FOLLOW.  DRAW":..U...." 
THE SHAPE AND SEE HOW MANY SIDES OR "...
...:  ." .PATHS. THERE ARE TO WALK. A SQ
UARE FOR":..9...." EXAMPLE HAS FOUR SIDE
S AND THE TURTLE".I....:." MUST WALK .FO
UR. DIFFERENT .PATHS. TO"......:." FOLLO
W THE SQUARE.".....UP.1:UH.1:.835:.850.N
...."   REPLY TO QUESTION .HOW MANY PATH
S. BY".U....:......" TYPING A NUMBER FRO
M 1 TO 15. NEXT YOU".9....:." ARE ASKED 
TO .ENTER DIRECTIONS.. TYPE IN":..D...."
 'NORTH' OR 'SOUTH' OR 'SE' ETC. AS"....
..". SHOWN. NOW YOU MUST TYPE IN THE NUM
BER".C....: ." OF STEPS THAT TURTLE TAKE
S, REPLY":......." TO THE QUESTION .HOW 
FAR. BY TYPING A":.."...." NUMBER FROM 1
 TO 15. YOU WILL BE ASKED".S....:." THE 
TWO QUESTIONS 'ENTER DIRECTIONS'":......
." AND 'HOW FAR' FOR EACH OF THE PATHS":
......." THE TURTLE MUST WALK."...G..835
:.490...L..".":."..NOTE:...TO ADVANCE FR
OM ONE QUESTION"...V..".TO THE NEXT PRES
S THE SPACE BAR".8....".......IF AT ANY 
TIME YOU WISH TO RETURN".[....".TO THE M
ENU PRESS H RETURN".D....835.X....UZ.1..
UP%:.217.~.......... ** TEACHER INSTRUCT
IONS **.O....".":.UT,UL%:.B(50003).0..53
281,2:.53280,10.....UP.0:UG$."TEACHER IN
ST":.850......"..      TO THE BEST OF OU
R KNOWLEDGE,.".G...."   THIS PROGRAM IS 
IN THE PUBLIC.".S...."   DOMAIN.  IF THI
S IS NOT THE CASE."......"   PLEASE CONT
ACT:..."......"      COMMODORE BUSINESS 
MACHINES."......"          3370 PHARMACY
 AVE......."          AGINCOURT, ONTARIO
".#...."          CANADA   M1W 2K4".C...
."          (416) 499-4292".Y...UP.1:. 8
35:. 850:.~...."     ..PROGRAM NAME: TUR
TLE 1......."     WRITTEN BY  : R. J. MI
TCHELL..K...."     UPGRADED BY :        
  ......."     .THIS PROGRAM WILL RUN ON
 ANY........"         PET 64 COMPUTER.:.
..."         COMMODORE 64 COMPUTER.M....
835:UH.1:.850.}."..". PROGRAM CLASSIFICA
TION:  ART, GEOMETRY"...%..".. ANCILLARY
 MATERIAL NEEDED: PEN & PAPER"...(..".. 
OBJECTIVE OF THE PROGRAM: TO GIVE THE.*.
*..". EXPERIENCE WITH COMPUTER ART OR":.
". GEOMETRY USING TURTLE GEOMETRY".U.+..
".. DESCRIPTION OF STUDENT ACTIVITY:"...
,..:." THE STUDENT DESIGNS AND HAS THE T
URTLE"...-..:." EXECUTE THOSE DESIGNS.  
   ":.:..D...UH.1:.835:. 850.../.:."... 
PLACEMENT WITHIN STUDENT CURRICULUM:":."
. ALL GRADES".G.0..".. SUGGESTIONS FOR S
TUDENT USAGE:":.:." SINGLY OR IN PAIRS..
X.2..".. PREREQUISITES / BACKGROUND INFO
RMATION"...3.:.". NEEDED: THE STUDENT MU
ST KNOW THE".N.4..:." CARDINAL POINTS OF
 THE COMPASS.".W.5..835...N..UZ.1..UP%:.
217...W.....X.. ** PROGRAM MODIFICATION 
INST **.(.Y..".":.UT,UL%.H.].UP.0:UG$."P
ROGRAM MOD":.850.Q....835.E....UZ.1..UP%
:.217.K.......... ** TO USE 8032 LOAD CB
M4032 **.F.F..".....BEFORE RUNNING THIS 
PROGRAM ON AN 8032  .....P.."      LOAD 
THE 'CBM 4032' PROGRAM............."...Z
..UU.71.......-. .. ** T I T L E   P A G
 E **.A.".."....";:.UT,UU%:.B(50003).0..
53280,14:.53281,6.W.$..I.1.38:."...";:..
..&..I.1.22:.".....";:....(..I.1.37:."..
...";:....*..I.1.22:.".....";:....,.."..
.........................  .......".....
.............. .  . ...'.0.."...........
........ .  ....E.2.."..................
..  ..M.4.."..............C O M M O D O 
R E.....6.."...............EDUCATIONAL..
...8.."................SOFTWARE.J.:.. **
 COMMODORE LOGO **...;..H(UD$,24);".....
.....PRESS SPACE BAR OR WAIT.":I.0.$.<..
A$:.A$.." ".I.I.1:.I.250.828.H.>.T1$."":
T2$."":T3$."":T4$."":I.0.Q.@..300.M.C.. 
** SPACE BAR PRESS **...H..UO,0:.H(UD$,2
4);".......PRESS SPACE BAR TO CONTINUE."
...L..UI$:.UI$.." ".844.E.N.....R.. ** P
AGE DESIGN ROUTINE **...T.UP.UP.1...W.."
."H(UT$.UP$,21);I(UP$.UG$.D(UP),18).J.\.
." -------------------------------------
-".Y.`..UH..0.870...A..H(UD$,24);H(UP$,7
);"HELP - PRESS   H <RETURN>"...F.UH.0:.
"..":....K.. ** PLEASE WAIT REMARK **...
P..H(UD$,24);"           ONE MOMENT PLEA
SE...     "...U.... ... ** SET UP VARIAB
LES **.A ..UX$."H":.UQ%(1000):UB.32768:U
1.196:U2.197:U3.198:U4.216:UC.167:UU.102
4.. ..UT.59468:UU%.12:UL%.14:UP%.1146:UM
.32768:UO.158:. 50003,0.. ...B(50003).0.
UB.1024:U1.209:U2.210:U3.211:U4.214:UC.2
04:UU.2048.!!...B(50003).0.UT.53272:UU%.
21:UL%.23:UP%.2139:UM.1024:UO.198.E!..UD
$.".........................".W!..UP$." 
                                      ".
E!..UT$." TURTLE 1          ":. PLACE PR
OGRAM TITLE HERE !!!!!!!!!!!!!!!!!***.K!
.....!... ** SET VARIABLES **..!...900..
"...A$(20),A(20),R(20),L(20),N(20).)"...
Q(20,20),P(20,20).D"... ** CHECK FOR 803
2 **.B"...".":." ":. SHIFTED SPACE.Y"...
B(UB.40)..96..700.."... ** MEMORY CHECK 
**.."... .(0).2000.937.T"..."....THIS MA
CHINE DOES NOT HAVE ENOUGH.".."..."MEMOR
Y TO RUN THIS PROGRAM !"..#...UU.71..#..
..##..."..":.B(50003).0.962.R#... ** BAS
IC 2.0  OR  4.0  OR  C-64 SETUP **..#...
1075,133:.1076,144:.1077,234:.1079,4:.10
80,133:.1081,145.F#...1091,155:.1098,133
:.1099,144:.1100,234:.1103,133..#...1104
,145:.1105,234:.1082,234..#...B(50003)..
160.955..$...1093,88:.1094,228:.1097,85:
.1102,228:.965.C$...B(50003)..1.990.R$..
.1093,49:.1094,230:.1097,46:.1102,230:.9
65..$B..2099,141:.2100,20:.2101,3:.2103,
8:.2104,141:.2105,21..$C..2106,3:.2115,1
45:.2117,52:.2118,234:.2121,49:.2122,141
."%D..2123,20:.2124,3:.2126,234:.2127,14
1:.2128,21:.2129,3.@%E..UU.48:. DISABLE 
STOP KEY.Q%J..800:. TITLE.A%T..300:. MEN
U..%...".THE PGM WILL NOT WORK ON THIS M
ACHINE!":..G%...UZ.1..UP%:.UP%:UZ.0:. **
 PROGRAM STARTS HERE **..%..."..";:.:.B(
50003).0..53281,6:.53280,14..%..FLAG.0..
&... "TURTLE1"VERSION IS FOR ELEMENTARY 
APPLIC.@&..."..":.UT,UL%.&... BY**R.J.M
ITCHELL** BASED ON SEYMOUR PAPERTS LOGO 
CONCEPT..&$.L(0).UM.832:. SCREEN POSIT O
F TURTLE..&...".............     THIS IS
 THE .TURTLE. PROGRAM.":.835..&B....&V..
"..":.1490..'`...E'J.FL.0:." HOW MANY PA
THS?..(1 TO 15) ";:US$."0123456789H":UL.
2:.35.H'K.N$.UR$:N.E(N$):.N..0.N.15.1110
.V'T.. I.1 . N..'Y.UG$."PATH":UP.I.1:.85
0.B'~..". .TURTLE DIRECTIONS= NORTH-SOUT
H-EAST-.";..'...".                      
 . WEST-SE-SW-NE-NW"..'..:.1790..(..FLAG
 . 0.T(..FL.0:.". HOW FAR?..(1 TO 15)   
";:US$."0123456789H":UL.2:.35:R$.UR$..(.
.R.E(R$):.R..0.R.15..".                 
                ..":.1180..(... 1760..(.
....(D..B(50003).0..53281,1:.".":.53281,
6:.53280,14:.1227..(F.."."..(K..1500..(N
..2460..)X..T.1.N.<)... A(T).1540,1600,1
660,1710,1910,1980,2050,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.LL.. 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:." DRA
W .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 PROGRAM..+R.. TURTLE I
NITIAL POSITION..+...L(0),42:..+...UM.86
3,84:.UM.864,85:.UM.865,82:.UM.866,84:.U
M.867,76..,...UM.868,69..,....$,..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).40)..,6...E,@.L(T).
L(T.1):. DOWN..,J..I.1.R(T) :.L(T).(I.40
).UM.999.L(T).(I.40).UM.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 VARIA
BLES.....A(I).A:R(I).R.......U...FLAG.1:
.". ENTER DIRECTIONS? ";:US$."NORTHSUDEA
W":UL.5:.35:A$(I).UR$......A$(I).G(13).1
790......1800../... 2490../... A$(I)."NO
RTH".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)."N
W".A$(I)."NW   ".A.7:..U0B.." MUST BE NO
RTH-SOUTH-EAST-WEST           OR SE-SW-N
E-NW".F0D..TT.1.2000:...0G.."...        
                            "..0L.."    
                                        
             .....":.1790..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".I
4X..U.1.N..4..Q(Z,U).A(U):P(Z,U).R(U)..4
..N(Z).N..4.....4....S4...B(50003).0..53
281,1:.".":.53281,6:.53280,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,1710,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