CpcForth v1.1.0 (UK) (1988) [UTILITAIRE].dsk
HexaDumpAscii only
000000: 45 58 54 45 4E 44 45 44 20 43 50 43 20 44 53 4B EXTENDED CPC DSK
000010: 20 46 69 6C 65 0D 0A 44 69 73 6B 2D 49 6E 66 6F File..Disk-Info
000020: 0D 0A 53 41 4D 64 69 73 6B 31 36 30 32 32 30 00 ..SAMdisk160220.
000030: 2A 01 00 13 13 13 13 13 13 13 13 13 13 13 13 13 *...............
000040: 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 ................
000050: 13 13 13 13 13 13 13 13 13 13 13 13 13 13 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
000110: 00 00 01 00 02 09 4E E5 00 00 C1 02 00 00 00 02 ......N.........
000120: 00 00 C6 02 00 00 00 02 00 00 C2 02 00 00 00 02 ................
000130: 00 00 C7 02 00 00 00 02 00 00 C3 02 00 00 00 02 ................
000140: 00 00 C8 02 00 00 00 02 00 00 C4 02 00 00 00 02 ................
000150: 00 00 C9 02 00 00 00 02 00 00 C5 02 00 00 00 02 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000200: 00 41 4D 45 4E 44 31 20 20 46 54 48 00 00 00 30 .AMEND1 FTH...0
000210: 02 03 04 05 06 07 00 00 00 00 00 00 00 00 00 00 ................
000220: 00 42 45 4E 43 48 20 20 20 46 54 48 00 00 00 38 .BENCH FTH...8
000230: 08 09 0A 0B 0C 0D 0E 00 00 00 00 00 00 00 00 00 ................
000240: 00 43 50 43 46 54 48 32 20 42 49 4E 00 00 00 41 .CPCFTH2 BIN...A
000250: 0F 10 11 12 13 14 15 16 17 00 00 00 00 00 00 00 ................
000260: 00 44 45 42 55 47 20 20 20 46 54 48 00 00 00 30 .DEBUG FTH...0
000270: 18 19 1A 1B 1C 1D 00 00 00 00 00 00 00 00 00 00 ................
000280: 00 44 45 43 4F 4D 50 20 20 46 54 48 00 00 00 18 .DECOMP FTH....
000290: 1E 1F 20 00 00 00 00 00 00 00 00 00 00 00 00 00 .. .............
0002A0: 00 46 4F 52 54 48 20 20 20 42 49 4E 00 00 00 55 .FORTH BIN...U
0002B0: 21 22 23 24 25 26 27 28 29 2A 2B 00 00 00 00 00 !"#$%&'()*+.....
0002C0: 00 46 4F 52 54 48 20 20 20 54 58 54 00 00 00 38 .FORTH TXT...8
0002D0: 2C 2D 2E 2F 30 31 32 00 00 00 00 00 00 00 00 00 ,-./012.........
0002E0: 00 46 4F 52 54 48 33 41 20 54 58 54 00 00 00 28 .FORTH3A TXT...(
0002F0: 33 34 35 36 37 00 00 00 00 00 00 00 00 00 00 00 34567...........
000300: 00 46 4F 52 54 48 33 42 20 54 58 54 00 00 00 38 .FORTH3B TXT...8
000310: 38 39 3A 3B 3C 3D 3E 00 00 00 00 00 00 00 00 00 89:;<=>.........
000320: 00 46 4F 52 54 48 34 41 20 54 58 54 00 00 00 20 .FORTH4A TXT...
000330: 3F 40 41 42 00 00 00 00 00 00 00 00 00 00 00 00 ?@AB............
000340: 00 46 4F 52 54 48 34 42 20 54 58 54 00 00 00 60 .FORTH4B TXT...`
000350: 43 44 45 46 47 48 49 4A 4B 4C 4D 4E 00 00 00 00 CDEFGHIJKLMN....
000360: 00 46 4F 52 54 48 35 41 20 54 58 54 00 00 00 08 .FORTH5A TXT....
000370: 4F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 O...............
000380: 00 46 4F 52 54 48 35 42 20 54 58 54 00 00 00 18 .FORTH5B TXT....
000390: 50 51 52 00 00 00 00 00 00 00 00 00 00 00 00 00 PQR.............
0003A0: 00 46 4F 52 54 48 36 20 20 54 58 54 00 00 00 28 .FORTH6 TXT...(
0003B0: 53 54 55 56 57 00 00 00 00 00 00 00 00 00 00 00 STUVW...........
0003C0: 00 47 4C 4F 53 53 31 20 20 46 54 48 00 00 00 58 .GLOSS1 FTH...X
0003D0: 58 59 5A 5B 5C 5D 5E 5F 60 61 62 00 00 00 00 00 XYZ[\]^_`ab.....
0003E0: 00 47 4F 20 20 20 20 20 20 46 54 48 00 00 00 40 .GO FTH...@
0003F0: 63 64 65 66 67 68 69 6A 00 00 00 00 00 00 00 00 cdefghij........
000400: 00 43 50 43 46 54 48 32 20 42 49 4E 00 00 00 41 .CPCFTH2 BIN...A
000410: 02 03 04 05 06 07 08 09 0A 00 00 00 00 00 00 00 ................
000420: 00 46 4F 52 54 48 20 20 20 54 58 54 00 00 00 36 .FORTH TXT...6
000430: 0B 0C 0D 0E 0F 10 11 00 00 00 00 00 00 00 00 00 ................
000440: 00 52 45 41 44 45 52 20 20 42 41 53 00 00 00 17 .READER BAS....
000450: 12 13 14 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000460: 00 53 43 52 45 44 32 20 20 46 54 48 00 00 00 50 .SCRED2 FTH...P
000470: 15 16 17 18 19 1A 1B 1C 1D 1E 00 00 00 00 00 00 ................
000480: 00 44 45 42 55 47 20 20 20 46 54 48 00 00 00 30 .DEBUG FTH...0
000490: 1F 20 21 22 23 24 00 00 00 00 00 00 00 00 00 00 . !"#$..........
0004A0: 00 46 4F 52 54 48 36 20 20 54 58 54 00 00 00 25 .FORTH6 TXT...%
0004B0: 25 26 27 28 29 00 00 00 00 00 00 00 00 00 00 00 %&'()...........
0004C0: 00 46 4F 52 54 48 35 41 20 54 58 54 00 00 00 08 .FORTH5A TXT....
0004D0: 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *...............
0004E0: 00 46 4F 52 54 48 35 42 20 54 58 54 00 00 00 11 .FORTH5B TXT....
0004F0: 2B 2C 2D 00 00 00 00 00 00 00 00 00 00 00 00 00 +,-.............
000500: 00 48 41 4E 4F 49 20 20 20 46 54 48 00 00 00 60 .HANOI FTH...`
000510: 2E 2F 30 31 32 33 34 35 36 37 38 39 00 00 00 00 ./0123456789....
000520: 00 44 45 43 4F 4D 50 20 20 46 54 48 00 00 00 18 .DECOMP FTH....
000530: 3A 3B 3C 00 00 00 00 00 00 00 00 00 00 00 00 00 :;<.............
000540: 00 46 4F 52 54 48 33 41 20 54 58 54 00 00 00 24 .FORTH3A TXT...$
000550: 3D 3E 3F 40 41 00 00 00 00 00 00 00 00 00 00 00 =>?@A...........
000560: 00 46 4F 52 54 48 33 42 20 54 58 54 00 00 00 35 .FORTH3B TXT...5
000570: 42 43 44 45 46 47 48 00 00 00 00 00 00 00 00 00 BCDEFGH.........
000580: 00 47 4C 4F 53 53 31 20 20 46 54 48 00 00 00 55 .GLOSS1 FTH...U
000590: 49 4A 4B 4C 4D 4E 4F 50 51 52 53 00 00 00 00 00 IJKLMNOPQRS.....
0005A0: 00 41 4D 45 4E 44 31 20 20 24 24 24 00 00 00 00 .AMEND1 $$$....
0005B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0005C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000600: 00 47 4F 46 4F 52 54 48 20 54 58 54 00 00 00 18 .GOFORTH TXT....
000610: 6B 6C 6D 00 00 00 00 00 00 00 00 00 00 00 00 00 klm.............
000620: 00 48 41 4E 4F 49 20 20 20 46 54 48 00 00 00 60 .HANOI FTH...`
000630: 6E 6F 70 71 72 73 74 75 76 77 78 79 00 00 00 00 nopqrstuvwxy....
000640: 00 50 45 52 4D 53 20 20 20 46 54 48 00 00 00 18 .PERMS FTH....
000650: 7A 7B 7C 00 00 00 00 00 00 00 00 00 00 00 00 00 z{|.............
000660: 00 53 43 52 45 44 32 20 20 46 54 48 00 00 00 50 .SCRED2 FTH...P
000670: 7D 7E 7F 80 81 82 83 84 85 86 00 00 00 00 00 00 }~..............
000680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000800: 00 43 50 43 46 54 48 32 20 42 49 4E 00 00 00 41 .CPCFTH2 BIN...A
000810: 02 03 04 05 06 07 08 09 0A 00 00 00 00 00 00 00 ................
000820: 00 46 4F 52 54 48 20 20 20 54 58 54 00 00 00 36 .FORTH TXT...6
000830: 0B 0C 0D 0E 0F 10 11 00 00 00 00 00 00 00 00 00 ................
000840: 00 52 45 41 44 45 52 20 20 42 41 53 00 00 00 17 .READER BAS....
000850: 12 13 14 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000860: 00 53 43 52 45 44 32 20 20 46 54 48 00 00 00 50 .SCRED2 FTH...P
000870: 15 16 17 18 19 1A 1B 1C 1D 1E 00 00 00 00 00 00 ................
000880: 3F 01 00 0C 50 00 01 00 00 1C 01 00 0C 50 00 01 ?...P........P..
000890: 00 00 66 01 00 0C 50 00 01 00 00 7B 01 00 0C 50 ..f...P....{...P
0008A0: 00 01 00 00 AA 01 00 0C 50 00 01 00 00 DE 01 00 ........P.......
0008B0: 0C F0 00 01 00 00 00 00 00 00 3C 00 00 0C 00 00 ..........<.....
0008C0: DE 01 00 0C 4E 00 04 00 00 00 00 00 00 02 00 04 ....N...........
0008D0: 00 00 DE 01 00 0C 28 00 04 00 00 7E 02 00 0C 28 ......(....~...(
0008E0: 00 04 00 00 DE 01 00 0C 4E 00 04 00 00 00 00 00 ........N.......
0008F0: 00 02 00 04 00 00 DE 01 00 0C 28 00 04 00 00 7E ..........(....~
000900: 02 00 0C 28 00 04 00 00 DE 01 00 0C 76 00 04 00 ...(........v...
000910: 00 00 00 00 00 02 00 04 00 00 DE 01 00 0C 28 00 ..............(.
000920: 04 00 00 7E 02 00 0C 4E 00 04 00 00 00 00 00 00 ...~...N........
000930: 02 00 04 00 00 7E 02 00 0C 4E 00 04 00 00 00 00 .....~...N......
000940: 00 00 02 00 04 00 00 7E 02 00 0C 4E 00 04 00 00 .......~...N....
000950: 00 00 00 00 02 00 04 00 00 7E 02 00 0C 28 00 04 .........~...(..
000960: 00 00 FA 01 00 0C 28 00 04 00 00 DE 01 00 0C 4E ......(........N
000970: 00 04 00 00 00 00 00 00 02 00 04 00 00 DE 01 00 ................
000980: 0C 28 00 04 00 00 7E 02 00 0C 28 00 04 00 00 CC .(....~...(.....
000990: 02 00 0C 50 00 04 00 00 7E 02 00 0C 28 00 04 00 ...P....~...(...
0009A0: 00 FA 01 00 0C 28 00 04 00 00 BE 03 00 0C 9E 00 .....(..........
0009B0: 04 00 00 00 00 00 00 02 00 0C 00 00 DE 01 00 0C ................
0009C0: 4E 00 04 00 00 00 00 00 00 02 00 04 00 00 DE 01 N...............
0009D0: 00 0C 28 00 04 00 00 7E 02 00 0C 28 00 04 00 00 ..(....~...(....
0009E0: DE 01 00 0C 4E 00 04 00 00 00 00 00 00 02 00 04 ....N...........
0009F0: 00 00 DE 01 00 0C 28 00 04 00 00 7E 02 00 0C 28 ......(....~...(
000A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C00: 00 04 00 00 DE 01 00 0C 76 00 04 00 00 00 00 00 ........v.......
000C10: 00 02 00 04 00 00 DE 01 00 0C 28 00 04 00 00 7E ..........(....~
000C20: 02 00 0C 4E 00 04 00 00 00 00 00 00 02 00 04 00 ...N............
000C30: 00 7E 02 00 0C 4E 00 04 00 00 00 00 00 00 02 00 .~...N..........
000C40: 04 00 00 7E 02 00 0C 4E 00 04 00 00 00 00 00 00 ...~...N........
000C50: 02 00 04 00 00 7E 02 00 0C 28 00 04 00 00 FA 01 .....~...(......
000C60: 00 0C 28 00 04 00 00 DE 01 00 0C 4E 00 04 00 00 ..(........N....
000C70: 00 00 00 00 02 00 04 00 00 DE 01 00 0C 28 00 04 .............(..
000C80: 00 00 7E 02 00 0C 28 00 04 00 00 CC 02 00 0C 50 ..~...(........P
000C90: 00 04 00 00 7E 02 00 0C 28 00 04 00 00 FA 01 00 ....~...(.......
000CA0: 0C 28 00 04 00 00 BE 03 00 0C 50 00 04 00 00 00 .(........P.....
000CB0: 00 00 00 50 00 04 00 00 7E 02 00 0C 4E 00 04 00 ...P....~...N...
000CC0: 00 00 00 00 00 02 00 04 00 00 7E 02 00 0C 3C 00 ..........~...<.
000CD0: 04 00 00 53 03 00 0C 14 00 04 00 00 7E 02 00 0C ...S........~...
000CE0: 50 00 04 00 00 00 00 00 00 50 00 04 00 00 DE 01 P........P......
000CF0: 00 0C 4E 00 04 00 00 00 00 00 00 02 00 04 00 00 ..N.............
000D00: DE 01 00 0C 3C 00 04 00 00 7E 02 00 0C 14 00 04 ....<....~......
000D10: 00 00 DE 01 00 0C 50 00 04 00 00 00 00 00 00 50 ......P........P
000D20: 00 04 00 00 7E 02 00 0C 4E 00 04 00 00 00 00 00 ....~...N.......
000D30: 00 02 00 04 00 00 7E 02 00 0C 3C 00 04 00 00 53 ......~...<....S
000D40: 03 00 0C 14 00 04 00 00 7E 02 00 0C 50 00 04 00 ........~...P...
000D50: 00 00 00 00 00 50 00 04 00 00 DE 01 00 0C 28 00 .....P........(.
000D60: 04 00 00 FA 01 00 0C 28 00 04 00 00 38 02 00 0C .......(....8...
000D70: 28 00 04 00 00 7E 02 00 0C 28 00 04 00 00 38 02 (....~...(....8.
000D80: 00 0C 28 00 04 00 00 7E 02 00 0C 28 00 04 00 00 ..(....~...(....
000D90: 00 00 00 00 50 00 04 00 00 7E 02 00 0C 4E 00 04 ....P....~...N..
000DA0: 00 00 00 00 00 00 02 00 04 00 00 7E 02 00 0C 3C ...........~...<
000DB0: 00 04 00 00 53 03 00 0C 14 00 04 00 00 7E 02 00 ....S........~..
000DC0: 0C 50 00 04 00 00 00 00 00 00 50 00 04 00 00 DE .P........P.....
000DD0: 01 00 0C 4E 00 04 00 00 00 00 00 00 02 00 04 00 ...N............
000DE0: 00 DE 01 00 0C 3C 00 04 00 00 7E 02 00 0C 14 00 .....<....~.....
000DF0: 04 00 00 DE 01 00 0C 76 00 04 00 00 00 00 00 00 .......v........
000E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001000: 02 00 04 00 00 DE 01 00 0C 28 00 04 00 00 CC 02 .........(......
001010: 00 0C 76 00 04 00 00 00 00 00 00 02 00 04 00 00 ..v.............
001020: CC 02 00 0C 28 00 04 00 00 7E 02 00 0C 4E 00 04 ....(....~...N..
001030: 00 00 00 00 00 00 02 00 04 00 00 7E 02 00 0C 50 ...........~...P
001040: 00 04 00 00 BC 03 00 0C F0 00 00 04 0C 0C 08 0C ................
001050: 0C 0C 0C 0C FC FC 0C 5C FC FC AC 5C FC FC AC 5C .......\...\...\
001060: FC FC AC 0C 0C 0C 0C 0C 0C 0C 0C 4C CC CC 8C 4C ...........L...L
001070: CC CC 8C 4C CC CC 8C 4C CC CC 8C 08 CC CC 8C 08 ...L...L........
001080: 44 CC 8C 08 44 CC 8C 08 44 CC 8C 08 44 CC 8C 08 D...D...D...D...
001090: 44 CC 8C 08 CC CC 8C 08 CC CC 8C 08 CC CC 8C 4C D..............L
0010A0: CC CC 8C 4C CC CC 8C 0C 0C 0C 0C 44 CC CC 00 CC ...L.......D....
0010B0: CC CC 88 50 50 F0 00 F0 F0 F0 00 50 F0 A0 00 00 ...PP......P....
0010C0: 04 00 00 00 0C 08 00 04 49 86 00 04 49 86 00 04 ........I...I...
0010D0: 49 86 00 14 49 96 00 14 78 3C 00 00 3C 28 00 00 I...I...x<..<(..
0010E0: 14 28 00 00 14 28 00 00 FC A8 00 00 CC CC 88 44 .(...(.........D
0010F0: CC CC CC 00 A0 F0 A0 50 F0 F0 A0 00 F0 F0 00 00 .......P........
001100: 00 08 00 00 04 0C 00 00 49 86 08 E1 C3 86 58 E1 ........I.....X.
001110: C3 0C 58 00 2C 0C 28 00 3C 3C 28 00 14 3C 28 00 ..X.,.(.<<(..<(.
001120: 3C 3C 3C 00 3C 00 7C 54 FC 54 A8 44 CC CC 00 CC <<<.<.|T.T.D....
001130: CC CC 88 50 F0 50 00 50 F0 F0 A0 00 F0 F0 00 00 ...P.P.P........
001140: 04 00 00 00 0C 08 00 04 49 86 00 A4 49 C3 D2 A4 ........I...I...
001150: 0C C3 D2 14 0C 1C 00 14 3C 3C 00 14 3C 28 00 3C ........<<..<(.<
001160: 3C 3C 00 BC 00 3C 00 54 A8 FC A8 00 CC CC 88 44 <<...<.T.......D
001170: CC CC CC 00 F0 A0 A0 00 F0 F0 F0 00 50 F0 A0 00 ............P...
001180: 00 08 00 00 04 0C 00 00 49 86 08 00 49 86 08 00 ........I...I...
001190: 49 86 08 00 69 86 28 00 3C B4 28 00 14 3C 00 00 I...i.(.<.(..<..
0011A0: 14 28 00 00 14 28 00 00 54 FC 00 FE 00 00 28 01 .(...(..T.....(.
0011B0: 39 86 FE 00 13 28 01 39 86 FE 00 01 01 12 39 86 9....(.9......9.
0011C0: FE 27 01 01 12 39 86 FF 0B 0C 00 0D 44 6F 77 6E .'...9......Down
0011D0: 20 41 74 20 44 6F 6C 6C 69 73 20 42 72 6F 6F 6B At Dollis Brook
0011E0: 01 FB 00 13 28 01 59 86 00 00 12 28 01 49 86 08 ....(.Y....(.I..
0011F0: 00 11 0F 01 69 86 09 21 11 07 01 69 86 F9 02 03 ....i..!...i....
001200: 00 43 50 43 46 54 48 32 20 42 49 4E 00 00 00 41 .CPCFTH2 BIN...A
001210: 02 03 04 05 06 07 08 09 0A 00 00 00 00 00 00 00 ................
001220: 00 46 4F 52 54 48 20 20 20 54 58 54 00 00 00 36 .FORTH TXT...6
001230: 0B 0C 0D 0E 0F 10 11 00 00 00 00 00 00 00 00 00 ................
001240: 00 52 45 41 44 45 52 20 20 42 41 53 00 00 00 17 .READER BAS....
001250: 12 13 14 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001260: 00 53 43 52 45 44 32 20 20 46 54 48 00 00 00 50 .SCRED2 FTH...P
001270: 15 16 17 18 19 1A 1B 1C 1D 1E 00 00 00 00 00 00 ................
001280: 00 44 45 42 55 47 20 20 20 46 54 48 00 00 00 30 .DEBUG FTH...0
001290: 1F 20 21 22 23 24 00 00 00 00 00 00 00 00 00 00 . !"#$..........
0012A0: 00 46 4F 52 54 48 36 20 20 54 58 54 00 00 00 25 .FORTH6 TXT...%
0012B0: 25 26 27 28 29 00 00 00 00 00 00 00 00 00 00 00 %&'()...........
0012C0: 00 46 4F 52 54 48 35 41 20 54 58 54 00 00 00 08 .FORTH5A TXT....
0012D0: 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *...............
0012E0: 00 46 4F 52 54 48 35 42 20 54 58 54 00 00 00 11 .FORTH5B TXT....
0012F0: 2B 2C 2D 00 00 00 00 00 00 00 00 00 00 00 00 00 +,-.............
001300: 00 48 41 4E 4F 49 20 20 20 46 54 48 00 00 00 60 .HANOI FTH...`
001310: 2E 2F 30 31 32 33 34 35 36 37 38 39 00 00 00 00 ./0123456789....
001320: 00 44 45 43 4F 4D 50 20 20 46 54 48 00 00 00 18 .DECOMP FTH....
001330: 3A 3B 3C 00 00 00 00 00 00 00 00 00 00 00 00 00 :;<.............
001340: 00 46 4F 52 54 48 33 41 20 54 58 54 00 00 00 24 .FORTH3A TXT...$
001350: 3D 3E 3F 40 41 00 00 00 00 00 00 00 00 00 00 00 =>?@A...........
001360: 00 46 4F 52 54 48 33 42 20 54 58 54 00 00 00 35 .FORTH3B TXT...5
001370: 42 43 44 45 46 47 48 00 00 00 00 00 00 00 00 00 BCDEFGH.........
001380: 00 47 4C 4F 53 53 31 20 20 46 54 48 00 00 00 55 .GLOSS1 FTH...U
001390: 49 4A 4B 4C 4D 4E 4F 50 51 52 53 00 00 00 00 00 IJKLMNOPQRS.....
0013A0: 00 41 4D 45 4E 44 31 20 20 24 24 24 00 00 00 00 .AMEND1 $$$....
0013B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0013C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001400: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
001410: 01 00 01 00 02 09 4E E5 01 00 C1 02 00 00 00 02 ......N.........
001420: 01 00 C6 02 00 00 00 02 01 00 C2 02 00 00 00 02 ................
001430: 01 00 C7 02 00 00 00 02 01 00 C3 02 00 00 00 02 ................
001440: 01 00 C8 02 00 00 00 02 01 00 C4 02 00 00 00 02 ................
001450: 01 00 C9 02 00 00 00 02 01 00 C5 02 00 00 00 02 ................
001460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001500: 01 0D 79 86 09 04 06 11 01 A9 86 00 15 00 03 01 ..y.............
001510: 23 A0 09 16 00 01 06 A9 86 00 27 04 01 02 23 A0 #.........'...#.
001520: FE 19 06 0A 01 89 86 FE 19 07 0A 01 99 86 08 11 ................
001530: 0A 02 01 A9 86 FE 17 0A 02 01 99 86 FE 07 0D 1D ................
001540: 01 99 86 FD 14 13 01 01 37 89 FD 04 0C 01 01 47 ........7......G
001550: 89 FD 08 05 01 01 57 89 0A 14 07 00 00 23 A0 0A ......W......#..
001560: 05 0A 00 00 23 A0 FF 00 00 02 02 06 06 14 14 12 ....#...........
001570: 12 08 08 18 18 1A 1A 14 14 03 03 12 00 00 12 09 ................
001580: 09 14 02 02 14 0F 0F 13 00 00 14 20 20 20 54 68 ........... Th
001590: 65 20 52 6F 6D 61 6E 20 46 6F 72 74 20 20 20 01 e Roman Fort .
0015A0: 00 01 00 03 01 23 A0 0A 13 02 00 00 23 A0 09 01 .....#......#...
0015B0: 03 02 0A 87 8B 09 01 06 03 01 77 8B 09 07 06 02 ..........w.....
0015C0: 01 77 8B 09 0F 06 02 01 77 8B 09 16 06 04 01 77 .w......w......w
0015D0: 8B 09 1F 06 02 01 77 8B 09 25 06 02 0B 87 8B 09 ......w..%......
0015E0: 0D 08 02 01 77 8B 0A 06 0A 00 00 23 A0 09 12 0A ....w......#....
0015F0: 04 01 77 8B 09 1A 0C 03 01 77 8B 09 07 0E 02 01 ..w......w......
001600: 77 8B 09 0E 0E 04 01 77 8B 09 17 0E 03 01 77 8B w......w......w.
001610: 0A 20 0E 00 00 23 A0 09 1A 10 03 01 77 8B 00 00 . ...#......w...
001620: 11 01 02 23 A0 FD 1E 12 01 01 57 89 09 1F 12 02 ...#......W.....
001630: 01 77 8B FF 00 00 02 02 06 06 14 14 12 12 08 08 .w..............
001640: 18 18 1A 1A 14 14 03 03 12 00 00 12 04 04 14 02 ................
001650: 02 14 0F 0F 16 17 00 19 20 4E 6A 6F 72 6C 27 73 ........ Njorl's
001660: 20 44 72 61 67 6F 6E 62 6F 61 74 20 00 FD 00 10 Dragonboat ....
001670: 28 04 49 86 FB 1F 10 09 01 49 86 09 07 0F 17 01 (.I......I......
001680: 67 8D 09 06 0D 1A 02 67 8D 09 05 0C 1C 01 67 8D g......g......g.
001690: FE 05 0B 02 01 67 8D FE 00 09 01 02 47 91 FE 04 .....g......G...
0016A0: 09 02 02 67 8D 09 1E 0B 03 01 67 8D 09 1F 0A 03 ...g......g.....
0016B0: 01 67 8D FE 20 08 02 02 67 8D FE 21 07 01 01 67 .g.. ...g..!...g
0016C0: 8D FE 21 05 02 02 67 8D 09 21 05 01 01 67 8D FE ..!...g..!...g..
0016D0: 23 05 01 01 67 8D F8 12 00 01 0C 47 8D F8 13 00 #...g......G....
0016E0: 01 0C 57 8D 09 1C 0D 0C 01 77 8B 09 1E 0E 01 01 ..W......w......
0016F0: 77 8B FD 1E 0F 01 01 57 89 09 22 0E 01 02 77 8B w......W.."...w.
001700: 01 30 95 00 FE 20 77 91 77 91 01 7C 69 00 02 18 .0... w.w..|i...
001710: 77 91 77 91 01 6E 97 FE 00 1C B7 91 F7 91 00 01 w.w..n..........
001720: 62 97 FE 00 32 23 A0 67 92 01 6A 97 FE 00 32 23 b...2#.g..j...2#
001730: A0 A7 92 02 0D 17 01 00 38 F3 7A 73 7A 02 61 17 ........8.zsz.a.
001740: 01 00 38 F3 7A 73 7A 00 01 48 5F 00 00 01 E7 92 ..8.zsz..H_.....
001750: E7 92 01 50 5F 00 00 01 27 93 27 93 01 48 4F 00 ...P_...'.'..HO.
001760: 00 01 67 93 67 93 01 50 4F 00 00 01 A7 93 A7 93 ..g.g..PO.......
001770: 00 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 ................
001780: C0 CC CC F3 3F 3F F3 CC CC CC CC F3 3F 3F F3 CC ....??......??..
001790: CC CC CC F3 3F 3F F3 CC CC 30 30 61 30 30 61 30 ....??...00a00a0
0017A0: 30 32 10 32 30 32 92 32 30 30 32 32 30 63 33 33 02.202.200220c33
0017B0: 63 CB 27 45 0A 1B C7 05 8A CB 27 45 0A 1B C7 05 c.'E......'E....
0017C0: 8A 1C 1C A4 69 1C 1C 69 A4 1C 1C A4 69 1C 1C 69 ....i..i....i..i
0017D0: A4 1C 1C A4 69 1C 1C 69 A4 14 49 04 28 00 08 00 ....i..i..I.(...
0017E0: 08 08 0C 04 28 49 49 82 04 14 C3 04 82 00 08 00 ....(II.........
0017F0: 08 00 08 00 00 04 86 00 00 86 00 50 00 08 00 F0 ...........P....
001800: A0 82 00 08 A0 08 55 AE A0 82 FF FF A0 08 FF FF ......U.........
001810: 00 D7 EB FF 00 5D FF D7 00 D7 FF D7 82 5D EB 55 .....].......].U
001820: AA D7 D7 41 AA 5D D7 AA EB FF FF AA F0 55 FF AA ...A.].......U..
001830: F0 04 00 00 00 08 50 00 00 82 F0 00 00 08 A0 A0 ......P.........
001840: 00 82 AE A0 00 08 FF 08 00 D7 FF AA 00 5D D7 00 .............]..
001850: 00 D7 D7 AA 00 49 FF EB 00 D7 D7 FF 00 5D EB FF .....I.......]..
001860: 00 D7 D7 50 A0 5D D7 FA A0 FF FF BA 32 55 FF BB ...P.]......2U..
001870: 31 00 00 00 00 00 00 00 00 00 00 00 00 04 00 00 1...............
001880: 00 04 82 00 00 0C C3 C3 82 49 C3 C3 C3 14 3C 69 .........I....<i
001890: C3 00 3C 3C 82 00 FF 3C 28 14 3C BE 00 00 3C 3C ..<<...<(.<...<<
0018A0: 00 00 7D 3C 00 00 3C 7D 28 14 00 14 28 00 00 00 ..}<..<}(...(...
0018B0: 14 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0018C0: 00 04 00 00 00 04 96 28 00 14 7D 3C 28 49 3C 7D .......(..}<(I<}
0018D0: C3 14 3C 3C 69 00 3C 3C 82 00 00 00 00 00 00 00 ..<<i.<<........
0018E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0018F0: 00 00 28 00 00 00 14 00 00 00 14 3C 00 00 7D BE ..(........<..}.
001900: 09 26 0E 01 02 77 8B FD 0A 0D 01 01 47 89 FD 0E .&...w......G...
001910: 0D 01 01 47 89 FD 12 0D 01 01 47 89 FD 16 0D 01 ...G......G.....
001920: 01 47 89 FD 1A 0D 01 01 47 89 0A 05 05 00 00 23 .G......G......#
001930: A0 0A 15 04 00 00 23 A0 0A 24 05 00 00 23 A0 0A ......#..$...#..
001940: 23 0E 00 00 23 A0 09 26 05 02 01 77 8B FF 01 01 #...#..&...w....
001950: 02 02 06 06 14 14 12 12 08 08 18 18 1A 1A 0C 0C ................
001960: 03 03 12 01 01 12 0F 0F 14 02 02 14 00 00 00 1B ................
001970: 00 1E 20 53 65 65 6E 20 4D 79 20 42 61 6C 6C 69 .. Seen My Balli
001980: 73 74 61 20 3F 20 00 FD 02 04 01 01 57 89 0A 10 sta ? ......W...
001990: 04 00 00 23 A0 0A 1F 04 00 00 23 A0 FE 00 08 03 ...#......#.....
0019A0: 07 97 8C FE 03 08 01 01 A7 8C FE 03 09 01 06 B7 ................
0019B0: 8C FE 07 08 04 07 97 8C FE 0B 08 01 01 A7 8C FE ................
0019C0: 0B 09 01 06 B7 8C FE 0F 08 03 07 97 8C FE 12 08 ................
0019D0: 01 01 A7 8C FE 12 09 01 06 B7 8C FE 16 08 04 07 ................
0019E0: 97 8C FE 1A 08 01 01 A7 8C FE 1A 09 01 06 B7 8C ................
0019F0: FE 1E 08 03 07 97 8C FE 21 08 01 01 A7 8C FE 21 ........!......!
001A00: 09 01 06 B7 8C FE 25 08 02 07 97 8C FE 27 08 01 ......%......'..
001A10: 01 A7 8C FE 27 09 01 06 B7 8C FE 00 0F 28 05 97 ....'........(..
001A20: 8C FF 00 00 02 02 06 06 14 14 12 12 08 08 18 18 ................
001A30: 1A 1A 14 14 03 03 12 00 00 12 04 04 14 02 02 14 ................
001A40: 0F 0F 00 22 00 20 4A 65 6E 6E 79 20 47 6F 65 73 ...". Jenny Goes
001A50: 20 53 70 69 6E 6E 69 6E 67 20 01 00 00 09 01 02 Spinning ......
001A60: 23 A0 00 27 09 01 02 23 A0 08 07 04 1A 0C 77 8E #..'...#......w.
001A70: F8 03 01 01 12 87 8E F8 04 01 01 12 97 8E F8 23 ...............#
001A80: 01 01 12 87 8E F8 24 01 01 12 97 8E 0A 0E 01 00 ......$.........
001A90: 00 23 A0 0A 0B 0A 08 00 77 8E 0A 13 08 08 00 77 .#......w......w
001AA0: 8E 0A 19 12 00 00 23 A0 0A 1C 0A 08 00 77 8E FD ......#......w..
001AB0: 0C 09 01 01 57 89 FD 0C 0B 01 01 57 89 FD 12 07 ....W......W....
001AC0: 01 01 57 89 FD 14 07 01 01 57 89 FD 18 0B 01 01 ..W......W......
001AD0: 57 89 FD 1C 09 01 01 57 89 FF 00 00 0F 0F 06 06 W......W........
001AE0: 14 14 14 14 08 08 18 18 1A 1A 05 05 03 03 14 00 ................
001AF0: 00 14 13 13 14 02 02 14 0A 0A 00 23 00 00 20 20 ...........#..
001B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D00: 4D 69 73 73 69 6C 65 20 53 69 6C 6F 20 23 34 37 Missile Silo #47
001D10: 20 20 01 00 27 01 01 02 23 A0 0A 07 02 00 00 23 ..'...#......#
001D20: A0 FD 1A 03 02 01 57 89 0A 1A 04 00 00 23 A0 0A ......W......#..
001D30: 1B 04 00 00 23 A0 00 1A 05 02 03 B7 90 F9 1F 05 ....#...........
001D40: 02 0E 8B 90 09 23 05 02 01 77 8B 09 05 07 12 01 .....#...w......
001D50: 77 8B 00 19 07 01 01 9B 90 00 1C 07 01 01 AB 90 w...............
001D60: 0A 21 07 00 00 23 A0 09 25 07 02 01 77 8B 09 19 .!...#..%...w...
001D70: 08 06 01 8B 90 FD 21 08 01 01 47 89 09 01 09 02 ......!...G.....
001D80: 01 77 8B 0A 13 09 00 00 23 A0 00 19 09 04 09 B7 .w......#.......
001D90: 90 09 23 09 02 01 77 8B 09 01 0B 02 01 77 8B 09 ..#...w......w..
001DA0: 25 0B 02 01 77 8B 09 05 0D 12 01 77 8B 09 23 0D %...w......w..#.
001DB0: 02 01 77 8B 09 19 0E 06 01 8B 90 0A 21 0E 00 00 ..w.........!...
001DC0: 23 A0 09 01 0F 02 01 77 8B 0A 08 0F 00 00 23 A0 #......w......#.
001DD0: FD 21 0F 01 01 47 89 09 25 0F 02 01 77 8B 00 18 .!...G..%...w...
001DE0: 10 01 01 9B 90 00 1D 10 01 01 AB 90 09 01 11 02 ................
001DF0: 01 77 8B 00 17 11 02 02 B7 90 00 1D 11 02 02 B7 .w..............
001E00: 90 00 17 11 01 01 9B 90 00 1E 11 01 01 AB 90 09 ................
001E10: 23 11 02 01 77 8B 00 1F 12 02 01 8B 90 FF 01 01 #...w...........
001E20: 02 02 06 06 14 14 12 12 08 08 18 18 1A 1A 14 14 ................
001E30: 03 03 12 01 01 12 04 04 14 01 01 14 0F 0F 00 00 ................
001E40: 00 28 41 66 74 65 72 20 54 68 65 20 48 6F 6C 6F .(After The Holo
001E50: 63 61 75 73 74 20 01 0A 0D 07 00 00 23 A0 0A 26 caust ......#..&
001E60: 07 00 00 23 A0 FE 23 08 05 0C 89 86 FE 0F 09 03 ...#..#.........
001E70: 01 99 86 FE 00 0A 07 0A 89 86 FE 16 0A 03 01 99 ................
001E80: 86 FE 22 0A 01 0A 89 86 09 0A 0B 01 01 99 86 FE ..".............
001E90: 07 0C 02 08 89 86 09 1C 0C 01 01 99 86 FE 20 0C .............. .
001EA0: 02 08 89 86 FE 09 0D 01 07 89 86 0A 13 0E 00 00 ................
001EB0: 23 A0 0A 14 0E 00 00 23 A0 FE 1E 0E 02 06 89 86 #......#........
001EC0: FE 0A 0F 02 05 89 86 FE 1C 0F 02 05 89 86 FE 0C ................
001ED0: 10 02 04 89 86 FE 1A 10 02 04 89 86 FE 0E 11 03 ................
001EE0: 03 89 86 FE 17 11 03 03 89 86 FD 11 12 06 01 67 ...............g
001EF0: 89 FE 11 13 06 01 89 86 FF 0D 0D 04 04 06 06 14 ................
001F00: 00 43 50 43 46 54 48 32 20 42 49 4E 00 00 00 41 .CPCFTH2 BIN...A
001F10: 02 03 04 05 06 07 08 09 0A 00 00 00 00 00 00 00 ................
001F20: 00 46 4F 52 54 48 20 20 20 54 58 54 00 00 00 36 .FORTH TXT...6
001F30: 0B 0C 0D 0E 0F 10 11 00 00 00 00 00 00 00 00 00 ................
001F40: 00 52 45 41 44 45 52 20 20 42 41 53 00 00 00 17 .READER BAS....
001F50: 12 13 14 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001F60: 00 53 43 52 45 44 32 20 20 46 54 48 00 00 00 50 .SCRED2 FTH...P
001F70: 15 16 17 18 19 1A 1B 1C 1D 1E 00 00 00 00 00 00 ................
001F80: 00 44 45 42 55 47 20 20 20 46 54 48 00 00 00 30 .DEBUG FTH...0
001F90: 1F 20 21 22 23 24 00 00 00 00 00 00 00 00 00 00 . !"#$..........
001FA0: 00 46 4F 52 54 48 36 20 20 54 58 54 00 00 00 25 .FORTH6 TXT...%
001FB0: 25 26 27 28 29 00 00 00 00 00 00 00 00 00 00 00 %&'()...........
001FC0: 00 46 4F 52 54 48 35 41 20 54 58 54 00 00 00 08 .FORTH5A TXT....
001FD0: 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *...............
001FE0: 00 46 4F 52 54 48 35 42 20 54 58 54 00 00 00 11 .FORTH5B TXT....
001FF0: 2B 2C 2D 00 00 00 00 00 00 00 00 00 00 00 00 00 +,-.............
002000: 00 48 41 4E 4F 49 20 20 20 46 54 48 00 00 00 60 .HANOI FTH...`
002010: 2E 2F 30 31 32 33 34 35 36 37 38 39 00 00 00 00 ./0123456789....
002020: 00 44 45 43 4F 4D 50 20 20 46 54 48 00 00 00 18 .DECOMP FTH....
002030: 3A 3B 3C 00 00 00 00 00 00 00 00 00 00 00 00 00 :;<.............
002040: 00 46 4F 52 54 48 33 41 20 54 58 54 00 00 00 24 .FORTH3A TXT...$
002050: 3D 3E 3F 40 41 00 00 00 00 00 00 00 00 00 00 00 =>?@A...........
002060: 00 46 4F 52 54 48 33 42 20 54 58 54 00 00 00 35 .FORTH3B TXT...5
002070: 42 43 44 45 46 47 48 00 00 00 00 00 00 00 00 00 BCDEFGH.........
002080: 00 47 4C 4F 53 53 31 20 20 46 54 48 00 00 00 55 .GLOSS1 FTH...U
002090: 49 4A 4B 4C 4D 4E 4F 50 51 52 53 00 00 00 00 00 IJKLMNOPQRS.....
0020A0: 00 41 4D 45 4E 44 31 20 20 46 54 48 00 00 00 2C .AMEND1 FTH...,
0020B0: 54 55 56 57 58 59 00 00 00 00 00 00 00 00 00 00 TUVWXY..........
0020C0: 00 42 45 4E 43 48 20 20 20 24 24 24 00 00 00 00 .BENCH $$$....
0020D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0020E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0020F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002100: 14 00 00 08 08 18 18 1A 1A 01 01 03 03 12 12 09 ................
002110: 09 09 12 12 0D 0D 09 02 02 00 2B 00 2C 48 65 6C ..........+.,Hel
002120: 69 2D 48 75 6E 74 65 72 20 53 74 61 74 69 6F 6E i-Hunter Station
002130: 20 01 09 12 04 04 01 67 91 09 11 05 06 06 67 91 ......g......g.
002140: F8 13 05 02 05 57 91 09 0F 06 02 03 67 91 09 17 .....W......g...
002150: 06 02 03 67 91 FD 10 06 01 01 57 89 FD 11 07 01 ...g......W.....
002160: 01 57 89 F9 12 0B 04 08 57 91 09 05 06 03 01 67 .W......W......g
002170: 91 09 03 07 07 01 67 91 09 04 08 05 01 67 91 09 ......g......g..
002180: 02 09 09 01 67 91 F8 05 0A 03 08 57 91 FA 08 0B ....g......W....
002190: 0A 01 77 8B 09 1D 09 06 01 67 91 09 1B 0A 0A 02 ..w......g......
0021A0: 67 91 09 1D 0C 06 01 67 91 F8 1E 0D 04 05 57 91 g......g......W.
0021B0: FC 16 0F 08 01 77 8B FD 1D 0E 01 01 57 89 FC 01 .....w......W...
0021C0: 12 11 01 67 91 FB 16 12 0C 01 67 91 00 00 05 01 ...g......g.....
0021D0: 02 23 A0 00 27 07 01 02 23 A0 0A 06 05 00 00 23 .#..'...#......#
0021E0: A0 0A 10 05 00 00 23 A0 0A 17 05 00 00 23 A0 0A ......#......#..
0021F0: 1B 0A 00 00 23 A0 0A 24 0A 00 00 23 A0 0A 1C 0E ....#..$...#....
002200: 00 00 23 A0 FF 00 00 02 02 06 06 14 14 12 12 08 ..#.............
002210: 08 18 18 1A 1A 14 14 03 03 12 00 00 12 04 04 14 ................
002220: 02 02 14 0F 0F 00 30 00 31 20 20 20 57 65 73 74 ......0.1 West
002230: 20 6F 66 20 44 6F 6D 65 20 39 20 20 20 00 FD 00 of Dome 9 ...
002240: 00 20 01 57 92 FE 20 00 05 01 37 92 FE 00 04 01 . .W.. ...7.....
002250: 0F 47 92 09 00 04 03 0F 47 92 F8 01 05 01 0E 57 .G......G......W
002260: 91 09 03 05 02 05 47 92 09 06 05 03 05 47 92 09 ......G......G..
002270: 05 06 01 03 47 92 09 08 06 02 03 47 92 FA 0F 06 ....G......G....
002280: 04 01 47 92 09 0C 0B 05 01 47 92 FA 00 13 28 01 ..G......G....(.
002290: 69 86 09 1F 01 05 01 37 92 09 1D 02 06 01 37 92 i......7......7.
0022A0: 09 1C 03 05 01 37 92 09 1B 04 05 01 37 92 09 1A .....7......7...
0022B0: 05 05 01 37 92 09 19 06 05 01 37 92 09 18 07 05 ...7......7.....
0022C0: 01 37 92 09 18 08 04 01 37 92 09 17 09 04 01 37 .7......7......7
0022D0: 92 09 16 0A 05 01 37 92 09 16 0B 04 01 37 92 09 ......7......7..
0022E0: 15 0C 05 01 37 92 09 15 0D 04 01 37 92 09 14 0E ....7......7....
0022F0: 05 02 37 92 09 14 10 04 01 37 92 09 13 11 05 02 ..7......7......
002300: 00 43 50 43 46 54 48 32 20 42 49 4E 00 00 00 41 .CPCFTH2 BIN...A
002310: 02 03 04 05 06 07 08 09 0A 00 00 00 00 00 00 00 ................
002320: 00 46 4F 52 54 48 20 20 20 54 58 54 00 00 00 36 .FORTH TXT...6
002330: 0B 0C 0D 0E 0F 10 11 00 00 00 00 00 00 00 00 00 ................
002340: 00 52 45 41 44 45 52 20 20 42 41 53 00 00 00 17 .READER BAS....
002350: 12 13 14 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002360: 00 53 43 52 45 44 32 20 20 46 54 48 00 00 00 50 .SCRED2 FTH...P
002370: 15 16 17 18 19 1A 1B 1C 1D 1E 00 00 00 00 00 00 ................
002380: 00 44 45 42 55 47 20 20 20 46 54 48 00 00 00 30 .DEBUG FTH...0
002390: 1F 20 21 22 23 24 00 00 00 00 00 00 00 00 00 00 . !"#$..........
0023A0: 00 46 4F 52 54 48 36 20 20 54 58 54 00 00 00 25 .FORTH6 TXT...%
0023B0: 25 26 27 28 29 00 00 00 00 00 00 00 00 00 00 00 %&'()...........
0023C0: 00 46 4F 52 54 48 35 41 20 54 58 54 00 00 00 08 .FORTH5A TXT....
0023D0: 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *...............
0023E0: 00 46 4F 52 54 48 35 42 20 54 58 54 00 00 00 11 .FORTH5B TXT....
0023F0: 2B 2C 2D 00 00 00 00 00 00 00 00 00 00 00 00 00 +,-.............
002400: 00 48 41 4E 4F 49 20 20 20 46 54 48 00 00 00 60 .HANOI FTH...`
002410: 2E 2F 30 31 32 33 34 35 36 37 38 39 00 00 00 00 ./0123456789....
002420: 00 44 45 43 4F 4D 50 20 20 46 54 48 00 00 00 18 .DECOMP FTH....
002430: 3A 3B 3C 00 00 00 00 00 00 00 00 00 00 00 00 00 :;<.............
002440: 00 46 4F 52 54 48 33 41 20 54 58 54 00 00 00 24 .FORTH3A TXT...$
002450: 3D 3E 3F 40 41 00 00 00 00 00 00 00 00 00 00 00 =>?@A...........
002460: 00 46 4F 52 54 48 33 42 20 54 58 54 00 00 00 35 .FORTH3B TXT...5
002470: 42 43 44 45 46 47 48 00 00 00 00 00 00 00 00 00 BCDEFGH.........
002480: 00 47 4C 4F 53 53 31 20 20 46 54 48 00 00 00 55 .GLOSS1 FTH...U
002490: 49 4A 4B 4C 4D 4E 4F 50 51 52 53 00 00 00 00 00 IJKLMNOPQRS.....
0024A0: 00 41 4D 45 4E 44 31 20 20 46 54 48 00 00 00 2C .AMEND1 FTH...,
0024B0: 54 55 56 57 58 59 00 00 00 00 00 00 00 00 00 00 TUVWXY..........
0024C0: 00 42 45 4E 43 48 20 20 20 24 24 24 00 00 00 00 .BENCH $$$....
0024D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0024E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0024F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002500: 37 92 09 1D 0B 01 01 37 92 FB 24 0B 04 01 77 8B 7......7..$...w.
002510: FD 25 08 01 01 57 89 0A 08 05 09 00 47 92 0A 10 .%...W......G...
002520: 05 00 00 23 A0 0A 05 07 09 00 47 92 0A 07 09 09 ...#......G.....
002530: 00 47 92 0A 25 0A 00 00 23 A0 0A 1E 0E 00 00 23 .G..%...#......#
002540: A0 FF 00 00 02 02 06 06 14 14 12 12 08 08 18 18 ................
002550: 1A 1A 14 14 03 03 12 00 00 12 04 04 14 02 02 14 ................
002560: 0D 0D 00 00 00 00 20 20 20 54 68 65 20 45 6E 64 ...... The End
002570: 20 4F 66 20 54 69 6D 65 20 20 01 09 07 08 01 01 Of Time ......
002580: A9 86 09 08 0C 01 01 A9 86 09 09 10 01 01 A9 86 ................
002590: 09 20 0C 01 01 A9 86 09 1F 07 01 01 A9 86 08 25 . .............%
0025A0: 06 01 01 A9 86 0A 24 03 00 00 23 A0 FF 00 00 02 ......$...#.....
0025B0: 02 06 06 14 14 12 12 08 08 18 18 1A 1A 14 14 03 ................
0025C0: 03 06 12 14 08 05 18 14 02 02 14 1A 1A 01 04 97 ................
0025D0: 00 00 02 B9 86 F9 86 04 1E 47 02 00 1A 37 88 39 .........G...7.9
0025E0: 87 04 78 27 FE 00 28 39 87 37 88 04 6C 47 04 00 ..x'..(9.7..lG..
0025F0: 0B 37 88 39 87 00 02 10 1B 00 04 20 17 8C 17 8C .7.9....... ....
002600: 02 88 95 00 FE 40 97 8B 97 8B 02 52 83 FE FC 18 .....@.....R....
002610: 97 8B 97 8B 02 42 1B 02 04 1C 17 8C 17 8C 00 04 .....B..........
002620: 32 67 FE 00 1A 23 A0 77 89 04 3C 53 00 04 14 77 2g...#.w..<S...w
002630: 8D 77 8D 02 58 8F 04 00 11 23 A0 C7 8C 00 02 12 .w..X....#......
002640: 3C 00 05 0D 17 8C 17 8C 02 32 39 00 02 20 97 8B <........29.. ..
002650: 97 8B 02 4E 3A 00 03 18 17 8C 17 8C 02 6E 3B 00 ...N:........n;.
002660: 04 10 97 8B 97 8B 02 5C 78 00 01 30 C7 8C C7 8C .......\x..0....
002670: 02 8A 3D 00 06 0C 17 8C 17 8C 00 01 04 1B 00 04 ..=.............
002680: 20 A7 8E A7 8E 01 14 19 00 02 40 A7 8E A7 8E 01 .........@.....
002690: 84 19 00 02 40 A7 8E A7 8E 01 94 1B 00 04 20 A7 ....@......... .
0026A0: 8E A7 8E 01 78 8F FE 00 2E E7 8E E7 8E 01 1E 1F ....x...........
0026B0: 02 00 2E 13 8F 13 8F 00 04 5A 77 FE 00 28 53 8F .........Zw..(S.
0026C0: 53 8F 01 12 47 02 00 24 4B 90 4B 90 04 52 17 FE S...G..$K.K..R..
0026D0: 00 20 53 8F 53 8F 00 04 46 23 FE 04 1C 77 8A 77 . S.S...F#...w.w
0026E0: 89 04 86 8B FE FC 1C 53 8F 53 8F 01 48 96 00 FF .......S.S..H...
0026F0: 58 C7 90 C7 90 01 50 96 00 FF 58 07 91 07 91 00 X.....P...X.....
002700: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
002710: 02 00 01 00 02 09 4E E5 02 00 C1 02 00 00 00 02 ......N.........
002720: 02 00 C6 02 00 00 00 02 02 00 C2 02 00 00 00 02 ................
002730: 02 00 C7 02 00 00 00 02 02 00 C3 02 00 00 00 02 ................
002740: 02 00 C8 02 00 00 00 02 02 00 C4 02 00 00 00 02 ................
002750: 02 00 C9 02 00 00 00 02 02 00 C5 02 00 00 00 02 ................
002760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002800: 00 43 50 43 46 54 48 32 20 42 49 4E 00 00 00 41 .CPCFTH2 BIN...A
002810: 02 03 04 05 06 07 08 09 0A 00 00 00 00 00 00 00 ................
002820: 00 46 4F 52 54 48 20 20 20 54 58 54 00 00 00 36 .FORTH TXT...6
002830: 0B 0C 0D 0E 0F 10 11 00 00 00 00 00 00 00 00 00 ................
002840: 00 52 45 41 44 45 52 20 20 42 41 53 00 00 00 17 .READER BAS....
002850: 12 13 14 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002860: 00 53 43 52 45 44 32 20 20 46 54 48 00 00 00 50 .SCRED2 FTH...P
002870: 15 16 17 18 19 1A 1B 1C 1D 1E 00 00 00 00 00 00 ................
002880: C3 C3 C3 03 83 03 83 00 00 00 00 00 14 28 00 00 .............(..
002890: 3C 3C 00 14 39 36 28 16 39 36 29 16 3C 36 29 3C <<..96(.96).<6)<
0028A0: 2C 1C 36 39 26 1C 36 39 2C 19 36 39 2C 1C 3C 16 ,.69&.69,.69,.<.
0028B0: 39 3C 29 16 39 36 29 14 39 36 28 00 3C 3C 00 00 9<).96).96(.<<..
0028C0: 14 28 00 00 00 00 00 00 00 00 00 00 14 28 00 00 .(...........(..
0028D0: 3C 3C 00 14 3C 3C 28 16 3C 3C 29 16 36 39 29 3C <<..<<(.<<).69)<
0028E0: 39 36 3C 3C 2C 1C 3C 3C 2C 1C 3C 3C 39 36 3C 16 96<<,.<<,.<<96<.
0028F0: 36 39 29 16 3C 3C 29 14 3C 3C 28 00 3C 3C 00 00 69).<<).<<(.<<..
002900: 14 28 00 00 00 00 00 00 00 00 00 00 14 28 00 00 .(...........(..
002910: 3C 3C 00 14 3C 3C 28 16 3C 3C 29 16 3C 3C 29 3C <<..<<(.<<).<<)<
002920: 2C 1C 3C 3C 2C 1C 3C 3C 2C 1C 3C 3C 2C 1C 3C 16 ,.<<,.<<,.<<,.<.
002930: 3C 3C 29 16 3C 3C 29 14 3C 3C 28 00 3C 3C 00 00 <<).<<).<<(.<<..
002940: 14 28 00 00 00 00 00 00 00 00 00 00 14 28 00 00 .(...........(..
002950: 3C 3C 00 14 3C 3C 28 16 3C 3C 29 16 36 39 29 3C <<..<<(.<<).69)<
002960: 39 36 3C 3C 2C 1C 3C 3C 2C 1C 3C 3C 39 36 3C 16 96<<,.<<,.<<96<.
002970: 36 39 29 16 3C 3C 29 14 3C 3C 28 00 3C 3C 00 00 69).<<).<<(.<<..
002980: 14 28 00 00 00 00 00 A8 28 E9 C3 E9 C3 A8 28 A8 .(......(.....(.
002990: 28 0C 2C 0C 2C A8 28 CF 30 CF 30 0F 30 0F 30 CF (.,.,.(.0.0.0.0.
0029A0: 30 CF 30 0F 30 0F 30 30 0F 30 0F 30 CF 30 CF 30 0.0.0.00.0.0.0.0
0029B0: 0F 30 0F 30 CF 30 CF 14 3C 3C 28 14 3C 3C 28 00 .0.0.0..<<(.<<(.
0029C0: DC FC 00 00 EC FC 00 00 FC DC 00 00 FC EC 00 00 ................
0029D0: DC FC 00 00 EC FC 00 00 FC DC 00 00 FC EC 00 00 ................
0029E0: DC FC 00 00 EC FC 00 00 FC DC 00 00 FC EC 00 14 ................
0029F0: 3C 3C 28 14 3C 3C 28 00 00 00 00 00 00 00 00 00 <<(.<<(.........
002A00: 33 33 33 33 33 33 33 33 33 33 33 33 33 33 33 11 333333333333333.
002A10: 33 11 33 00 33 00 33 33 33 33 33 33 33 33 33 33 3.3.3.3333333333
002A20: 22 33 22 33 00 33 00 FC 33 FC 33 B9 33 B9 33 33 "3"3.3..3.3.3.33
002A30: 33 33 33 33 33 33 33 33 33 33 33 33 33 33 33 B9 333333333333333.
002A40: 33 B9 33 FC 33 FC 33 00 33 22 00 11 33 33 00 33 3.3.3.3.3"..33.3
002A50: 22 33 22 22 22 22 22 22 22 22 22 33 33 33 22 22 "3"""""""""333""
002A60: 22 22 22 22 22 22 22 33 33 33 22 22 22 22 22 22 """""""333""""""
002A70: 22 22 22 33 33 33 22 22 22 22 22 22 22 22 22 33 """333"""""""""3
002A80: 22 33 22 22 22 22 22 00 00 00 00 00 00 00 00 00 "3""""".........
002A90: 00 00 00 00 00 00 00 00 00 00 00 22 00 00 00 11 ..........."....
002AA0: 00 00 00 11 C0 00 00 40 C0 C0 00 C0 C0 C0 C0 C0 .......@........
002AB0: 0C C0 C0 94 0C 48 C0 84 2C 48 00 04 1C 08 00 04 .....H..,H......
002AC0: 0C 28 00 00 0C 00 00 00 00 00 00 00 00 00 00 00 .(..............
002AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 C0 11 ................
002AE0: 00 C0 C0 11 C0 C0 C0 40 C0 C0 80 C0 C0 C0 80 C0 .......@........
002AF0: 2C C0 00 84 2C 48 00 84 2C 08 00 04 1C 08 00 04 ,...,H..,.......
002B00: 1C 08 00 00 1C 00 00 00 00 00 00 00 00 C0 00 00 ................
002B10: 00 C0 00 00 40 C0 00 00 40 C0 00 00 C0 C0 00 00 ....@...@.......
002B20: C0 C0 00 40 C0 C0 00 62 C0 80 00 C0 C0 80 00 C0 ...@...b........
002B30: 0C 80 00 84 0C 28 00 84 1C 08 00 04 2C 08 00 14 .....(......,...
002B40: 0C 08 00 00 0C 00 00 00 00 00 00 00 00 00 00 00 ................
002B50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 C0 00 ................
002B60: 00 C0 C0 00 C0 C0 C0 40 C0 C0 80 C0 C0 C0 80 C0 .......@........
002B70: 0C C0 00 84 0C 48 00 94 2C 08 00 04 1C 28 00 04 .....H..,....(..
002B80: 0C 08 00 00 0C 00 00 00 00 00 00 00 00 00 00 00 ................
002B90: 00 00 00 00 00 00 00 00 C0 40 00 40 C0 C0 80 04 .........@.@....
002BA0: 0C 0C 0C 04 0C 0C 0C 04 0C 0C 0C 00 0C 0C 08 00 ................
002BB0: 0C 0C 08 00 AC 0C 20 10 B8 18 30 10 B8 5C FC 10 ...... ...0..\..
002BC0: B8 10 30 00 A8 00 20 00 00 00 00 00 00 00 00 00 ..0... .........
002BD0: 00 00 00 00 00 00 00 40 80 80 00 C0 C0 C0 00 0C .......@........
002BE0: 0C 0C 08 0C 0C 0C 08 0C 0C 0C 08 04 0C 0C 00 04 ................
002BF0: 0C 0C 00 10 0C 5C 00 30 24 74 20 FC AC 74 20 30 .....\.0$t ..t 0
002C00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002C10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002C20: 00 00 00 11 33 33 22 62 FF D5 33 77 D5 EA BB 33 ....33"b..3w...3
002C30: EA FF 91 11 33 33 22 00 00 00 00 00 00 00 00 00 ....33".........
002C40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002C60: 00 00 00 00 00 00 00 00 00 00 00 00 FC FC 00 54 ...............T
002C70: FC FC A8 54 54 A8 A8 FC 54 A8 FC A8 54 A8 54 A8 ...TT...T...T.T.
002C80: 54 A8 54 A8 FC FC 54 FC A8 54 FC FC 00 00 FC 54 T.T...T..T.....T
002C90: 00 00 A8 54 A8 54 A8 00 FC FC 00 00 00 00 00 00 ...T.T..........
002CA0: 00 00 00 00 00 00 00 00 00 00 00 00 54 A8 00 00 ............T...
002CB0: FC FC 00 00 FC FC 00 54 A8 FC A8 54 A8 A8 A8 54 .......T...T...T
002CC0: A8 A8 A8 54 A8 A8 A8 54 FC FC A8 54 FC 54 A8 00 ...T...T...T.T..
002CD0: FC 54 00 00 FC FC 00 00 54 A8 00 00 00 00 00 00 .T......T.......
002CE0: 00 00 00 00 00 00 00 00 00 00 00 00 54 A8 00 00 ............T...
002CF0: 54 A8 00 00 54 A8 00 00 54 A8 00 00 54 A8 00 00 T...T...T...T...
002D00: 54 A8 00 00 54 A8 00 00 54 A8 00 00 54 A8 00 00 T...T...T...T...
002D10: 54 A8 00 00 54 A8 00 00 54 A8 00 00 00 00 00 00 T...T...T.......
002D20: 00 00 00 00 00 00 00 00 00 00 00 00 54 A8 00 00 ............T...
002D30: FC FC 00 00 FC FC 00 54 FC 54 A8 54 54 54 A8 54 .......T.T.TTT.T
002D40: 54 54 A8 54 54 54 A8 54 FC FC A8 54 A8 FC A8 00 TT.TTT.T...T....
002D50: A8 FC 00 00 FC FC 00 00 54 A8 00 00 00 00 00 00 ........T.......
002D60: 00 00 00 00 FC FC 00 54 EC DC A8 FC DC CC FC EC .......T........
002D70: FC FC DC FC CC CC FC 54 EC FC A8 00 54 A8 00 00 .......T....T...
002D80: 54 A8 00 00 FC FC 00 00 FC FC 00 00 54 A8 00 00 T...........T...
002D90: 54 A8 00 00 FC FC 00 00 FC FC 00 FF FF 00 FF EB T...............
002DA0: D7 FF C3 D7 EB C3 FF AA 55 FF FF 00 54 00 54 00 ........U...T.T.
002DB0: DC 00 DC 54 DC 54 DC DC DC DC DC 88 00 88 00 DC ...T.T..........
002DC0: 00 DC 00 DC 88 DC 88 DC DC DC DC DC DC DC DC DC ................
002DD0: DC DC DC DC DC DC DC 00 00 00 33 00 00 11 33 00 ..........3...3.
002DE0: 00 33 33 00 00 33 33 00 11 33 33 00 11 33 33 00 .33..33..33..33.
002DF0: 3B 49 19 51 11 0C 19 15 11 49 19 51 11 19 19 00 ;I.Q.....I.Q....
002E00: 20 74 20 10 00 54 00 00 00 00 00 00 00 00 00 00 t ..T..........
002E10: 00 00 00 00 00 00 00 00 00 00 00 FC 00 54 A8 FC .............T..
002E20: 00 54 A8 54 FC FC 00 54 FC FC 00 FC 00 54 A8 FC .T.T...T.....T..
002E30: 00 54 A8 00 00 00 00 00 00 00 00 00 00 00 00 00 .T..............
002E40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002E50: 00 00 00 54 00 00 00 54 A8 00 00 00 A8 00 00 A8 ...T...T........
002E60: A8 00 00 FC FC 54 00 54 54 FC A8 00 00 A8 A8 00 .....T.TT.......
002E70: 00 A8 00 00 00 FC 00 00 00 54 00 00 00 00 00 00 .........T......
002E80: 00 00 00 00 00 00 00 00 00 00 00 00 A8 A8 00 00 ................
002E90: A8 A8 00 00 FC A8 00 00 FC A8 00 00 54 00 00 00 ............T...
002EA0: 54 00 00 00 54 00 00 00 54 00 00 00 54 00 00 00 T...T...T...T...
002EB0: FC A8 00 00 FC A8 00 00 A8 A8 00 00 A8 A8 00 00 ................
002EC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002ED0: 00 00 00 00 00 00 A8 00 00 54 A8 00 00 54 00 00 .........T...T..
002EE0: 00 54 54 00 A8 FC FC 54 FC A8 A8 54 54 00 00 00 .TT....T...TT...
002EF0: 54 00 00 00 FC 00 00 00 A8 00 00 00 00 00 00 00 T...............
002F00: 00 00 00 00 00 00 00 00 00 00 00 00 00 4F 8A 00 .............O..
002F10: 05 0A 8F 00 05 00 00 00 0C 00 00 00 0C 00 00 00 ................
002F20: 0C 00 88 00 0C 00 88 10 30 30 30 30 30 30 30 30 ........00000000
002F30: 30 30 30 30 30 30 30 40 30 60 30 C0 95 3F 95 D1 0000000@0`0..?..
002F40: F7 D1 F7 40 00 40 00 00 00 0A 8A 4F 8F 0A 00 4F ...@.@.....O...O
002F50: 00 00 00 00 00 00 00 00 00 00 00 3C 3C 00 00 28 ...........<<..(
002F60: 3C 00 00 28 3C 00 00 30 3C 00 00 30 3C 00 00 30 <..(<..0<..0<..0
002F70: 3C A8 00 30 3C A8 00 40 3C 00 00 3F 80 00 00 C0 <..0<..@<..?....
002F80: 80 00 00 40 00 00 00 00 00 00 00 00 00 00 00 00 ...@............
002F90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002FA0: 00 00 00 A8 00 00 00 FC 00 76 88 FC 76 FC CC FC .........v..v...
002FB0: FC 0C FC DE AC 0C FC 54 0C 5C FC 04 5C FC A8 14 .......T.\..\...
002FC0: 05 0A 28 41 00 00 82 00 00 00 00 00 00 00 00 00 ..(A............
002FD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002FE0: 00 00 54 44 B9 00 FC CC FC B9 FC FC 0C FC FC FC ..TD............
002FF0: 0C 5C A8 FC AC 0C A8 54 FC AC 08 00 45 0A 00 00 .\.....T....E...
003000: 3B 19 19 00 45 1B 33 00 00 67 4F 00 00 33 33 00 ;...E.3..gO..33.
003010: 00 11 33 00 00 00 33 33 00 00 00 33 22 00 00 33 ..3...33...3"..3
003020: 33 00 00 33 33 00 00 33 33 22 00 33 0C 22 00 0C 3..33..33".3."..
003030: 26 73 00 19 19 22 2A 19 0C 22 A2 19 33 22 2A 0C &s..."*.."..3"*.
003040: 33 73 00 33 67 0A 00 4F 1B 00 00 33 33 00 00 33 3s.3g..O...33..3
003050: 22 00 00 33 00 00 00 C0 80 D5 C0 EA C0 40 C0 C0 "..3.........@..
003060: 80 C0 D5 C0 EA 40 C0 00 14 22 00 00 36 36 00 00 .....@..."..66..
003070: 36 36 00 11 3C 3C 22 14 00 00 28 33 AA 55 33 3C 66..<<"...(3.U3<
003080: 00 00 3C 33 00 00 33 3C 55 AA 3C 11 22 11 22 14 ..<3..3<U.<.".".
003090: 28 14 28 11 23 13 22 14 29 16 28 00 22 11 00 00 (.(.#.".).(."...
0030A0: 29 16 00 00 23 13 00 14 3C 3C 00 7D 69 3C 28 7D )...#...<<.}i<(}
0030B0: 3C 3C 28 7D 3C 96 82 14 3C 3C 28 00 69 69 28 00 <<(}<...<<(.ii(.
0030C0: 3C 3C 28 00 3C 96 82 00 3C 3C 28 00 69 69 28 00 <<(.<...<<(.ii(.
0030D0: 3C 3C 28 14 3C 96 82 7D 3C 3C 28 7D 3C 69 28 7D <<(.<..}<<(}<i(}
0030E0: 3C 3C 28 14 3C 3C 00 00 00 00 00 14 3C 3C 00 7D <<(.<<......<<.}
0030F0: 69 3C 28 7D 3C 3C 28 7D 3C 96 82 14 3C 3C 28 00 i<(}<<(}<...<<(.
003100: 69 69 28 00 3C 3C 28 00 3C 96 82 00 3C 3C 28 14 ii(.<<(.<...<<(.
003110: 69 69 28 7D 3C 3C 28 7D 3C 96 82 7D 3C 3C 28 14 ii(}<<(}<..}<<(.
003120: 3C 69 00 00 00 00 00 00 00 00 00 00 00 00 00 14 <i..............
003130: 3C 3C 00 7D 69 3C 28 7D 3C 3C 28 7D 3C 96 82 14 <<.}i<(}<<(}<...
003140: 3C 3C 28 00 69 69 28 00 3C 3C 28 14 3C 96 82 7D <<(.ii(.<<(.<..}
003150: 3C 3C 28 7D 69 69 28 7D 3C 3C 28 14 3C 96 00 00 <<(}ii(}<<(.<...
003160: 00 00 00 00 00 00 00 00 00 00 00 14 3C 3C 00 7D ............<<.}
003170: 69 3C 28 7D 3C 3C 28 7D 3C 96 82 14 3C 3C 28 00 i<(}<<(}<...<<(.
003180: 69 69 28 00 3C 3C 28 00 3C 96 82 00 3C 3C 28 14 ii(.<<(.<...<<(.
003190: 69 69 28 7D 3C 3C 28 7D 3C 96 82 7D 3C 3C 28 14 ii(}<<(}<..}<<(.
0031A0: 3C 69 00 00 00 00 00 00 00 00 00 00 14 28 00 00 <i...........(..
0031B0: 14 28 00 00 14 28 00 00 3C 3C 00 00 3C 3C 00 00 .(...(..<<..<<..
0031C0: 3C 3C 00 14 3C 3C 28 14 3C 3C 28 14 3C 3C 28 3C <<..<<(.<<(.<<(<
0031D0: 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 00 <<<<<<<<<<<<<<<.
0031E0: 00 00 00 00 00 00 00 00 00 00 00 00 55 28 00 00 ............U(..
0031F0: 55 28 00 00 55 28 00 00 FF 3C 00 00 BE 3C 00 00 U(..U(...<...<..
003200: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003210: 00 00 00 00 00 00 00 00 00 00 00 00 04 00 00 00 ................
003220: AC A8 00 54 00 54 00 88 00 00 88 CC CC CC 88 88 ...T.T..........
003230: 88 88 88 CC CC CC 88 88 88 88 88 CC CC CC 88 CC ................
003240: 44 44 88 44 CC CC 00 00 08 00 08 00 08 41 49 41 DD.D.........AIA
003250: 0C 11 FC 11 FC 41 0C 3C 28 78 28 39 28 78 28 39 .....A.<(x(9(x(9
003260: 28 78 28 39 28 3C 28 00 FF FF 00 55 FF FF AA FF (x(9(<(....U....
003270: FF FF FF FF FF FF FF FF FF FF BE FF FF FF BE FF ................
003280: FF FF 3C FF 3C 3C 3C EB 3C 3C 96 EB 86 0C 1C EB ..<.<<<.<<......
003290: C6 5C 1C EB AC 8C 1C FF 86 0C 3C FF 3C 3C 7D 55 .\........<.<<}U
0032A0: 3C 3C 28 00 FF 7D 00 41 82 C3 C3 C3 86 86 0C 86 <<(..}.A........
0032B0: 1C 96 3C 96 2C 04 08 00 00 00 00 00 00 00 00 00 ..<.,...........
0032C0: 00 00 00 00 00 00 00 00 00 00 00 3C 3C 3C 3C 3C ...........<<<<<
0032D0: 3C 3C 3C 3C 3C 3C 3C 39 33 33 36 7D FF FF BE 7D <<<<<<<9336}...}
0032E0: 0C 0C BE 7D FF FF BE 7D FF FF BE 7D FF FF BE 7D ...}...}...}...}
0032F0: FF FF BE 3C 3C 3C 3C 4F 4F 0C 0C D5 C0 D5 C0 0C ...<<<<OO.......
003300: 0C 8F 8F 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003310: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003320: 00 00 00 FC FC FC A8 FC FC FD A8 C0 C0 C0 80 FC ................
003330: FC FC A8 FD 7D 7D A8 BC BE BE A8 FD 7D 7D A8 BC ....}}......}}..
003340: BE BE A8 FC FC FC A8 00 00 00 00 00 00 00 00 00 ................
003350: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003360: 00 00 00 FF FF FF FF BB 77 FF FF FF FF FF FF 33 ........w......3
003370: 33 33 33 FF FF FF FF BB BB BB AE 77 77 77 1C BB 333........www..
003380: BB AE 38 FF FF 1C 75 0C 0C 0C 0C 0C 0C 0C 0C 0C ..8...u.........
003390: 0C 0C 0C 0C 0C 0C 0C CC CC CC CC CC CC CC CC CC ................
0033A0: CC CC CC CC CC CC CC 33 93 33 33 93 33 33 93 33 .......3.33.33.3
0033B0: 33 63 33 33 63 33 33 00 00 00 00 00 00 00 00 00 3c33c33.........
0033C0: 1A 5F 00 27 04 35 31 2C 39 39 2C 35 31 2C 35 31 ._.'.51,99,51,51
0033D0: 0D 1A FF 00 FF 00 00 08 00 00 C3 96 00 00 00 00 ................
0033E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0033F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003400: BE 3C 00 55 BE 3C 28 55 BE 3C 28 55 3C 3C 28 FF .<.U.<(U.<(U<<(.
003410: 3C 3C 3C FF 3C 3C 3C FF 3C 3C 3C FF 3C 3C 3C 55 <<<.<<<.<<<.<<<U
003420: 3C 28 00 00 00 00 00 00 00 00 00 00 55 28 00 00 <(..........U(..
003430: 55 28 00 00 55 28 00 00 FF 3C 00 00 FF 3C 00 00 U(..U(...<...<..
003440: FF 3C 00 55 FF 3C 28 55 FF 3C 28 55 FF 3C 28 FF .<.U.<(U.<(U.<(.
003450: FF 3C 3C FF FF 3C 3C FF FF 3C 3C FF FF 3C 3C 55 .<<..<<..<<..<<U
003460: FF 3C 28 00 55 28 00 00 00 00 00 00 55 28 00 00 .<(.U(......U(..
003470: 55 28 00 00 55 28 00 00 FF 3C 00 00 FF BE 00 00 U(..U(...<......
003480: FF BE 00 55 FF BE 28 55 FF BE 28 55 FF FF 28 FF ...U..(U..(U..(.
003490: FF FF 3C FF FF FF 3C FF FF FF 3C FF FF FF 3C 00 ..<...<...<...<.
0034A0: 55 FF 28 00 00 00 00 0F 0F FC FC CF CF FC FC 0F U.(.............
0034B0: 0F FC FC CF CF FC FC 0C 0C 4C CC 4C CC 4C CC 4C .........L.L.L.L
0034C0: CC 4C CC 4C CC 0C 0C 00 00 00 00 00 00 00 00 0F .L.L............
0034D0: 1A 0F 0A 00 10 00 00 00 10 00 00 00 30 20 00 10 ............0 ..
0034E0: 20 30 00 10 80 90 00 40 80 C0 00 40 80 C0 00 40 0.....@...@...@
0034F0: 80 C0 00 40 40 40 00 00 C0 80 00 10 51 10 00 30 ...@@@......Q..0
003500: 00 10 20 20 00 00 20 00 FF AA 20 00 FF FF 20 00 .. .. ... ... .
003510: F0 FF 20 00 F0 F5 20 00 F0 F4 20 00 54 FC 30 00 .. ... ... .T.0.
003520: 54 D4 30 50 C0 D4 30 50 C0 FC 30 00 54 AC 30 00 T.0P..0P..0.T.0.
003530: 0C 0C 20 00 0C 08 05 00 0C 00 0A 00 0C 00 05 00 .. .............
003540: CC 00 00 44 CC 00 05 10 55 FF 00 10 FF FF 00 10 ...D....U.......
003550: FF F0 00 10 FA F0 00 10 F8 F0 00 30 FC A8 00 30 ...........0...0
003560: E8 A8 00 30 E8 C0 A0 30 FC C0 A0 30 5C A8 00 10 ...0...0...0\...
003570: 0C 0C 00 0A 04 0C 00 05 00 0C 00 0A 00 0C 00 00 ................
003580: 00 CC 00 0A 00 CC 88 6C EC 9C DD BD EC 9C DC EE .......l........
003590: 6C DC F6 6C 6C F7 DC FF FF FF FF FE FD FE FD FE l..ll...........
0035A0: FD FE FD FF FF FF FF 00 00 00 00 01 00 01 00 01 ................
0035B0: 00 03 03 FC FC 03 03 00 00 3C 00 00 04 0C 0C 00 .........<......
0035C0: 0C C8 CC 04 4C C8 CC 0C CC C8 CC 0C CC C8 CC 0C ....L...........
0035D0: CC C8 CC 0C 4C C8 CC 0C 0C 48 C3 04 0C 48 C3 00 ....L....H...H..
0035E0: 0C 0C 0C 00 00 00 B7 00 00 00 7B 00 00 00 00 00 ..........{.....
0035F0: 00 00 00 00 00 00 00 00 3C 00 00 0C 0C 08 00 C4 ........<.......
003600: 00 52 49 54 44 45 4D 4F 20 42 49 4E 00 00 00 00 .RITDEMO BIN....
003610: 00 00 02 00 00 48 6A 00 00 2C 00 00 00 00 00 00 .....Hj..,......
003620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003640: 00 2C 00 19 04 00 00 52 49 54 44 45 4D 4F 20 24 .,.....RITDEMO $
003650: 24 24 FF 00 FF 05 0A 00 A2 CF 00 00 05 8A 00 00 $$..............
003660: 0F 00 00 00 1A 00 00 00 00 00 00 00 00 00 00 00 ................
003670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003680: AF 01 00 00 CD 32 BC 3E 01 01 18 18 CD 32 BC AF .....2.>.....2..
003690: CD 96 BB 3E 01 CD 90 BB 01 00 00 CD 38 BC 3E 01 ...>........8.>.
0036A0: CD 0E BC 21 8B 70 CD 4D 6E 3E 2B CD 1E BB 20 0A ...!.p.Mn>+... .
0036B0: 3E 2E CD 1E BB 28 F2 AF 18 02 3E 01 32 6A 70 CD >....(....>.2jp.
0036C0: 0D BD 22 25 71 CD 9F 6E 21 04 04 CD 3E BC AF CD .."%q..n!...>...
0036D0: 96 BB 3E 08 CD 90 BB 3E 20 11 48 94 F5 21 01 01 ..>....> .H..!..
0036E0: CD 75 BB F1 CD 5A BB 21 00 C0 06 08 C5 01 04 00 .u...Z.!........
0036F0: ED B0 01 FC 07 09 C1 10 F3 3C FE 7B 20 DE 21 23 .........<.{ .!#
003700: A0 CD 27 6D 21 A8 71 22 38 6C 22 7E 6C 21 8A 72 ..'m!.q"8l"~l!.r
003710: 22 3E 6C 22 A6 6C CD 34 6C AF CD 0E BC CD 6D 6B ">l".l.4l.....mk
003720: 21 96 C3 22 A1 71 CD FB 6C 21 27 71 CD 4D 6E 21 !..".q..l!'q.Mn!
003730: 0D 71 CD 27 6D 06 4B C5 CD 81 6B C1 10 F9 21 30 .q.'m.K...k...!0
003740: 30 22 94 71 22 96 71 3E 0A 32 99 71 CD 5C 6C 21 0".q".q>.2.q.\l!
003750: A6 72 22 38 6C 22 7E 6C 21 85 76 22 3E 6C 22 A6 .r"8l"~l!.v">l".
003760: 6C CD 34 6C 06 0A C5 21 CF 70 16 00 58 19 19 7E l.4l...!.p..X..~
003770: 32 9C 71 E5 CD B7 6E E1 23 46 3E 0D 80 47 C5 CD 2.q...n.#F>..G..
003780: 19 BD CD 49 6D DD 21 11 A0 06 03 C5 CD FA 6D 01 ...Im.!.......m.
003790: F0 FF DD 09 C1 10 F4 C1 10 E4 C1 10 C9 3E 01 CD .............>..
0037A0: 0E BC C3 5C 6C 06 1E DD 21 23 A1 C5 CD F2 6B DD ...\l...!#....k.
0037B0: 23 DD 23 DD 23 C1 10 F3 C9 DD 21 23 A1 06 1E C5 #.#.#.....!#....
0037C0: DD 4E 00 DD 46 01 AF CD 19 6C DD 7E 00 4F D6 4F .N..F....l.~.O.O
0037D0: CD C8 6B 81 4F FE A0 30 1A DD 7E 01 47 D6 64 CD ..k.O..0..~.G.d.
0037E0: C8 6B 80 47 FE C8 30 0B DD 71 00 DD 70 01 CD 17 .k.G..0..q..p...
0037F0: 6C 18 03 CD F2 6B DD 23 DD 23 DD 23 C1 10 C0 C9 l....k.#.#.#....
003800: CC 4C 00 C4 CC 8C 88 C4 CC CC 4C C4 CC CC 0C C4 .L........L.....
003810: CC CC 0C C4 CC 8C 0C 84 0C 0C 08 84 0C 0C 00 0C ................
003820: 0C 08 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003830: 00 00 00 00 00 00 00 00 00 00 0F 00 00 45 0A 00 .............E..
003840: 00 CF 51 00 05 0A 73 00 8F 11 22 00 8A F3 15 05 ..Q...s...".....
003850: 8A A2 3F 05 11 05 0A 45 11 2F 00 45 22 2A 11 4F ..?....E./.E"*.O
003860: B7 55 9B 0A A7 AA 8A 5B A7 11 00 9B 05 11 00 9B .U.....[........
003870: 3F 8A 05 9B 2A 8A 8A CF 00 00 00 45 0A 00 00 22 ?...*......E..."
003880: 0F 00 00 73 45 8A 00 51 A2 8F 00 0A 33 05 00 0F ...sE..Q....3...
003890: 11 05 8A 15 2A A2 8A 00 2F A2 0A 8A 05 51 0A 9B ....*.../....Q..
0038A0: 0A 1B 4F 11 45 3B 45 00 8A 3B 45 00 8A 2A A7 22 ..O.E;E..;E..*."
0038B0: 11 0F A7 51 11 05 A7 5B 0A 22 0A 5B 0F 22 11 5B ...Q...[.".[.".[
0038C0: 15 45 00 8A 37 45 00 8A 37 8A 22 8F 27 05 67 05 .E..7E..7.".'.g.
0038D0: A2 0A 45 05 51 1F 00 45 51 15 2A 45 0A 22 0F 00 ..E.Q..EQ.*E."..
0038E0: 0A 33 05 00 4F 51 A2 00 45 8A B3 00 00 0F 11 00 .3..OQ..E.......
0038F0: 00 05 8A 00 00 00 CF 11 45 15 67 0A 45 3F 67 00 ........E.g.E?g.
003900: 22 0A 67 00 22 5B A7 45 55 5B 05 67 AA 7B 8F 22 ".g."[.EU[.g.{."
003910: 15 11 8A 00 1F 22 8A 05 0A 22 0A 3F 51 45 0A 2A ....."...".?QE.*
003920: F3 45 00 11 22 4F 00 B3 05 0A 00 A2 CF 00 00 05 .E.."O..........
003930: 8A 00 00 0F 00 00 00 00 00 00 00 00 00 00 00 00 ................
003940: 00 00 00 00 00 00 00 00 00 00 00 00 A8 54 00 54 .............T.T
003950: A8 FC 54 FC FC FC FC A8 FC 54 A8 00 A8 54 00 00 ..T......T...T..
003960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003970: 00 00 00 00 00 00 00 3C 3C 36 3C 3C 16 3C 3C 29 .......<<6<<.<<)
003980: 3C 3C 29 3C 3C 29 3C FC FC FC FC FC FC FC FC FC <<)<<)<.........
003990: FC FC FC FC FC FC FC 33 33 33 33 33 33 33 33 33 .......333333333
0039A0: 33 33 33 33 33 33 33 00 76 00 FC 11 FC 54 FC 76 3333333.v....T.v
0039B0: FC 76 FC FC FC FC FC B9 00 FC 00 FC 22 FC A8 FC .v.........."...
0039C0: B9 FC B9 FC FC FC FC FC FC FC FC 76 FC 76 FC 54 ...........v.v.T
0039D0: FC 11 FC 00 FC 00 76 FC FC FC FC FC B9 FC B9 FC ......v.........
0039E0: A8 FC 22 FC 00 B9 00 00 33 00 33 11 33 11 33 33 ..".....3.3.3.33
0039F0: 33 33 33 33 33 33 33 33 00 33 00 33 22 33 22 33 33333333.3.3"3"3
003A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
003A10: 03 00 01 00 02 09 4E E5 03 00 C1 02 00 00 00 02 ......N.........
003A20: 03 00 C6 02 00 00 00 02 03 00 C2 02 00 00 00 02 ................
003A30: 03 00 C7 02 00 00 00 02 03 00 C3 02 00 00 00 02 ................
003A40: 03 00 C8 02 00 00 00 02 03 00 C4 02 00 00 00 02 ................
003A50: 03 00 C9 02 00 00 00 02 03 00 C5 02 00 00 00 02 ................
003A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003B00: CB 7F C5 28 15 ED 44 CB 2F CB 2F DD 46 02 CB 2F ...(..D././.F../
003B10: 10 FC B7 20 01 3C ED 44 C1 C9 CB 2F CB 2F DD 46 ... .<.D..././.F
003B20: 02 CB 2F 10 FC B7 C1 C0 3C C9 3E 4D CD CB 6C C6 ../.....<.>M..l.
003B30: 2A DD 77 00 3E 74 CD CB 6C C6 2A DD 77 01 47 DD *.w.>t..l.*.w.G.
003B40: 4E 00 CD 17 6C 3E 02 CD CB 6C 3C DD 77 02 C9 3E N...l>...l<.w..>
003B50: 01 CD DE BB 26 00 69 29 29 EB 26 00 68 29 D5 E5 ....&.i)).&.h)..
003B60: CD F0 BB E1 D1 FE 02 D0 CD EA BB C9 CD A7 BC 21 ...............!
003B70: A6 72 22 A4 71 21 85 76 22 A6 71 21 1E 94 11 66 .r".q!.v".q!...f
003B80: 6C 01 00 80 CD EF BC 21 18 94 01 03 00 11 03 00 l......!........
003B90: CD E9 BC C9 21 18 94 CD EC BC CD A7 BC C9 DD E5 ....!...........
003BA0: F5 C5 D5 E5 3A A3 71 EE 01 32 A3 71 28 28 2A A4 ....:£q..2£q((*.
003BB0: 71 7E B7 20 06 21 A6 72 22 A4 71 E5 11 2E 94 01 q~. .!.r".q.....
003BC0: 09 00 ED B0 21 2E 94 CD AA BC E1 30 2F 11 09 00 ....!......0/...
003BD0: 19 22 A4 71 18 26 2A A6 71 7E B7 20 06 21 85 76 .".q.&*.q~. .!.v
003BE0: 22 A6 71 E5 11 2E 94 01 09 00 ED B0 21 2E 94 CD ".q.........!...
003BF0: AA BC E1 30 07 11 09 00 19 22 A6 71 E1 D1 C1 F1 ...0.....".q....
003C00: DD E1 C9 ED 5B 25 71 CD EE 6C E5 1E 4B 3A 25 71 ....[%q..l..K:%q
003C10: CD EE 6C 11 4B 00 19 11 01 01 AF ED 52 30 FC 19 ..l.K.......R0..
003C20: 2B 22 25 71 F1 C9 67 2E 00 55 06 08 29 30 01 19 +"%q..g..U..)0..
003C30: 10 FA C9 3A A2 71 B7 C8 11 13 7A 2A A1 71 06 18 ...:.q....z*.q..
003C40: C5 01 04 00 EB ED B0 EB 01 FC 07 09 30 04 01 50 ............0..P
003C50: C0 09 C1 10 EB C9 3A 6A 70 B7 28 03 21 6B 70 46 ......:jp.(.!kpF
003C60: 23 4E 2B E5 CD 38 BC E1 06 10 C5 3E 10 90 46 23 #N+..8.....>..F#
003C70: 4E 23 E5 CD 32 BC E1 C1 10 F0 C9 7A B3 C8 1B 18 N#..2......z....
003C80: FA FD 21 A8 9F DD 21 F1 9F FD 7E 00 B7 C8 26 00 ..!...!...~...&.
003C90: FD 6E 04 54 FD 5E 03 CD 1D BC DD 75 00 DD 74 01 .n.T.^.....u..t.
003CA0: FD 7E 00 3D 20 2B FD 7E 05 ED 44 FD 77 05 FD 7E .~.= +.~..D.w..~
003CB0: 06 ED 44 FD 77 06 FD 7E 07 FD 46 08 FD 4E 0A FD ..D.w..~..F..N..
003CC0: 71 08 FD 70 0A FD 46 09 FD 4E 0B FD 71 09 FD 70 q..p..F..N..q..p
003CD0: 0B FD 77 00 FD 7E 05 FD 4E 03 81 FD 77 03 5F FD ..w..~..N...w._.
003CE0: 7E 06 FD 4E 04 81 FD 77 04 26 00 6F 54 CD 1D BC ~..N...w.&.oT...
003CF0: DD 75 02 DD 74 03 FD 5E 08 FD 56 09 26 00 FD 6E .u..t..^..V.&..n
003D00: 06 7E 0C DE 16 6A 19 52 17 7E 13 81 AB 77 04 91 .~...j.R.~...w..
003D10: 04 D1 E1 19 C3 4A 01 82 2B A1 8B 04 9E 04 E1 D1 .....J..+.......
003D20: 7E 83 77 23 7E 8A 77 C3 4B 01 82 2B AD 97 04 C3 ~.w#~.w.K..+....
003D30: 06 0F 06 3F 06 04 00 FC 17 7E 13 C5 2B 6C 6F 6F ...?.....~..+loo
003D40: F0 AA 04 C3 06 8A 16 03 00 1C 0D 88 0F 1F 07 F6 ................
003D50: 14 EB 04 DB 04 7E 13 81 AC BB 04 C3 06 F6 14 84 .....~..........
003D60: 03 70 06 47 0E 7E 13 81 AD D7 04 ED 04 D1 E1 CD .p.G.~..........
003D70: D3 1A C3 4A 01 85 2D 66 69 6E E4 E7 04 C3 06 2F ...J..-fin...../
003D80: 07 7E 13 89 2D 74 72 61 69 6C 69 6E E7 F5 04 C3 .~..-trailin....
003D90: 06 C8 12 06 06 D6 08 9E 11 8F 04 65 06 F4 0E 84 ...........e....
003DA0: 0E 67 0C 3F 06 08 00 1A 16 B9 0E 04 00 65 06 50 .g.?.........e.P
003DB0: 06 64 07 E4 FF 7E 13 81 AE 03 05 C3 06 12 1A 0A .d...~..........
003DC0: 11 7E 13 C2 2E A2 37 05 C3 06 14 04 F4 0E 8A 16 .~....7.........
003DD0: 22 00 5B 0C 3F 06 0C 00 50 06 75 0C 9C 04 B9 0E ".[.?...P.u.....
003DE0: 40 00 8A 16 22 00 CF 1A B0 0D 3F 06 06 00 88 0F @...".....?.....
003DF0: 46 07 71 1D C8 12 F4 0E 59 06 7D 18 8F 04 F4 0E F.q.....Y.}.....
003E00: 8A 16 22 00 5B 0C 3C 18 8B 0D CF 1A B0 0D 3F 06 ..".[.<.......?.
003E10: 0C 00 F4 0E 59 06 47 0E B9 0E 06 00 18 10 79 1B ....Y.G.......y.
003E20: 7E 13 85 2E 6C 69 6E E5 43 05 C3 06 95 0A 0F 05 ~...lin.C.......
003E30: 79 1B 7E 13 82 2E F2 A2 05 C3 06 7E 0C 12 1A 6A y.~........~...j
003E40: 19 1A 11 7E 13 81 AF B4 05 C3 06 F6 05 E1 1A BC ...~............
003E50: 12 7E 13 C5 2F 6C 6F 6F F0 C5 05 C3 06 8A 16 03 .~../loo........
003E60: 00 1C 0D 88 0F 64 07 F6 14 EB 04 DB 04 7E 13 84 .....d.......~..
003E70: 2F 6D 6F E4 D3 05 C3 06 7E 0C 12 1A 6A 19 52 17 /mo.....~...j.R.
003E80: 7E 13 81 B0 EF 05 AD 0F 00 00 82 30 BC 02 06 11 ~..........0....
003E90: 06 E1 29 21 00 00 D2 1A 06 23 C3 4A 01 82 30 BD ..)!.....#.J..0.
003EA0: 0A 06 C3 06 3C 18 7E 13 82 30 BE 1D 06 C3 06 06 ....<.~..0......
003EB0: 06 67 0C 7E 13 87 30 62 72 61 6E 63 E8 28 06 41 .g.~..0branc.(.A
003EC0: 06 E1 7D B4 CA BB 0E 03 03 C3 4B 01 81 B1 35 06 ..}.......K...5.
003ED0: AD 0F 01 00 82 31 AB 4C 06 5B 06 E1 23 C3 4A 01 .....1.L.[..#.J.
003EE0: 82 31 AD 54 06 67 06 E1 2B C3 4A 01 81 B2 60 06 .1.T.g..+.J...`.
003EF0: AD 0F 02 00 82 32 AA 6C 06 7B 06 E1 29 C3 4A 01 .....2.l.{..).J.
003F00: 01 2C FD 7E 02 BD 20 01 6C FD 75 01 29 29 29 29 .,.~.. .l.u.))))
003F10: 29 29 19 DD 7E 04 DD 77 06 DD 7E 05 DD 77 07 DD ))..~..w..~..w..
003F20: 75 04 DD 74 05 01 08 00 DD 09 01 0C 00 FD 09 C3 u..t............
003F30: 51 6D 11 23 A0 CD 19 BD DD 7E 01 B7 28 3B 67 DD Qm.#.....~..(;g.
003F40: 6E 00 CD 4C 70 DD 7E 09 B7 28 0A 67 DD 6E 08 11 n..Lp.~..(.g.n..
003F50: 23 A0 CD 4C 70 DD 6E 02 DD 66 03 DD 5E 04 DD 56 #..Lp.n..f..^..V
003F60: 05 CD 4C 70 DD 7E 09 B7 28 15 DD 6E 0A DD 66 0B ..Lp.~..(..n..f.
003F70: DD 5E 0C DD 56 0D C3 4C 70 11 86 00 C3 43 6D 11 .^..V..Lp....Cm.
003F80: 43 00 C3 43 6D 7E FE FF C8 CD 5A BB 23 18 F6 FD C..Cm~....Z.#...
003F90: 6E 00 FD 23 FD 66 00 FD 23 22 83 71 C5 FD 7E 00 n..#.f..#".q..~.
003FA0: CD 71 6E FD 23 C1 10 F4 C9 D6 20 26 00 6F 29 29 .qn.#..... &.o))
003FB0: 29 29 29 11 48 94 19 ED 5B 83 71 06 08 C5 01 04 ))).H...[.q.....
003FC0: 00 ED B0 EB 01 FC 07 09 EB C1 10 F1 2A 83 71 23 ............*.q#
003FD0: 23 23 23 22 83 71 C9 21 A8 9F 11 A9 9F 01 D4 01 ###".q.!........
003FE0: AF 77 ED B0 21 23 A0 CD 27 6D AF CD 0E BC C9 CD .w..!#..'m......
003FF0: 9F 6E 21 90 7B 3A 9C 71 FE 01 28 17 3D 47 11 19 .n!.{:.q..(.=G..
004000: 00 19 7E FE FF 20 05 1E 21 19 18 05 1E 07 19 18 ..~.. ..!.......
004010: F1 10 EB 22 9D 71 21 95 84 3A 9C 71 FE 01 28 0F ...".q!..:.q..(.
004020: 3D 47 7E B7 28 06 11 0A 00 19 18 F6 23 10 F3 22 =G~.(.......#.."
004030: 9F 71 3A 99 71 47 21 28 C0 11 73 7A CD 4C 70 23 .q:.qG!(..sz.Lp#
004040: 23 23 23 10 F7 FD 21 85 71 06 08 CD 57 6E FD 23 ###...!.q...Wn.#
004050: FD 23 FD 23 06 04 CD 57 6E FD 2A 9D 71 01 04 00 .#.#...Wn.*.q...
004060: FD 09 06 14 21 F0 C0 22 83 71 CD 64 6E FD 7E 00 ....!..".q.dn.~.
004070: FD 23 B7 28 0B FD E5 FD 21 73 7B CD D4 6F FD E1 .#.(....!s{..o..
004080: CD D4 6F FD E5 21 A8 9F 22 9A 71 2A 9F 71 DD 21 ..o..!..".q*.q.!
004090: F1 9F CD 8D 6F 3A 9C 71 FE 0B 21 00 00 22 A1 71 ....o:.q..!..".q
0040A0: 30 1B 3D CB 27 CB 27 FD 21 E5 70 16 00 5F FD 19 0.=.'.'.!.p.._..
0040B0: FD 5E 00 62 FD 6E 01 CD 1D BC 22 A1 71 CD FB 6C .^.b.n....".q..l
0040C0: E1 23 C3 1E 6D 7E B7 C8 ED 5B 9A 71 D5 FD E1 AF .#..m~...[.q....
0040D0: 13 12 13 01 0A 00 ED B0 ED 53 9A 71 FD 7E 07 FD .........S.q.~..
0040E0: 77 00 FD 7E 08 DD 77 04 FD 7E 09 DD 77 05 E5 26 w..~..w..~..w..&
0040F0: 00 FD 6E 04 54 FD 5E 03 CD 1D BC FD 5E 08 FD 56 ..n.T.^.....^..V
004100: 82 32 AB 74 06 87 06 E1 23 23 C3 4A 01 82 32 AD .2.t....##.J..2.
004110: 80 06 94 06 E1 2B 2B C3 4A 01 82 32 AF 8D 06 C3 .....++.J..2....
004120: 06 70 06 C9 05 7E 13 81 BA 9A 06 C3 06 8D 1A AE .p...~..........
004130: 10 84 03 BC 10 B0 0D C0 0F 84 03 38 10 59 1A DE ...........8.Y..
004140: 1D 98 07 2A 47 01 2B 70 2B 71 22 47 01 13 4B 42 ...*G.+p+q"G..KB
004150: C3 4B 01 C1 BB A7 06 C3 06 C3 0C 88 0F 7E 13 59 .K...........~.Y
004160: 1A A8 1D 7E 13 81 BC D3 06 EB 06 D1 E1 7A AC FA ...~.........z..
004170: F5 06 CD D3 1A 24 25 FA 00 07 21 00 00 C3 4A 01 .....$%...!...J.
004180: 21 01 00 C3 4A 01 82 3C A3 E5 06 C3 06 8B 18 16 !...J..<£.......
004190: 15 84 03 7E 13 87 3C 2B 6C 6F 6F 70 BE 06 07 21 ...~..<+loop...!
0041A0: 07 D1 C3 07 0B 87 3C 2D 66 69 6E 64 BE 15 07 C3 ......<-find....
0041B0: 06 84 0E 71 1D C0 0F B0 0D B0 0D D5 09 7E 13 84 ...q.........~..
0041C0: 3C 2E 22 BE 25 07 C3 06 7F 19 18 10 C8 12 59 06 <.".%.........Y.
0041D0: 6A 19 8F 04 7E 0C 79 1B 7E 13 87 3C 2F 6C 6F 6F j...~.y.~..</loo
0041E0: 70 BE 3F 07 66 07 D1 2A 47 01 7E 83 77 5F 23 7E p.?.f..*G.~.w_#~
0041F0: 8A 77 23 14 15 57 DA 84 07 7B 96 7A 23 9E DA BB .w#..W...{.z#...
004200: 0E C3 85 07 23 23 22 47 01 03 03 C3 4B 01 87 3C ....##"G....K..<
004210: 3B 63 6F 64 65 BE 5A 07 C3 06 6A 19 08 16 AB 18 ;code.Z...j.....
004220: 03 0F 84 03 7E 13 88 3C 3C 63 6D 6F 76 65 BE 8E ....~..<<cmove..
004230: 07 B3 07 69 60 C1 D1 E3 09 2B EB 09 2B EB 78 B1 ...i`....+..+.x.
004240: CA CB 07 7E 2B 12 1B 0B C2 BE 07 C1 C3 4B 01 8B ...~+........K..
004250: 3C 3F 74 65 72 6D 69 6E 61 6C BE A6 07 DF 07 CD <?terminal......
004260: 09 BB 21 00 00 D2 E9 07 2C C3 4A 01 88 3C 61 62 ..!.....,.J..<ab
004270: 6F 72 74 22 BE CF 07 C3 06 3F 06 14 00 B1 1C 29 ort".....?.....)
004280: 10 7F 19 18 10 79 1B 6B 1A 24 19 B9 0E 0E 00 6A .....y.k.$.....j
004290: 19 C8 12 F4 0E 8F 04 59 06 7E 0C 7E 13 87 3C 61 .......Y.~.~..<a
0042A0: 62 6F 72 74 BE EC 07 C3 06 6B 1A 36 0D A7 14 CB bort.....k.6....
0042B0: 11 24 19 7E 13 87 3C 62 6C 6F 63 6B BE 1D 08 C3 .$.~..<block....
0042C0: 06 C8 12 C8 12 D5 03 67 0C E1 1A 50 06 E9 06 5F .......g...P..._
0042D0: 18 F7 07 05 72 61 6E 67 65 65 06 8A 16 00 04 60 ....rangee.....`
0042E0: 04 E8 13 8F 04 7E 13 86 3C 63 6D 6F 76 E5 35 08 .....~..<cmov.5.
0042F0: C3 06 C8 12 50 06 E9 06 3F 06 0A 00 90 11 BC 12 ....P...?.......
004300: 09 CD 4C 70 01 08 00 DD 09 E1 18 B9 FD 7E 00 FE ..Lp.........~..
004310: FF C8 FD 5E 01 FD 56 02 FD 4E 03 FD 46 04 FD 6E ...^..V..N..F..n
004320: 05 FD 66 06 FE 0A 28 0A FE 0B 20 0C 79 01 01 01 ..f...(... .y...
004330: 18 06 21 C1 70 01 01 01 F5 E5 C5 3E 14 92 CB 27 ..!.p......>...'
004340: CB 27 CB 27 3D 26 00 6F 54 CB 23 CB 23 CD 1D BC .'.'=&.oT.#.#...
004350: C1 D1 F1 C5 E5 41 CD 34 70 23 23 10 F9 E1 0E 50 .....A.4p##....P
004360: 09 C1 10 EF 01 07 00 FD 09 C3 D4 6F C5 D5 E5 06 ...........o....
004370: 08 C5 01 02 00 EB ED B0 EB 01 FE 07 09 C1 10 F1 ................
004380: E1 D1 C1 C9 C5 D5 E5 06 10 C5 01 04 00 EB ED B0 ................
004390: EB 01 FC 07 09 30 04 01 50 C0 09 C1 10 EB E1 D1 .....0..P.......
0043A0: C1 C9 00 00 00 0D 0D 06 06 14 14 12 12 08 08 18 ................
0043B0: 18 1A 1A 14 14 1A 1A 12 00 00 12 09 09 14 02 02 ................
0043C0: 14 0F 0F 1F 06 13 41 72 65 20 79 6F 75 20 75 73 ......Are you us
0043D0: 69 6E 67 20 61 20 47 72 65 65 6E 20 53 63 72 65 ing a Green Scre
0043E0: 65 6E 20 3F 1F 0B 15 50 72 65 73 73 20 59 20 6F en ?...Press Y o
0043F0: 72 20 4E 20 3A 2D 20 8F FF 51 2A 3E 71 B2 1D 2E r N :- ..Q*>q...
004400: 79 A6 3D 3A 59 B6 35 15 A2 0A 28 09 3C 08 28 07 y.=:Y.5...(.<.(.
004410: 28 06 28 05 28 04 28 03 3C 02 28 01 28 94 2F 90 (.(.(.(.<.(.(./.
004420: 27 94 87 90 7F 90 4F 8C 47 00 77 04 6F 4C 47 48 '.....O.G.w.oLGH
004430: 3F 04 6F 08 67 04 67 08 5F 04 27 08 1F 34 5F 38 ?.o.g.g._.'..4_8
004440: 57 04 1F 08 17 00 00 1A 1A 06 06 14 14 12 12 08 W...............
004450: 08 18 18 1A 1A 12 12 03 03 06 06 02 02 00 00 1F ................
004460: 03 05 0F 08 41 6D 73 6F 66 74 20 20 50 72 65 73 ....Amsoft Pres
004470: 65 6E 74 73 1F 04 07 0F 02 52 4F 4C 41 4E 44 20 ents.....ROLAND
004480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0044A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0044B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0044C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0044D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0044E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0044F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004500: B9 0E 04 00 B1 07 7E 13 87 3C 63 6D 6F 76 65 BE ......~..<cmove.
004510: 67 08 94 08 69 60 C1 D1 E3 C3 A1 08 7E 23 12 13 g...i`......~#..
004520: 0B 78 B1 C2 9C 08 C1 C3 4B 01 84 3C 63 72 BE 88 .x......K..<cr..
004530: 08 B3 08 2A 74 18 EB 2A 45 01 19 36 00 23 36 00 ...*t..*E..6.#6.
004540: C5 0E 0D CD 59 01 0E 0A CD 59 01 C1 C3 4B 01 84 ....Y....Y...K..
004550: 3C 64 6F BE AA 08 D8 08 2A 47 01 2B 2B 2B 2B 22 <do.....*G.++++"
004560: 47 01 D1 73 23 72 D1 23 73 23 72 C3 4B 01 86 3C G..s#r.#s#r.K..<
004570: 65 6D 69 74 BE CF 08 F9 08 E1 C5 4D CD 59 01 C1 emit.......M.Y..
004580: 2A 74 18 EB 2A 45 01 19 5E 23 56 13 72 2B 73 C3 *t..*E..^#V.r+s.
004590: 4B 01 88 3C 65 78 70 65 63 74 BE EE 08 C3 06 8A K..<expect......
0045A0: 16 03 00 F7 08 7D 18 8F 04 7D 18 D6 08 F9 15 C8 .....}...}......
0045B0: 12 8A 16 08 00 5B 0C 7D 18 8A 16 7E 00 67 0C 5F .....[.}...~.g._
0045C0: 18 3F 06 32 00 BC 12 C8 12 5E 15 5B 0C C8 12 6A .?.2.....^.[...j
0045D0: 19 92 06 8F 04 7E 0C 3F 06 0A 00 8A 16 07 00 B9 .....~.?........
0045E0: 0E 10 00 8A 16 08 00 C8 12 F7 12 8A 16 20 00 F7 ............. ..
0045F0: 12 B9 0E 28 00 C8 12 8A 16 20 00 E9 06 3F 06 0E ...(..... ...?..
004600: 00 1A 16 BC 12 84 0E 06 06 B9 0E 04 00 C8 12 5E ...............^
004610: 15 CC 0E 06 06 5E 15 59 06 84 03 F7 12 50 06 64 .....^.Y.....P.d
004620: 07 8C FF BC 12 70 06 F7 08 7E 13 86 3C 66 69 6C .....p...~..<fil
004630: 6C BE 12 09 B6 09 69 60 D1 C1 E3 EB 78 B1 CA C8 l.....i`....x...
004640: 09 7D 12 13 0B C3 BC 09 C1 C3 4B 01 86 3C 66 69 .}........K..<fi
004650: 6E 64 BE AB 09 D7 09 D1 E1 E5 1A AE E6 3F C2 03 nd...........?..
004660: 0A 23 13 1A AE 87 C2 00 0A D2 E1 09 21 05 00 19 .#..........!...
004670: E3 1B 1A B7 F2 F1 09 5F 16 00 21 01 00 C3 49 01 ......._..!...I.
004680: DA 09 0A 13 1A B7 F2 03 0A 13 EB 5E 23 56 7A B3 ...........^#Vz.
004690: C2 D8 09 E1 21 00 00 C3 4A 01 8B 3C 69 6E 74 65 ....!...J..<inte
0046A0: 72 70 72 65 74 BE CC 09 C3 06 FD 04 3F 06 1C 00 rpret.......?...
0046B0: CF 1A B0 0D E9 06 3F 06 0A 00 03 0F DB 04 B9 0E ......?.........
0046C0: 06 00 03 0F 71 13 B9 0E 1A 00 F6 14 54 18 A5 12 ....q.......T...
0046D0: B0 0D 59 06 3F 06 08 00 25 12 B9 0E 06 00 BC 12 ..Y.?...%.......
0046E0: 9F 16 36 0D B9 0E C4 FF 7E 13 85 3C 6B 65 79 BE ..6.....~..<key.
0046F0: 1A 0A 74 0A CD 06 BB FE 19 5F C2 86 0A 21 65 13 ..t......_...!e.
004700: 00 43 50 43 46 54 48 32 20 42 49 4E 00 00 00 00 .CPCFTH2 BIN....
004710: 00 00 02 00 00 00 01 00 D6 1F 00 01 00 00 00 00 ................
004720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004730: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004740: D6 1F 00 D1 04 C3 06 8A 16 50 00 72 18 84 03 C0 .........P.r....
004750: 0F B0 0D B0 0D 8A 16 50 00 72 18 B0 0D EB 04 7D .......P.r.....}
004760: 18 F4 0E 8A 16 1F 00 55 0E 8A 16 04 00 8F 04 E9 .......U........
004770: 06 3F 06 0A 00 29 10 06 06 72 18 84 03 C8 12 56 .?...)...r.....V
004780: 2A 37 01 F9 CD C8 BC CD 37 BD 21 10 D0 36 C3 2B *7......7.!..6.+
004790: 36 53 2B 36 49 2B 36 44 E5 CD D4 BC 21 FF B0 0E 6S+6I+6D....!...
0047A0: 07 D4 CE BC E1 CD D4 BC 3E 00 DC 1B 00 01 33 01 ........>.....3.
0047B0: C3 4B 01 46 0F 78 20 FA AB 00 C0 40 00 1F 00 D6 .K.F.x ....@....
0047C0: 20 D6 20 AD 14 00 BF FA BF D5 E5 CD 6F 01 0A 03 . .........o...
0047D0: 6F 0A 03 67 5E 23 56 EB E9 79 CD 5A BB 3A 65 13 o..g^#V..y.Z.:e.
0047E0: B7 C8 CD 6F 01 CD 2E BD DA 5D 01 79 C3 2B BD C5 ...o.....].y.+..
0047F0: 3E 42 CD 1E BB C1 C8 CD 09 BB DA 77 01 CD 18 BB >B.........w....
004800: D6 FC C0 32 65 13 CD 5D BB CD A7 BC 01 92 01 C3 ...2e..]........
004810: 4B 01 24 19 86 65 73 63 64 69 F3 00 00 9F 01 21 K.$..escdi.....!
004820: 00 00 22 4B 01 22 4C 01 C3 4B 01 85 65 73 63 65 .."K."L..K..esce
004830: EE 94 01 B5 01 3E CD 32 4B 01 21 6F 01 22 4C 01 .....>.2K.!o."L.
004840: C3 4B 01 84 6E 6F 6F F0 AB 01 C3 06 7E 13 83 72 .K..noo.....~..r
004850: 75 EE C3 01 C3 06 7E 13 7E 13 83 63 61 F4 CE 01 u.....~.~..ca...
004860: E2 01 3A 9D 12 16 00 5F 2A 45 01 19 5E 23 56 C5 ..:...._*E..^#V.
004870: CD 9B BC C1 C3 4B 01 84 69 6E 69 F4 DA 01 00 02 .....K..ini.....
004880: C5 CD A7 BC CD 00 BB CD 4E BB CD BA BB CD FF BB ........N.......
004890: CD 65 BC CD 9C BB C1 C3 4B 01 84 77 61 72 ED F7 .e......K..war..
0048A0: 01 C3 06 FE 01 70 06 C7 02 46 07 1A 63 70 63 46 .....p...F..cpcF
0048B0: 4F 52 54 48 20 76 2E 20 31 2E 31 2E 30 20 2F 20 ORTH v. 1.1.0 /
0048C0: 38 37 30 33 31 36 B1 08 46 07 21 41 64 61 70 74 870316..F.!Adapt
0048D0: 65 64 20 66 72 6F 6D 20 4D 56 50 2D 46 4F 52 54 ed from MVP-FORT
0048E0: 48 20 76 2E 20 31 2E 30 31 2E 30 33 B1 08 46 07 H v. 1.01.03..F.
0048F0: 28 50 2E 20 4C 55 4B 45 53 2C 20 32 36 20 4E 6F (P. LUKES, 26 No
004900: 1E 07 7E EE 01 77 6B 26 00 C3 4A 01 86 3C 6C 69 ..~..wk&..J..<li
004910: 6E 65 BE 6A 0A C3 06 AA 0E E1 1A EB 0E 60 04 8F ne.j.........`..
004920: 04 EB 0E 7E 13 86 3C 6C 6F 61 64 BE 8C 0A C3 06 ...~..<load.....
004930: C8 12 65 06 0F 06 F7 07 0A 75 6E 6C 6F 61 64 61 ..e......unloada
004940: 62 6C 65 C8 12 3F 08 8A 16 FF 03 8F 04 06 06 E1 ble..?..........
004950: 1A CC 0E 9E 0E B0 0D 7E 0C 75 0C B0 0D 7E 0C 06 .......~.u...~..
004960: 06 75 0C 84 03 9E 0E 84 03 D9 15 6A 19 75 0C 84 .u.........j.u..
004970: 03 6A 19 9E 0E 84 03 7E 13 86 3C 6C 6F 6F 70 BE .j.....~..<loop.
004980: A5 0A 04 0B 11 01 00 2A 47 01 C5 7E 83 77 4F 23 .......*G..~.wO#
004990: 7E 8A 47 7E FA 27 0B A2 F2 2B 0B 23 23 23 22 47 ~.G~.'...+.###"G
0049A0: 01 C1 03 03 C3 4B 01 B2 F2 1B 0B 70 79 23 96 23 .....K.....py#.#
0049B0: 78 9E 78 FA 51 0B A7 FA 43 0B 7A A7 F2 1D 0B C1 x.x.Q...C.z.....
0049C0: C3 BB 0E 7E A7 FA 3A 0B 7A A7 FA 1D 0B C1 C3 BB ...~..:.z.......
0049D0: 0E 78 A7 FA 48 0B C3 43 0B 88 3C 6E 75 6D 62 65 .x..H..C..<numbe
0049E0: 72 BE F9 0A C3 06 06 06 06 06 EB 19 C8 12 59 06 r.............Y.
0049F0: F4 0E 8A 16 2D 00 5B 0C C8 12 7E 0C 8F 04 8A 16 ....-.[...~.....
004A00: FF FF A5 12 84 03 CE 0F C8 12 F4 0E 84 0E 67 0C ..............g.
004A10: 3F 06 28 00 C8 12 F4 0E 8A 16 2E 00 5B 0C 3C 18 ?.(.........[.<.
004A20: F7 07 02 3F 3F 06 06 A5 12 84 03 CE 0F C8 12 F4 ...??...........
004A30: 0E 84 0E 67 0C F7 07 02 3F 3F BC 12 6A 19 3F 06 ...g....??..j.?.
004A40: 04 00 41 12 7E 13 8E 3C 76 6F 63 61 62 75 6C 61 ..A.~..<vocabula
004A50: 72 79 37 39 BE 59 0B C3 06 38 10 8A 16 81 A0 DB ry79.Y...8......
004A60: 04 8A 16 A9 14 DB 04 F6 14 92 1C B0 0D DB 04 92 ................
004A70: 1C 84 03 98 07 CD 86 12 85 06 C0 0F 84 03 7E 13 ..............~.
004A80: 86 3C 77 6F 72 64 BE C6 0B C3 06 14 04 E1 1A 27 .<word.........'
004A90: 13 9E 11 67 0C 3F 06 10 00 90 11 90 11 06 06 F6 ...g.?..........
004AA0: 14 84 03 B9 0E 2E 00 75 0C 9C 04 7D 18 EB 04 C8 .......u...}....
004AB0: 12 7E 0C F6 14 CC 0E 8F 04 F6 14 59 06 6A 19 C8 .~.........Y.j..
004AC0: 12 8A 16 FF 00 67 0C F7 07 05 3E 5F 32 35 35 59 .....g....>_255Y
004AD0: 06 27 0F F6 14 7E 13 81 BD 00 0C C3 06 EB 04 3C .'...~.........<
004AE0: 18 7E 13 81 BE 57 0C C3 06 E1 1A E9 06 7E 13 83 .~...W.......~..
004AF0: 3E 69 EE 63 0C 66 1C 14 00 82 3E F2 6F 0C 80 0C >i.c.f....>.o...
004B00: 6C 6C 20 53 74 2E 2C 20 54 4F 4F 57 4F 4F 4D 42 ll St., TOOWOOMB
004B10: 41 2C 20 51 20 34 33 35 30 B1 08 46 07 1E 50 75 A, Q 4350..F..Pu
004B20: 62 6C 69 63 20 44 6F 6D 61 69 6E 2C 20 70 61 79 blic Domain, pay
004B30: 2D 69 66 2D 79 6F 75 2D 6C 69 6B 65 B1 08 7E 13 -if-you-like..~.
004B40: 84 6D 6F 64 E5 1A 02 C9 02 E1 C5 7D CD 0E BC CD .mod.......}....
004B50: 6C BB CD 81 BB C1 C3 4B 01 89 63 61 73 69 6E 6F l......K..casino
004B60: 70 65 EE C0 02 E7 02 D1 E1 C5 06 0C CD 77 BC 21 pe...........w.!
004B70: 00 00 DA F6 02 6F E5 DA FD 02 CD 7D BC E1 C1 C3 .....o.....}....
004B80: 4A 01 89 63 61 73 69 6E 63 68 61 F2 D9 02 10 03 J..casincha.....
004B90: D1 E1 CD 80 BC D2 20 03 77 23 1B 7A B3 C2 12 03 ...... .w#.z....
004BA0: C5 CD 7A BC C1 C3 4B 01 8A 63 61 73 6F 75 74 6F ..z...K..casouto
004BB0: 70 65 EE 02 03 37 03 D1 E1 C5 06 0C CD 8C BC 21 pe...7.........!
004BC0: 00 00 DA 46 03 6F E5 DA 4D 03 CD 92 BC E1 C1 C3 ...F.o..M.......
004BD0: 4A 01 8C 63 61 73 6F 75 74 64 69 72 65 63 F4 28 J..casoutdirec.(
004BE0: 03 63 03 E1 7D DD E1 D1 E1 C5 DD E5 C1 CD 98 BC .c..}...........
004BF0: F5 CD 8F BC F1 C1 21 00 00 DA 7D 03 6F C3 4A 01 ......!...}.o.J.
004C00: 81 A1 52 03 86 03 E1 D1 73 23 72 C3 4B 01 81 A3 ..R.....s#r.K..£
004C10: 80 03 C3 06 69 0E B0 0D 7E 17 EB 19 8A 16 09 00 ....i...~.......
004C20: 7D 18 E9 06 3F 06 08 00 8A 16 27 00 8F 04 8A 16 }...?.....'.....
004C30: 30 00 8F 04 21 15 7E 13 82 23 BE 8E 03 C3 06 90 0...!.~..#......
004C40: 11 16 15 B0 0D 8B 18 7D 18 EB 04 7E 13 85 23 62 .......}...~..#b
004C50: 75 66 E6 B8 03 AD 0F 10 00 82 23 F3 CD 03 C3 06 uf........#.....
004C60: 92 03 9E 11 5F 18 3C 18 3F 06 F6 FF 7E 13 C1 A7 ...._.<.?...~...
004C70: D9 03 C3 06 FD 04 3C 18 F7 07 09 6E 6F 74 5F 66 ......<....not_f
004C80: 6F 75 6E 64 BC 12 9F 16 7E 13 87 27 73 74 72 65 ound....~..'stre
004C90: 61 ED EE 03 C3 06 9E 0E B0 0D E3 0C 3F 06 08 00 a...........?...
004CA0: AA 0E B9 0E 06 00 34 1B B0 0D 75 0C B0 0D 8F 04 ......4...u.....
004CB0: 7E 13 C1 A8 0A 04 C3 06 8A 16 FF FF 75 0C 9C 04 ~...........u...
004CC0: 8A 16 29 00 71 1D F4 0E 59 06 F6 14 8F 04 F4 0E ..).q...Y.......
004CD0: 8A 16 29 00 5B 0C 3C 18 8B 0D 7E 13 81 AA 32 04 ..).[.<...~...2.
004CE0: C3 06 A4 1B BC 12 7E 13 82 2A AF 5C 04 C3 06 7F ......~..*.\....
004CF0: 04 E1 1A BC 12 7E 13 85 2A 2F 6D 6F E4 68 04 C3 .....~..*/mo.h..
004D00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
004D10: 04 00 01 00 02 09 4E E5 04 00 C1 02 00 00 00 02 ......N.........
004D20: 04 00 C6 02 00 00 00 02 04 00 C2 02 00 00 00 02 ................
004D30: 04 00 C7 02 00 00 00 02 04 00 C3 02 00 00 00 02 ................
004D40: 04 00 C8 02 00 00 00 02 04 00 C4 02 00 00 00 02 ................
004D50: 04 00 C9 02 00 00 00 02 04 00 C5 02 00 00 00 02 ................
004D60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004E00: D1 2A 47 01 2B 2B 22 47 01 73 23 72 C3 4B 01 81 .*G.++"G.s#r.K..
004E10: BF 79 0C C3 06 B0 0D 3B 05 7E 13 85 3F 63 6F 6D .y.....;.~..?com
004E20: F0 8F 0C C3 06 CF 1A B0 0D 3C 18 F7 07 0C 63 6F .........<....co
004E30: 6D 70 69 6C 65 5F 6F 6E 6C 79 7E 13 84 3F 63 73 mpile_only~..?cs
004E40: F0 9B 0C C3 06 8D 1A AE 10 B0 0D EB 04 F7 07 0A ................
004E50: 75 6E 66 69 6E 69 73 68 65 64 7E 13 84 3F 64 75 unfinished~..?du
004E60: F0 BC 0C C3 06 C8 12 3F 06 04 00 C8 12 7E 13 88 .......?.....~..
004E70: 3F 6C 6F 61 64 69 6E E7 DC 0C C3 06 9E 0E B0 0D ?loadin.........
004E80: 3C 18 F7 07 0C 6C 6F 61 64 69 6E 67 5F 6F 6E 6C <....loading_onl
004E90: 79 7E 13 86 3F 70 61 69 72 F3 EF 0C C3 06 EB 04 y~..?pair.......
004EA0: F7 07 08 75 6E 70 61 69 72 65 64 7E 13 86 3F 73 ...unpaired~..?s
004EB0: 74 61 63 EB 13 0D C3 06 8D 1A 27 1A E1 1A 2A 1C tac.......'...*.
004EC0: 8D 1A 41 16 85 06 2A 1C 5F 18 F7 07 0C 73 74 61 ..A...*._....sta
004ED0: 63 6B 5F 62 6F 75 6E 64 73 E8 13 F6 14 8A 16 80 ck_bounds.......
004EE0: 00 8F 04 2A 1C 3F 06 18 00 E8 13 F6 14 EB 04 3B ...*.?.........;
004EF0: 05 46 07 0B 62 79 74 65 73 5F 6C 65 66 74 20 7E .F..bytes_left ~
004F00: 13 87 3F 73 74 72 65 61 ED 2D 0D C3 06 F7 07 08 ..?strea.-......
004F10: 6E 6F 5F 69 6E 70 75 74 7E 13 89 3F 74 65 72 6D no_input~..?term
004F20: 69 6E 61 EC 81 0D C3 06 DD 07 7E 13 81 C0 9A 0D ina.......~.....
004F30: B2 0D E1 5E 23 56 D5 C3 4B 01 85 61 62 6F 72 F4 ...^#V..K..abor.
004F40: AC 0D C3 06 27 08 7E 13 C6 61 62 6F 72 74 A2 BA ....'.~..abort..
004F50: 0D C3 06 A3 0C 88 0F F7 07 14 04 F4 0E 8A 16 22 ...£..........."
004F60: 00 5B 0C 3F 06 10 00 50 06 75 0C 9C 04 06 06 D9 .[.?...P.u......
004F70: 0E B9 0E 22 00 8A 16 22 00 71 1D C8 12 F4 0E 59 ..."...".q.....Y
004F80: 06 E1 1A 7D 18 8F 04 F4 0E 8A 16 22 00 5B 0C 3C ...}.......".[.<
004F90: 18 8B 0D 47 0E 7E 13 83 61 62 F3 C8 0D C3 06 C8 ...G.~..ab......
004FA0: 12 AF 04 7E 13 C5 61 67 61 69 EE 17 0E C3 06 50 ...~..agai.....P
004FB0: 06 1C 0D 88 0F B9 0E F6 14 EB 04 DB 04 7E 13 85 .............~..
004FC0: 61 6C 6C 6F F4 25 0E C3 06 9B 12 9C 04 7E 13 83 allo.%.......~..
004FD0: 61 6E E4 3F 0E 57 0E D1 E1 7B A5 6F 7A A4 67 C3 an.?.W...{.oz.g.
004FE0: 4A 01 84 62 61 73 E5 4F 0E 66 1C 16 00 C5 62 65 J..bas.O.f....be
004FF0: 67 69 EE 62 0E C3 06 A3 0C F6 14 50 06 7E 13 82 gi.b...£...P.~..
005000: 29 10 7E 13 83 6C 69 F4 45 16 8C 16 0A 03 6F 0A ).~..li.E.....o.
005010: 03 67 C3 4A 01 C7 6C 69 74 65 72 61 EC 84 16 C3 .g.J..litera....
005020: 06 CF 1A B0 0D 3F 06 08 00 88 0F 8A 16 DB 04 7E .....?.........~
005030: 13 84 6C 6F 61 E4 95 16 C3 06 AE 0A 7E 13 C4 6C ..loa.......~..l
005040: 6F 6F F0 B1 16 C3 06 8A 16 03 00 1C 0D 88 0F 02 oo..............
005050: 0B F6 14 EB 04 DB 04 7E 13 82 6D AA BE 16 C3 06 .......~..m.....
005060: 9E 11 97 1D 7E 0C 1D 0E E1 1A 1D 0E A4 1B 6A 19 ....~.........j.
005070: F9 10 7E 13 83 6D 2A AF D9 16 C3 06 9E 11 97 1D ..~..m*.........
005080: E1 1A 1D 0E 7E 0C E1 1A 1D 0E 7E 0C 7D 18 97 1D ....~.....~.}...
005090: EB 19 EB 19 80 11 E1 1A 7F 19 A4 1B EB 19 6A 19 ..............j.
0050A0: A4 1B EB 19 06 06 D9 10 7F 19 D7 1B EB 19 EB 19 ................
0050B0: 6A 19 D7 1B E1 1A BC 12 E1 1A EB 19 F9 10 7E 13 j.............~.
0050C0: 82 6D AB F4 16 C3 06 12 1A D9 10 7E 13 82 6D AF .m.........~..m.
0050D0: 40 17 C3 06 7D 18 7E 0C 7E 0C C8 12 F9 10 7F 19 @...}.~.~.......
0050E0: 1D 0E D7 1B 6A 19 7F 19 97 1D AF 04 E1 1A 6A 19 ....j.........j.
0050F0: AF 04 E1 1A 7E 13 85 6D 2F 6D 6F E4 4D 17 C3 06 ....~..m/mo.M...
005100: 7E 0C 06 06 7F 19 D7 1B 6A 19 E1 1A 7E 0C D7 1B ~.......j...~...
005110: 6A 19 7E 13 83 6D 61 F8 76 17 C3 06 9E 11 E9 06 j.~..ma.v.......
005120: 3F 06 04 00 E1 1A BC 12 7E 13 83 6D 69 EE 94 17 ?.......~..mi...
005130: C3 06 9E 11 67 0C 3F 06 04 00 E1 1A BC 12 7E 13 ....g.?.......~.
005140: 83 6D 6F E4 AA 17 C3 06 F6 05 BC 12 7E 13 84 6D .mo.........~..m
005150: 6F 76 E5 C0 17 C3 06 06 06 9A 17 79 06 92 08 7E ov.........y...~
005160: 13 21 00 00 0E 08 29 17 D2 EE 17 19 CE 00 0D C2 .!....).........
005170: E6 17 C9 86 6E 65 67 61 74 E5 CE 17 FE 17 E1 7D ....negat......}
005180: 2F 6F 7C 2F 67 23 C3 4A 01 84 6E 65 78 F4 F3 17 /o|/g#.J..nex...
005190: AD 0F 4B 01 85 6E 65 78 74 B1 09 18 AD 0F 54 01 ..K..next.....T.
0051A0: 83 6E 66 E1 14 18 C3 06 8A 16 05 00 EB 04 8A 16 .nf.............
0051B0: FF FF 56 1B 7E 13 83 6E 6F F4 20 18 3E 18 E1 7D ..V.~..no. .>..}
0051C0: B4 21 00 00 C2 48 18 23 C3 4A 01 86 6E 75 6D 62 .!...H.#.J..numb
0051D0: 65 F2 36 18 C3 06 64 0B 7E 13 82 6F F2 4B 18 61 e.6...d.~..o.K.a
0051E0: 18 D1 E1 7B B5 6F 7A B4 67 C3 4A 01 83 6F 75 F4 ...{.oz.g.J..ou.
0051F0: 5A 18 66 1C 26 00 84 6F 76 65 F2 6C 18 7F 18 D1 Z.f.&..ove.l....
005200: 62 EC 6D 0E AD 0F 20 00 85 62 6C 61 6E EB 7F 0E b.m... ..blan...
005210: C3 06 84 0E AF 13 7E 13 83 62 6C EB 88 0E 66 1C ......~..bl...f.
005220: 18 00 85 62 6C 6F 63 EB 98 0E C3 06 3F 08 7E 13 ...bloc.....?.~.
005230: 86 62 72 61 6E 63 E8 A2 0E BB 0E 60 69 5E 23 56 .branc.....`i^#V
005240: 2B 19 4D 44 C3 4B 01 82 63 A1 B0 0E CE 0E E1 D1 +.MD.K..c.......
005250: 73 C3 4B 01 82 63 AC C7 0E C3 06 F6 14 CC 0E 50 s.K..c.........P
005260: 06 47 0E 7E 13 83 63 2F EC D4 0E AD 0F 40 00 82 .G.~..c/.....@..
005270: 63 C0 E5 0E F6 0E E1 6E 26 00 C3 4A 01 83 63 66 c......n&..J..cf
005280: E1 EF 0E C3 06 92 06 7E 13 85 63 6C 65 61 F2 FD .......~..clea..
005290: 0E C3 06 AA 0E 8A 16 00 04 84 0E AF 13 7E 13 85 .............~..
0052A0: 63 6D 6F 76 E5 09 0F C3 06 C8 12 50 06 E9 06 3F cmov.......P...?
0052B0: 06 0A 00 90 11 BC 12 B9 0E 04 00 92 08 7E 13 84 .............~..
0052C0: 63 6F 6C E4 1F 0F C3 06 8A 16 37 01 8A 16 45 01 col.......7...E.
0052D0: B0 0D 8A 16 06 00 8F 04 8A 16 0E 00 27 0F 06 06 ............'...
0052E0: 63 13 84 03 8A 16 35 01 B0 0D 8A 16 A9 14 85 06 c.....5.........
0052F0: 84 03 21 02 0D 13 B1 11 D4 01 C2 0D 7E 13 87 63 ..!.........~..c
005300: 6F 6D 70 69 6C E5 3F 0F C3 06 A3 0C 6A 19 C8 12 ompil.?...£.j...
005310: 85 06 7E 0C B0 0D DB 04 7E 13 88 63 6F 6E 73 74 ..~.....~..const
005320: 61 6E F4 7E 0F C3 06 38 10 DB 04 98 07 13 EB 5E an.~...8.......^
005330: 23 56 D5 C3 4B 01 87 63 6F 6E 74 65 78 F4 9A 0F #V..K..contex...
005340: 66 1C 1A 00 87 63 6F 6E 76 65 72 F4 B6 0F C3 06 f....conver.....
005350: 59 06 C8 12 7E 0C F4 0E 69 0E B0 0D F5 11 3F 06 Y...~...i.....?.
005360: 2C 00 E1 1A 69 0E B0 0D A4 1B BC 12 EB 19 69 0E ,...i.........i.
005370: B0 0D A4 1B D9 10 A5 12 B0 0D 59 06 3F 06 08 00 ..........Y.?...
005380: 50 06 A5 12 9C 04 6A 19 B9 0E C6 FF 6A 19 7E 13 P.....j.....j.~.
005390: 85 63 6F 75 6E F4 C4 0F C3 06 C8 12 59 06 E1 1A .coun.......Y...
0053A0: F4 0E 7E 13 82 63 F2 10 10 C3 06 B1 08 7E 13 86 ..~..c.......~..
0053B0: 63 72 65 61 74 E5 24 10 C3 06 84 0E 71 1D C8 12 creat.$.....q...
0053C0: C8 12 59 06 F4 0E 06 06 5B 0C F7 07 04 6E 75 6C ..Y.....[....nul
0053D0: 6C C8 12 C0 0F B0 0D B0 0D D5 09 3F 06 18 00 90 l..........?....
0053E0: 11 C8 12 18 10 79 1B 46 07 0B 20 64 75 70 6C 69 .....y.F.. dupli
0053F0: 63 61 74 65 64 F4 0E 66 1D B0 0D B0 17 59 06 47 cated..f.....Y.G
005400: E1 E5 C3 49 01 83 70 61 E4 76 18 C3 06 F6 14 EB ...I..pa.v......
005410: 0E 8F 04 8A 16 04 00 8F 04 7E 13 83 70 61 F4 85 .........~..pa..
005420: 18 AD 0F 9A 00 83 70 66 E1 9B 18 C3 06 50 06 56 ......pf.....P.V
005430: 1B 8A 16 05 00 8F 04 7E 13 84 70 69 63 EB A5 18 .......~..pic...
005440: C3 06 C8 12 50 06 E9 06 F7 07 03 3C 5F 31 79 06 ....P......<_1y.
005450: 8D 1A 8F 04 B0 0D 7E 13 82 70 F0 B9 18 C3 06 C8 ......~..p......
005460: 12 8A 16 F0 FF 55 0E F7 07 03 6F 66 66 50 06 EF .....U....offP..
005470: 1A 8B 18 59 06 E1 1A 35 1A B0 0D 95 0A 27 0F 7E ...Y...5.....'.~
005480: 13 85 71 75 65 72 F9 D8 18 C3 06 34 1B B0 0D 8A ..quer.....4....
005490: 16 50 00 96 13 06 06 75 0C 84 03 7E 13 84 71 75 .P.....u...~..qu
0054A0: 69 F4 01 19 C3 06 B3 01 06 06 9E 0E 84 03 A8 1D i...............
0054B0: 29 10 61 19 B0 0D 07 1A 84 03 09 19 D9 15 CF 1A ).a.............
0054C0: B0 0D 3C 18 3F 06 07 00 46 07 02 6F 6B B9 0E E1 ..<.?...F..ok...
0054D0: FF 7E 13 82 72 A3 1D 19 66 1C 28 00 82 72 B0 53 .~..r£..f.(..r.S
0054E0: 19 66 1C 08 00 82 72 BE 5C 19 6C 19 2A 47 01 5E .f....r.\.l.*G.^
0054F0: 23 56 23 22 47 01 D5 C3 4B 01 82 72 C0 65 19 81 #V#"G...K..r.e..
005500: 19 2A 47 01 5E 23 56 D5 C3 4B 01 C6 72 65 70 65 .*G.^#V..K..repe
005510: 61 F4 7A 19 C3 06 7E 0C 7E 0C 2D 0E 6A 19 6A 19 a.z...~.~.-.j.j.
005520: 92 06 1A 1B 7E 13 84 72 6F 6C EC 8B 19 C3 06 C8 ....~..rol......
005530: 12 50 06 E9 06 F7 07 03 3C 5F 31 59 06 C8 12 C0 .P......<_1Y....
005540: 18 E1 1A 79 06 8D 1A 8F 04 C8 12 92 06 B0 0D 7D ...y...........}
005550: 18 84 03 92 06 8D 1A 7D 18 2A 1C 3C 18 3F 06 EA .......}.*.<.?..
005560: FF 90 11 7E 13 83 72 6F F4 A6 19 ED 19 D1 E1 E3 ...~..ro........
005570: C3 49 01 83 72 70 C0 E5 19 FB 19 2A 47 01 C3 4A .I..rp.....*G..J
005580: 01 83 72 70 F0 F3 19 AD 0F 47 01 84 73 2D 3E E4 ..rp.....G..s->.
005590: 01 1A 14 1A D1 21 00 00 7A E6 80 CA 1F 1A 2B C3 .....!..z.....+.
0055A0: 49 01 82 73 B0 0B 1A C3 06 83 1A B0 0D 7E 13 83 I..s.........~..
0055B0: 73 63 F2 22 1A 66 1C 2A 00 84 73 69 67 EE 2F 1A sc.".f.*..sig./.
0055C0: C3 06 0F 06 3F 06 08 00 8A 16 2D 00 21 15 7E 13 ....?.....-.!.~.
0055D0: 86 73 6D 75 64 67 E5 39 1A C3 06 08 16 8A 16 20 .smudg.9.......
0055E0: 00 41 1B 7E 13 83 73 70 A1 50 1A 6D 1A 2A 85 1A .A.~..sp.P.m.*..
0055F0: EB 2A 45 01 19 5E 23 56 EB F9 C3 4B 01 83 73 70 .*E..^#V...K..sp
005600: 0E C8 12 8A 16 80 00 41 1B F6 14 65 06 8A 16 80 .......A...e....
005610: 00 41 1B 08 16 DB 04 70 06 47 0E BC 10 B0 0D 84 .A.....p.G......
005620: 03 98 07 13 D5 C3 4B 01 83 63 73 F0 2F 10 66 1C ......K..cs./.f.
005630: 1C 00 87 63 75 72 72 65 6E F4 A8 10 66 1C 1E 00 ...curren...f...
005640: 82 64 A1 B2 10 C7 10 E1 D1 73 23 72 23 D1 73 23 .d.......s#r#.s#
005650: 72 C3 4B 01 82 64 AB C0 10 DB 10 21 06 00 39 5E r.K..d.....!..9^
005660: 71 23 56 70 C1 E1 19 EB E1 7D 89 6F 7C 88 67 C1 q#Vp.....}.o|.g.
005670: C3 49 01 83 64 2B AD D4 10 C3 06 0F 06 3F 06 04 .I..d+.......?..
005680: 00 41 12 7E 13 82 64 AE F3 10 C3 06 06 06 1A 11 .A.~..d.........
005690: 9E 1A 7E 13 83 64 2E F2 05 11 C3 06 DF 11 8A 16 ..~..d..........
0056A0: 03 00 E9 06 F7 07 05 65 6D 70 74 79 7E 0C E1 1A .......empty~...
0056B0: 7D 18 C8 12 F9 10 0B 07 DE 03 EB 19 40 1A BD 03 }...........@...
0056C0: 6A 19 7D 18 EB 04 AF 1A 79 1B 7E 13 82 64 BC 14 j.}.....y.~..d..
0056D0: 11 C3 06 EB 19 9E 11 5B 0C 3F 06 10 00 EB 19 EB .......[.?......
0056E0: 19 41 12 D9 10 0F 06 B9 0E 0A 00 E1 1A E9 06 E1 .A..............
0056F0: 1A BC 12 E1 1A BC 12 7E 13 84 64 61 62 F3 4C 11 .......~..dab.L.
005700: C3 06 C8 12 F9 10 7E 13 85 64 64 72 6F F0 79 11 ......~..ddro.y.
005710: 92 11 E1 E1 C3 4B 01 84 64 64 75 F0 88 11 A0 11 .....K..ddu.....
005720: E1 D1 D5 E5 C3 49 01 87 64 65 63 69 6D 61 EC 97 .....I..decima..
005730: 11 C3 06 8A 16 0A 00 69 0E 84 03 7E 13 8B 64 65 .......i...~..de
005740: 66 69 6E 69 74 69 6F 6E F3 A7 11 C3 06 C0 0F B0 finition........
005750: 0D BC 10 84 03 7E 13 85 64 65 70 74 E8 BD 11 C3 .....~..dept....
005760: 06 8D 1A 27 1A E1 1A EB 04 9F 06 7E 13 85 64 69 ...'.......~..di
005770: 67 69 F4 D7 11 F7 11 E1 D1 7B D6 30 FA 16 12 FE gi.......{.0....
005780: 0A FA 0B 12 D6 27 FE 0A FA 16 12 BD F2 16 12 5F .....'........._
005790: 21 01 00 C3 49 01 6C C3 4A 01 C8 64 6C 69 74 65 !...I.l.J..dlite
0057A0: 72 61 EC ED 11 C3 06 CF 1A B0 0D 3F 06 08 00 E1 ra.........?....
0057B0: 1A 9F 16 9F 16 7E 13 87 64 6E 65 67 61 74 E5 1A .....~..dnegat..
0057C0: 12 43 12 E1 D1 97 93 5F 3E 00 9A 57 3E 00 9D 6F .C....._>..W>..o
0057D0: 3E 00 9C 67 C3 49 01 C2 64 EF 37 12 C3 06 88 0F >..g.I..d.7.....
0057E0: D6 08 F6 14 8A 16 03 00 7E 13 C5 64 6F 65 73 BE ........~..does.
0057F0: 57 12 C3 06 C3 0C 88 0F 98 07 8A 16 CD 00 D9 0E W...............
005800: B0 65 1A 66 1C 06 00 83 73 70 C0 7D 1A 8F 1A 21 .e.f....sp.}...!
005810: 00 00 39 C3 4A 01 85 73 70 61 63 E5 87 1A C3 06 ..9.J..spac.....
005820: 84 0E F7 12 7E 13 86 73 70 61 63 65 F3 96 1A C3 ....~..space....
005830: 06 06 06 9A 17 E3 0C 3F 06 0C 00 06 06 D6 08 9E .......?........
005840: 1A 02 0B FC FF 7E 13 85 73 74 61 74 E5 A6 1A 66 .....~..stat...f
005850: 1C 2C 00 7D 93 6F 7C 9A 67 C9 84 73 77 61 F0 C7 .,.}.o|.g..swa..
005860: 1A E3 1A E1 E3 C3 4A 01 84 74 65 78 F4 DA 1A C3 ......J..tex....
005870: 06 F6 14 EB 0E 59 06 90 0E 71 1D 84 0E 7D 18 C8 .....Y...q...}..
005880: 12 F4 0E 8F 04 59 06 CC 0E 8B 18 EB 0E 59 06 27 .....Y.......Y.'
005890: 0F 7E 13 C4 74 68 65 EE E8 1A C3 06 A3 0C 70 06 .~..the.....£.p.
0058A0: 1C 0D F6 14 7D 18 EB 04 E1 1A 84 03 7E 13 83 74 ....}.......~..t
0058B0: 69 E2 13 1B 66 1C 0A 00 86 74 6F 67 67 6C E5 2E i...f....toggl..
0058C0: 1B 43 1B D1 E1 7E AB 77 C3 4B 01 88 74 72 61 76 .C...~.w.K..trav
0058D0: 65 72 73 E5 38 1B C3 06 E1 1A 7D 18 8F 04 8A 16 ers.8.....}.....
0058E0: 7F 00 7D 18 F4 0E E9 06 3F 06 F0 FF E1 1A BC 12 ..}.....?.......
0058F0: 7E 13 84 74 79 70 E5 4B 1B C3 06 C8 12 2D 06 3F ~..typ.K.....-.?
005900: 06 1A 00 7D 18 8F 04 E1 1A D6 08 5E 15 F4 0E F7 ...}.......^....
005910: 12 50 06 64 07 F6 FF B9 0E 04 00 90 11 7E 13 82 .P.d.........~..
005920: 75 AA 72 1B A6 1B D1 E1 C5 44 7D CD E1 17 E5 67 u.r......D}....g
005930: 78 44 CD E1 17 D1 4A 09 CE 00 55 6C 67 C1 D5 C3 xD....J...Ulg...
005940: 4A 01 82 75 AE 9F 1B C3 06 06 06 0A 11 7E 13 85 J..u.........~..
005950: 75 2F 6D 6F E4 C2 1B D9 1B 21 04 00 39 5E 71 23 u/mo.....!..9^q#
005960: 56 70 C1 E1 7D 91 7C 98 DA F4 1B 21 FF FF 11 FF Vp..}.|....!....
005970: FF C3 1F 1C 3E 10 29 17 EB 29 D2 FF 1B 13 A7 EB ....>.)..)......
005980: 1F F5 D2 0E 1C 7D 91 6F 7C 98 67 C3 19 1C 7D 91 .....}.o|.g...}.
005990: 6F 7C 98 67 D2 19 1C 09 1B 13 F1 3D C2 F6 1B C1 o|.g.......=....
0059A0: E5 D5 C3 4B 01 82 75 BC CF 1B C3 06 06 06 E1 1A ...K..u.........
0059B0: 06 06 51 11 7E 13 C5 75 6E 74 69 EC 25 1C C3 06 ..Q.~..unti.%...
0059C0: 50 06 1C 0D 88 0F 3F 06 F6 14 EB 04 DB 04 7E 13 P.....?.......~.
0059D0: 82 75 F0 36 1C AD 0F 45 01 84 75 73 65 F2 50 1C .u.6...E..use.P.
0059E0: C3 06 A5 0F 98 07 13 EB 5E 16 00 2A 45 01 19 C3 ........^..*E...
0059F0: 4A 01 88 76 61 72 69 61 62 6C E5 59 1C C3 06 38 J..variabl.Y...8
005A00: 88 0F 86 12 7E 13 13 2A 47 01 2B 70 2B 71 22 47 ....~..*G.+p+q"G
005A10: 01 C1 D5 C3 4B 01 82 64 F0 6A 12 66 1C 10 00 83 ....K..d.j.f....
005A20: 64 70 EC 96 12 66 1C 20 00 85 64 70 75 73 E8 9F dp...f. ..dpus..
005A30: 12 AD 0F 49 01 84 64 72 6F F0 A9 12 BE 12 E1 C3 ...I..dro.......
005A40: 4B 01 83 64 75 F0 B5 12 CA 12 E1 E5 C3 4A 01 C4 K..du........J..
005A50: 65 6C 73 E5 C2 12 C3 06 70 06 1C 0D 88 0F B9 0E els.....p.......
005A60: F6 14 06 06 DB 04 E1 1A 70 06 1A 1B 70 06 7E 13 ........p...p.~.
005A70: 84 65 6D 69 F4 CF 12 C3 06 F7 08 7E 13 8D 65 6D .emi.......~..em
005A80: 70 74 79 2D 62 75 66 66 65 72 F3 F0 12 C3 06 E8 pty-buffer......
005A90: 13 41 16 7D 18 EB 04 84 0E B4 09 7E 13 87 65 6E .A.}.......~..en
005AA0: 63 6C 6F 73 E5 FD 12 29 13 D1 E1 E5 7B 11 FF FF clos...)....{...
005AB0: 2B 23 13 BE CA 31 13 D5 34 35 C2 44 13 13 D5 1B +#...1..45.D....
005AC0: D5 C3 4B 01 23 13 BE CA 54 13 34 35 C2 44 13 D5 ..K.#...T.45.D..
005AD0: D5 C3 4B 01 D5 13 D5 C3 4B 01 86 65 70 72 69 6E ..K.....K..eprin
005AE0: F4 1D 13 A3 10 00 00 87 65 78 65 63 75 74 E5 5A ...£....execut.Z
005AF0: 13 73 13 E1 C3 54 01 84 65 78 69 F4 67 13 80 13 .s...T..exi.g...
005B00: 2A 47 01 4E 23 46 23 22 47 01 C3 4B 01 86 65 78 *G.N#F#"G..K..ex
005B10: 70 65 63 F4 77 13 C3 06 1D 09 7E 13 85 66 65 6E pec.w.....~..fen
005B20: 63 E5 8D 13 66 1C 0E 00 84 66 69 6C EC 9C 13 C3 c...f....fil....
005B30: 06 7D 18 2D 06 3F 06 08 00 B4 09 B9 0E 06 00 90 .}.-.?..........
005B40: 11 BC 12 7E 13 84 66 69 6E E4 A8 13 C3 06 FD 04 ...~..fin.......
005B50: 3F 06 0A 00 BC 12 03 0F B9 0E 04 00 06 06 7E 13 ?.............~.
005B60: 85 66 69 72 73 F4 C5 13 AD 0F FA 6A 83 66 6C E4 .firs......j.fl.
005B70: E0 13 66 1C 22 00 86 66 6F 72 67 65 F4 EC 13 C3 ..f."..forge....
005B80: 06 84 0E 71 1D BC 10 B0 0D B0 0D D5 09 22 06 F7 ...q........."..
005B90: 07 0B 6E 6F 74 5F 63 75 72 72 65 6E 74 BC 12 26 ..not_current..&
005BA0: 18 C8 12 A4 13 B0 0D 2A 1C F7 07 09 70 72 6F 74 .......*....prot
005BB0: 65 63 74 65 64 7E 0C 7F 19 C0 0F B0 0D 2A 1C 3F ected~.......*.?
005BC0: 06 04 00 A7 14 7F 19 BC 10 B0 0D 2A 1C 3F 06 06 ...........*.?..
005BD0: 00 A7 14 CB 11 92 1C B0 0D 7F 19 7D 18 2A 1C 3F ...........}.*.?
005BE0: 06 08 00 B0 0D B9 0E F2 FF C8 12 92 1C 84 03 C8 ................
005BF0: 12 8A 16 04 00 EB 04 AB 18 2F 16 B0 0D C8 12 7F ........./......
005C00: 10 70 06 47 0E 7E 13 88 76 6F 63 2D 6C 69 6E EB .p.G.~..voc-lin.
005C10: 72 1C 66 1C 12 00 8A 76 6F 63 61 62 75 6C 61 72 r.f....vocabular
005C20: F9 87 1C C3 06 D7 0B 7E 13 85 77 68 65 72 E5 96 .......~..wher..
005C30: 1C C3 06 9E 0E B0 0D 3F 06 5B 00 9E 0E B0 0D C8 .......?.[......
005C40: 12 35 1A 84 03 29 10 29 10 46 07 05 73 63 72 23 .5...).).F..scr#
005C50: 20 C8 12 3B 05 75 0C B0 0D 8A 16 FF 03 B0 17 EB ..;.u..........
005C60: 0E F6 05 C8 12 46 07 06 6C 69 6E 65 23 20 3B 05 .....F..line# ;.
005C70: EB 0E 60 04 EB 19 AA 0E 8F 04 29 10 29 10 EB 0E ..`.......).)...
005C80: 0F 05 79 1B 75 0C B0 0D 8A 16 FF 03 67 0C 8F 04 ..y.u.......g...
005C90: B9 0E 06 00 75 0C B0 0D 29 10 F6 14 F4 0E C8 12 ....u...).......
005CA0: 7E 0C EB 04 F6 14 7F 19 8F 04 59 06 F4 0E 8A 16 ~.........Y.....
005CB0: 20 00 5B 0C 3F 06 04 00 65 06 AF 1A 6A 19 06 06 .[.?...e...j...
005CC0: D6 08 8A 16 5E 00 F7 12 02 0B F8 FF 7E 13 C5 77 ....^.......~..w
005CD0: 68 69 6C E5 A9 1C C3 06 84 15 85 06 7E 13 85 77 hil.........~..w
005CE0: 69 64 74 E8 4E 1D 66 1C 0C 00 84 77 6F 72 E4 5E idt.N.f....wor.^
005CF0: 1D C3 06 09 0C 7E 13 C0 80 6A 1D C3 06 9E 0E B0 .....~...j......
005D00: 0D 3F 06 08 00 CF 1A B0 0D 8B 0D 6A 19 BC 12 7E .?.........j...~
005D10: 13 83 78 6F F2 77 1D 99 1D D1 E1 7B AD 6F 7A AC ..xo.w.....{.oz.
005D20: 67 C3 4A 01 C1 DB 91 1D C3 06 06 06 CF 1A 84 03 g.J.............
005D30: 7E 13 C9 5B 63 6F 6D 70 69 6C 65 DD A4 1D C3 06 ~..[compile.....
005D40: A3 0C FD 04 3C 18 F7 07 09 6E 6F 74 5F 66 6F 75 £...<....not_fou
005D50: 6E 64 BC 12 03 0F DB 04 7E 13 81 DD B2 1D C3 06 nd......~.......
005D60: 8A 16 C0 00 CF 1A 84 03 7E 13 86 6E 61 6D 65 75 ........~..nameu
005D70: F0 DA 1D C3 06 29 10 46 07 07 4E 61 6D 65 20 3A .....).F..Name :
005D80: 20 09 19 84 0E EF 1A 8B 18 18 10 9E 11 7D 18 8F ............}..
005D90: 04 59 06 E1 1A D6 08 5E 15 F4 0E C8 12 8A 16 60 .Y.....^.......`
005DA0: 00 67 0C E1 1A 8A 16 7B 00 E9 06 55 0E 3F 06 0A .g.....{...U.?..
005DB0: 00 5E 15 8A 16 20 00 41 1B 50 06 64 07 DA FF 29 .^... .A.P.d...)
005DC0: 10 9E 11 8A 16 07 00 AF 1A 79 1B 29 10 7E 13 8A .........y.).~..
005DD0: 73 61 76 65 2D 66 6F 72 74 E8 EA 1D C3 06 B8 14 save-fort.......
005DE0: F3 1D BC 12 8A 16 00 C0 35 03 E3 0C 3F 06 12 00 ........5...?...
005DF0: 46 07 09 6E 6F 74 5F 6F 70 65 6E 3A 3B 05 C2 0D F..not_open:;...
005E00: 19 2A 1C 3F 06 F2 FF 7D 18 92 06 84 03 B0 0D E3 .*.?...}........
005E10: 0C 22 06 3F 06 DA FF 6A 19 9B 12 84 03 7E 13 C5 .".?...j.....~..
005E20: 66 6F 72 74 E8 F6 13 F5 0B 81 A0 78 20 00 00 86 fort.......x ...
005E30: 66 72 65 65 7A E5 9F 14 C3 06 F6 14 A4 13 84 03 freez...........
005E40: 8A 16 45 01 B0 0D 8A 16 06 00 8F 04 8A 16 37 01 ..E...........7.
005E50: 8A 16 0E 00 27 0F 8A 16 A9 14 85 06 B0 0D 8A 16 ....'...........
005E60: 35 01 84 03 7E 13 82 67 EF AF 14 ED 14 E1 E9 84 5...~..g........
005E70: 68 65 72 E5 E6 14 C3 06 9B 12 B0 0D 7E 13 83 68 her.........~..h
005E80: 65 F8 EF 14 C3 06 8A 16 10 00 69 0E 84 03 7E 13 e.........i...~.
005E90: 83 68 6C E4 FE 14 66 1C 24 00 84 68 6F 6C E4 10 .hl...f.$..hol..
005EA0: 15 C3 06 8A 16 FF FF 16 15 9C 04 16 15 B0 0D CC ................
005EB0: 0E 7E 13 85 68 70 75 73 E8 1A 15 AD 0F 4A 01 86 .~..hpus.....J..
005EC0: 68 78 63 6F 64 E5 33 15 C3 06 04 15 38 10 59 1A hxcod.3.....8.Y.
005ED0: F6 14 C8 12 92 06 84 03 7E 13 81 E9 3F 15 60 15 ........~...?.`.
005EE0: 2A 47 01 5E 23 56 D5 C3 4B 01 82 69 A7 5A 15 71 *G.^#V..K..i.Z.q
005EF0: 15 2A 47 01 11 02 00 19 5E 23 56 D5 C3 4B 01 C2 .*G.....^#V..K..
005F00: 69 E6 6A 15 C3 06 88 0F 3F 06 F6 14 06 06 DB 04 i.j.....?.......
005F10: 70 06 7E 13 89 69 6D 6D 65 64 69 61 74 E5 7F 15 p.~..immediat...
005F20: C3 06 08 16 8A 16 40 00 41 1B 7E 13 8A 69 6E 69 ......@.A.~..ini
005F30: 74 2D 66 6F 72 74 E8 94 15 AD 0F 35 01 89 69 6E t-fort.....5..in
005F40: 69 74 2D 75 73 65 F2 AC 15 AD 0F 37 01 89 69 6E it-use.....7..in
005F50: 74 65 72 70 72 65 F4 BD 15 C3 06 28 0A 7E 13 81 terpre.....(.~..
005F60: EA CD 15 E5 15 2A 47 01 11 04 00 19 5E 23 56 D5 .....*G.....^#V.
005F70: C3 4B 01 83 6B 65 F9 DF 15 C3 06 72 0A 7E 13 86 .K..ke.....r.~..
005F80: 6C 61 74 65 73 F4 F3 15 C3 06 BC 10 B0 0D B0 0D lates...........
005F90: 7E 13 85 6C 65 61 76 E5 FF 15 1C 16 2A 47 01 5E ~..leav.....*G.^
005FA0: 23 56 23 73 23 72 C3 4B 01 83 6C 66 E1 12 16 C3 #V#s#r.K..lf....
005FB0: 06 8A 16 04 00 EB 04 7E 13 85 6C 69 6D 69 F4 29 .......~..limi.)
005FC0: 16 AD 0F FA AA 84 6C 69 73 F4 39 16 C3 06 29 10 ......lis.9...).
005FD0: C8 12 35 1A 84 03 46 07 05 73 63 72 20 23 C7 1B ..5...F..scr #..
005FE0: 8A 16 10 00 06 06 D6 08 29 10 7F 19 8A 16 03 00 ........).......
005FF0: B9 05 9E 1A 7F 19 35 1A B0 0D AA 05 02 0B EA FF ......5.........
006000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
006010: 05 00 01 00 02 09 4E E5 05 00 C1 02 00 00 00 02 ......N.........
006020: 05 00 C6 02 00 00 00 02 05 00 C2 02 00 00 00 02 ................
006030: 05 00 C7 02 00 00 00 02 05 00 C3 02 00 00 00 02 ................
006040: 05 00 C8 02 00 00 00 02 05 00 C4 02 00 00 00 02 ................
006050: 05 00 C9 02 00 00 00 02 05 00 C5 02 00 00 00 02 ................
006060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006100: 8A 16 00 01 C8 12 C8 12 F6 14 E1 1A EB 04 EB 19 ................
006110: 8A 16 02 00 61 03 46 07 06 65 72 72 6F 72 3A 3B ....a.F..error:;
006120: 05 7E 13 88 73 63 72 2D 6C 6F 61 E4 4F 1E C3 06 .~..scr-loa.O...
006130: F3 1D BC 12 8A 16 00 C0 E5 02 E3 0C 3F 06 12 00 ............?...
006140: 46 07 09 6E 6F 74 5F 6F 70 65 6E 3A 3B 05 C2 0D F..not_open:;...
006150: 29 10 0D 13 E8 13 D5 03 8A 16 00 04 60 04 0E 03 )...........`...
006160: 7E 13 08 73 63 72 2D 73 61 76 E5 A3 1E C3 06 B1 ~..scr-sav.£....
006170: 08 46 07 07 6C 65 6E 67 74 68 3A E8 13 41 16 E8 .F..length:..A..
006180: 13 EB 04 65 06 9D 01 0F 05 B3 01 C8 12 3B 05 46 ...e.........;.F
006190: 07 05 62 79 74 65 73 F3 1D BC 12 8A 16 00 C0 35 ..bytes........5
0061A0: 03 E3 0C 3F 06 12 00 46 07 09 6E 6F 74 5F 6F 70 ...?...F..not_op
0061B0: 65 6E 3A 3B 05 27 08 06 06 8A 16 16 00 61 03 46 en:;.'.......a.F
0061C0: 07 06 65 72 72 6F 72 3A 3B 05 7E 13 83 69 6E EB ..error:;.~..in.
0061D0: E2 1E C3 06 8A 16 1C 00 8A 16 04 00 06 06 D6 08 ................
0061E0: F7 12 02 0B FC FF 7E 13 85 70 61 70 65 F2 4C 1F ......~..pape.L.
0061F0: C3 06 8A 16 0E 00 F7 12 F7 12 7E 13 83 70 65 EE ..........~..pe.
006200: 68 1F C3 06 8A 16 0F 00 F7 12 F7 12 7E 13 86 77 h...........~..w
006210: 69 6E 64 6F F7 7C 1F C3 06 8A 16 1A 00 8A 16 0C indo.|..........
006220: 00 8A 16 18 00 8A 16 07 00 06 06 D6 08 F7 12 02 ................
006230: 0B FC FF 8A 16 0C 00 8A 16 18 00 F7 12 F7 12 7E ...............~
006240: 13 C3 2D 2D BE 8E 1F C3 06 FA 0C 06 06 75 0C 84 ..--.........u..
006250: 03 9E 0E B0 0D 59 06 C8 12 C8 12 AA 0E 8A 16 FF .....Y..........
006260: 03 8F 04 06 06 E1 1A CC 0E 3B 05 9E 0E 84 03 7E .........;.....~
006270: 13 82 2E F3 C1 1F C3 06 DF 11 3F 06 1E 00 46 07 ..........?...F.
006280: 03 3E 3E 20 8D 1A 27 1A 92 06 D6 08 5E 15 B0 0D .>> ..'.....^...
006290: C7 1B 8A 16 FE FF 1F 07 F4 FF 7E 13 81 FC F1 1F ..........~.....
0062A0: C3 06 F3 1D 9E 11 8F 04 65 06 8A 16 80 00 41 1B ........e.....A.
0062B0: BC 12 36 20 7E 13 38 20 E1 C5 CD D4 BC 30 08 AF ..6 ~.8 .....0..
0062C0: CD 1B 00 3E 07 18 02 3E 3F CD 5A BB C1 C3 4B 01 ...>...>?.Z...K.
0062D0: 83 69 64 AE 1C 20 C3 06 18 10 8A 16 1F 00 55 0E .id.. ........U.
0062E0: 9E 11 65 06 79 1B 8F 04 65 06 F4 0E 8A 16 7F 00 ..e.y...e.......
0062F0: 55 0E F7 12 9E 1A 7E 13 85 76 6C 69 73 F4 50 20 U.....~..vlis.P
006300: 74 6F 20 73 75 69 74 20 74 68 65 20 68 75 6D 61 to suit the huma
006310: 6E 20 68 61 62 69 74 20 6F 66 20 63 6F 75 6E 74 n habit of count
006320: 69 6E 67 20 66 72 6F 6D 20 6F 6E 65 2C 20 62 75 ing from one, bu
006330: 74 20 74 68 65 79 20 61 72 65 20 20 20 20 20 20 t they are
006340: 69 64 65 6E 74 69 66 69 65 64 20 61 73 20 30 20 identified as 0
006350: 31 20 32 20 6F 6E 20 74 68 65 20 73 74 61 63 6B 1 2 on the stack
006360: 2C 20 74 6F 20 73 75 69 74 20 74 68 65 20 63 6F , to suit the co
006370: 6D 70 75 74 65 72 2E 20 20 54 6F 20 20 20 20 20 mputer. To
006380: 6D 61 6B 65 20 69 74 20 65 61 73 69 65 72 20 74 make it easier t
006390: 6F 20 66 6F 6C 6C 6F 77 20 74 68 65 20 73 74 65 o follow the ste
0063A0: 70 73 2C 20 64 65 63 6F 6D 70 69 6C 65 20 4D 4F ps, decompile MO
0063B0: 56 45 53 20 61 6E 64 20 6B 65 65 70 20 61 20 20 VES and keep a
0063C0: 68 61 72 64 20 63 6F 70 79 2E 20 20 57 6F 72 64 hard copy. Word
0063D0: 73 20 73 75 63 68 20 61 73 20 49 46 20 61 6E 64 s such as IF and
0063E0: 20 45 4C 53 45 20 61 72 65 20 63 6F 6D 70 69 6C ELSE are compil
0063F0: 65 64 20 61 73 20 30 42 52 41 4E 43 48 20 20 20 ed as 0BRANCH
006400: 61 6E 64 20 42 52 41 4E 43 48 3B 20 30 2C 20 31 and BRANCH; 0, 1
006410: 2C 20 61 6E 64 20 32 20 61 72 65 20 77 6F 72 64 , and 2 are word
006420: 73 20 28 63 6F 6E 73 74 61 6E 74 73 29 20 77 68 s (constants) wh
006430: 69 63 68 20 70 75 74 20 74 68 65 69 72 20 20 20 ich put their
006440: 76 61 6C 75 65 20 6F 6E 20 74 68 65 20 73 74 61 value on the sta
006450: 63 6B 2C 20 77 68 69 6C 65 20 6F 74 68 65 72 20 ck, while other
006460: 6E 75 6D 62 65 72 73 20 63 6F 6D 70 69 6C 65 20 numbers compile
006470: 61 73 20 4C 49 54 20 22 76 61 6C 75 65 22 2C 20 as LIT "value",
006480: 77 68 65 72 65 20 22 76 61 6C 75 65 22 20 61 70 where "value" ap
006490: 70 65 61 72 73 20 6F 6E 20 74 68 65 20 73 74 61 pears on the sta
0064A0: 63 6B 20 6F 6E 6C 79 20 61 66 74 65 72 20 4C 49 ck only after LI
0064B0: 54 20 65 78 65 63 75 74 65 73 2E 20 20 20 20 20 T executes.
0064C0: 44 45 43 4F 4D 50 20 61 6E 64 20 44 45 42 55 47 DECOMP and DEBUG
0064D0: 20 61 72 65 20 70 6F 77 65 72 66 75 6C 20 75 74 are powerful ut
0064E0: 69 6C 69 74 69 65 73 20 77 68 69 63 68 20 63 61 ilities which ca
0064F0: 6E 20 73 68 6F 77 20 68 6F 77 20 74 68 65 20 20 n show how the
006500: C3 06 8A 16 50 00 72 18 84 03 C0 0F B0 0D B0 0D ....P.r.........
006510: 8A 16 50 00 72 18 B0 0D EB 04 7D 18 F4 0E 8A 16 ..P.r.....}.....
006520: 1F 00 55 0E 8A 16 04 00 8F 04 E9 06 3F 06 0A 00 ..U.........?...
006530: 29 10 06 06 72 18 84 03 C8 12 56 20 70 06 AF 1A )...r.....V p...
006540: AB 18 8A 16 04 00 EB 04 B0 0D C8 12 3C 18 3F 06 ............<.?.
006550: C0 FF BC 12 7E 13 00 00 00 00 00 00 00 00 00 00 ....~...........
006560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0065A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0065B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0065C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0065D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0065E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0065F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006700: 73 79 73 74 65 6D 20 77 6F 72 6B 73 2C 20 61 6E system works, an
006710: 64 20 61 73 73 69 73 74 20 77 69 74 68 20 64 65 d assist with de
006720: 62 75 67 67 69 6E 67 2E 20 20 20 20 20 20 20 20 bugging.
006730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006740: 55 73 69 6E 67 20 4D 4F 56 45 53 20 69 6E 20 48 Using MOVES in H
006750: 41 4E 4F 49 20 61 73 20 61 6E 20 65 78 61 6D 70 ANOI as an examp
006760: 6C 65 3A 20 6C 6F 61 64 20 48 41 4E 4F 49 20 61 le: load HANOI a
006770: 6E 64 20 65 78 65 72 63 69 73 65 20 69 74 20 20 nd exercise it
006780: 74 6F 20 73 65 65 20 74 68 61 74 20 69 74 20 77 to see that it w
006790: 6F 72 6B 73 2C 20 74 68 65 6E 20 6C 6F 61 64 20 orks, then load
0067A0: 44 45 42 55 47 2E 20 45 6E 74 65 72 20 5C 74 72 DEBUG. Enter \tr
0067B0: 61 63 65 5F 6D 6F 76 65 73 5C 2C 20 74 68 65 6E ace_moves\, then
0067C0: 72 75 6E 20 48 41 4E 4F 49 20 63 68 6F 6F 73 69 run HANOI choosi
0067D0: 6E 67 20 33 20 64 69 73 63 73 20 61 6E 64 20 61 ng 3 discs and a
0067E0: 75 74 6F 6D 61 74 69 63 20 6D 6F 64 65 2E 20 20 utomatic mode.
0067F0: 45 61 63 68 20 73 74 65 70 20 69 6E 20 20 20 20 Each step in
006800: 4D 4F 56 45 53 20 77 69 6C 6C 20 62 65 20 64 69 MOVES will be di
006810: 73 70 6C 61 79 65 64 20 61 6E 64 20 77 61 69 74 splayed and wait
006820: 20 66 6F 72 20 61 20 6B 65 79 2D 70 72 65 73 73 for a key-press
006830: 20 62 65 66 6F 72 65 20 20 20 20 20 20 20 20 20 before
006840: 63 6F 6E 74 69 6E 75 69 6E 67 2E 20 20 49 74 20 continuing. It
006850: 77 69 6C 6C 20 72 65 71 75 69 72 65 20 73 6F 6D will require som
006860: 65 20 70 61 74 69 65 6E 63 65 20 74 6F 20 69 6E e patience to in
006870: 74 65 72 70 72 65 74 20 74 68 65 20 20 20 20 20 terpret the
006880: 64 69 73 70 6C 61 79 2C 20 62 75 74 20 69 74 20 display, but it
006890: 73 68 6F 75 6C 64 20 62 65 20 72 65 77 61 72 64 should be reward
0068A0: 69 6E 67 20 69 66 20 79 6F 75 20 61 72 65 20 69 ing if you are i
0068B0: 6E 74 65 72 65 73 74 65 64 20 69 6E 20 74 68 65 nterested in the
0068C0: 72 65 63 75 72 73 69 76 65 20 70 72 6F 63 65 73 recursive proces
0068D0: 73 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s.
0068E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0068F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006900: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006910: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006920: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006930: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006940: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006950: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006B00: 28 20 44 45 42 55 47 20 20 4C 4B 53 20 38 37 30 ( DEBUG LKS 870
006B10: 37 32 32 29 20 20 20 20 20 20 68 65 78 20 20 20 722) hex
006B20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006B40: 3A 20 6C 61 62 65 6C 20 20 76 61 72 69 61 62 6C : label variabl
006B50: 65 20 2D 32 20 61 6C 6C 6F 74 20 3B 20 28 20 68 e -2 allot ; ( h
006B60: 65 61 64 65 72 20 66 6F 72 20 6D 2F 63 20 73 75 eader for m/c su
006B70: 62 72 6F 75 74 69 6E 65 73 29 20 20 20 20 20 20 broutines)
006B80: 76 61 72 69 61 62 6C 65 20 69 70 6C 20 20 20 76 variable ipl v
006B90: 61 72 69 61 62 6C 65 20 69 70 68 20 20 76 61 72 ariable iph var
006BA0: 69 61 62 6C 65 20 63 6E 74 20 20 20 20 20 20 20 iable cnt
006BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006BC0: 76 61 72 69 61 62 6C 65 20 73 74 65 70 76 65 63 variable stepvec
006BD0: 20 28 20 76 65 63 74 6F 72 29 20 27 20 6E 6F 6F ( vector) ' noo
006BE0: 70 20 63 66 61 20 73 74 65 70 76 65 63 20 21 20 p cfa stepvec !
006BF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006C00: 65 73 63 65 6E 20 6E 65 78 74 20 31 2B 20 40 20 escen next 1+ @
006C10: 63 6F 6E 73 74 61 6E 74 20 65 73 63 20 28 20 61 constant esc ( a
006C20: 64 64 72 20 6F 66 20 45 53 43 20 72 6F 75 74 69 ddr of ESC routi
006C30: 6E 65 29 20 65 73 63 64 69 73 20 20 20 20 20 20 ne) escdis
006C40: 6C 61 62 65 6C 20 3F 72 61 6E 67 65 20 20 28 20 label ?range (
006C50: 48 4C 2D 42 43 2C 20 73 65 74 73 20 43 59 20 69 HL-BC, sets CY i
006C60: 66 20 69 6E 20 72 61 6E 67 65 29 20 20 20 20 20 f in range)
006C70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006C80: 20 28 20 6C 64 20 68 6C 2C 5B 69 70 6C 5D 20 29 ( ld hl,[ipl] )
006C90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006CA0: 20 32 61 20 63 2C 20 69 70 6C 20 2C 20 20 20 20 2a c, ipl ,
006CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006CC0: 20 28 20 6F 72 20 61 20 20 73 62 63 20 68 6C 2C ( or a sbc hl,
006CD0: 62 63 29 20 20 20 20 20 20 20 20 20 20 20 20 20 bc)
006CE0: 20 62 37 20 63 2C 20 65 64 20 63 2C 20 34 32 20 b7 c, ed c, 42
006CF0: 63 2C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c,
006D00: 28 20 44 45 42 55 47 74 78 20 38 37 30 37 32 32 ( DEBUGtx 870722
006D10: 29 20 20 20 33 20 6C 6F 61 64 20 65 78 69 74 20 ) 3 load exit
006D20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006D30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006D40: 54 68 69 73 20 69 73 20 61 6E 20 61 64 61 70 74 This is an adapt
006D50: 61 74 69 6F 6E 20 6F 66 20 74 68 65 20 44 45 42 ation of the DEB
006D60: 55 47 20 72 6F 75 74 69 6E 65 73 20 69 6E 20 74 UG routines in t
006D70: 68 65 20 4C 61 78 65 6E 20 26 20 50 65 72 72 79 he Laxen & Perry
006D80: 46 38 33 2E 20 20 41 6E 79 20 68 69 67 68 20 6C F83. Any high l
006D90: 65 76 65 6C 20 77 6F 72 64 20 6D 61 79 20 62 65 evel word may be
006DA0: 20 65 78 65 63 75 74 65 64 20 62 79 20 73 69 6E executed by sin
006DB0: 67 6C 65 2D 73 74 65 70 70 69 6E 67 20 20 20 20 gle-stepping
006DC0: 74 68 72 6F 75 67 68 20 69 74 73 20 63 6F 6D 70 through its comp
006DD0: 6F 6E 65 6E 74 20 77 6F 72 64 73 3A 20 20 74 68 onent words: th
006DE0: 65 20 63 6F 6D 70 6F 6E 65 6E 74 20 77 6F 72 64 e component word
006DF0: 20 69 73 20 65 78 65 63 75 74 65 64 2C 20 20 20 is executed,
006E00: 74 68 65 20 70 61 72 61 6D 65 74 65 72 20 73 74 the parameter st
006E10: 61 63 6B 20 69 73 20 64 69 73 70 6C 61 79 65 64 ack is displayed
006E20: 2C 20 61 6E 64 20 74 68 65 20 6E 61 6D 65 20 6F , and the name o
006E30: 66 20 74 68 65 20 6E 65 78 74 20 20 20 20 20 20 f the next
006E40: 63 6F 6D 70 6F 6E 65 6E 74 20 77 6F 72 64 20 69 component word i
006E50: 73 20 73 68 6F 77 6E 2C 20 72 65 70 65 61 74 65 s shown, repeate
006E60: 64 20 75 6E 74 69 6C 20 74 68 65 20 74 72 61 63 d until the trac
006E70: 65 64 20 77 6F 72 64 20 20 20 20 20 20 20 20 20 ed word
006E80: 74 65 72 6D 69 6E 61 74 65 73 20 76 69 61 20 45 terminates via E
006E90: 58 49 54 2E 20 20 54 68 69 73 20 69 73 20 61 63 XIT. This is ac
006EA0: 68 69 65 76 65 64 20 62 79 20 76 65 63 74 6F 72 hieved by vector
006EB0: 69 6E 67 20 74 68 65 20 69 6E 6E 65 72 20 20 20 ing the inner
006EC0: 69 6E 74 65 72 70 72 65 74 65 72 20 61 74 20 4E interpreter at N
006ED0: 45 58 54 20 61 6C 74 65 72 6E 61 74 65 6C 79 20 EXT alternately
006EE0: 74 6F 20 74 68 65 20 73 74 65 70 70 69 6E 67 20 to the stepping
006EF0: 77 6F 72 64 20 61 6E 64 20 74 6F 20 20 20 20 20 word and to
006F00: 20 28 20 72 65 74 20 6E 63 29 20 20 20 20 20 20 ( ret nc)
006F10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006F20: 20 64 30 20 63 2C 20 20 20 20 20 20 20 20 20 20 d0 c,
006F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006F40: 20 28 20 6C 64 20 68 6C 2C 5B 69 70 68 5D 29 20 ( ld hl,[iph])
006F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006F60: 20 32 61 20 63 2C 20 69 70 68 20 2C 20 20 20 20 2a c, iph ,
006F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006F80: 20 28 20 6F 72 20 61 20 20 73 62 63 20 68 6C 2C ( or a sbc hl,
006F90: 62 63 29 20 20 20 20 20 20 20 20 20 20 20 20 20 bc)
006FA0: 20 62 37 20 63 2C 20 65 64 20 63 2C 20 34 32 20 b7 c, ed c, 42
006FB0: 63 2C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c,
006FC0: 20 28 20 63 63 66 20 20 20 72 65 74 29 20 20 20 ( ccf ret)
006FD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
006FE0: 20 33 66 20 63 2C 20 63 39 20 63 2C 20 20 20 20 3f c, c9 c,
006FF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007000: 6C 61 62 65 6C 20 73 74 70 6E 65 78 74 20 20 28 label stpnext (
007010: 20 4E 45 58 54 20 77 69 74 68 20 62 72 61 6E 63 NEXT with branc
007020: 68 20 74 6F 20 73 74 65 70 70 69 6E 67 20 77 6F h to stepping wo
007030: 72 64 29 20 20 20 20 20 20 20 20 20 20 20 20 20 rd)
007040: 20 28 20 63 61 6C 6C 20 3F 72 61 6E 67 65 29 20 ( call ?range)
007050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007060: 20 63 64 20 63 2C 20 3F 72 61 6E 67 65 20 2C 20 cd c, ?range ,
007070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007080: 20 28 20 6A 72 20 6E 63 2C 4C 31 20 7B 33 33 44 ( jr nc,L1 {33D
007090: 7D 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 })
0070A0: 20 33 30 20 63 2C 20 32 31 20 63 2C 20 20 20 20 30 c, 21 c,
0070B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0070C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
0070D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0070E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0070F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
007100: 6E 6F 72 6D 61 6C 20 65 78 65 63 75 74 69 6F 6E normal execution
007110: 2C 20 77 68 65 72 65 20 74 68 65 20 73 74 65 70 , where the step
007120: 70 69 6E 67 20 77 6F 72 64 20 64 6F 65 73 20 74 ping word does t
007130: 68 65 20 61 63 74 75 61 6C 20 20 20 20 20 20 20 he actual
007140: 64 69 73 70 6C 61 79 20 64 65 73 69 67 6E 65 64 display designed
007150: 20 74 6F 20 70 72 6F 76 69 64 65 20 74 68 65 20 to provide the
007160: 6D 6F 73 74 20 72 65 6C 65 76 61 6E 74 20 69 6E most relevant in
007170: 66 6F 72 6D 61 74 69 6F 6E 2E 20 20 20 20 20 20 formation.
007180: 54 68 65 20 73 74 65 70 70 69 6E 67 20 77 6F 72 The stepping wor
007190: 64 20 53 54 45 50 48 20 69 6E 20 74 68 69 73 20 d STEPH in this
0071A0: 69 6D 70 6C 65 6D 65 6E 74 61 74 69 6F 6E 20 69 implementation i
0071B0: 73 20 64 65 73 69 67 6E 65 64 20 66 6F 72 20 20 s designed for
0071C0: 74 68 65 20 4D 4F 56 45 53 20 77 6F 72 64 20 69 the MOVES word i
0071D0: 6E 20 48 41 4E 4F 49 2C 20 73 6F 20 61 73 20 6E n HANOI, so as n
0071E0: 6F 74 20 74 6F 20 69 6E 74 65 72 66 65 72 65 20 ot to interfere
0071F0: 77 69 74 68 20 74 68 65 20 6D 61 69 6E 20 20 20 with the main
007200: 64 69 73 70 6C 61 79 2E 20 20 49 74 20 73 68 6F display. It sho
007210: 77 73 20 74 68 65 20 72 65 63 75 72 73 69 76 65 ws the recursive
007220: 20 70 72 6F 63 65 73 73 20 6F 66 20 73 74 6F 72 process of stor
007230: 69 6E 67 20 74 68 65 20 6C 6F 63 61 6C 20 20 20 ing the local
007240: 76 61 72 69 61 62 6C 65 73 20 6F 6E 20 74 68 65 variables on the
007250: 20 73 74 61 63 6B 2C 20 74 68 65 6E 20 63 6F 6E stack, then con
007260: 73 75 6D 69 6E 67 20 74 68 65 6D 20 61 73 20 4D suming them as M
007270: 4F 56 45 53 20 72 65 74 75 72 6E 73 20 74 6F 20 OVES returns to
007280: 74 77 6F 20 64 69 66 66 65 72 65 6E 74 20 70 6C two different pl
007290: 61 63 65 73 20 77 69 74 68 69 6E 20 74 68 65 20 aces within the
0072A0: 77 6F 72 64 2E 20 20 54 68 65 72 65 20 69 73 20 word. There is
0072B0: 61 20 73 6C 69 67 68 74 20 70 72 6F 62 6C 65 6D a slight problem
0072C0: 77 69 74 68 20 74 68 65 20 70 65 67 20 6E 75 6D with the peg num
0072D0: 62 65 72 69 6E 67 3A 20 6F 6E 20 74 68 65 20 73 bering: on the s
0072E0: 63 72 65 65 6E 20 74 68 65 79 20 61 72 65 20 73 creen they are s
0072F0: 68 6F 77 6E 20 61 73 20 31 20 32 20 33 2C 20 00 hown as 1 2 3, .
007300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
007310: 06 00 01 00 02 09 4E E5 06 00 C1 02 00 00 00 02 ......N.........
007320: 06 00 C6 02 00 00 00 02 06 00 C2 02 00 00 00 02 ................
007330: 06 00 C7 02 00 00 00 02 06 00 C3 02 00 00 00 02 ................
007340: 06 00 C8 02 00 00 00 02 06 00 C4 02 00 00 00 02 ................
007350: 06 00 C9 02 00 00 00 02 06 00 C5 02 00 00 00 02 ................
007360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007400: 20 28 20 6C 64 20 61 2C 5B 63 6E 74 5D 20 69 6E ( ld a,[cnt] in
007410: 63 20 61 20 6C 64 20 5B 63 6E 74 5D 2C 61 29 20 c a ld [cnt],a)
007420: 20 33 61 20 63 2C 20 63 6E 74 20 2C 20 33 63 20 3a c, cnt , 3c
007430: 63 2C 20 33 32 20 63 2C 20 63 6E 74 20 2C 20 20 c, 32 c, cnt ,
007440: 20 28 20 63 70 20 32 20 20 6A 72 20 6E 7A 2C 4C ( cp 2 jr nz,L
007450: 31 20 7B 32 32 44 7D 29 20 20 20 20 20 20 20 20 1 {22D})
007460: 20 66 65 20 63 2C 20 30 32 20 63 2C 20 32 30 20 fe c, 02 c, 20
007470: 63 2C 20 31 36 20 63 2C 20 20 20 20 20 20 20 20 c, 16 c,
007480: 20 28 20 78 6F 72 20 61 20 20 6C 64 20 5B 63 6E ( xor a ld [cn
007490: 74 5D 2C 61 29 20 20 20 20 20 20 20 20 20 20 20 t],a)
0074A0: 20 61 66 20 63 2C 20 33 32 20 63 2C 20 63 6E 74 af c, 32 c, cnt
0074B0: 20 2C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,
0074C0: 20 28 20 6C 64 20 61 2C 63 64 20 20 6C 64 20 5B ( ld a,cd ld [
0074D0: 6E 65 78 74 5D 2C 61 29 20 20 20 20 20 20 20 20 next],a)
0074E0: 20 33 65 20 63 2C 20 63 64 20 63 2C 20 33 32 20 3e c, cd c, 32
0074F0: 63 2C 20 6E 65 78 74 20 2C 20 20 20 20 20 20 20 c, next ,
007500: 20 28 20 6C 64 20 68 6C 2C 65 73 63 20 20 6C 64 ( ld hl,esc ld
007510: 20 5B 6E 65 78 74 2B 31 5D 2C 68 6C 29 20 20 20 [next+1],hl)
007520: 20 32 31 20 63 2C 20 65 73 63 20 2C 20 32 32 20 21 c, esc , 22
007530: 63 2C 20 6E 65 78 74 20 31 2B 20 2C 20 20 20 20 c, next 1+ ,
007540: 20 20 28 20 72 65 73 74 6F 72 65 73 20 6E 6F 72 ( restores nor
007550: 6D 61 6C 20 63 61 6C 6C 20 74 6F 20 45 53 43 29 mal call to ESC)
007560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007580: 20 28 20 70 75 73 68 20 62 63 20 6C 64 20 68 6C ( push bc ld hl
007590: 2C 5B 73 74 65 70 76 65 63 5D 29 20 20 20 20 20 ,[stepvec])
0075A0: 20 63 35 20 63 2C 20 32 61 20 63 2C 20 73 74 65 c5 c, 2a c, ste
0075B0: 70 76 65 63 20 2C 20 20 20 20 20 20 20 20 20 20 pvec ,
0075C0: 20 28 20 6A 70 20 6E 65 78 74 31 29 20 28 20 65 ( jp next1) ( e
0075D0: 78 65 63 75 74 65 20 29 20 20 20 20 20 20 20 20 xecute )
0075E0: 20 63 33 20 63 2C 20 6E 65 78 74 31 20 2C 20 20 c3 c, next1 ,
0075F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007600: 20 73 74 65 70 70 69 6E 67 20 77 6F 72 64 20 6D stepping word m
007610: 75 73 74 20 75 73 65 20 69 74 20 75 70 20 61 6E ust use it up an
007620: 64 20 70 61 74 63 68 20 69 74 73 65 6C 66 20 69 d patch itself i
007630: 6E 74 6F 20 4E 45 58 54 20 61 67 61 69 6E 2E 29 nto NEXT again.)
007640: 20 20 20 20 32 30 20 31 20 33 31 20 65 6D 69 74 20 1 31 emit
007650: 20 65 6D 69 74 20 65 6D 69 74 20 28 20 6C 6F 63 emit emit ( loc
007660: 61 74 65 20 31 2C 32 30 29 20 20 20 20 20 20 20 ate 1,20)
007670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007680: 20 20 20 20 3E 72 20 2E 73 68 20 72 3E 20 20 20 >r .sh r>
007690: 20 28 20 73 61 76 65 20 49 50 2C 20 73 68 6F 77 ( save IP, show
0076A0: 20 73 74 61 63 6B 2C 20 72 65 63 6F 76 65 72 20 stack, recover
0076B0: 49 50 29 20 20 20 20 20 20 20 20 20 20 20 20 20 IP)
0076C0: 20 20 20 20 2E 22 20 2E 2E 2E 20 22 20 40 20 32 ." ... " @ 2
0076D0: 2B 20 6E 66 61 20 69 64 2E 20 28 20 73 68 6F 77 + nfa id. ( show
0076E0: 20 77 6F 72 64 20 74 6F 20 62 65 20 65 78 65 63 word to be exec
0076F0: 75 74 65 64 29 20 20 20 20 20 20 20 20 20 20 20 uted)
007700: 20 20 20 20 32 34 31 20 65 6D 69 74 20 32 30 20 241 emit 20
007710: 65 6D 69 74 20 20 6B 65 79 20 64 72 6F 70 20 20 emit key drop
007720: 28 20 63 6C 65 61 72 2C 20 77 61 69 74 20 66 6F ( clear, wait fo
007730: 72 20 6B 65 79 20 70 72 65 73 73 29 20 20 20 20 r key press)
007740: 20 20 20 20 70 6E 65 78 74 20 28 20 70 61 74 63 pnext ( patc
007750: 68 20 4E 45 58 54 20 74 6F 20 74 68 65 20 73 74 h NEXT to the st
007760: 65 70 70 69 6E 67 20 77 6F 72 64 29 20 20 20 20 epping word)
007770: 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
007780: 20 27 20 73 74 65 70 68 20 63 66 61 20 73 74 65 ' steph cfa ste
007790: 70 76 65 63 20 21 20 28 20 73 74 6F 72 65 20 43 pvec ! ( store C
0077A0: 46 41 20 6F 66 20 53 54 45 50 48 20 69 6E 20 76 FA of STEPH in v
0077B0: 65 63 74 6F 72 29 1A 20 20 20 20 20 20 20 20 20 ector).
0077C0: 54 68 69 73 20 69 73 20 61 6E 20 61 64 61 70 74 This is an adapt
0077D0: 61 74 69 6F 6E 20 6F 66 20 74 68 65 20 44 45 42 ation of the DEB
0077E0: 55 47 20 72 6F 75 74 69 6E 65 73 20 69 6E 20 74 UG routines in t
0077F0: 68 65 20 4C 61 78 65 6E 20 26 20 50 65 72 72 79 he Laxen & Perry
007800: 20 28 20 4C 31 3A 20 6A 70 20 6E 65 78 74 2B 33 ( L1: jp next+3
007810: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
007820: 20 63 33 20 63 2C 20 6E 65 78 74 20 33 20 2B 20 c3 c, next 3 +
007830: 2C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,
007840: 68 78 63 6F 64 65 20 70 6E 65 78 74 20 20 28 20 hxcode pnext (
007850: 70 61 74 63 68 20 4E 45 58 54 20 74 6F 20 6A 75 patch NEXT to ju
007860: 6D 70 20 74 6F 20 53 54 50 4E 45 58 54 29 20 20 mp to STPNEXT)
007870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007880: 20 28 20 6C 64 20 61 2C 63 33 20 20 6C 64 20 5B ( ld a,c3 ld [
007890: 6E 65 78 74 5D 2C 61 29 20 20 20 20 20 20 20 20 next],a)
0078A0: 20 33 65 20 63 2C 20 63 33 20 63 2C 20 33 32 20 3e c, c3 c, 32
0078B0: 63 2C 20 6E 65 78 74 20 2C 20 20 20 20 20 20 20 c, next ,
0078C0: 20 28 20 6C 64 20 68 6C 2C 73 74 70 6E 65 78 74 ( ld hl,stpnext
0078D0: 20 6C 64 20 5B 6E 65 78 74 2B 31 5D 2C 68 6C 29 ld [next+1],hl)
0078E0: 20 32 31 20 63 2C 20 73 74 70 6E 65 78 74 20 2C 21 c, stpnext ,
0078F0: 20 32 32 20 63 2C 20 6E 65 78 74 20 31 2B 20 2C 22 c, next 1+ ,
007900: 20 28 20 6A 70 20 6E 65 78 74 29 20 20 20 20 20 ( jp next)
007910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007920: 20 63 33 20 63 2C 20 6E 65 78 74 20 2C 20 20 20 c3 c, next ,
007930: 20 20 20 73 6D 75 64 67 65 20 20 20 20 20 20 20 smudge
007940: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
007950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0079A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0079B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0079C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0079D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0079E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0079F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
007A00: 28 20 44 45 43 4F 4D 50 20 20 4C 4B 53 20 38 37 ( DECOMP LKS 87
007A10: 30 34 32 32 20 20 44 65 63 6F 6D 70 69 6C 65 72 0422 Decompiler
007A20: 20 66 6F 72 20 63 70 63 46 54 48 32 29 20 20 20 for cpcFTH2)
007A30: 20 20 20 20 68 65 78 20 20 20 20 20 20 20 20 20 hex
007A40: 3A 20 74 79 70 72 20 20 28 20 61 64 64 72 20 6C : typr ( addr l
007A50: 67 74 68 20 2D 2D 20 29 20 28 20 70 72 69 6E 74 gth -- ) ( print
007A60: 73 20 63 6F 64 65 73 20 33 32 44 20 74 6F 20 31 s codes 32D to 1
007A70: 32 37 44 20 6F 6E 6C 79 29 20 20 20 20 20 20 20 27D only)
007A80: 20 20 20 64 75 70 20 30 3E 20 69 66 20 6F 76 65 dup 0> if ove
007A90: 72 20 2B 20 73 77 61 70 20 64 6F 20 69 20 63 40 r + swap do i c@
007AA0: 20 37 66 20 61 6E 64 20 62 6C 20 6D 61 78 20 65 7f and bl max e
007AB0: 6D 69 74 20 20 20 20 20 20 20 20 20 20 20 20 20 mit
007AC0: 20 20 20 31 20 2F 6C 6F 6F 70 20 20 65 6C 73 65 1 /loop else
007AD0: 20 64 64 72 6F 70 20 74 68 65 6E 20 3B 20 20 20 ddrop then ;
007AE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007AF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007B00: 3A 20 69 64 2E 20 20 20 20 28 20 61 64 64 72 20 : id. ( addr
007B10: 2D 2D 20 29 20 63 6F 75 6E 74 20 31 66 20 61 6E -- ) count 1f an
007B20: 64 20 74 79 70 72 20 20 73 70 61 63 65 20 3B 20 d typr space ;
007B30: 28 20 73 61 66 65 72 29 20 20 20 20 20 20 20 20 ( safer)
007B40: 3A 20 23 2E 20 20 28 20 75 20 2D 2D 20 29 20 20 : #. ( u -- )
007B50: 30 20 35 20 64 2E 72 20 73 70 61 63 65 20 3B 20 0 5 d.r space ;
007B60: 28 20 70 72 69 6E 74 20 6E 75 6D 62 65 72 20 69 ( print number i
007B70: 6E 20 35 2D 63 68 61 72 20 66 69 65 6C 64 29 20 n 5-char field)
007B80: 76 61 72 69 61 62 6C 65 20 22 70 66 61 20 32 20 variable "pfa 2
007B90: 61 6C 6C 6F 74 20 32 32 20 74 65 78 74 20 22 70 allot 22 text "p
007BA0: 66 61 20 22 20 70 61 64 20 63 6F 75 6E 74 20 22 fa " pad count "
007BB0: 70 66 61 20 73 77 61 70 20 63 6D 6F 76 65 20 20 pfa swap cmove
007BC0: 3A 20 6E 6F 74 63 6F 6C 6F 6E 20 20 20 28 20 70 : notcolon ( p
007BD0: 66 61 20 63 66 61 5F 40 20 2D 2D 20 29 20 20 20 fa cfa_@ -- )
007BE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007BF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007C00: 64 65 63 69 6D 61 6C 20 20 20 20 20 20 20 20 20 decimal
007C10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007C20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007C30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007C40: 3A 20 74 72 61 63 65 20 28 20 2D 2D 20 29 20 28 : trace ( -- ) (
007C50: 20 75 73 61 67 65 3A 20 74 72 61 63 65 20 4E 41 usage: trace NA
007C60: 4D 45 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ME)
007C70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007C80: 20 20 20 5B 63 6F 6D 70 69 6C 65 5D 20 27 20 64 [compile] ' d
007C90: 75 70 20 20 20 20 20 20 20 20 20 20 28 20 70 66 up ( pf
007CA0: 61 20 6F 66 20 4E 41 4D 45 29 20 20 20 20 20 20 a of NAME)
007CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007CC0: 20 20 20 63 72 20 32 34 20 65 6D 69 74 20 6E 66 cr 24 emit nf
007CD0: 61 20 69 64 2E 20 38 20 65 6D 69 74 20 32 34 20 a id. 8 emit 24
007CE0: 65 6D 69 74 20 2E 22 20 20 3A 20 22 20 20 20 20 emit ." : "
007CF0: 28 20 73 68 6F 77 20 4E 41 4D 45 29 20 20 20 20 ( show NAME)
007D00: 20 20 20 63 66 61 20 64 75 70 20 20 64 75 70 20 cfa dup dup
007D10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007D20: 20 20 20 20 20 20 20 20 28 20 63 66 61 20 6F 66 ( cfa of
007D30: 20 4E 41 4D 45 29 20 20 20 20 20 20 20 20 20 20 NAME)
007D40: 20 20 20 40 20 6F 76 65 72 20 32 2B 20 3D 20 20 @ over 2+ =
007D50: 20 20 20 20 20 28 20 64 6F 65 73 20 63 66 61 20 ( does cfa
007D60: 70 6F 69 6E 74 20 74 6F 20 70 66 61 20 3F 29 20 point to pfa ?)
007D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007D80: 20 20 20 69 66 20 2E 22 20 43 61 6E 6E 6F 74 20 if ." Cannot
007D90: 74 72 61 63 65 20 61 20 6D 61 63 68 69 6E 65 20 trace a machine
007DA0: 63 6F 64 65 20 77 6F 72 64 2E 22 20 64 64 72 6F code word." ddro
007DB0: 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 p
007DC0: 20 20 20 65 6C 73 65 20 20 20 20 28 20 61 20 68 else ( a h
007DD0: 69 67 68 20 6C 65 76 65 6C 20 77 6F 72 64 29 20 igh level word)
007DE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
007E00: 20 20 20 64 75 70 20 5B 20 27 20 63 6F 6E 73 74 dup [ ' const
007E10: 61 6E 74 20 30 36 20 2B 20 5D 20 6C 69 74 65 72 ant 06 + ] liter
007E20: 61 6C 20 3D 20 69 66 20 2E 22 20 64 6F 63 6F 6E al = if ." docon
007E30: 22 20 20 65 6C 73 65 20 20 20 20 20 20 20 20 20 " else
007E40: 20 20 20 64 75 70 20 5B 20 27 20 63 72 65 61 74 dup [ ' creat
007E50: 65 20 20 20 36 39 20 2B 20 5D 20 6C 69 74 65 72 e 69 + ] liter
007E60: 61 6C 20 3D 20 69 66 20 2E 22 20 64 6F 76 61 72 al = if ." dovar
007E70: 22 20 20 65 6C 73 65 20 20 20 20 20 20 20 20 20 " else
007E80: 20 20 20 64 75 70 20 5B 20 27 20 75 73 65 72 20 dup [ ' user
007E90: 20 20 20 20 30 34 20 2B 20 5D 20 6C 69 74 65 72 04 + ] liter
007EA0: 61 6C 20 3D 20 69 66 20 2E 22 20 64 6F 75 73 65 al = if ." douse
007EB0: 22 20 20 65 6C 73 65 20 20 20 20 20 20 20 20 20 " else
007EC0: 20 20 20 64 75 70 20 5B 20 27 20 64 6F 65 73 3E dup [ ' does>
007ED0: 20 20 20 20 31 30 20 2B 20 5D 20 6C 69 74 65 72 10 + ] liter
007EE0: 61 6C 20 3D 20 69 66 20 2E 22 20 64 6F 64 6F 65 al = if ." dodoe
007EF0: 73 22 20 65 6C 73 65 20 2E 22 20 63 6F 64 65 22 s" else ." code"
007F00: 20 20 20 20 74 68 65 6E 20 74 68 65 6E 20 74 68 then then th
007F10: 65 6E 20 74 68 65 6E 20 63 72 20 64 72 6F 70 20 en then cr drop
007F20: 64 75 70 20 2E 22 20 70 66 61 20 22 20 23 2E 20 dup ." pfa " #.
007F30: 40 20 23 2E 20 3B 20 20 20 20 20 20 20 20 20 20 @ #. ;
007F40: 28 20 70 61 74 20 69 73 20 61 20 66 69 78 65 64 ( pat is a fixed
007F50: 20 62 75 66 66 65 72 20 66 72 6F 6D 20 39 61 48 buffer from 9aH
007F60: 20 74 6F 20 66 66 48 2C 20 74 61 69 6C 2D 65 6E to ffH, tail-en
007F70: 64 20 6F 66 20 54 49 42 29 20 20 2D 2D 3E 20 20 d of TIB) -->
007F80: 28 20 72 23 20 61 6E 64 20 66 6C 64 20 61 72 65 ( r# and fld are
007F90: 20 55 53 45 52 20 76 61 72 69 61 62 6C 65 73 20 USER variables
007FA0: 6E 6F 74 20 75 73 65 64 20 62 79 20 74 68 65 20 not used by the
007FB0: 73 79 73 74 65 6D 29 20 20 20 20 20 20 20 20 20 system)
007FC0: 28 20 48 6F 74 70 61 74 63 68 29 20 28 20 27 20 ( Hotpatch) ( '
007FD0: 74 79 70 72 20 63 66 61 20 27 20 74 79 70 65 20 typr cfa ' type
007FE0: 21 20 20 20 20 20 27 20 65 78 69 74 20 63 66 61 ! ' exit cfa
007FF0: 20 27 20 74 79 70 65 20 32 2B 20 21 20 29 20 00 ' type 2+ ! ) .
008000: 20 20 20 20 20 62 65 67 69 6E 20 32 2B 20 64 75 begin 2+ du
008010: 70 20 40 20 5B 20 27 20 65 78 69 74 20 63 66 61 p @ [ ' exit cfa
008020: 20 5D 20 6C 69 74 65 72 61 6C 20 3D 20 75 6E 74 ] literal = unt
008030: 69 6C 20 28 20 69 74 73 20 65 78 69 74 29 20 20 il ( its exit)
008040: 20 20 20 20 20 69 70 68 20 21 20 20 69 70 6C 20 iph ! ipl
008050: 21 20 20 20 28 20 73 74 61 72 74 20 69 6E 20 49 ! ( start in I
008060: 50 4C 2C 20 65 6E 64 20 69 6E 20 49 50 48 29 20 PL, end in IPH)
008070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008080: 20 20 20 20 20 31 20 63 6E 74 20 21 20 20 70 6E 1 cnt ! pn
008090: 65 78 74 20 20 28 20 69 6E 69 74 69 61 6C 69 7A ext ( initializ
0080A0: 65 20 73 74 65 70 70 69 6E 67 29 20 20 20 20 20 e stepping)
0080B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0080C0: 20 20 20 20 20 2E 22 20 6E 6F 77 20 73 65 74 20 ." now set
0080D0: 75 70 20 66 6F 72 20 74 72 61 63 69 6E 67 3B 20 up for tracing;
0080E0: 45 53 43 45 4E 20 6F 72 20 45 53 43 44 49 53 20 ESCEN or ESCDIS
0080F0: 64 69 73 61 62 6C 65 73 2E 22 20 20 20 20 20 20 disables."
008100: 20 20 20 74 68 65 6E 20 63 72 20 3B 20 20 20 20 then cr ;
008110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008140: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
008150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008180: 54 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 77 6F The following wo
008190: 72 64 73 20 64 69 73 70 6C 61 79 20 65 61 63 68 rds display each
0081A0: 20 73 74 65 70 20 74 68 72 6F 75 67 68 20 74 68 step through th
0081B0: 65 20 63 68 6F 73 65 6E 20 77 6F 72 64 2E 20 20 e chosen word.
0081C0: 54 68 65 79 20 6D 61 79 20 62 65 20 6D 6F 64 69 They may be modi
0081D0: 66 69 65 64 20 74 6F 20 73 75 69 74 2E 20 54 68 fied to suit. Th
0081E0: 65 73 65 20 73 75 69 74 20 4D 4F 56 45 53 20 69 ese suit MOVES i
0081F0: 6E 20 48 41 4E 4F 49 2E 20 20 20 20 20 20 20 00 n HANOI. .
008200: 3A 20 6E 6F 74 63 6F 6D 70 69 6C 65 3F 20 20 28 : notcompile? (
008210: 20 2D 2D 20 66 6C 29 20 20 28 20 6C 6F 6F 6B 2D -- fl) ( look-
008220: 62 65 68 69 6E 64 20 66 6F 72 20 63 6F 6D 70 69 behind for compi
008230: 6C 65 29 20 20 20 20 20 20 20 20 20 20 20 20 20 le)
008240: 20 20 20 66 6C 64 20 40 20 40 20 5B 20 27 20 63 fld @ @ [ ' c
008250: 6F 6D 70 69 6C 65 20 63 66 61 20 5D 20 6C 69 74 ompile cfa ] lit
008260: 65 72 61 6C 20 3D 20 6E 6F 74 20 3B 20 20 20 20 eral = not ;
008270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008280: 3A 20 69 6E 2D 6C 69 6E 65 3F 20 20 20 20 20 28 : in-line? (
008290: 20 61 64 31 20 61 64 32 20 2D 2D 20 61 64 31 5C ad1 ad2 -- ad1\
0082A0: 61 64 33 29 20 28 20 74 65 73 74 20 66 6F 72 20 ad3) ( test for
0082B0: 64 69 73 63 6F 6E 74 69 6E 75 69 74 79 29 20 20 discontinuity)
0082C0: 20 20 20 64 75 70 20 20 27 20 6C 69 74 20 20 20 dup ' lit
0082D0: 20 20 3D 20 20 64 75 70 20 72 23 20 21 20 20 20 = dup r# !
0082E0: 20 20 20 6F 76 65 72 20 27 20 62 72 61 6E 63 68 over ' branch
0082F0: 20 20 3D 20 20 6F 72 20 20 20 20 20 20 20 20 20 = or
008300: 20 20 20 6F 76 65 72 20 27 20 30 62 72 61 6E 63 over ' 0branc
008310: 68 20 3D 20 20 6F 72 20 20 20 20 20 20 20 20 20 h = or
008320: 20 20 20 6F 76 65 72 20 27 20 3C 6C 6F 6F 70 3E over ' <loop>
008330: 20 20 3D 20 20 6F 72 20 20 20 20 20 20 20 20 20 = or
008340: 20 20 20 6F 76 65 72 20 27 20 3C 2B 6C 6F 6F 70 over ' <+loop
008350: 3E 20 3D 20 20 6F 72 20 20 20 20 20 20 20 20 20 > = or
008360: 20 20 20 6F 76 65 72 20 27 20 3C 2F 6C 6F 6F 70 over ' </loop
008370: 3E 20 3D 20 20 6F 72 20 20 20 20 20 20 20 20 20 > = or
008380: 28 20 31 29 20 69 66 20 64 72 6F 70 20 6E 6F 74 ( 1) if drop not
008390: 63 6F 6D 70 69 6C 65 3F 20 20 20 20 20 20 20 20 compile?
0083A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0083B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0083C0: 28 20 32 29 20 20 20 69 66 20 63 72 20 32 2B 20 ( 2) if cr 2+
0083D0: 64 75 70 20 64 75 70 20 34 20 73 70 61 63 65 73 dup dup 4 spaces
0083E0: 20 23 2E 20 64 75 70 20 40 20 64 75 70 20 23 2E #. dup @ dup #.
0083F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008400: 3A 20 2E 73 68 20 20 28 20 2D 2D 20 29 20 28 20 : .sh ( -- ) (
008410: 44 69 73 70 6C 61 79 20 73 74 61 63 6B 20 69 6E Display stack in
008420: 20 66 72 61 6D 65 73 20 6F 66 20 66 6F 75 72 29 frames of four)
008430: 20 20 2E 22 20 2D 2D 20 22 20 20 20 20 20 20 20 ." -- "
008440: 20 20 20 64 65 70 74 68 20 69 66 20 20 64 65 70 depth if dep
008450: 74 68 20 32 2A 20 32 2B 20 20 32 20 64 6F 20 20 th 2* 2+ 2 do
008460: 73 30 20 69 20 2D 20 40 20 75 2E 20 20 20 20 20 s0 i - @ u.
008470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 20 i
008490: 38 20 6D 6F 64 20 30 3D 20 69 66 20 2E 22 20 5C 8 mod 0= if ." \
0084A0: 20 22 20 74 68 65 6E 20 28 20 66 72 61 6D 65 20 " then ( frame
0084B0: 64 69 76 69 73 69 6F 6E 29 20 20 20 20 20 20 20 division)
0084C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 20 2B 2 +
0084D0: 6C 6F 6F 70 20 20 20 20 74 68 65 6E 20 20 3B 20 loop then ;
0084E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0084F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008500: 3A 20 73 74 65 70 68 20 20 28 20 69 70 20 2D 2D : steph ( ip --
008510: 20 29 20 20 20 28 20 65 78 65 63 75 74 65 64 20 ) ( executed
008520: 65 76 65 72 79 20 6F 74 68 65 72 20 70 61 73 73 every other pass
008530: 20 74 68 72 6F 75 67 68 20 4E 45 58 54 29 20 20 through NEXT)
008540: 20 28 20 49 50 20 69 73 20 74 68 65 20 49 6E 74 ( IP is the Int
008550: 65 72 70 72 65 74 65 72 20 50 6F 69 6E 74 65 72 erpreter Pointer
008560: 2C 20 63 6F 6E 74 65 6E 74 73 20 6F 66 20 72 65 , contents of re
008570: 67 20 42 43 20 70 75 73 68 65 64 20 20 20 20 20 g BC pushed
008580: 20 62 79 20 53 54 50 4E 45 58 54 2E 20 20 49 74 by STPNEXT. It
008590: 20 70 6F 69 6E 74 73 20 74 6F 20 74 68 65 20 6E points to the n
0085A0: 65 78 74 20 50 46 20 6F 66 20 74 68 65 20 74 72 ext PF of the tr
0085B0: 61 63 65 64 20 77 6F 72 64 2C 20 20 20 20 20 20 aced word,
0085C0: 20 77 68 69 63 68 20 63 6F 6E 74 61 69 6E 73 20 which contains
0085D0: 74 68 65 20 43 46 41 20 6F 66 20 74 68 65 20 77 the CFA of the w
0085E0: 6F 72 64 20 74 6F 20 62 65 20 65 78 65 63 75 74 ord to be execut
0085F0: 65 64 2E 20 20 54 68 65 20 20 20 20 20 20 20 20 ed. The
008600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
008610: 07 00 01 00 02 09 4E E5 07 00 C1 02 00 00 00 02 ......N.........
008620: 07 00 C6 02 00 00 00 02 07 00 C2 02 00 00 00 02 ................
008630: 07 00 C7 02 00 00 00 02 07 00 C3 02 00 00 00 02 ................
008640: 07 00 C8 02 00 00 00 02 07 00 C4 02 00 00 00 02 ................
008650: 07 00 C9 02 00 00 00 02 07 00 C5 02 00 00 00 02 ................
008660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008700: 20 20 20 20 20 20 20 20 20 72 23 20 40 20 20 28 r# @ (
008710: 20 33 29 20 69 66 20 64 64 72 6F 70 20 28 20 33 3) if ddrop ( 3
008720: 29 20 65 6C 73 65 20 2B 20 2E 22 20 74 6F 20 22 ) else + ." to "
008730: 20 23 2E 20 28 20 33 29 20 74 68 65 6E 20 20 20 #. ( 3) then
008740: 28 20 32 29 20 20 20 74 68 65 6E 20 28 20 6E 75 ( 2) then ( nu
008750: 6D 62 65 72 73 20 69 6E 64 69 63 61 74 65 20 6D mbers indicate m
008760: 61 74 63 68 69 6E 67 20 69 66 2E 2E 2E 7B 65 6C atching if...{el
008770: 73 65 7D 2E 2E 2E 74 68 65 6E 29 20 20 20 20 20 se}...then)
008780: 28 20 31 29 20 65 6C 73 65 20 20 20 64 75 70 20 ( 1) else dup
008790: 27 20 3C 2E 22 3E 20 3D 20 73 77 61 70 20 20 27 ' <."> = swap '
0087A0: 20 3C 61 62 6F 72 74 22 3E 20 3D 20 6F 72 20 20 <abort"> = or
0087B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0087C0: 28 20 34 29 20 20 20 69 66 20 6E 6F 74 63 6F 6D ( 4) if notcom
0087D0: 70 69 6C 65 3F 20 20 20 20 20 20 20 20 20 20 20 pile?
0087E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0087F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008800: 28 20 35 29 20 20 20 20 20 69 66 20 32 2B 20 64 ( 5) if 2+ d
008810: 75 70 20 64 64 75 70 20 63 72 20 34 20 73 70 61 up ddup cr 4 spa
008820: 63 65 73 20 23 2E 20 20 63 40 20 2B 20 31 2D 20 ces #. c@ + 1-
008830: 73 77 61 70 20 20 20 20 20 20 20 20 20 20 20 20 swap
008840: 20 20 20 20 20 20 20 20 20 20 20 64 75 70 20 63 dup c
008850: 40 20 2E 20 31 38 20 65 6D 69 74 20 63 6F 75 6E @ . 18 emit coun
008860: 74 20 74 79 70 72 20 31 38 20 65 6D 69 74 20 20 t typr 18 emit
008870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008880: 28 20 35 29 20 20 20 20 20 74 68 65 6E 20 20 20 ( 5) then
008890: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0088A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0088B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0088C0: 28 20 34 29 20 20 20 74 68 65 6E 20 20 20 20 20 ( 4) then
0088D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0088E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0088F0: 20 20 20 20 20 20 2D 2D 3E 20 20 20 20 20 20 00 --> .
008900: 06 7E 0C DE 16 6A 19 52 17 7E 13 81 AB 77 04 91 .~...j.R.~...w..
008910: 04 D1 E1 19 C3 4A 01 82 2B A1 8B 04 9E 04 E1 D1 .....J..+.......
008920: 7E 83 77 23 7E 8A 77 C3 4B 01 82 2B AD 97 04 C3 ~.w#~.w.K..+....
008930: 06 0F 06 3F 06 04 00 FC 17 7E 13 C5 2B 6C 6F 6F ...?.....~..+loo
008940: F0 AA 04 C3 06 8A 16 03 00 1C 0D 88 0F 1F 07 F6 ................
008950: 14 EB 04 DB 04 7E 13 81 AC BB 04 C3 06 F6 14 84 .....~..........
008960: 03 70 06 47 0E 7E 13 81 AD D7 04 ED 04 D1 E1 CD .p.G.~..........
008970: D3 1A C3 4A 01 85 2D 66 69 6E E4 E7 04 C3 06 2F ...J..-fin...../
008980: 07 7E 13 89 2D 74 72 61 69 6C 69 6E E7 F5 04 C3 .~..-trailin....
008990: 06 C8 12 06 06 D6 08 9E 11 8F 04 65 06 F4 0E 84 ...........e....
0089A0: 0E 67 0C 3F 06 08 00 1A 16 B9 0E 04 00 65 06 50 .g.?.........e.P
0089B0: 06 64 07 E4 FF 7E 13 81 AE 03 05 C3 06 12 1A 0A .d...~..........
0089C0: 11 7E 13 C2 2E A2 37 05 C3 06 14 04 F4 0E 8A 16 .~....7.........
0089D0: 22 00 5B 0C 3F 06 0C 00 50 06 75 0C 9C 04 B9 0E ".[.?...P.u.....
0089E0: 40 00 8A 16 22 00 CF 1A B0 0D 3F 06 06 00 88 0F @...".....?.....
0089F0: 46 07 71 1D C8 12 F4 0E 59 06 7D 18 8F 04 F4 0E F.q.....Y.}.....
008A00: 8A 16 22 00 5B 0C 3C 18 8B 0D CF 1A B0 0D 3F 06 ..".[.<.......?.
008A10: 0C 00 F4 0E 59 06 47 0E B9 0E 06 00 18 10 79 1B ....Y.G.......y.
008A20: 7E 13 85 2E 6C 69 6E E5 43 05 C3 06 95 0A 0F 05 ~...lin.C.......
008A30: 79 1B 7E 13 82 2E F2 A2 05 C3 06 7E 0C 12 1A 6A y.~........~...j
008A40: 19 1A 11 7E 13 81 AF B4 05 C3 06 F6 05 E1 1A BC ...~............
008A50: 12 7E 13 C5 2F 6C 6F 6F F0 C5 05 C3 06 8A 16 03 .~../loo........
008A60: 00 1C 0D 88 0F 64 07 F6 14 EB 04 DB 04 7E 13 84 .....d.......~..
008A70: 2F 6D 6F E4 D3 05 C3 06 7E 0C 12 1A 6A 19 52 17 /mo.....~...j.R.
008A80: 7E 13 81 B0 EF 05 AD 0F 00 00 82 30 BC 02 06 11 ~..........0....
008A90: 06 E1 29 21 00 00 D2 1A 06 23 C3 4A 01 82 30 BD ..)!.....#.J..0.
008AA0: 0A 06 C3 06 3C 18 7E 13 82 30 BE 1D 06 C3 06 06 ....<.~..0......
008AB0: 06 67 0C 7E 13 87 30 62 72 61 6E 63 E8 28 06 41 .g.~..0branc.(.A
008AC0: 06 E1 7D B4 CA BB 0E 03 03 C3 4B 01 81 B1 35 06 ..}.......K...5.
008AD0: AD 0F 01 00 82 31 AB 4C 06 5B 06 E1 23 C3 4A 01 .....1.L.[..#.J.
008AE0: 82 31 AD 54 06 67 06 E1 2B C3 4A 01 81 B2 60 06 .1.T.g..+.J...`.
008AF0: AD 0F 02 00 82 32 AA 6C 06 7B 06 E1 29 C3 4A 01 .....2.l.{..).J.
008B00: 28 20 31 29 20 74 68 65 6E 20 20 64 75 70 20 66 ( 1) then dup f
008B10: 6C 64 20 21 20 3B 20 28 20 64 65 63 6F 6D 70 69 ld ! ; ( decompi
008B20: 6C 65 20 74 6F 20 65 78 61 6D 69 6E 65 20 63 6F le to examine co
008B30: 6E 64 69 74 69 6F 6E 61 6C 73 29 20 20 20 20 20 nditionals)
008B40: 3A 20 63 6F 6C 6F 6E 65 78 3F 20 28 20 61 64 64 : colonex? ( add
008B50: 72 20 2D 2D 20 61 64 64 72 20 66 6C 29 20 28 20 r -- addr fl) (
008B60: 65 78 69 74 73 20 66 72 6F 6D 20 63 6F 6C 6F 6E exits from colon
008B70: 20 64 65 66 69 6E 69 74 69 6F 6E 73 29 20 20 20 definitions)
008B80: 20 20 20 20 64 75 70 20 20 20 27 20 65 78 69 74 dup ' exit
008B90: 20 3D 20 6F 76 65 72 20 20 27 20 3C 3B 63 6F 64 = over ' <;cod
008BA0: 65 3E 20 3D 20 6F 72 20 3B 20 20 20 20 20 20 20 e> = or ;
008BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008BC0: 3A 20 63 6F 6C 6F 6E 64 65 66 20 20 20 28 20 70 : colondef ( p
008BD0: 66 61 20 63 66 61 5F 40 20 2D 2D 20 29 20 28 20 fa cfa_@ -- ) (
008BE0: 63 6F 6C 6F 6E 20 64 65 66 69 6E 69 74 69 6F 6E colon definition
008BF0: 73 20 6F 6E 6C 79 29 20 20 20 20 20 20 20 20 20 s only)
008C00: 20 20 20 20 2E 22 20 64 6F 63 6F 6C 22 20 20 20 ." docol"
008C10: 20 66 6C 64 20 21 20 20 22 70 66 61 20 70 61 74 fld ! "pfa pat
008C20: 20 34 20 63 6D 6F 76 65 20 20 20 20 20 20 20 20 4 cmove
008C30: 20 20 20 20 20 28 20 20 2D 20 70 66 61 29 20 20 ( - pfa)
008C40: 20 20 20 20 62 65 67 69 6E 20 20 63 72 20 64 75 begin cr du
008C50: 70 20 64 75 70 20 70 61 74 20 34 20 74 79 70 72 p dup pat 4 typr
008C60: 20 23 2E 20 20 20 20 20 20 20 20 20 20 28 20 61 #. ( a
008C70: 64 31 20 2D 2D 20 61 64 31 20 61 64 31 29 20 20 d1 -- ad1 ad1)
008C80: 20 20 20 20 20 20 40 20 64 75 70 20 23 2E 20 20 @ dup #.
008C90: 20 32 2B 20 64 75 70 20 6E 66 61 20 69 64 2E 20 2+ dup nfa id.
008CA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 28 20 20 (
008CB0: 20 20 20 20 2D 20 61 64 31 20 61 64 32 29 20 20 - ad1 ad2)
008CC0: 20 20 20 20 20 20 63 6F 6C 6F 6E 65 78 3F 20 20 colonex?
008CD0: 6E 6F 74 20 20 77 68 69 6C 65 20 20 70 61 74 20 not while pat
008CE0: 34 20 62 6C 61 6E 6B 20 20 20 20 69 6E 2D 6C 69 4 blank in-li
008CF0: 6E 65 3F 20 20 20 20 20 20 20 20 20 20 20 20 20 ne?
008D00: 82 32 AB 74 06 87 06 E1 23 23 C3 4A 01 82 32 AD .2.t....##.J..2.
008D10: 80 06 94 06 E1 2B 2B C3 4A 01 82 32 AF 8D 06 C3 .....++.J..2....
008D20: 06 70 06 C9 05 7E 13 81 BA 9A 06 C3 06 8D 1A AE .p...~..........
008D30: 10 84 03 BC 10 B0 0D C0 0F 84 03 38 10 59 1A DE ...........8.Y..
008D40: 1D 98 07 2A 47 01 2B 70 2B 71 22 47 01 13 4B 42 ...*G.+p+q"G..KB
008D50: C3 4B 01 C1 BB A7 06 C3 06 C3 0C 88 0F 7E 13 59 .K...........~.Y
008D60: 1A A8 1D 7E 13 81 BC D3 06 EB 06 D1 E1 7A AC FA ...~.........z..
008D70: F5 06 CD D3 1A 24 25 FA 00 07 21 00 00 C3 4A 01 .....$%...!...J.
008D80: 21 01 00 C3 4A 01 82 3C A3 E5 06 C3 06 8B 18 16 !...J..<£.......
008D90: 15 84 03 7E 13 87 3C 2B 6C 6F 6F 70 BE 06 07 21 ...~..<+loop...!
008DA0: 07 D1 C3 07 0B 87 3C 2D 66 69 6E 64 BE 15 07 C3 ......<-find....
008DB0: 06 84 0E 71 1D C0 0F B0 0D B0 0D D5 09 7E 13 84 ...q.........~..
008DC0: 3C 2E 22 BE 25 07 C3 06 7F 19 18 10 C8 12 59 06 <.".%.........Y.
008DD0: 6A 19 8F 04 7E 0C 79 1B 7E 13 87 3C 2F 6C 6F 6F j...~.y.~..</loo
008DE0: 70 BE 3F 07 66 07 D1 2A 47 01 7E 83 77 5F 23 7E p.?.f..*G.~.w_#~
008DF0: 8A 77 23 14 15 57 DA 84 07 7B 96 7A 23 9E DA BB .w#..W...{.z#...
008E00: 0E C3 85 07 23 23 22 47 01 03 03 C3 4B 01 87 3C ....##"G....K..<
008E10: 3B 63 6F 64 65 BE 5A 07 C3 06 6A 19 08 16 AB 18 ;code.Z...j.....
008E20: 03 0F 84 03 7E 13 88 3C 3C 63 6D 6F 76 65 BE 8E ....~..<<cmove..
008E30: 07 B3 07 69 60 C1 D1 E3 09 2B EB 09 2B EB 78 B1 ...i`....+..+.x.
008E40: CA CB 07 7E 2B 12 1B 0B C2 BE 07 C1 C3 4B 01 8B ...~+........K..
008E50: 3C 3F 74 65 72 6D 69 6E 61 6C BE A6 07 DF 07 CD <?terminal......
008E60: 09 BB 21 00 00 D2 E9 07 2C C3 4A 01 88 3C 61 62 ..!.....,.J..<ab
008E70: 6F 72 74 22 BE CF 07 C3 06 3F 06 14 00 B1 1C 29 ort".....?.....)
008E80: 10 7F 19 18 10 79 1B 6B 1A 24 19 B9 0E 0E 00 6A .....y.k.$.....j
008E90: 19 C8 12 F4 0E 8F 04 59 06 7E 0C 7E 13 87 3C 61 .......Y.~.~..<a
008EA0: 62 6F 72 74 BE EC 07 C3 06 6B 1A 36 0D A7 14 CB bort.....k.6....
008EB0: 11 24 19 7E 13 87 3C 62 6C 6F 63 6B BE 1D 08 C3 .$.~..<block....
008EC0: 06 C8 12 C8 12 D5 03 67 0C E1 1A 50 06 E9 06 5F .......g...P..._
008ED0: 18 F7 07 05 72 61 6E 67 65 65 06 8A 16 00 04 60 ....rangee.....`
008EE0: 04 E8 13 8F 04 7E 13 86 3C 63 6D 6F 76 E5 35 08 .....~..<cmov.5.
008EF0: C3 06 C8 12 50 06 E9 06 3F 06 0A 00 90 11 BC 12 ....P...?.......
008F00: 20 20 20 20 32 2B 20 72 65 70 65 61 74 20 20 64 2+ repeat d
008F10: 64 72 6F 70 20 3B 20 20 20 20 20 20 20 20 20 20 drop ;
008F20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008F40: 3A 20 64 65 63 6F 6D 70 20 20 28 20 2D 2D 20 29 : decomp ( -- )
008F50: 20 28 20 64 65 63 6F 6D 70 69 6C 65 20 66 6F 6C ( decompile fol
008F60: 6C 6F 77 69 6E 67 20 77 6F 72 64 29 20 20 20 20 lowing word)
008F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
008F80: 20 20 20 73 70 21 20 65 73 63 65 6E 20 20 63 72 sp! escen cr
008F90: 20 20 20 20 20 20 5B 63 6F 6D 70 69 6C 65 5D 20 [compile]
008FA0: 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 '
008FB0: 20 20 20 20 20 20 28 20 2D 20 70 66 61 29 20 20 ( - pfa)
008FC0: 20 20 20 64 75 70 20 6E 66 61 20 64 75 70 20 2E dup nfa dup .
008FD0: 22 20 6E 66 61 20 22 20 23 2E 20 20 64 75 70 20 " nfa " #. dup
008FE0: 63 40 20 2E 20 69 64 2E 20 20 63 72 20 20 20 20 c@ . id. cr
008FF0: 20 20 20 20 20 20 28 20 2D 20 70 66 61 29 20 20 ( - pfa)
009000: 20 20 20 64 75 70 20 6C 66 61 20 64 75 70 20 2E dup lfa dup .
009010: 22 20 6C 66 61 20 22 20 23 2E 20 20 40 20 64 75 " lfa " #. @ du
009020: 70 20 23 2E 20 69 64 2E 20 20 63 72 20 20 20 20 p #. id. cr
009030: 20 20 20 20 20 20 28 20 2D 20 70 66 61 29 20 20 ( - pfa)
009040: 20 20 20 64 75 70 20 63 66 61 20 64 75 70 20 2E dup cfa dup .
009050: 22 20 63 66 61 20 22 20 23 2E 20 20 40 20 64 75 " cfa " #. @ du
009060: 70 20 23 2E 20 20 20 20 20 20 20 20 20 20 20 20 p #.
009070: 28 20 2D 20 70 66 61 20 63 66 61 5F 40 29 20 20 ( - pfa cfa_@)
009080: 20 20 20 64 75 70 20 5B 20 27 20 3A 20 20 31 36 dup [ ' : 16
009090: 20 2B 20 5D 20 6C 69 74 65 72 61 6C 20 3D 20 20 + ] literal =
0090A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0090B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0090C0: 20 20 20 69 66 20 63 6F 6C 6F 6E 64 65 66 20 65 if colondef e
0090D0: 6C 73 65 20 6E 6F 74 63 6F 6C 6F 6E 20 74 68 65 lse notcolon the
0090E0: 6E 20 2E 73 20 63 72 20 3B 1A 44 20 74 6F 20 31 n .s cr ;.D to 1
0090F0: 32 37 44 20 6F 6E 6C 79 29 20 20 20 20 20 20 20 27D only)
009100: B9 0E 04 00 B1 07 7E 13 87 3C 63 6D 6F 76 65 BE ......~..<cmove.
009110: 67 08 94 08 69 60 C1 D1 E3 C3 A1 08 7E 23 12 13 g...i`......~#..
009120: 0B 78 B1 C2 9C 08 C1 C3 4B 01 84 3C 63 72 BE 88 .x......K..<cr..
009130: 08 B3 08 2A 74 18 EB 2A 45 01 19 36 00 23 36 00 ...*t..*E..6.#6.
009140: C5 0E 0D CD 59 01 0E 0A CD 59 01 C1 C3 4B 01 84 ....Y....Y...K..
009150: 3C 64 6F BE AA 08 D8 08 2A 47 01 2B 2B 2B 2B 22 <do.....*G.++++"
009160: 47 01 D1 73 23 72 D1 23 73 23 72 C3 4B 01 86 3C G..s#r.#s#r.K..<
009170: 65 6D 69 74 BE CF 08 F9 08 E1 C5 4D CD 59 01 C1 emit.......M.Y..
009180: 2A 74 18 EB 2A 45 01 19 5E 23 56 13 72 2B 73 C3 *t..*E..^#V.r+s.
009190: 4B 01 88 3C 65 78 70 65 63 74 BE EE 08 C3 06 8A K..<expect......
0091A0: 16 03 00 F7 08 7D 18 8F 04 7D 18 D6 08 F9 15 C8 .....}...}......
0091B0: 12 8A 16 08 00 5B 0C 7D 18 8A 16 7E 00 67 0C 5F .....[.}...~.g._
0091C0: 18 3F 06 32 00 BC 12 C8 12 5E 15 5B 0C C8 12 6A .?.2.....^.[...j
0091D0: 19 92 06 8F 04 7E 0C 3F 06 0A 00 8A 16 07 00 B9 .....~.?........
0091E0: 0E 10 00 8A 16 08 00 C8 12 F7 12 8A 16 20 00 F7 ............. ..
0091F0: 12 B9 0E 28 00 C8 12 8A 16 20 00 E9 06 3F 06 0E ...(..... ...?..
009200: 00 1A 16 BC 12 84 0E 06 06 B9 0E 04 00 C8 12 5E ...............^
009210: 15 CC 0E 06 06 5E 15 59 06 84 03 F7 12 50 06 64 .....^.Y.....P.d
009220: 07 8C FF BC 12 70 06 F7 08 7E 13 86 3C 66 69 6C .....p...~..<fil
009230: 6C BE 12 09 B6 09 69 60 D1 C1 E3 EB 78 B1 CA C8 l.....i`....x...
009240: 09 7D 12 13 0B C3 BC 09 C1 C3 4B 01 86 3C 66 69 .}........K..<fi
009250: 6E 64 BE AB 09 D7 09 D1 E1 E5 1A AE E6 3F C2 03 nd...........?..
009260: 0A 23 13 1A AE 87 C2 00 0A D2 E1 09 21 05 00 19 .#..........!...
009270: E3 1B 1A B7 F2 F1 09 5F 16 00 21 01 00 C3 49 01 ......._..!...I.
009280: DA 09 0A 13 1A B7 F2 03 0A 13 EB 5E 23 56 7A B3 ...........^#Vz.
009290: C2 D8 09 E1 21 00 00 C3 4A 01 8B 3C 69 6E 74 65 ....!...J..<inte
0092A0: 72 70 72 65 74 BE CC 09 C3 06 FD 04 3F 06 1C 00 rpret.......?...
0092B0: CF 1A B0 0D E9 06 3F 06 0A 00 03 0F DB 04 B9 0E ......?.........
0092C0: 06 00 03 0F 71 13 B9 0E 1A 00 F6 14 54 18 A5 12 ....q.......T...
0092D0: B0 0D 59 06 3F 06 08 00 25 12 B9 0E 06 00 BC 12 ..Y.?...%.......
0092E0: 9F 16 36 0D B9 0E C4 FF 7E 13 85 3C 6B 65 79 BE ..6.....~..<key.
0092F0: 1A 0A 74 0A CD 06 BB FE 19 5F C2 86 0A 21 65 13 ..t......_...!e.
009300: 00 46 4F 52 54 48 20 20 20 42 49 4E 00 00 00 00 .FORTH BIN....
009310: 00 00 02 00 00 00 01 00 DD 29 00 01 00 00 00 00 .........)......
009320: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009330: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009340: DD 29 00 CC 04 6E 20 45 53 43 20 74 72 61 70 20 .)...n ESC trap
009350: 69 73 20 6F 6E 2C 20 62 79 20 70 72 65 73 73 69 is on, by pressi
009360: 6E 67 20 45 53 43 20 74 77 69 63 65 29 10 9D 01 ng ESC twice)...
009370: 46 07 0F 45 53 43 20 74 72 61 70 20 6F 66 66 20 F..ESC trap off
009380: 2A 37 01 F9 CD C8 BC CD 37 BD 21 10 D0 36 C3 2B *7......7.!..6.+
009390: 36 53 2B 36 49 2B 36 44 E5 CD D4 BC 21 FF B0 0E 6S+6I+6D....!...
0093A0: 07 D4 CE BC E1 CD D4 BC 3E 00 DC 1B 00 01 33 01 ........>.....3.
0093B0: C3 4B 01 46 0F 36 2A FA AB 00 C0 40 00 1F 00 DD .K.F.6*....@....
0093C0: 2A DD 2A AD 14 00 BF FA BF D5 E5 CD 6F 01 0A 03 *.*.........o...
0093D0: 6F 0A 03 67 5E 23 56 EB E9 79 CD 5A BB 3A 65 13 o..g^#V..y.Z.:e.
0093E0: B7 C8 CD 6F 01 CD 2E BD DA 5D 01 79 C3 2B BD C5 ...o.....].y.+..
0093F0: 3E 42 CD 1E BB C1 C8 CD 09 BB DA 77 01 CD 18 BB >B.........w....
009400: D6 FC C0 32 65 13 CD 5D BB CD A7 BC 01 92 01 C3 ...2e..]........
009410: 4B 01 24 19 86 65 73 63 64 69 F3 00 00 9F 01 21 K.$..escdi.....!
009420: 00 00 22 4B 01 22 4C 01 C3 4B 01 85 65 73 63 65 .."K."L..K..esce
009430: EE 94 01 B5 01 3E CD 32 4B 01 21 6F 01 22 4C 01 .....>.2K.!o."L.
009440: C3 4B 01 84 6E 6F 6F F0 AB 01 C3 06 7E 13 83 72 .K..noo.....~..r
009450: 75 EE C3 01 C3 06 7E 13 7E 13 83 63 61 F4 CE 01 u.....~.~..ca...
009460: E2 01 3A 9D 12 16 00 5F 2A 45 01 19 5E 23 56 C5 ..:...._*E..^#V.
009470: CD 9B BC C1 C3 4B 01 84 69 6E 69 F4 DA 01 00 02 .....K..ini.....
009480: C5 CD A7 BC CD 00 BB CD 4E BB CD BA BB CD FF BB ........N.......
009490: CD 65 BC CD 9C BB C1 C3 4B 01 84 77 61 72 ED F7 .e......K..war..
0094A0: 01 C3 06 FE 01 70 06 C7 02 46 07 1A 63 70 63 46 .....p...F..cpcF
0094B0: 4F 52 54 48 20 76 2E 20 31 2E 31 2E 30 20 2F 20 ORTH v. 1.1.0 /
0094C0: 38 37 30 33 31 36 B1 08 46 07 21 41 64 61 70 74 870316..F.!Adapt
0094D0: 65 64 20 66 72 6F 6D 20 4D 56 50 2D 46 4F 52 54 ed from MVP-FORT
0094E0: 48 20 76 2E 20 31 2E 30 31 2E 30 33 B1 08 46 07 H v. 1.01.03..F.
0094F0: 28 50 2E 20 4C 55 4B 45 53 2C 20 32 36 20 4E 6F (P. LUKES, 26 No
009500: 1E 07 7E EE 01 77 6B 26 00 C3 4A 01 86 3C 6C 69 ..~..wk&..J..<li
009510: 6E 65 BE 6A 0A C3 06 AA 0E E1 1A EB 0E 60 04 8F ne.j.........`..
009520: 04 EB 0E 7E 13 86 3C 6C 6F 61 64 BE 8C 0A C3 06 ...~..<load.....
009530: C8 12 65 06 0F 06 F7 07 0A 75 6E 6C 6F 61 64 61 ..e......unloada
009540: 62 6C 65 C8 12 3F 08 8A 16 FF 03 8F 04 06 06 E1 ble..?..........
009550: 1A CC 0E 9E 0E B0 0D 7E 0C 75 0C B0 0D 7E 0C 06 .......~.u...~..
009560: 06 75 0C 84 03 9E 0E 84 03 D9 15 6A 19 75 0C 84 .u.........j.u..
009570: 03 6A 19 9E 0E 84 03 7E 13 86 3C 6C 6F 6F 70 BE .j.....~..<loop.
009580: A5 0A 04 0B 11 01 00 2A 47 01 C5 7E 83 77 4F 23 .......*G..~.wO#
009590: 7E 8A 47 7E FA 27 0B A2 F2 2B 0B 23 23 23 22 47 ~.G~.'...+.###"G
0095A0: 01 C1 03 03 C3 4B 01 B2 F2 1B 0B 70 79 23 96 23 .....K.....py#.#
0095B0: 78 9E 78 FA 51 0B A7 FA 43 0B 7A A7 F2 1D 0B C1 x.x.Q...C.z.....
0095C0: C3 BB 0E 7E A7 FA 3A 0B 7A A7 FA 1D 0B C1 C3 BB ...~..:.z.......
0095D0: 0E 78 A7 FA 48 0B C3 43 0B 88 3C 6E 75 6D 62 65 .x..H..C..<numbe
0095E0: 72 BE F9 0A C3 06 06 06 06 06 EB 19 C8 12 59 06 r.............Y.
0095F0: F4 0E 8A 16 2D 00 5B 0C C8 12 7E 0C 8F 04 8A 16 ....-.[...~.....
009600: FF FF A5 12 84 03 CE 0F C8 12 F4 0E 84 0E 67 0C ..............g.
009610: 3F 06 28 00 C8 12 F4 0E 8A 16 2E 00 5B 0C 3C 18 ?.(.........[.<.
009620: F7 07 02 3F 3F 06 06 A5 12 84 03 CE 0F C8 12 F4 ...??...........
009630: 0E 84 0E 67 0C F7 07 02 3F 3F BC 12 6A 19 3F 06 ...g....??..j.?.
009640: 04 00 41 12 7E 13 8E 3C 76 6F 63 61 62 75 6C 61 ..A.~..<vocabula
009650: 72 79 37 39 BE 59 0B C3 06 38 10 8A 16 81 A0 DB ry79.Y...8......
009660: 04 8A 16 A9 14 DB 04 F6 14 92 1C B0 0D DB 04 92 ................
009670: 1C 84 03 98 07 CD 86 12 85 06 C0 0F 84 03 7E 13 ..............~.
009680: 86 3C 77 6F 72 64 BE C6 0B C3 06 14 04 E1 1A 27 .<word.........'
009690: 13 9E 11 67 0C 3F 06 10 00 90 11 90 11 06 06 F6 ...g.?..........
0096A0: 14 84 03 B9 0E 2E 00 75 0C 9C 04 7D 18 EB 04 C8 .......u...}....
0096B0: 12 7E 0C F6 14 CC 0E 8F 04 F6 14 59 06 6A 19 C8 .~.........Y.j..
0096C0: 12 8A 16 FF 00 67 0C F7 07 05 3E 5F 32 35 35 59 .....g....>_255Y
0096D0: 06 27 0F F6 14 7E 13 81 BD 00 0C C3 06 EB 04 3C .'...~.........<
0096E0: 18 7E 13 81 BE 57 0C C3 06 E1 1A E9 06 7E 13 83 .~...W.......~..
0096F0: 3E 69 EE 63 0C 66 1C 14 00 82 3E F2 6F 0C 80 0C >i.c.f....>.o...
009700: 6C 6C 20 53 74 2E 2C 20 54 4F 4F 57 4F 4F 4D 42 ll St., TOOWOOMB
009710: 41 2C 20 51 20 34 33 35 30 B1 08 46 07 1E 50 75 A, Q 4350..F..Pu
009720: 62 6C 69 63 20 44 6F 6D 61 69 6E 2C 20 70 61 79 blic Domain, pay
009730: 2D 69 66 2D 79 6F 75 2D 6C 69 6B 65 B1 08 7E 13 -if-you-like..~.
009740: 84 6D 6F 64 E5 1A 02 C9 02 E1 C5 7D CD 0E BC CD .mod.......}....
009750: 6C BB CD 81 BB C1 C3 4B 01 89 63 61 73 69 6E 6F l......K..casino
009760: 70 65 EE C0 02 E7 02 D1 E1 C5 06 0C CD 77 BC 21 pe...........w.!
009770: 00 00 DA F6 02 6F E5 DA FD 02 CD 7D BC E1 C1 C3 .....o.....}....
009780: 4A 01 89 63 61 73 69 6E 63 68 61 F2 D9 02 10 03 J..casincha.....
009790: D1 E1 CD 80 BC D2 20 03 77 23 1B 7A B3 C2 12 03 ...... .w#.z....
0097A0: C5 CD 7A BC C1 C3 4B 01 8A 63 61 73 6F 75 74 6F ..z...K..casouto
0097B0: 70 65 EE 02 03 37 03 D1 E1 C5 06 0C CD 8C BC 21 pe...7.........!
0097C0: 00 00 DA 46 03 6F E5 DA 4D 03 CD 92 BC E1 C1 C3 ...F.o..M.......
0097D0: 4A 01 8C 63 61 73 6F 75 74 64 69 72 65 63 F4 28 J..casoutdirec.(
0097E0: 03 63 03 E1 7D DD E1 D1 E1 C5 DD E5 C1 CD 98 BC .c..}...........
0097F0: F5 CD 8F BC F1 C1 21 00 00 DA 7D 03 6F C3 4A 01 ......!...}.o.J.
009800: 81 A1 52 03 86 03 E1 D1 73 23 72 C3 4B 01 81 A3 ..R.....s#r.K..£
009810: 80 03 C3 06 69 0E B0 0D 7E 17 EB 19 8A 16 09 00 ....i...~.......
009820: 7D 18 E9 06 3F 06 08 00 8A 16 27 00 8F 04 8A 16 }...?.....'.....
009830: 30 00 8F 04 21 15 7E 13 82 23 BE 8E 03 C3 06 90 0...!.~..#......
009840: 11 16 15 B0 0D 8B 18 7D 18 EB 04 7E 13 85 23 62 .......}...~..#b
009850: 75 66 E6 B8 03 AD 0F 10 00 82 23 F3 CD 03 C3 06 uf........#.....
009860: 92 03 9E 11 5F 18 3C 18 3F 06 F6 FF 7E 13 C1 A7 ...._.<.?...~...
009870: D9 03 C3 06 FD 04 3C 18 F7 07 09 6E 6F 74 5F 66 ......<....not_f
009880: 6F 75 6E 64 BC 12 9F 16 7E 13 87 27 73 74 72 65 ound....~..'stre
009890: 61 ED EE 03 C3 06 9E 0E B0 0D E3 0C 3F 06 08 00 a...........?...
0098A0: AA 0E B9 0E 06 00 34 1B B0 0D 75 0C B0 0D 8F 04 ......4...u.....
0098B0: 7E 13 C1 A8 0A 04 C3 06 8A 16 FF FF 75 0C 9C 04 ~...........u...
0098C0: 8A 16 29 00 71 1D F4 0E 59 06 F6 14 8F 04 F4 0E ..).q...Y.......
0098D0: 8A 16 29 00 5B 0C 3C 18 8B 0D 7E 13 81 AA 32 04 ..).[.<...~...2.
0098E0: C3 06 A4 1B BC 12 7E 13 82 2A AF 5C 04 C3 06 7F ......~..*.\....
0098F0: 04 E1 1A BC 12 7E 13 85 2A 2F 6D 6F E4 68 04 C3 .....~..*/mo.h..
009900: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
009910: 08 00 01 00 02 09 4E E5 08 00 C1 02 00 00 00 02 ......N.........
009920: 08 00 C6 02 00 00 00 02 08 00 C2 02 00 00 00 02 ................
009930: 08 00 C7 02 00 00 00 02 08 00 C3 02 00 00 00 02 ................
009940: 08 00 C8 02 00 00 00 02 08 00 C4 02 00 00 00 02 ................
009950: 08 00 C9 02 00 00 00 02 08 00 C5 02 00 00 00 02 ................
009960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009A00: D1 2A 47 01 2B 2B 22 47 01 73 23 72 C3 4B 01 81 .*G.++"G.s#r.K..
009A10: BF 79 0C C3 06 B0 0D 3B 05 7E 13 85 3F 63 6F 6D .y.....;.~..?com
009A20: F0 8F 0C C3 06 CF 1A B0 0D 3C 18 F7 07 0C 63 6F .........<....co
009A30: 6D 70 69 6C 65 5F 6F 6E 6C 79 7E 13 84 3F 63 73 mpile_only~..?cs
009A40: F0 9B 0C C3 06 8D 1A AE 10 B0 0D EB 04 F7 07 0A ................
009A50: 75 6E 66 69 6E 69 73 68 65 64 7E 13 84 3F 64 75 unfinished~..?du
009A60: F0 BC 0C C3 06 C8 12 3F 06 04 00 C8 12 7E 13 88 .......?.....~..
009A70: 3F 6C 6F 61 64 69 6E E7 DC 0C C3 06 9E 0E B0 0D ?loadin.........
009A80: 3C 18 F7 07 0C 6C 6F 61 64 69 6E 67 5F 6F 6E 6C <....loading_onl
009A90: 79 7E 13 86 3F 70 61 69 72 F3 EF 0C C3 06 EB 04 y~..?pair.......
009AA0: F7 07 08 75 6E 70 61 69 72 65 64 7E 13 86 3F 73 ...unpaired~..?s
009AB0: 74 61 63 EB 13 0D C3 06 8D 1A 27 1A E1 1A 2A 1C tac.......'...*.
009AC0: 8D 1A 41 16 85 06 2A 1C 5F 18 F7 07 0C 73 74 61 ..A...*._....sta
009AD0: 63 6B 5F 62 6F 75 6E 64 73 E8 13 F6 14 8A 16 80 ck_bounds.......
009AE0: 00 8F 04 2A 1C 3F 06 18 00 E8 13 F6 14 EB 04 3B ...*.?.........;
009AF0: 05 46 07 0B 62 79 74 65 73 5F 6C 65 66 74 20 7E .F..bytes_left ~
009B00: 13 87 3F 73 74 72 65 61 ED 2D 0D C3 06 F7 07 08 ..?strea.-......
009B10: 6E 6F 5F 69 6E 70 75 74 7E 13 89 3F 74 65 72 6D no_input~..?term
009B20: 69 6E 61 EC 81 0D C3 06 DD 07 7E 13 81 C0 9A 0D ina.......~.....
009B30: B2 0D E1 5E 23 56 D5 C3 4B 01 85 61 62 6F 72 F4 ...^#V..K..abor.
009B40: AC 0D C3 06 27 08 7E 13 C6 61 62 6F 72 74 A2 BA ....'.~..abort..
009B50: 0D C3 06 A3 0C 88 0F F7 07 14 04 F4 0E 8A 16 22 ...£..........."
009B60: 00 5B 0C 3F 06 10 00 50 06 75 0C 9C 04 06 06 D9 .[.?...P.u......
009B70: 0E B9 0E 22 00 8A 16 22 00 71 1D C8 12 F4 0E 59 ..."...".q.....Y
009B80: 06 E1 1A 7D 18 8F 04 F4 0E 8A 16 22 00 5B 0C 3C ...}.......".[.<
009B90: 18 8B 0D 47 0E 7E 13 83 61 62 F3 C8 0D C3 06 C8 ...G.~..ab......
009BA0: 12 AF 04 7E 13 C5 61 67 61 69 EE 17 0E C3 06 50 ...~..agai.....P
009BB0: 06 1C 0D 88 0F B9 0E F6 14 EB 04 DB 04 7E 13 85 .............~..
009BC0: 61 6C 6C 6F F4 25 0E C3 06 9B 12 9C 04 7E 13 83 allo.%.......~..
009BD0: 61 6E E4 3F 0E 57 0E D1 E1 7B A5 6F 7A A4 67 C3 an.?.W...{.oz.g.
009BE0: 4A 01 84 62 61 73 E5 4F 0E 66 1C 16 00 C5 62 65 J..bas.O.f....be
009BF0: 67 69 EE 62 0E C3 06 A3 0C F6 14 50 06 7E 13 82 gi.b...£...P.~..
009C00: 29 10 7E 13 83 6C 69 F4 45 16 8C 16 0A 03 6F 0A ).~..li.E.....o.
009C10: 03 67 C3 4A 01 C7 6C 69 74 65 72 61 EC 84 16 C3 .g.J..litera....
009C20: 06 CF 1A B0 0D 3F 06 08 00 88 0F 8A 16 DB 04 7E .....?.........~
009C30: 13 84 6C 6F 61 E4 95 16 C3 06 AE 0A 7E 13 C4 6C ..loa.......~..l
009C40: 6F 6F F0 B1 16 C3 06 8A 16 03 00 1C 0D 88 0F 02 oo..............
009C50: 0B F6 14 EB 04 DB 04 7E 13 82 6D AA BE 16 C3 06 .......~..m.....
009C60: 9E 11 97 1D 7E 0C 1D 0E E1 1A 1D 0E A4 1B 6A 19 ....~.........j.
009C70: F9 10 7E 13 83 6D 2A AF D9 16 C3 06 9E 11 97 1D ..~..m*.........
009C80: E1 1A 1D 0E 7E 0C E1 1A 1D 0E 7E 0C 7D 18 97 1D ....~.....~.}...
009C90: EB 19 EB 19 80 11 E1 1A 7F 19 A4 1B EB 19 6A 19 ..............j.
009CA0: A4 1B EB 19 06 06 D9 10 7F 19 D7 1B EB 19 EB 19 ................
009CB0: 6A 19 D7 1B E1 1A BC 12 E1 1A EB 19 F9 10 7E 13 j.............~.
009CC0: 82 6D AB F4 16 C3 06 12 1A D9 10 7E 13 82 6D AF .m.........~..m.
009CD0: 40 17 C3 06 7D 18 7E 0C 7E 0C C8 12 F9 10 7F 19 @...}.~.~.......
009CE0: 1D 0E D7 1B 6A 19 7F 19 97 1D AF 04 E1 1A 6A 19 ....j.........j.
009CF0: AF 04 E1 1A 7E 13 85 6D 2F 6D 6F E4 4D 17 C3 06 ....~..m/mo.M...
009D00: 7E 0C 06 06 7F 19 D7 1B 6A 19 E1 1A 7E 0C D7 1B ~.......j...~...
009D10: 6A 19 7E 13 83 6D 61 F8 76 17 C3 06 9E 11 E9 06 j.~..ma.v.......
009D20: 3F 06 04 00 E1 1A BC 12 7E 13 83 6D 69 EE 94 17 ?.......~..mi...
009D30: C3 06 9E 11 67 0C 3F 06 04 00 E1 1A BC 12 7E 13 ....g.?.......~.
009D40: 83 6D 6F E4 AA 17 C3 06 F6 05 BC 12 7E 13 84 6D .mo.........~..m
009D50: 6F 76 E5 C0 17 C3 06 06 06 9A 17 79 06 92 08 7E ov.........y...~
009D60: 13 21 00 00 0E 08 29 17 D2 EE 17 19 CE 00 0D C2 .!....).........
009D70: E6 17 C9 86 6E 65 67 61 74 E5 CE 17 FE 17 E1 7D ....negat......}
009D80: 2F 6F 7C 2F 67 23 C3 4A 01 84 6E 65 78 F4 F3 17 /o|/g#.J..nex...
009D90: AD 0F 4B 01 85 6E 65 78 74 B1 09 18 AD 0F 54 01 ..K..next.....T.
009DA0: 83 6E 66 E1 14 18 C3 06 8A 16 05 00 EB 04 8A 16 .nf.............
009DB0: FF FF 56 1B 7E 13 83 6E 6F F4 20 18 3E 18 E1 7D ..V.~..no. .>..}
009DC0: B4 21 00 00 C2 48 18 23 C3 4A 01 86 6E 75 6D 62 .!...H.#.J..numb
009DD0: 65 F2 36 18 C3 06 64 0B 7E 13 82 6F F2 4B 18 61 e.6...d.~..o.K.a
009DE0: 18 D1 E1 7B B5 6F 7A B4 67 C3 4A 01 83 6F 75 F4 ...{.oz.g.J..ou.
009DF0: 5A 18 66 1C 26 00 84 6F 76 65 F2 6C 18 7F 18 D1 Z.f.&..ove.l....
009E00: 62 EC 6D 0E AD 0F 20 00 85 62 6C 61 6E EB 7F 0E b.m... ..blan...
009E10: C3 06 84 0E AF 13 7E 13 83 62 6C EB 88 0E 66 1C ......~..bl...f.
009E20: 18 00 85 62 6C 6F 63 EB 98 0E C3 06 3F 08 7E 13 ...bloc.....?.~.
009E30: 86 62 72 61 6E 63 E8 A2 0E BB 0E 60 69 5E 23 56 .branc.....`i^#V
009E40: 2B 19 4D 44 C3 4B 01 82 63 A1 B0 0E CE 0E E1 D1 +.MD.K..c.......
009E50: 73 C3 4B 01 82 63 AC C7 0E C3 06 F6 14 CC 0E 50 s.K..c.........P
009E60: 06 47 0E 7E 13 83 63 2F EC D4 0E AD 0F 40 00 82 .G.~..c/.....@..
009E70: 63 C0 E5 0E F6 0E E1 6E 26 00 C3 4A 01 83 63 66 c......n&..J..cf
009E80: E1 EF 0E C3 06 92 06 7E 13 85 63 6C 65 61 F2 FD .......~..clea..
009E90: 0E C3 06 AA 0E 8A 16 00 04 84 0E AF 13 7E 13 85 .............~..
009EA0: 63 6D 6F 76 E5 09 0F C3 06 C8 12 50 06 E9 06 3F cmov.......P...?
009EB0: 06 0A 00 90 11 BC 12 B9 0E 04 00 92 08 7E 13 84 .............~..
009EC0: 63 6F 6C E4 1F 0F C3 06 8A 16 37 01 8A 16 45 01 col.......7...E.
009ED0: B0 0D 8A 16 06 00 8F 04 8A 16 0E 00 27 0F 06 06 ............'...
009EE0: 63 13 84 03 8A 16 35 01 B0 0D 8A 16 A9 14 85 06 c.....5.........
009EF0: 84 03 21 02 0D 13 B1 11 D4 01 C2 0D 7E 13 87 63 ..!.........~..c
009F00: 6F 6D 70 69 6C E5 3F 0F C3 06 A3 0C 6A 19 C8 12 ompil.?...£.j...
009F10: 85 06 7E 0C B0 0D DB 04 7E 13 88 63 6F 6E 73 74 ..~.....~..const
009F20: 61 6E F4 7E 0F C3 06 38 10 DB 04 98 07 13 EB 5E an.~...8.......^
009F30: 23 56 D5 C3 4B 01 87 63 6F 6E 74 65 78 F4 9A 0F #V..K..contex...
009F40: 66 1C 1A 00 87 63 6F 6E 76 65 72 F4 B6 0F C3 06 f....conver.....
009F50: 59 06 C8 12 7E 0C F4 0E 69 0E B0 0D F5 11 3F 06 Y...~...i.....?.
009F60: 2C 00 E1 1A 69 0E B0 0D A4 1B BC 12 EB 19 69 0E ,...i.........i.
009F70: B0 0D A4 1B D9 10 A5 12 B0 0D 59 06 3F 06 08 00 ..........Y.?...
009F80: 50 06 A5 12 9C 04 6A 19 B9 0E C6 FF 6A 19 7E 13 P.....j.....j.~.
009F90: 85 63 6F 75 6E F4 C4 0F C3 06 C8 12 59 06 E1 1A .coun.......Y...
009FA0: F4 0E 7E 13 82 63 F2 10 10 C3 06 B1 08 7E 13 86 ..~..c.......~..
009FB0: 63 72 65 61 74 E5 24 10 C3 06 84 0E 71 1D C8 12 creat.$.....q...
009FC0: C8 12 59 06 F4 0E 06 06 5B 0C F7 07 04 6E 75 6C ..Y.....[....nul
009FD0: 6C C8 12 C0 0F B0 0D B0 0D D5 09 3F 06 18 00 90 l..........?....
009FE0: 11 C8 12 18 10 79 1B 46 07 0B 20 64 75 70 6C 69 .....y.F.. dupli
009FF0: 63 61 74 65 64 F4 0E 66 1D B0 0D B0 17 59 06 47 cated..f.....Y.G
00A000: E1 E5 C3 49 01 83 70 61 E4 76 18 C3 06 F6 14 EB ...I..pa.v......
00A010: 0E 8F 04 8A 16 04 00 8F 04 7E 13 83 70 61 F4 85 .........~..pa..
00A020: 18 AD 0F 9A 00 83 70 66 E1 9B 18 C3 06 50 06 56 ......pf.....P.V
00A030: 1B 8A 16 05 00 8F 04 7E 13 84 70 69 63 EB A5 18 .......~..pic...
00A040: C3 06 C8 12 50 06 E9 06 F7 07 03 3C 5F 31 79 06 ....P......<_1y.
00A050: 8D 1A 8F 04 B0 0D 7E 13 82 70 F0 B9 18 C3 06 C8 ......~..p......
00A060: 12 8A 16 F0 FF 55 0E F7 07 03 6F 66 66 50 06 EF .....U....offP..
00A070: 1A 8B 18 59 06 E1 1A 35 1A B0 0D 95 0A 27 0F 7E ...Y...5.....'.~
00A080: 13 85 71 75 65 72 F9 D8 18 C3 06 34 1B B0 0D 8A ..quer.....4....
00A090: 16 50 00 96 13 06 06 75 0C 84 03 7E 13 84 71 75 .P.....u...~..qu
00A0A0: 69 F4 01 19 C3 06 B3 01 06 06 9E 0E 84 03 A8 1D i...............
00A0B0: 29 10 61 19 B0 0D 07 1A 84 03 09 19 D9 15 CF 1A ).a.............
00A0C0: B0 0D 3C 18 3F 06 07 00 46 07 02 6F 6B B9 0E E1 ..<.?...F..ok...
00A0D0: FF 7E 13 82 72 A3 1D 19 66 1C 28 00 82 72 B0 53 .~..r£..f.(..r.S
00A0E0: 19 66 1C 08 00 82 72 BE 5C 19 6C 19 2A 47 01 5E .f....r.\.l.*G.^
00A0F0: 23 56 23 22 47 01 D5 C3 4B 01 82 72 C0 65 19 81 #V#"G...K..r.e..
00A100: 19 2A 47 01 5E 23 56 D5 C3 4B 01 C6 72 65 70 65 .*G.^#V..K..repe
00A110: 61 F4 7A 19 C3 06 7E 0C 7E 0C 2D 0E 6A 19 6A 19 a.z...~.~.-.j.j.
00A120: 92 06 1A 1B 7E 13 84 72 6F 6C EC 8B 19 C3 06 C8 ....~..rol......
00A130: 12 50 06 E9 06 F7 07 03 3C 5F 31 59 06 C8 12 C0 .P......<_1Y....
00A140: 18 E1 1A 79 06 8D 1A 8F 04 C8 12 92 06 B0 0D 7D ...y...........}
00A150: 18 84 03 92 06 8D 1A 7D 18 2A 1C 3C 18 3F 06 EA .......}.*.<.?..
00A160: FF 90 11 7E 13 83 72 6F F4 A6 19 ED 19 D1 E1 E3 ...~..ro........
00A170: C3 49 01 83 72 70 C0 E5 19 FB 19 2A 47 01 C3 4A .I..rp.....*G..J
00A180: 01 83 72 70 F0 F3 19 AD 0F 47 01 84 73 2D 3E E4 ..rp.....G..s->.
00A190: 01 1A 14 1A D1 21 00 00 7A E6 80 CA 1F 1A 2B C3 .....!..z.....+.
00A1A0: 49 01 82 73 B0 0B 1A C3 06 83 1A B0 0D 7E 13 83 I..s.........~..
00A1B0: 73 63 F2 22 1A 66 1C 2A 00 84 73 69 67 EE 2F 1A sc.".f.*..sig./.
00A1C0: C3 06 0F 06 3F 06 08 00 8A 16 2D 00 21 15 7E 13 ....?.....-.!.~.
00A1D0: 86 73 6D 75 64 67 E5 39 1A C3 06 08 16 8A 16 20 .smudg.9.......
00A1E0: 00 41 1B 7E 13 83 73 70 A1 50 1A 6D 1A 2A 85 1A .A.~..sp.P.m.*..
00A1F0: EB 2A 45 01 19 5E 23 56 EB F9 C3 4B 01 83 73 70 .*E..^#V...K..sp
00A200: 0E C8 12 8A 16 80 00 41 1B F6 14 65 06 8A 16 80 .......A...e....
00A210: 00 41 1B 08 16 DB 04 70 06 47 0E BC 10 B0 0D 84 .A.....p.G......
00A220: 03 98 07 13 D5 C3 4B 01 83 63 73 F0 2F 10 66 1C ......K..cs./.f.
00A230: 1C 00 87 63 75 72 72 65 6E F4 A8 10 66 1C 1E 00 ...curren...f...
00A240: 82 64 A1 B2 10 C7 10 E1 D1 73 23 72 23 D1 73 23 .d.......s#r#.s#
00A250: 72 C3 4B 01 82 64 AB C0 10 DB 10 21 06 00 39 5E r.K..d.....!..9^
00A260: 71 23 56 70 C1 E1 19 EB E1 7D 89 6F 7C 88 67 C1 q#Vp.....}.o|.g.
00A270: C3 49 01 83 64 2B AD D4 10 C3 06 0F 06 3F 06 04 .I..d+.......?..
00A280: 00 41 12 7E 13 82 64 AE F3 10 C3 06 06 06 1A 11 .A.~..d.........
00A290: 9E 1A 7E 13 83 64 2E F2 05 11 C3 06 DF 11 8A 16 ..~..d..........
00A2A0: 03 00 E9 06 F7 07 05 65 6D 70 74 79 7E 0C E1 1A .......empty~...
00A2B0: 7D 18 C8 12 F9 10 0B 07 DE 03 EB 19 40 1A BD 03 }...........@...
00A2C0: 6A 19 7D 18 EB 04 AF 1A 79 1B 7E 13 82 64 BC 14 j.}.....y.~..d..
00A2D0: 11 C3 06 EB 19 9E 11 5B 0C 3F 06 10 00 EB 19 EB .......[.?......
00A2E0: 19 41 12 D9 10 0F 06 B9 0E 0A 00 E1 1A E9 06 E1 .A..............
00A2F0: 1A BC 12 E1 1A BC 12 7E 13 84 64 61 62 F3 4C 11 .......~..dab.L.
00A300: C3 06 C8 12 F9 10 7E 13 85 64 64 72 6F F0 79 11 ......~..ddro.y.
00A310: 92 11 E1 E1 C3 4B 01 84 64 64 75 F0 88 11 A0 11 .....K..ddu.....
00A320: E1 D1 D5 E5 C3 49 01 87 64 65 63 69 6D 61 EC 97 .....I..decima..
00A330: 11 C3 06 8A 16 0A 00 69 0E 84 03 7E 13 8B 64 65 .......i...~..de
00A340: 66 69 6E 69 74 69 6F 6E F3 A7 11 C3 06 C0 0F B0 finition........
00A350: 0D BC 10 84 03 7E 13 85 64 65 70 74 E8 BD 11 C3 .....~..dept....
00A360: 06 8D 1A 27 1A E1 1A EB 04 9F 06 7E 13 85 64 69 ...'.......~..di
00A370: 67 69 F4 D7 11 F7 11 E1 D1 7B D6 30 FA 16 12 FE gi.......{.0....
00A380: 0A FA 0B 12 D6 27 FE 0A FA 16 12 BD F2 16 12 5F .....'........._
00A390: 21 01 00 C3 49 01 6C C3 4A 01 C8 64 6C 69 74 65 !...I.l.J..dlite
00A3A0: 72 61 EC ED 11 C3 06 CF 1A B0 0D 3F 06 08 00 E1 ra.........?....
00A3B0: 1A 9F 16 9F 16 7E 13 87 64 6E 65 67 61 74 E5 1A .....~..dnegat..
00A3C0: 12 43 12 E1 D1 97 93 5F 3E 00 9A 57 3E 00 9D 6F .C....._>..W>..o
00A3D0: 3E 00 9C 67 C3 49 01 C2 64 EF 37 12 C3 06 88 0F >..g.I..d.7.....
00A3E0: D6 08 F6 14 8A 16 03 00 7E 13 C5 64 6F 65 73 BE ........~..does.
00A3F0: 57 12 C3 06 C3 0C 88 0F 98 07 8A 16 CD 00 D9 0E W...............
00A400: B0 65 1A 66 1C 06 00 83 73 70 C0 7D 1A 8F 1A 21 .e.f....sp.}...!
00A410: 00 00 39 C3 4A 01 85 73 70 61 63 E5 87 1A C3 06 ..9.J..spac.....
00A420: 84 0E F7 12 7E 13 86 73 70 61 63 65 F3 96 1A C3 ....~..space....
00A430: 06 06 06 9A 17 E3 0C 3F 06 0C 00 06 06 D6 08 9E .......?........
00A440: 1A 02 0B FC FF 7E 13 85 73 74 61 74 E5 A6 1A 66 .....~..stat...f
00A450: 1C 2C 00 7D 93 6F 7C 9A 67 C9 84 73 77 61 F0 C7 .,.}.o|.g..swa..
00A460: 1A E3 1A E1 E3 C3 4A 01 84 74 65 78 F4 DA 1A C3 ......J..tex....
00A470: 06 F6 14 EB 0E 59 06 90 0E 71 1D 84 0E 7D 18 C8 .....Y...q...}..
00A480: 12 F4 0E 8F 04 59 06 CC 0E 8B 18 EB 0E 59 06 27 .....Y.......Y.'
00A490: 0F 7E 13 C4 74 68 65 EE E8 1A C3 06 A3 0C 70 06 .~..the.....£.p.
00A4A0: 1C 0D F6 14 7D 18 EB 04 E1 1A 84 03 7E 13 83 74 ....}.......~..t
00A4B0: 69 E2 13 1B 66 1C 0A 00 86 74 6F 67 67 6C E5 2E i...f....toggl..
00A4C0: 1B 43 1B D1 E1 7E AB 77 C3 4B 01 88 74 72 61 76 .C...~.w.K..trav
00A4D0: 65 72 73 E5 38 1B C3 06 E1 1A 7D 18 8F 04 8A 16 ers.8.....}.....
00A4E0: 7F 00 7D 18 F4 0E E9 06 3F 06 F0 FF E1 1A BC 12 ..}.....?.......
00A4F0: 7E 13 84 74 79 70 E5 4B 1B C3 06 C8 12 2D 06 3F ~..typ.K.....-.?
00A500: 06 1A 00 7D 18 8F 04 E1 1A D6 08 5E 15 F4 0E F7 ...}.......^....
00A510: 12 50 06 64 07 F6 FF B9 0E 04 00 90 11 7E 13 82 .P.d.........~..
00A520: 75 AA 72 1B A6 1B D1 E1 C5 44 7D CD E1 17 E5 67 u.r......D}....g
00A530: 78 44 CD E1 17 D1 4A 09 CE 00 55 6C 67 C1 D5 C3 xD....J...Ulg...
00A540: 4A 01 82 75 AE 9F 1B C3 06 06 06 0A 11 7E 13 85 J..u.........~..
00A550: 75 2F 6D 6F E4 C2 1B D9 1B 21 04 00 39 5E 71 23 u/mo.....!..9^q#
00A560: 56 70 C1 E1 7D 91 7C 98 DA F4 1B 21 FF FF 11 FF Vp..}.|....!....
00A570: FF C3 1F 1C 3E 10 29 17 EB 29 D2 FF 1B 13 A7 EB ....>.)..)......
00A580: 1F F5 D2 0E 1C 7D 91 6F 7C 98 67 C3 19 1C 7D 91 .....}.o|.g...}.
00A590: 6F 7C 98 67 D2 19 1C 09 1B 13 F1 3D C2 F6 1B C1 o|.g.......=....
00A5A0: E5 D5 C3 4B 01 82 75 BC CF 1B C3 06 06 06 E1 1A ...K..u.........
00A5B0: 06 06 51 11 7E 13 C5 75 6E 74 69 EC 25 1C C3 06 ..Q.~..unti.%...
00A5C0: 50 06 1C 0D 88 0F 3F 06 F6 14 EB 04 DB 04 7E 13 P.....?.......~.
00A5D0: 82 75 F0 36 1C AD 0F 45 01 84 75 73 65 F2 50 1C .u.6...E..use.P.
00A5E0: C3 06 A5 0F 98 07 13 EB 5E 16 00 2A 45 01 19 C3 ........^..*E...
00A5F0: 4A 01 88 76 61 72 69 61 62 6C E5 59 1C C3 06 38 J..variabl.Y...8
00A600: 88 0F 86 12 7E 13 13 2A 47 01 2B 70 2B 71 22 47 ....~..*G.+p+q"G
00A610: 01 C1 D5 C3 4B 01 82 64 F0 6A 12 66 1C 10 00 83 ....K..d.j.f....
00A620: 64 70 EC 96 12 66 1C 20 00 85 64 70 75 73 E8 9F dp...f. ..dpus..
00A630: 12 AD 0F 49 01 84 64 72 6F F0 A9 12 BE 12 E1 C3 ...I..dro.......
00A640: 4B 01 83 64 75 F0 B5 12 CA 12 E1 E5 C3 4A 01 C4 K..du........J..
00A650: 65 6C 73 E5 C2 12 C3 06 70 06 1C 0D 88 0F B9 0E els.....p.......
00A660: F6 14 06 06 DB 04 E1 1A 70 06 1A 1B 70 06 7E 13 ........p...p.~.
00A670: 84 65 6D 69 F4 CF 12 C3 06 F7 08 7E 13 8D 65 6D .emi.......~..em
00A680: 70 74 79 2D 62 75 66 66 65 72 F3 F0 12 C3 06 E8 pty-buffer......
00A690: 13 41 16 7D 18 EB 04 84 0E B4 09 7E 13 87 65 6E .A.}.......~..en
00A6A0: 63 6C 6F 73 E5 FD 12 29 13 D1 E1 E5 7B 11 FF FF clos...)....{...
00A6B0: 2B 23 13 BE CA 31 13 D5 34 35 C2 44 13 13 D5 1B +#...1..45.D....
00A6C0: D5 C3 4B 01 23 13 BE CA 54 13 34 35 C2 44 13 D5 ..K.#...T.45.D..
00A6D0: D5 C3 4B 01 D5 13 D5 C3 4B 01 86 65 70 72 69 6E ..K.....K..eprin
00A6E0: F4 1D 13 A3 10 00 00 87 65 78 65 63 75 74 E5 5A ...£....execut.Z
00A6F0: 13 73 13 E1 C3 54 01 84 65 78 69 F4 67 13 80 13 .s...T..exi.g...
00A700: 2A 47 01 4E 23 46 23 22 47 01 C3 4B 01 86 65 78 *G.N#F#"G..K..ex
00A710: 70 65 63 F4 77 13 C3 06 1D 09 7E 13 85 66 65 6E pec.w.....~..fen
00A720: 63 E5 8D 13 66 1C 0E 00 84 66 69 6C EC 9C 13 C3 c...f....fil....
00A730: 06 7D 18 2D 06 3F 06 08 00 B4 09 B9 0E 06 00 90 .}.-.?..........
00A740: 11 BC 12 7E 13 84 66 69 6E E4 A8 13 C3 06 FD 04 ...~..fin.......
00A750: 3F 06 0A 00 BC 12 03 0F B9 0E 04 00 06 06 7E 13 ?.............~.
00A760: 85 66 69 72 73 F4 C5 13 AD 0F FA 6A 83 66 6C E4 .firs......j.fl.
00A770: E0 13 66 1C 22 00 86 66 6F 72 67 65 F4 EC 13 C3 ..f."..forge....
00A780: 06 84 0E 71 1D BC 10 B0 0D B0 0D D5 09 22 06 F7 ...q........."..
00A790: 07 0B 6E 6F 74 5F 63 75 72 72 65 6E 74 BC 12 26 ..not_current..&
00A7A0: 18 C8 12 A4 13 B0 0D 2A 1C F7 07 09 70 72 6F 74 .......*....prot
00A7B0: 65 63 74 65 64 7E 0C 7F 19 C0 0F B0 0D 2A 1C 3F ected~.......*.?
00A7C0: 06 04 00 A7 14 7F 19 BC 10 B0 0D 2A 1C 3F 06 06 ...........*.?..
00A7D0: 00 A7 14 CB 11 92 1C B0 0D 7F 19 7D 18 2A 1C 3F ...........}.*.?
00A7E0: 06 08 00 B0 0D B9 0E F2 FF C8 12 92 1C 84 03 C8 ................
00A7F0: 12 8A 16 04 00 EB 04 AB 18 2F 16 B0 0D C8 12 7F ........./......
00A800: 10 70 06 47 0E 7E 13 88 76 6F 63 2D 6C 69 6E EB .p.G.~..voc-lin.
00A810: 72 1C 66 1C 12 00 8A 76 6F 63 61 62 75 6C 61 72 r.f....vocabular
00A820: F9 87 1C C3 06 D7 0B 7E 13 85 77 68 65 72 E5 96 .......~..wher..
00A830: 1C C3 06 9E 0E B0 0D 3F 06 5B 00 9E 0E B0 0D C8 .......?.[......
00A840: 12 35 1A 84 03 29 10 29 10 46 07 05 73 63 72 23 .5...).).F..scr#
00A850: 20 C8 12 3B 05 75 0C B0 0D 8A 16 FF 03 B0 17 EB ..;.u..........
00A860: 0E F6 05 C8 12 46 07 06 6C 69 6E 65 23 20 3B 05 .....F..line# ;.
00A870: EB 0E 60 04 EB 19 AA 0E 8F 04 29 10 29 10 EB 0E ..`.......).)...
00A880: 0F 05 79 1B 75 0C B0 0D 8A 16 FF 03 67 0C 8F 04 ..y.u.......g...
00A890: B9 0E 06 00 75 0C B0 0D 29 10 F6 14 F4 0E C8 12 ....u...).......
00A8A0: 7E 0C EB 04 F6 14 7F 19 8F 04 59 06 F4 0E 8A 16 ~.........Y.....
00A8B0: 20 00 5B 0C 3F 06 04 00 65 06 AF 1A 6A 19 06 06 .[.?...e...j...
00A8C0: D6 08 8A 16 5E 00 F7 12 02 0B F8 FF 7E 13 C5 77 ....^.......~..w
00A8D0: 68 69 6C E5 A9 1C C3 06 84 15 85 06 7E 13 85 77 hil.........~..w
00A8E0: 69 64 74 E8 4E 1D 66 1C 0C 00 84 77 6F 72 E4 5E idt.N.f....wor.^
00A8F0: 1D C3 06 09 0C 7E 13 C0 80 6A 1D C3 06 9E 0E B0 .....~...j......
00A900: 0D 3F 06 08 00 CF 1A B0 0D 8B 0D 6A 19 BC 12 7E .?.........j...~
00A910: 13 83 78 6F F2 77 1D 99 1D D1 E1 7B AD 6F 7A AC ..xo.w.....{.oz.
00A920: 67 C3 4A 01 C1 DB 91 1D C3 06 06 06 CF 1A 84 03 g.J.............
00A930: 7E 13 C9 5B 63 6F 6D 70 69 6C 65 DD A4 1D C3 06 ~..[compile.....
00A940: A3 0C FD 04 3C 18 F7 07 09 6E 6F 74 5F 66 6F 75 £...<....not_fou
00A950: 6E 64 BC 12 03 0F DB 04 7E 13 81 DD B2 1D C3 06 nd......~.......
00A960: 8A 16 C0 00 CF 1A 84 03 7E 13 86 6E 61 6D 65 75 ........~..nameu
00A970: F0 DA 1D C3 06 29 10 46 07 07 4E 61 6D 65 20 3A .....).F..Name :
00A980: 20 09 19 84 0E EF 1A 8B 18 18 10 9E 11 7D 18 8F ............}..
00A990: 04 59 06 E1 1A D6 08 5E 15 F4 0E C8 12 8A 16 60 .Y.....^.......`
00A9A0: 00 67 0C E1 1A 8A 16 7B 00 E9 06 55 0E 3F 06 0A .g.....{...U.?..
00A9B0: 00 5E 15 8A 16 20 00 41 1B 50 06 64 07 DA FF 29 .^... .A.P.d...)
00A9C0: 10 9E 11 8A 16 07 00 AF 1A 79 1B 29 10 7E 13 8A .........y.).~..
00A9D0: 73 61 76 65 2D 66 6F 72 74 E8 EA 1D C3 06 B8 14 save-fort.......
00A9E0: F3 1D BC 12 8A 16 00 C0 35 03 E3 0C 3F 06 12 00 ........5...?...
00A9F0: 46 07 09 6E 6F 74 5F 6F 70 65 6E 3A 3B 05 C2 0D F..not_open:;...
00AA00: 19 2A 1C 3F 06 F2 FF 7D 18 92 06 84 03 B0 0D E3 .*.?...}........
00AA10: 0C 22 06 3F 06 DA FF 6A 19 9B 12 84 03 7E 13 C5 .".?...j.....~..
00AA20: 66 6F 72 74 E8 F6 13 F5 0B 81 A0 36 2A 00 00 86 fort.......6*...
00AA30: 66 72 65 65 7A E5 9F 14 C3 06 F6 14 A4 13 84 03 freez...........
00AA40: 8A 16 45 01 B0 0D 8A 16 06 00 8F 04 8A 16 37 01 ..E...........7.
00AA50: 8A 16 0E 00 27 0F 8A 16 A9 14 85 06 B0 0D 8A 16 ....'...........
00AA60: 35 01 84 03 7E 13 82 67 EF AF 14 ED 14 E1 E9 84 5...~..g........
00AA70: 68 65 72 E5 E6 14 C3 06 9B 12 B0 0D 7E 13 83 68 her.........~..h
00AA80: 65 F8 EF 14 C3 06 8A 16 10 00 69 0E 84 03 7E 13 e.........i...~.
00AA90: 83 68 6C E4 FE 14 66 1C 24 00 84 68 6F 6C E4 10 .hl...f.$..hol..
00AAA0: 15 C3 06 8A 16 FF FF 16 15 9C 04 16 15 B0 0D CC ................
00AAB0: 0E 7E 13 85 68 70 75 73 E8 1A 15 AD 0F 4A 01 86 .~..hpus.....J..
00AAC0: 68 78 63 6F 64 E5 33 15 C3 06 04 15 38 10 59 1A hxcod.3.....8.Y.
00AAD0: F6 14 C8 12 92 06 84 03 7E 13 81 E9 3F 15 60 15 ........~...?.`.
00AAE0: 2A 47 01 5E 23 56 D5 C3 4B 01 82 69 A7 5A 15 71 *G.^#V..K..i.Z.q
00AAF0: 15 2A 47 01 11 02 00 19 5E 23 56 D5 C3 4B 01 C2 .*G.....^#V..K..
00AB00: 69 E6 6A 15 C3 06 88 0F 3F 06 F6 14 06 06 DB 04 i.j.....?.......
00AB10: 70 06 7E 13 89 69 6D 6D 65 64 69 61 74 E5 7F 15 p.~..immediat...
00AB20: C3 06 08 16 8A 16 40 00 41 1B 7E 13 8A 69 6E 69 ......@.A.~..ini
00AB30: 74 2D 66 6F 72 74 E8 94 15 AD 0F 35 01 89 69 6E t-fort.....5..in
00AB40: 69 74 2D 75 73 65 F2 AC 15 AD 0F 37 01 89 69 6E it-use.....7..in
00AB50: 74 65 72 70 72 65 F4 BD 15 C3 06 28 0A 7E 13 81 terpre.....(.~..
00AB60: EA CD 15 E5 15 2A 47 01 11 04 00 19 5E 23 56 D5 .....*G.....^#V.
00AB70: C3 4B 01 83 6B 65 F9 DF 15 C3 06 72 0A 7E 13 86 .K..ke.....r.~..
00AB80: 6C 61 74 65 73 F4 F3 15 C3 06 BC 10 B0 0D B0 0D lates...........
00AB90: 7E 13 85 6C 65 61 76 E5 FF 15 1C 16 2A 47 01 5E ~..leav.....*G.^
00ABA0: 23 56 23 73 23 72 C3 4B 01 83 6C 66 E1 12 16 C3 #V#s#r.K..lf....
00ABB0: 06 8A 16 04 00 EB 04 7E 13 85 6C 69 6D 69 F4 29 .......~..limi.)
00ABC0: 16 AD 0F FA AA 84 6C 69 73 F4 39 16 C3 06 29 10 ......lis.9...).
00ABD0: C8 12 35 1A 84 03 46 07 05 73 63 72 20 23 C7 1B ..5...F..scr #..
00ABE0: 8A 16 10 00 06 06 D6 08 29 10 7F 19 8A 16 03 00 ........).......
00ABF0: B9 05 9E 1A 7F 19 35 1A B0 0D AA 05 02 0B EA FF ......5.........
00AC00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00AC10: 09 00 01 00 02 09 4E E5 09 00 C1 02 00 00 00 02 ......N.........
00AC20: 09 00 C6 02 00 00 00 02 09 00 C2 02 00 00 00 02 ................
00AC30: 09 00 C7 02 00 00 00 02 09 00 C3 02 00 00 00 02 ................
00AC40: 09 00 C8 02 00 00 00 02 09 00 C4 02 00 00 00 02 ................
00AC50: 09 00 C9 02 00 00 00 02 09 00 C5 02 00 00 00 02 ................
00AC60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00AC70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00AC80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00AC90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00AD00: 8A 16 00 01 C8 12 C8 12 F6 14 E1 1A EB 04 EB 19 ................
00AD10: 8A 16 02 00 61 03 46 07 06 65 72 72 6F 72 3A 3B ....a.F..error:;
00AD20: 05 7E 13 88 73 63 72 2D 6C 6F 61 E4 4F 1E C3 06 .~..scr-loa.O...
00AD30: F3 1D BC 12 8A 16 00 C0 E5 02 E3 0C 3F 06 12 00 ............?...
00AD40: 46 07 09 6E 6F 74 5F 6F 70 65 6E 3A 3B 05 C2 0D F..not_open:;...
00AD50: 29 10 0D 13 E8 13 D5 03 8A 16 00 04 60 04 0E 03 )...........`...
00AD60: 7E 13 08 73 63 72 2D 73 61 76 E5 A3 1E C3 06 B1 ~..scr-sav.£....
00AD70: 08 46 07 07 6C 65 6E 67 74 68 3A E8 13 41 16 E8 .F..length:..A..
00AD80: 13 EB 04 65 06 9D 01 0F 05 B3 01 C8 12 3B 05 46 ...e.........;.F
00AD90: 07 05 62 79 74 65 73 F3 1D BC 12 8A 16 00 C0 35 ..bytes........5
00ADA0: 03 E3 0C 3F 06 12 00 46 07 09 6E 6F 74 5F 6F 70 ...?...F..not_op
00ADB0: 65 6E 3A 3B 05 27 08 06 06 8A 16 16 00 61 03 46 en:;.'.......a.F
00ADC0: 07 06 65 72 72 6F 72 3A 3B 05 7E 13 83 69 6E EB ..error:;.~..in.
00ADD0: E2 1E C3 06 8A 16 1C 00 8A 16 04 00 06 06 D6 08 ................
00ADE0: F7 12 02 0B FC FF 7E 13 85 70 61 70 65 F2 4C 1F ......~..pape.L.
00ADF0: C3 06 8A 16 0E 00 F7 12 F7 12 7E 13 83 70 65 EE ..........~..pe.
00AE00: 68 1F C3 06 8A 16 0F 00 F7 12 F7 12 7E 13 86 77 h...........~..w
00AE10: 69 6E 64 6F F7 7C 1F C3 06 8A 16 1A 00 8A 16 0C indo.|..........
00AE20: 00 8A 16 18 00 8A 16 07 00 06 06 D6 08 F7 12 02 ................
00AE30: 0B FC FF 8A 16 0C 00 8A 16 18 00 F7 12 F7 12 7E ...............~
00AE40: 13 C3 2D 2D BE 8E 1F C3 06 FA 0C 06 06 75 0C 84 ..--.........u..
00AE50: 03 9E 0E B0 0D 59 06 C8 12 C8 12 AA 0E 8A 16 FF .....Y..........
00AE60: 03 8F 04 06 06 E1 1A CC 0E 3B 05 9E 0E 84 03 7E .........;.....~
00AE70: 13 82 2E F3 C1 1F C3 06 DF 11 3F 06 1E 00 46 07 ..........?...F.
00AE80: 03 3E 3E 20 8D 1A 27 1A 92 06 D6 08 5E 15 B0 0D .>> ..'.....^...
00AE90: C7 1B 8A 16 FE FF 1F 07 F4 FF 7E 13 81 FC F1 1F ..........~.....
00AEA0: C3 06 F3 1D 9E 11 8F 04 65 06 8A 16 80 00 41 1B ........e.....A.
00AEB0: BC 12 36 20 7E 13 38 20 E1 C5 CD D4 BC 30 08 AF ..6 ~.8 .....0..
00AEC0: CD 1B 00 3E 07 18 02 3E 3F CD 5A BB C1 C3 4B 01 ...>...>?.Z...K.
00AED0: 83 69 64 AE 1C 20 C3 06 18 10 8A 16 1F 00 55 0E .id.. ........U.
00AEE0: 9E 11 65 06 79 1B 8F 04 65 06 F4 0E 8A 16 7F 00 ..e.y...e.......
00AEF0: 55 0E F7 12 9E 1A 7E 13 85 76 6C 69 73 F4 50 20 U.....~..vlis.P
00AF00: 54 52 4C 2B 4E 20 73 65 61 72 63 68 20 3A 29 10 TRL+N search :).
00AF10: 46 07 2F 20 65 6E 74 65 72 20 73 74 72 69 6E 67 F./ enter string
00AF20: 3B 20 63 6F 6E 74 20 62 79 20 43 4C 52 20 75 6E ; cont by CLR un
00AF30: 74 69 6C 20 70 61 70 65 72 20 63 68 61 6E 67 65 til paper change
00AF40: 73 21 29 10 46 07 1F 43 54 52 4C 2B 4C 20 67 6F s!).F..CTRL+L go
00AF50: 74 6F 20 3A 20 65 6E 74 65 72 20 61 62 73 20 6C to : enter abs l
00AF60: 69 6E 65 20 6E 6F 29 10 46 07 33 43 4F 50 59 20 ine no).F.3COPY
00AF70: 63 6F 70 79 20 6C 69 6E 65 20 3A 20 65 6E 74 65 copy line : ente
00AF80: 72 20 61 62 73 20 6C 69 6E 65 20 6E 6F 3B 20 63 r abs line no; c
00AF90: 6F 6E 66 69 72 6D 20 62 79 20 43 4F 50 59 29 10 onfirm by COPY).
00AFA0: 29 10 46 07 2C 44 6F 20 6E 6F 74 20 75 73 65 20 ).F.,Do not use
00AFB0: 74 68 65 20 6C 61 73 74 20 63 68 61 72 61 63 74 the last charact
00AFC0: 65 72 20 6F 6E 20 61 6E 79 20 73 63 72 65 65 6E er on any screen
00AFD0: 2E 29 10 29 10 46 07 19 45 72 61 73 65 20 61 6C .).).F..Erase al
00AFE0: 6C 20 73 63 72 65 65 6E 73 20 28 6E 2F 59 29 20 l screens (n/Y)
00AFF0: 3F 8A 16 07 00 F7 12 62 21 29 10 F9 15 8A 16 59 ?......b!).....Y
00B000: 00 5B 0C 3F 06 11 00 0D 13 46 07 06 65 72 61 73 .[.?.....F..eras
00B010: 65 64 B9 0E 44 00 46 07 27 63 6F 6E 76 65 72 74 ed..D.F.'convert
00B020: 69 6E 67 20 6E 6F 6E 2D 70 72 69 6E 74 69 6E 67 ing non-printing
00B030: 20 63 6F 64 65 73 20 74 6F 20 62 6C 61 6E 6B 73 codes to blanks
00B040: 41 16 E8 13 D6 08 5E 15 F4 0E 84 0E 9A 17 5E 15 A.....^.......^.
00B050: CC 0E 50 06 64 07 F0 FF 29 10 46 07 0C 70 72 65 ..P.d...).F..pre
00B060: 73 73 20 61 20 6B 65 79 20 8A 16 07 00 F7 12 F9 ss a key .......
00B070: 15 6B 1A 8A 16 18 00 06 06 DB 20 65 06 06 06 97 .k........ e....
00B080: 1F 8A 16 1E 00 F7 12 8A 16 08 00 F6 20 84 03 30 ............ ..0
00B090: 23 B3 01 21 02 7E 13 88 6C 6F 6F 70 30 2D 39 B9 #..!.~..loop0-9.
00B0A0: C5 26 C3 06 8A 16 64 00 06 06 D6 08 5E 15 3B 05 .&....d.....^.;.
00B0B0: 02 0B FA FF 7E 13 87 65 73 63 64 65 6D EF 17 2A ....~..escdem..*
00B0C0: C3 06 29 10 8A 16 07 00 F7 12 29 10 46 07 07 65 ..).......).F..e
00B0D0: 73 63 64 65 6D 6F 29 10 46 07 4C 45 6E 64 6C 65 scdemo).F.LEndle
00B0E0: 73 73 20 6C 6F 6F 70 2C 20 63 61 6E 20 62 65 20 ss loop, can be
00B0F0: 73 74 6F 70 70 65 64 20 6F 6E 6C 79 20 77 68 65 stopped only whe
00B100: C3 06 8A 16 50 00 72 18 84 03 C0 0F B0 0D B0 0D ....P.r.........
00B110: 8A 16 50 00 72 18 B0 0D EB 04 7D 18 F4 0E 8A 16 ..P.r.....}.....
00B120: 1F 00 55 0E 8A 16 04 00 8F 04 E9 06 3F 06 0A 00 ..U.........?...
00B130: 29 10 06 06 72 18 84 03 C8 12 56 20 70 06 AF 1A )...r.....V p...
00B140: AB 18 8A 16 04 00 EB 04 B0 0D C8 12 3C 18 3F 06 ............<.?.
00B150: C0 FF BC 12 7E 13 82 63 E8 78 20 AD 0F 40 00 82 ....~..c.x ..@..
00B160: 6D EC D6 20 AD 0F FF 00 82 64 EC DF 20 AD 0F 17 m.. .....d.. ...
00B170: 00 82 74 EC E8 20 A3 10 FF FF 82 63 E3 F1 20 A3 ..t.. £....c.. £
00B180: 10 01 00 82 63 EC FA 20 A3 10 0B 00 82 6D E1 03 ....c.. £....m..
00B190: 21 A3 10 FA 6C 82 74 B1 0C 21 A3 10 08 00 82 74 !£..l.t..!£....t
00B1A0: B2 15 21 A3 10 6C 65 83 63 75 E7 1E 21 2F 21 CD ..!£.le.cu..!/!.
00B1B0: 78 BB 16 00 5C ED 53 01 21 5D ED 53 0A 21 C3 4B x...\.S.!].S.!.K
00B1C0: 01 83 63 75 F3 27 21 49 21 ED 5B 01 21 63 ED 5B ..cu.'!I!.[.!c.[
00B1D0: 0A 21 6B CD 75 BB C3 4B 01 86 6B 65 79 64 65 E6 .!k.u..K..keyde.
00B1E0: 41 21 64 21 C5 3E 00 06 0B CD 27 BB 3E 00 06 05 A!d!.>....'.>...
00B1F0: CD 2D BB 3E 01 06 09 CD 27 BB 3E 02 06 0A CD 27 .-.>....'.>....'
00B200: BB 3E 02 06 06 CD 2D BB 3E 08 06 08 CD 27 BB 3E .>....-.>....'.>
00B210: 09 06 0F CD 27 BB 3E 44 06 01 CD 27 BB 3E 44 06 ....'.>D...'.>D.
00B220: 02 CD 2D BB 3E 4F 06 03 CD 27 BB 3E 4F 06 04 CD ..-.>O...'.>O...
00B230: 2D BB C1 C3 4B 01 83 69 6E F3 59 21 BE 21 C5 21 -...K..in.Y!.!.!
00B240: FA AA 2B ED 4B 1C 21 54 5D 03 1A 1B FE 21 38 FA ..+.K.!T]....!8.
00B250: 13 ED 52 ED 42 38 16 6B 62 09 EB ED 4B 13 21 B7 ..R.B8.kb...K.!.
00B260: ED 42 38 09 09 7E 36 20 12 1B 2B 18 F2 C1 C3 4B .B8..~6 ..+....K
00B270: 01 83 64 65 EC B6 21 F9 21 C5 2A 13 21 ED 4B 1C ..de..!.!.*.!.K.
00B280: 21 54 5D 09 01 FA AA B7 ED 42 30 09 09 7E 36 20 !T]......B0..~6
00B290: 12 13 23 18 F2 C1 C3 4B 01 84 61 6D 69 F4 F1 21 ..#....K..ami..!
00B2A0: 22 22 E1 C5 7D CD 5D BB C1 C3 4B 01 84 64 69 73 ""..}.]...K..dis
00B2B0: F0 19 22 C3 06 F6 20 B0 0D ED 20 8F 04 DB 20 60 .."... ... ... `
00B2C0: 04 E8 13 8F 04 50 06 EB 04 11 21 B0 0D D6 08 5E .....P....!....^
00B2D0: 15 B0 0D 20 22 50 06 64 07 F6 FF 47 21 7E 13 83 ... "P.d...G!~..
00B2E0: 6E 6F BF 2C 22 C3 06 8A 16 07 00 F7 12 50 06 09 no.,"........P..
00B2F0: 19 8A 16 0D 00 71 1D C8 12 C8 12 F4 0E 59 06 8F .....q.......Y..
00B300: 6E 20 45 53 43 20 74 72 61 70 20 69 73 20 6F 6E n ESC trap is on
00B310: 2C 20 62 79 20 70 72 65 73 73 69 6E 67 20 45 53 , by pressing ES
00B320: 43 20 74 77 69 63 65 29 10 9D 01 46 07 0F 45 53 C twice)...F..ES
00B330: 43 20 74 72 61 70 20 6F 66 66 20 3A 20 22 2A 29 C trap off : "*)
00B340: 10 B3 01 46 07 0F 45 53 43 20 74 72 61 70 20 6F ...F..ESC trap o
00B350: 6E 20 20 3A 20 22 2A B9 0E 69 FF 7E 13 00 00 00 n : "*..i.~....
00B360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B3A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B3B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B3C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B3D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B3E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B3F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B400: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B420: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B430: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B440: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B450: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B4A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B4B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B4C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B4D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B4E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B4F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B500: 04 E1 1A 59 06 D6 08 5E 15 F4 0E 69 0E B0 0D F5 ...Y...^...i....
00B510: 11 3F 06 08 00 BC 12 B9 0E 06 00 22 06 1A 16 50 .?........."...P
00B520: 06 64 07 E4 FF C8 12 F6 14 E1 1A 3F 06 0C 00 54 .d.........?...T
00B530: 18 BC 12 E1 1A B9 0E 0A 00 8A 16 50 00 06 06 AF ...........P....
00B540: 13 C8 12 3F 06 20 00 E1 1A C8 12 C8 12 0F 06 E1 ...?. ..........
00B550: 1A E4 20 67 0C 5F 18 3F 06 0A 00 BC 12 22 06 B9 .. g._.?....."..
00B560: 0E 04 00 E1 1A 47 21 7E 13 82 24 BD 5F 22 C3 06 .....G!~..$._"..
00B570: E1 1A E3 0C 3F 06 2C 00 7D 18 8F 04 E1 1A D6 08 ....?.,.}.......
00B580: C8 12 F4 0E 5E 15 F4 0E EB 04 3F 06 0A 00 22 06 ....^.....?...".
00B590: 1A 16 B9 0E 04 00 59 06 50 06 64 07 E4 FF B9 0E ......Y.P.d.....
00B5A0: 06 00 BC 12 22 06 7E 13 85 72 6F 75 6E E4 E9 22 ....".~..roun.."
00B5B0: C3 06 2D 21 F6 20 B0 0D 08 21 B0 0D 70 06 EB 04 ..-!. ...!..p...
00B5C0: 8F 04 C8 12 C8 12 9E 11 1A 21 84 03 70 06 F7 12 .........!..p...
00B5D0: 8A 16 1E 00 F7 12 8A 16 04 00 B9 05 8A 16 05 00 ................
00B5E0: AF 1A 8A 16 10 00 F6 05 59 06 70 06 B9 05 8A 16 ........Y.p.....
00B5F0: 3A 00 F7 12 70 06 B9 05 47 21 8A 16 03 00 F7 12 :...p...G!......
00B600: 0F 06 E1 1A E4 20 67 0C 5F 18 3F 06 20 00 8A 16 ..... g._.?. ...
00B610: 0B 00 1A 21 B0 0D 0F 06 3F 06 06 00 50 06 EB 04 ...!....?...P...
00B620: F7 12 8A 16 07 00 F7 12 B9 0E 88 FF F6 1F 08 21 ...............!
00B630: B0 0D C8 12 8A 16 03 00 E9 06 E1 1A ED 20 67 0C ............. g.
00B640: 5F 18 3F 06 68 00 ED 20 70 06 C9 05 08 21 B0 0D _.?.h.. p....!..
00B650: C8 12 8A 16 03 00 E9 06 3F 06 0E 00 E1 1A FC 17 ........?.......
00B660: 59 06 8F 04 B9 0E 06 00 E1 1A EB 04 F6 20 B0 0D Y............ ..
00B670: 8F 04 ED 20 FC 17 9A 17 E4 20 B0 17 C8 12 F6 20 ... ..... .....
00B680: 84 03 DB 20 60 04 E8 13 8F 04 11 21 84 03 8A 16 ... `......!....
00B690: 1E 00 F7 12 8A 16 0F 00 AF 1A 29 10 ED 20 70 06 ..........).. p.
00B6A0: C9 05 08 21 84 03 33 22 B9 0E 08 FF 1A 21 B0 0D ...!..3".....!..
00B6B0: DB 20 60 04 E8 13 8F 04 FF 20 B0 0D 50 06 EB 04 . `...... ..P...
00B6C0: 8F 04 11 21 84 03 F9 15 8A 16 7F 00 55 0E C8 12 ...!........U...
00B6D0: 50 06 5B 0C 3F 06 0E 00 BC 12 06 06 06 06 1A 21 P.[.?..........!
00B6E0: 84 03 BC 21 C8 12 70 06 5B 0C 3F 06 14 00 BC 12 ...!..p.[.?.....
00B6F0: 06 06 DB 20 FF 20 B0 0D EB 04 1A 21 84 03 BC 21 ... . .....!...!
00B700: 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 20 20 2A 2A .. ******.. **
00B710: 2A 2A 2A 2A 20 46 4F 52 54 48 2C 20 50 41 52 54 **** FORTH, PART
00B720: 20 31 2C 20 62 79 20 50 45 54 52 20 4C 55 4B 45 1, by PETR LUKE
00B730: 53 2C 20 32 36 20 4E 6F 6C 6C 20 53 74 2C 20 54 S, 26 Noll St, T
00B740: 6F 6F 77 6F 6F 6D 62 61 20 34 33 35 30 2E 0D 0A oowoomba 4350...
00B750: 20 20 2A 2A 2A 2A 2A 2A 20 20 20 20 20 20 20 20 ******
00B760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00B770: 20 20 20 20 20 20 20 74 65 6C 65 70 68 6F 6E 65 telephone
00B780: 20 28 30 37 36 29 20 33 35 2D 35 38 32 32 0D 0A (076) 35-5822..
00B790: 0D 0A 20 20 20 20 28 54 68 65 20 66 69 6C 65 73 .. (The files
00B7A0: 20 69 6E 20 74 68 69 73 20 6A 6F 75 72 6E 61 6C in this journal
00B7B0: 20 61 73 73 6F 63 69 61 74 65 64 20 77 69 74 68 associated with
00B7C0: 20 74 68 69 73 20 74 65 78 74 20 6F 6E 20 20 46 this text on F
00B7D0: 6F 72 74 68 20 20 61 72 65 0D 0A 20 20 20 20 20 orth are..
00B7E0: 74 68 65 20 6B 65 72 6E 65 6C 2C 20 43 50 43 46 the kernel, CPCF
00B7F0: 54 48 32 2E 42 49 4E 2C 20 61 6E 64 20 74 68 65 TH2.BIN, and the
00B800: 20 73 63 72 65 65 6E 20 65 64 69 74 6F 72 2C 20 screen editor,
00B810: 53 43 52 45 44 2E 46 54 48 29 0D 0A 0D 0A 20 20 SCRED.FTH)....
00B820: 20 54 68 69 73 20 69 73 20 74 68 65 20 50 75 62 This is the Pub
00B830: 6C 69 63 20 44 6F 6D 61 69 6E 20 4D 56 50 2D 46 lic Domain MVP-F
00B840: 4F 52 54 48 20 73 70 65 63 69 61 6C 6C 79 20 61 ORTH specially a
00B850: 64 61 70 74 65 64 20 66 6F 72 20 74 68 65 20 43 dapted for the C
00B860: 50 43 73 2C 20 74 61 70 65 20 6F 72 0D 0A 20 20 PCs, tape or..
00B870: 64 69 73 6B 20 28 77 69 74 68 6F 75 74 20 43 50 disk (without CP
00B880: 2F 4D 29 2E 20 54 68 65 20 61 76 61 69 6C 61 62 /M). The availab
00B890: 6C 65 20 46 4F 52 54 48 73 20 63 6F 73 74 20 61 le FORTHs cost a
00B8A0: 62 6F 75 74 20 24 36 30 20 77 69 74 68 20 20 64 bout $60 with d
00B8B0: 6F 63 75 6D 65 6E 74 61 74 69 6F 6E 0D 0A 20 20 ocumentation..
00B8C0: 61 6E 64 20 74 75 74 6F 72 69 61 6C 73 2C 20 77 and tutorials, w
00B8D0: 68 69 6C 65 20 53 74 72 61 74 65 67 79 20 53 6F hile Strategy So
00B8E0: 66 74 77 61 72 65 20 69 73 20 73 65 6C 6C 69 6E ftware is sellin
00B8F0: 67 20 74 68 65 20 65 61 72 6C 79 20 61 6D 73 2D g the early ams-
00B900: C8 12 8A 16 03 00 5B 0C 3F 06 0E 00 BC 12 06 06 ......[.?.......
00B910: 50 06 1A 21 84 03 F7 21 C8 12 8A 16 04 00 5B 0C P..!...!......[.
00B920: 3F 06 44 00 BC 12 06 06 8A 16 18 00 F7 12 DB 20 ?.D............
00B930: FF 20 B0 0D EB 04 59 06 C8 12 1A 21 84 03 11 21 . ....Y....!...!
00B940: B0 0D E1 1A 79 1B 46 07 07 63 6F 6E 66 69 72 6D ....y.F..confirm
00B950: 47 21 8A 16 18 00 F7 12 F9 15 8A 16 04 00 5B 0C G!............[.
00B960: 3F 06 04 00 F7 21 C8 12 8A 16 0C 00 5B 0C 3F 06 ?....!......[.?.
00B970: 36 00 BC 12 06 06 8A 16 18 00 F7 12 8A 16 12 00 6...............
00B980: F7 12 46 07 0B 67 6F 74 6F 20 6C 69 6E 65 20 3A ..F..goto line :
00B990: 65 22 3F 06 0C 00 F6 20 84 03 BC 12 8A 16 05 00 e"?.... ........
00B9A0: 8A 16 18 00 F7 12 C8 12 8A 16 0D 00 5B 0C 3F 06 ............[.?.
00B9B0: 04 00 29 10 C8 12 8A 16 0E 00 5B 0C 3F 06 9D 00 ..).......[.?...
00B9C0: BC 12 1A 21 B0 0D 23 21 84 03 8A 16 1A 00 8A 16 ...!..#!........
00B9D0: 1A 00 50 06 52 1F 46 07 08 73 65 61 72 63 68 20 ..P.R.F..search
00B9E0: 3A 09 19 8A 16 0D 00 71 1D BC 12 41 16 E8 13 D6 :......q...A....
00B9F0: 08 70 06 8A 16 03 00 F7 12 F7 12 5E 15 F6 14 F4 .p.........^....
00BA00: 0E F6 14 59 06 EE 22 3F 06 2E 00 5E 15 E8 13 EB ...Y.."?...^....
00BA10: 04 DB 20 C9 05 F6 20 84 03 8A 16 1E 00 8A 16 07 .. ... .........
00BA20: 00 F7 12 F7 12 30 23 8A 16 0D 00 F7 12 F6 14 59 .....0#........Y
00BA30: 06 F6 14 F4 0E 79 1B 50 06 64 07 B6 FF 8A 16 18 .....y.P.d......
00BA40: 00 8A 16 18 00 50 06 52 1F 23 21 B0 0D F6 20 84 .....P.R.#!... .
00BA50: 03 8A 16 07 00 F7 12 8A 16 05 00 C8 12 8A 16 0F ................
00BA60: 00 5B 0C 3F 06 62 00 BC 12 06 06 8A 16 18 00 F7 .[.?.b..........
00BA70: 12 8A 16 12 00 F7 12 46 07 0B 63 6F 70 79 20 6C .......F..copy l
00BA80: 69 6E 65 20 3A 65 22 3F 06 38 00 DB 20 60 04 E8 ine :e"?.8.. `..
00BA90: 13 8F 04 C8 12 1A 21 84 03 DB 20 79 1B 46 07 07 ......!... y.F..
00BAA0: 63 6F 6E 66 69 72 6D 47 21 F9 15 8A 16 0F 00 5B confirmG!......[
00BAB0: 0C 3F 06 0E 00 1A 21 B0 0D 11 21 B0 0D DB 20 27 .?....!...!... '
00BAC0: 0F 8A 16 18 00 F7 12 C8 12 22 06 3F 06 0C 00 33 .........".?...3
00BAD0: 22 A6 0D 22 06 3F 06 FA FF C8 12 8A 16 05 00 5B "..".?.........[
00BAE0: 0C 3F 06 08 00 8A 16 1E 00 F7 12 C8 12 8A 16 06 .?..............
00BAF0: 00 5B 0C 3F 06 0C 00 8A 16 18 00 08 21 84 03 47 .[.?........!..G
00BB00: 46 4F 52 54 48 2C 20 20 77 69 74 68 0D 0A 20 20 FORTH, with..
00BB10: 6D 69 6E 69 6D 61 6C 20 64 6F 63 75 6D 65 6E 74 minimal document
00BB20: 61 74 69 6F 6E 20 66 6F 72 20 24 32 35 2E 20 54 ation for $25. T
00BB30: 68 65 79 20 61 72 65 20 74 68 65 20 50 75 62 6C hey are the Publ
00BB40: 69 63 20 20 44 6F 6D 61 69 6E 20 20 66 69 67 2D ic Domain fig-
00BB50: 46 4F 52 54 48 73 20 20 77 69 74 68 0D 0A 20 20 FORTHs with..
00BB60: 6F 6E 6C 79 20 74 68 65 20 65 78 74 65 6E 73 69 only the extensi
00BB70: 6F 6E 73 20 61 6E 64 20 74 75 74 6F 72 69 61 6C ons and tutorial
00BB80: 73 20 71 75 61 6C 69 66 79 69 6E 67 20 66 6F 72 s qualifying for
00BB90: 20 20 63 6F 70 79 72 69 67 68 74 2E 20 20 4D 79 copyright. My
00BBA0: 20 20 61 64 61 70 74 61 74 69 6F 6E 0D 0A 20 20 adaptation..
00BBB0: 63 6F 75 6C 64 20 62 65 20 63 6F 70 79 72 69 67 could be copyrig
00BBC0: 68 74 65 64 2C 20 62 75 74 20 74 68 65 72 65 20 hted, but there
00BBD0: 69 73 20 6E 6F 74 20 6D 75 63 68 20 70 6F 69 6E is not much poin
00BBE0: 74 20 69 6E 20 69 74 2E 0D 0A 0D 0A 20 20 20 54 t in it..... T
00BBF0: 68 65 20 46 4F 52 54 48 20 69 74 73 65 6C 66 20 he FORTH itself
00BC00: 69 73 20 20 74 68 65 20 20 62 69 6E 61 72 79 20 is the binary
00BC10: 20 70 72 6F 67 72 61 6D 20 20 43 50 43 46 54 48 program CPCFTH
00BC20: 32 2E 42 49 4E 2C 20 20 39 6B 2C 20 20 77 69 74 2.BIN, 9k, wit
00BC30: 68 20 20 31 30 6B 20 20 6F 66 0D 0A 20 20 22 73 h 10k of.. "s
00BC40: 63 72 65 65 6E 73 22 2C 20 77 68 69 63 68 2C 20 creens", which,
00BC50: 77 68 65 6E 20 63 6F 6D 70 69 6C 65 64 2C 20 74 when compiled, t
00BC60: 61 6B 65 20 75 70 20 61 62 6F 75 74 20 33 6B 2E ake up about 3k.
00BC70: 0D 0A 0D 0A 20 20 20 49 6E 20 74 68 65 20 66 6F .... In the fo
00BC80: 6C 6C 6F 77 69 6E 67 2C 20 65 61 63 68 20 63 6F llowing, each co
00BC90: 6D 6D 61 6E 64 20 69 73 20 65 6E 63 6C 6F 73 65 mmand is enclose
00BCA0: 64 20 20 77 69 74 68 20 20 62 61 63 6B 2D 73 6C d with back-sl
00BCB0: 61 73 68 65 73 2E 20 20 43 6F 6D 70 75 6C 73 6F ashes. Compulso
00BCC0: 72 79 0D 0A 20 20 73 70 61 63 65 73 20 61 72 65 ry.. spaces are
00BCD0: 20 69 6E 64 69 63 61 74 65 64 20 62 79 20 75 6E indicated by un
00BCE0: 64 65 72 6C 69 6E 65 73 2E 20 22 49 6E 70 75 74 derlines. "Input
00BCF0: 22 20 6D 65 61 6E 73 20 74 6F 20 22 74 79 70 65 " means to "type
00BD00: 21 C8 12 C8 12 84 0E E9 06 E1 1A 8A 16 10 00 67 !..............g
00BD10: 0C 55 0E 3F 06 08 00 BC 12 8A 16 07 00 C8 12 9E .U.?............
00BD20: 11 F7 12 84 0E E9 06 22 06 3F 06 0C 00 11 21 B0 .......".?....!.
00BD30: 0D CC 0E B9 0E 04 00 BC 12 8A 16 10 00 5B 0C 3F .............[.?
00BD40: 06 71 FC 7E 13 85 73 63 72 65 E4 28 23 C3 06 B1 .q.~..scre.(#...
00BD50: 11 9D 01 70 06 C7 02 8A 16 18 00 8A 16 18 00 50 ...p...........P
00BD60: 06 52 1F 06 06 82 1F 50 06 70 1F 29 10 29 10 46 .R.....P.p.).).F
00BD70: 07 21 53 63 72 65 65 6E 20 45 64 69 74 6F 72 20 .!Screen Editor
00BD80: 66 6F 72 20 63 70 63 46 54 48 32 20 20 38 37 30 for cpcFTH2 870
00BD90: 33 31 32 29 10 46 07 26 50 2E 20 4C 75 6B 65 73 312).F.&P. Lukes
00BDA0: 2C 20 32 36 20 4E 6F 6C 6C 20 53 74 2E 2C 20 54 , 26 Noll St., T
00BDB0: 6F 6F 77 6F 6F 6D 62 61 2C 20 34 33 35 30 29 10 oowoomba, 4350).
00BDC0: E4 20 59 06 3B 05 46 07 2C 6C 69 6E 65 73 2C 20 . Y.;.F.,lines,
00BDD0: 73 68 6F 77 6E 20 61 73 3A 20 20 61 62 73 20 6C shown as: abs l
00BDE0: 69 6E 65 20 20 20 73 63 72 3A 6C 69 6E 65 20 69 ine scr:line i
00BDF0: 6E 20 73 63 72 29 10 46 07 1D 6E 6F 72 6D 61 6C n scr).F..normal
00BE00: 20 63 75 72 73 6F 72 20 6B 65 79 73 2C 20 20 73 cursor keys, s
00BE10: 68 69 66 74 65 64 20 8A 16 F1 00 8A 16 F0 00 F7 hifted .........
00BE20: 12 9E 1A F7 12 46 07 0E 20 3A 20 70 61 67 65 20 .....F.. : page
00BE30: 74 6F 67 67 6C 65 29 10 46 07 17 53 70 65 63 69 toggle).F..Speci
00BE40: 61 6C 20 66 75 6E 63 74 69 6F 6E 20 6B 65 79 73 al function keys
00BE50: 20 3A 29 10 46 07 08 43 4C 52 20 65 78 69 74 29 :).F..CLR exit)
00BE60: 10 46 07 34 6E 6F 72 6D 61 6C 2F 73 68 69 66 74 .F.4normal/shift
00BE70: 20 3A 20 54 41 42 20 69 6E 73 65 72 74 20 73 70 : TAB insert sp
00BE80: 61 63 65 2F 73 2C 20 44 45 4C 20 64 65 6C 65 74 ace/s, DEL delet
00BE90: 65 20 63 68 61 72 2F 73 29 10 46 07 30 20 20 28 e char/s).F.0 (
00BEA0: 69 6E 73 65 72 74 69 6F 6E 20 6F 6E 6C 79 20 69 insertion only i
00BEB0: 66 20 74 68 65 72 65 20 69 73 20 66 72 65 65 20 f there is free
00BEC0: 73 70 61 63 65 20 61 74 20 65 6E 64 29 29 10 46 space at end)).F
00BED0: 07 28 20 20 28 63 6F 6E 66 69 72 6D 20 6D 75 6C .( (confirm mul
00BEE0: 74 69 70 6C 65 20 64 65 6C 65 74 65 20 62 79 20 tiple delete by
00BEF0: 53 48 49 46 54 2B 44 45 4C 29 29 10 46 07 0F 43 SHIFT+DEL)).F..C
00BF00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00BF10: 0A 00 01 00 02 09 4E E5 0A 00 C1 02 00 00 00 02 ......N.........
00BF20: 0A 00 C6 02 00 00 00 02 0A 00 C2 02 00 00 00 02 ................
00BF30: 0A 00 C7 02 00 00 00 02 0A 00 C3 02 00 00 00 02 ................
00BF40: 0A 00 C8 02 00 00 00 02 0A 00 C4 02 00 00 00 02 ................
00BF50: 0A 00 C9 02 00 00 00 02 0A 00 C5 02 00 00 00 02 ................
00BF60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BF70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BF80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BF90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C000: 20 69 6E 20 20 74 68 65 20 20 63 6F 6D 6D 61 6E in the comman
00C010: 64 2C 0D 0A 20 20 6E 6F 74 20 69 6E 63 6C 75 64 d,.. not includ
00C020: 69 6E 67 20 74 68 65 20 62 61 63 6B 2D 73 6C 61 ing the back-sla
00C030: 73 68 65 73 2C 20 72 65 70 6C 61 63 69 6E 67 20 shes, replacing
00C040: 74 68 65 20 20 75 6E 64 65 72 6C 69 6E 65 73 20 the underlines
00C050: 5B 77 68 65 72 65 20 20 69 6E 64 69 63 61 74 65 [where indicate
00C060: 64 5D 0D 0A 20 20 77 69 74 68 20 73 70 61 63 65 d].. with space
00C070: 73 2C 20 74 68 65 6E 20 70 72 65 73 73 20 45 4E s, then press EN
00C080: 54 45 52 20 5B 6F 72 20 52 45 54 55 52 4E 5D 2E TER [or RETURN].
00C090: 22 20 44 6F 20 6E 6F 74 20 63 6F 6E 66 75 73 65 " Do not confuse
00C0A0: 20 20 75 6E 64 65 72 6C 69 6E 65 73 20 20 77 69 underlines wi
00C0B0: 74 68 0D 0A 20 20 68 79 70 68 65 6E 73 2C 20 77 th.. hyphens, w
00C0C0: 68 69 63 68 20 61 72 65 20 72 65 71 75 69 72 65 hich are require
00C0D0: 64 20 69 6E 20 73 6F 6D 65 20 72 6F 75 74 69 6E d in some routin
00C0E0: 65 73 2E 0D 0A 0D 0A 20 20 20 54 68 65 20 73 65 es..... The se
00C0F0: 71 75 65 6E 63 65 20 66 6F 72 20 74 72 79 69 6E quence for tryin
00C100: 67 20 69 74 2C 20 61 73 73 75 6D 69 6E 67 20 61 g it, assuming a
00C110: 20 72 65 73 65 74 20 6D 61 63 68 69 6E 65 20 73 reset machine s
00C120: 65 74 20 75 70 20 20 66 6F 72 20 20 74 61 70 65 et up for tape
00C130: 20 20 28 62 79 0D 0A 20 20 5C 7C 74 61 70 65 5C (by.. \|tape\
00C140: 29 2C 20 61 6E 64 20 74 68 65 20 74 61 70 65 20 ), and the tape
00C150: 69 6E 20 70 6F 73 69 74 69 6F 6E 20 72 65 61 64 in position read
00C160: 79 20 74 6F 20 72 65 61 64 3A 20 20 49 6E 70 75 y to read: Inpu
00C170: 74 20 20 5C 72 75 6E 22 63 70 63 66 74 68 32 5C t \run"cpcfth2\
00C180: 20 20 61 6E 64 0D 0A 20 20 74 68 65 20 74 61 70 and.. the tap
00C190: 65 20 77 69 6C 6C 20 6C 6F 61 64 2C 20 74 68 65 e will load, the
00C1A0: 20 73 69 67 6E 2D 6F 6E 20 6D 65 73 73 61 67 65 sign-on message
00C1B0: 20 61 70 70 65 61 72 73 2E 20 4C 65 61 76 65 20 appears. Leave
00C1C0: 74 68 65 20 74 61 70 65 20 69 6E 20 20 70 6F 73 the tape in pos
00C1D0: 69 74 69 6F 6E 0D 0A 20 20 61 74 20 74 68 69 73 ition.. at this
00C1E0: 20 73 74 61 67 65 2E 20 54 68 65 20 73 79 73 74 stage. The syst
00C1F0: 65 6D 20 77 69 6C 6C 20 61 75 74 6F 6D 61 74 69 em will automati
00C200: 46 54 20 70 6C 75 73 20 63 75 72 73 6F 72 20 20 FT plus cursor
00C210: 6B 65 79 73 20 20 74 6F 67 67 6C 65 73 0D 0A 20 keys toggles..
00C220: 20 74 68 65 20 73 63 72 65 65 6E 73 2E 20 53 70 the screens. Sp
00C230: 65 63 69 61 6C 20 66 75 6E 63 74 69 6F 6E 20 6B ecial function k
00C240: 65 79 73 3A 20 54 68 65 20 54 41 42 20 6B 65 79 eys: The TAB key
00C250: 20 77 69 6C 6C 20 69 6E 73 65 72 74 20 61 20 20 will insert a
00C260: 73 70 61 63 65 2C 20 20 53 48 49 46 54 0D 0A 20 space, SHIFT..
00C270: 20 70 6C 75 73 20 54 41 42 20 77 69 6C 6C 20 69 plus TAB will i
00C280: 6E 73 65 72 74 20 73 70 61 63 65 73 2E 20 44 45 nsert spaces. DE
00C290: 4C 20 77 69 6C 6C 20 64 65 6C 65 74 65 20 61 20 L will delete a
00C2A0: 20 63 68 61 72 61 63 74 65 72 2C 20 20 53 48 49 character, SHI
00C2B0: 46 54 20 20 70 6C 75 73 20 20 44 45 4C 0D 0A 20 FT plus DEL..
00C2C0: 20 77 69 6C 6C 20 64 65 6C 65 74 65 20 63 68 61 will delete cha
00C2D0: 72 61 63 74 65 72 73 2E 20 54 68 65 20 69 6E 73 racters. The ins
00C2E0: 65 72 74 69 6F 6E 20 6F 66 20 73 70 61 63 65 73 ertion of spaces
00C2F0: 20 77 69 6C 6C 20 6F 63 63 75 72 20 6F 6E 6C 79 will occur only
00C300: 20 20 77 68 65 6E 20 20 74 68 65 72 65 0D 0A 20 when there..
00C310: 20 69 73 20 66 72 65 65 20 73 70 61 63 65 20 61 is free space a
00C320: 74 20 74 68 65 20 65 6E 64 20 6F 66 20 74 68 65 t the end of the
00C330: 20 73 63 72 65 65 6E 2E 20 43 6F 6E 66 69 72 6D screen. Confirm
00C340: 20 61 20 6D 75 6C 74 69 70 6C 65 20 64 65 6C 65 a multiple dele
00C350: 74 65 20 20 62 79 20 20 53 48 49 46 54 0D 0A 20 te by SHIFT..
00C360: 20 70 6C 75 73 20 44 45 4C 2E 0D 0A 20 20 20 20 plus DEL...
00C370: 43 54 52 4C 20 70 6C 75 73 20 4E 20 69 73 20 74 CTRL plus N is t
00C380: 68 65 20 20 73 65 61 72 63 68 20 20 6D 6F 64 65 he search mode
00C390: 2E 20 20 45 6E 74 65 72 20 20 61 20 20 73 74 72 . Enter a str
00C3A0: 69 6E 67 20 20 61 6E 64 2C 20 77 68 65 6E 20 20 ing and, when
00C3B0: 6F 70 65 72 61 74 69 6E 67 2C 0D 0A 20 20 63 6F operating,.. co
00C3C0: 6E 74 69 6E 75 65 20 77 69 74 68 20 43 4C 52 20 ntinue with CLR
00C3D0: 75 6E 74 69 6C 20 74 68 65 20 70 61 70 65 72 20 until the paper
00C3E0: 63 68 61 6E 67 65 73 2E 20 43 54 52 4C 20 70 6C changes. CTRL pl
00C3F0: 75 73 20 4C 20 77 69 6C 6C 20 63 61 75 73 65 20 us L will cause
00C400: 63 61 6C 6C 79 20 69 6E 69 74 69 61 6C 69 73 65 cally initialise
00C410: 20 74 68 65 20 64 69 73 63 20 52 4F 4D 20 20 37 the disc ROM 7
00C420: 2C 20 20 49 46 0D 0A 20 20 49 54 20 49 53 20 50 , IF.. IT IS P
00C430: 52 45 53 45 4E 54 2E 0D 0A 0D 0A 20 20 20 49 6E RESENT..... In
00C440: 70 75 74 20 5C 76 6C 69 73 74 5C 2E 20 54 68 65 put \vlist\. The
00C450: 20 6E 61 6D 65 73 20 6F 66 20 74 68 65 20 22 77 names of the "w
00C460: 6F 72 64 73 22 20 28 72 6F 75 74 69 6E 65 73 29 ords" (routines)
00C470: 20 77 69 6C 6C 20 62 65 20 64 69 73 70 6C 61 79 will be display
00C480: 65 64 20 6F 6E 20 74 68 65 0D 0A 20 20 73 63 72 ed on the.. scr
00C490: 65 65 6E 2E 20 50 72 6F 67 72 61 6D 73 20 63 61 een. Programs ca
00C4A0: 6E 20 62 65 20 70 61 75 73 65 64 20 62 79 20 70 n be paused by p
00C4B0: 72 65 73 73 69 6E 67 20 45 53 43 20 61 6E 64 20 ressing ESC and
00C4C0: 72 65 73 74 61 72 74 65 64 20 62 79 20 70 72 65 restarted by pre
00C4D0: 73 73 69 6E 67 20 61 6E 79 0D 0A 20 20 6F 74 68 ssing any.. oth
00C4E0: 65 72 20 6B 65 79 2C 20 6F 72 20 73 74 6F 70 70 er key, or stopp
00C4F0: 65 64 20 62 79 20 70 72 65 73 73 69 6E 67 20 45 ed by pressing E
00C500: 53 43 20 45 53 43 20 61 6E 64 20 28 63 68 72 24 SC ESC and (chr$
00C510: 28 30 29 29 2C 20 61 20 20 72 65 63 74 61 6E 67 (0)), a rectang
00C520: 6C 65 2C 20 20 77 69 6C 6C 0D 0A 20 20 61 70 70 le, will.. app
00C530: 65 61 72 20 6F 6E 20 74 68 65 20 73 63 72 65 65 ear on the scree
00C540: 6E 2E 20 49 66 20 73 74 6F 70 70 65 64 20 77 69 n. If stopped wi
00C550: 74 68 20 45 53 43 20 45 53 43 2C 20 70 72 65 73 th ESC ESC, pres
00C560: 73 20 61 6E 6F 74 68 65 72 20 20 6B 65 79 20 20 s another key
00C570: 74 6F 20 20 63 6C 65 61 72 0D 0A 20 20 74 68 65 to clear.. the
00C580: 20 62 75 66 66 65 72 2E 20 49 6D 70 6F 72 74 61 buffer. Importa
00C590: 6E 74 3A 20 74 68 65 20 45 53 43 20 45 53 43 20 nt: the ESC ESC
00C5A0: 73 65 71 75 65 6E 63 65 20 64 6F 65 73 20 6E 6F sequence does no
00C5B0: 74 20 20 63 6C 65 61 72 20 20 74 68 65 20 20 73 t clear the s
00C5C0: 74 61 63 6B 3B 20 20 69 74 0D 0A 20 20 73 68 6F tack; it.. sho
00C5D0: 75 6C 64 20 62 65 20 63 6C 65 61 72 65 64 20 77 uld be cleared w
00C5E0: 69 74 68 20 5C 73 70 21 5C 2E 0D 0A 0D 0A 20 20 ith \sp!\.....
00C5F0: 20 54 6F 20 6C 6F 61 64 20 74 68 65 20 73 63 72 To load the scr
00C600: 74 68 65 20 65 64 69 74 6F 72 0D 0A 20 20 74 6F the editor.. to
00C610: 20 67 6F 74 6F 20 61 20 6C 69 6E 65 3B 20 65 6E goto a line; en
00C620: 74 65 72 20 74 68 65 20 61 62 73 6F 6C 75 74 65 ter the absolute
00C630: 20 6C 69 6E 65 20 6E 75 6D 62 65 72 20 28 6E 6F line number (no
00C640: 74 20 74 68 65 20 73 63 72 65 65 6E 20 6C 69 6E t the screen lin
00C650: 65 20 6E 75 6D 62 65 72 29 2E 0D 0A 20 20 43 4F e number)... CO
00C660: 50 59 20 77 69 6C 6C 20 63 6F 70 79 20 61 20 6C PY will copy a l
00C670: 69 6E 65 2C 20 65 6E 74 65 72 20 61 62 73 6F 6C ine, enter absol
00C680: 75 74 65 20 6C 69 6E 65 20 6E 75 6D 62 65 72 20 ute line number
00C690: 20 61 6E 64 20 20 63 6F 6E 66 69 72 6D 20 20 62 and confirm b
00C6A0: 79 20 20 68 69 74 74 69 6E 67 0D 0A 20 20 43 4F y hitting.. CO
00C6B0: 50 59 20 61 67 61 69 6E 2E 0D 0A 20 20 20 20 57 PY again... W
00C6C0: 68 65 6E 20 75 73 69 6E 67 20 74 68 65 20 65 64 hen using the ed
00C6D0: 69 74 6F 72 2C 20 64 6F 20 6E 6F 74 20 75 73 65 itor, do not use
00C6E0: 20 74 68 65 20 6C 61 73 74 20 63 68 61 72 61 63 the last charac
00C6F0: 74 65 72 20 20 6F 6E 20 20 61 20 20 73 63 72 65 ter on a scre
00C700: 65 6E 2E 20 20 57 68 65 6E 0D 0A 20 20 6D 6F 76 en. When.. mov
00C710: 69 6E 67 20 66 72 6F 6D 20 74 68 65 20 6D 65 6E ing from the men
00C720: 75 20 69 6E 74 6F 20 53 63 72 65 64 20 79 6F 75 u into Scred you
00C730: 20 72 65 63 65 69 76 65 20 61 20 6D 65 73 73 61 receive a messa
00C740: 67 65 20 61 73 6B 69 6E 67 20 69 66 20 79 6F 75 ge asking if you
00C750: 20 77 61 6E 74 20 20 74 6F 0D 0A 20 20 65 72 61 want to.. era
00C760: 73 65 20 61 6C 6C 20 73 63 72 65 65 6E 73 2E 20 se all screens.
00C770: 54 68 65 20 53 48 49 46 54 20 70 6C 75 73 20 59 The SHIFT plus Y
00C780: 20 77 69 6C 6C 20 65 72 61 73 65 20 20 61 6C 6C will erase all
00C790: 20 20 73 63 72 65 65 6E 73 2C 20 20 61 6C 74 68 screens, alth
00C7A0: 6F 75 67 68 20 20 74 68 65 0D 0A 20 20 63 6F 6D ough the.. com
00C7B0: 70 69 6C 65 64 20 70 72 6F 67 72 61 6D 20 73 74 piled program st
00C7C0: 69 6C 6C 20 69 73 20 69 6E 20 6D 65 6D 6F 72 79 ill is in memory
00C7D0: 2E 20 54 68 65 20 73 6D 61 6C 6C 20 6E 20 77 69 . The small n wi
00C7E0: 6C 6C 20 61 6C 6C 6F 77 20 65 6E 74 72 79 20 20 ll allow entry
00C7F0: 69 6E 74 6F 20 20 74 68 65 0D 0A 20 20 73 63 72 into the.. scr
00C800: 65 65 6E 20 65 64 69 74 6F 72 2C 20 77 68 69 63 een editor, whic
00C810: 68 20 66 6F 6C 6C 6F 77 73 20 6F 6E 20 74 68 65 h follows on the
00C820: 20 20 74 61 70 65 3A 20 20 4F 6E 20 20 61 20 20 tape: On a
00C830: 64 69 73 6B 20 20 73 79 73 74 65 6D 0D 0A 20 20 disk system..
00C840: 69 6E 70 75 74 20 5C 7C 5C 2C 20 74 68 65 6E 20 input \|\, then
00C850: 69 6E 70 75 74 20 5C 74 61 70 65 5C 20 77 68 65 input \tape\ whe
00C860: 6E 20 74 68 65 20 22 4E 61 6D 65 20 20 3A 22 20 n the "Name :"
00C870: 70 72 6F 6D 70 74 20 61 70 70 65 61 72 73 2E 20 prompt appears.
00C880: 54 68 65 20 20 6D 61 63 68 69 6E 65 0D 0A 20 20 The machine..
00C890: 77 69 6C 6C 20 62 65 65 70 20 69 66 20 74 68 65 will beep if the
00C8A0: 20 72 6F 75 74 69 6E 65 20 69 73 20 66 6F 75 6E routine is foun
00C8B0: 64 2C 20 65 6C 73 65 20 61 20 3F 20 77 69 6C 6C d, else a ? will
00C8C0: 20 20 61 70 70 65 61 72 2E 20 20 49 6E 70 75 74 appear. Input
00C8D0: 20 20 5C 73 63 72 2D 6C 6F 61 64 5C 0D 0A 20 20 \scr-load\..
00C8E0: 61 6E 64 20 69 6E 70 75 74 20 5C 73 63 72 65 64 and input \scred
00C8F0: 32 5C 2E 20 54 68 65 20 74 61 70 65 20 77 69 6C 2\. The tape wil
00C900: 6C 20 62 65 67 69 6E 20 6C 6F 61 64 69 6E 67 2E l begin loading.
00C910: 20 54 68 65 20 73 63 72 65 65 6E 20 6D 65 6D 6F The screen memo
00C920: 72 79 20 20 69 73 20 20 75 73 65 64 0D 0A 20 20 ry is used..
00C930: 61 73 20 61 20 62 75 66 66 65 72 20 2D 2D 20 74 as a buffer -- t
00C940: 68 65 20 6C 69 6E 65 73 20 64 6F 20 6E 6F 74 20 he lines do not
00C950: 73 69 67 6E 69 66 79 20 61 20 63 72 61 73 68 2E signify a crash.
00C960: 20 20 57 68 65 6E 20 20 74 68 65 20 20 66 69 6C When the fil
00C970: 65 20 20 68 61 73 20 20 62 65 65 6E 0D 0A 20 20 e has been..
00C980: 6C 6F 61 64 65 64 2C 20 69 6E 70 75 74 20 5C 31 loaded, input \1
00C990: 5F 6C 69 73 74 5C 20 61 6E 64 20 74 68 65 20 66 _list\ and the f
00C9A0: 69 72 73 74 20 22 73 63 72 65 65 6E 22 20 77 69 irst "screen" wi
00C9B0: 6C 6C 20 62 65 20 64 69 73 70 6C 61 79 65 64 2E ll be displayed.
00C9C0: 0D 0A 0D 0A 20 20 20 22 53 63 72 65 65 6E 22 20 .... "Screen"
00C9D0: 69 73 20 61 20 74 65 72 6D 20 66 6F 72 20 61 20 is a term for a
00C9E0: 31 6B 20 62 6C 6F 63 6B 20 6F 66 20 20 6D 65 6D 1k block of mem
00C9F0: 6F 72 79 2E 20 20 41 20 20 70 72 6F 67 72 61 6D ory. A program
00CA00: 65 65 6E 20 65 64 69 74 6F 72 20 77 69 74 68 6F een editor witho
00CA10: 75 74 20 65 72 61 73 69 6E 67 20 73 63 72 65 65 ut erasing scree
00CA20: 6E 73 2C 20 61 6C 74 68 6F 75 67 68 20 69 74 20 ns, although it
00CA30: 77 69 6C 6C 20 74 69 64 79 20 20 69 74 73 65 6C will tidy itsel
00CA40: 66 20 20 62 65 66 6F 72 65 0D 0A 20 20 6D 6F 76 f before.. mov
00CA50: 69 6E 67 20 74 6F 20 74 68 65 20 66 69 72 73 74 ing to the first
00CA60: 20 73 63 72 65 65 6E 2E 0D 0A 0D 0A 20 20 20 42 screen..... B
00CA70: 65 66 6F 72 65 20 67 6F 69 6E 67 20 6D 75 63 68 efore going much
00CA80: 20 66 75 72 74 68 65 72 2C 20 49 20 73 75 67 67 further, I sugg
00CA90: 65 73 74 20 61 20 62 61 63 6B 2D 75 70 20 74 6F est a back-up to
00CAA0: 20 61 6E 6F 74 68 65 72 20 74 61 70 65 20 6F 72 another tape or
00CAB0: 20 64 69 73 6B 2E 20 20 54 6F 0D 0A 20 20 72 65 disk. To.. re
00CAC0: 61 63 74 69 76 61 74 65 20 74 68 65 20 64 69 73 activate the dis
00CAD0: 6B 2C 20 69 6E 70 75 74 20 5C 7C 5C 2C 20 74 68 k, input \|\, th
00CAE0: 65 6E 20 69 6E 70 75 74 20 5C 64 69 73 63 5C 2E en input \disc\.
00CAF0: 20 49 6E 70 75 74 20 20 5C 66 6F 72 67 65 74 5F Input \forget_
00CB00: 6C 6F 6F 70 30 5F 39 39 5C 2E 0D 0A 20 20 54 68 loop0_99\... Th
00CB10: 61 74 20 77 69 6C 6C 20 65 72 61 73 65 20 74 68 at will erase th
00CB20: 65 20 63 6F 6D 70 69 6C 65 64 20 77 6F 72 64 20 e compiled word
00CB30: 20 66 72 6F 6D 20 20 74 68 65 20 20 64 69 63 74 from the dict
00CB40: 69 6F 6E 61 72 79 2E 20 20 54 68 65 20 20 73 6F ionary. The so
00CB50: 75 72 63 65 20 20 77 69 6C 6C 0D 0A 20 20 72 65 urce will.. re
00CB60: 6D 61 69 6E 20 6F 6E 20 73 63 72 65 65 6E 20 31 main on screen 1
00CB70: 30 20 61 6E 64 20 63 61 6E 20 62 65 20 72 65 63 0 and can be rec
00CB80: 6F 6D 70 69 6C 65 64 20 73 68 6F 75 6C 64 20 69 ompiled should i
00CB90: 74 20 20 62 65 20 20 6E 65 65 64 65 64 20 20 61 t be needed a
00CBA0: 67 61 69 6E 2E 20 20 4E 6F 77 0D 0A 20 20 69 6E gain. Now.. in
00CBB0: 70 75 74 20 5C 73 61 76 65 2D 66 6F 72 74 68 5C put \save-forth\
00CBC0: 20 61 6E 64 20 69 6E 70 75 74 20 61 20 66 69 6C and input a fil
00CBD0: 65 6E 61 6D 65 2E 20 54 68 65 20 6B 65 72 6E 65 ename. The kerne
00CBE0: 6C 20 61 6E 64 20 74 68 65 20 65 64 69 74 6F 72 l and the editor
00CBF0: 20 20 77 69 6C 6C 20 20 62 65 0D 0A 20 20 73 61 will be.. sa
00CC00: 20 20 69 73 20 20 75 73 75 61 6C 6C 79 20 20 70 is usually p
00CC10: 75 74 0D 0A 20 20 74 6F 67 65 74 68 65 72 20 6F ut.. together o
00CC20: 6E 20 74 68 65 20 73 63 72 65 65 6E 73 2C 20 77 n the screens, w
00CC30: 68 65 72 65 20 69 74 20 63 61 6E 20 62 65 20 65 here it can be e
00CC40: 64 69 74 65 64 20 28 73 6F 75 72 63 65 20 63 6F dited (source co
00CC50: 64 65 29 20 20 62 65 66 6F 72 65 20 20 62 65 69 de) before bei
00CC60: 6E 67 0D 0A 20 20 63 6F 6D 70 69 6C 65 64 20 69 ng.. compiled i
00CC70: 6E 74 6F 20 74 68 65 20 73 79 73 74 65 6D 20 28 nto the system (
00CC80: 6F 62 6A 65 63 74 20 63 6F 64 65 29 2E 0D 0A 0D object code)....
00CC90: 0A 20 20 20 4E 6F 77 20 63 6F 6D 70 69 6C 65 20 . Now compile
00CCA0: 74 68 65 20 73 63 72 65 65 6E 73 2E 20 49 6E 70 the screens. Inp
00CCB0: 75 74 20 20 5C 31 5F 6C 6F 61 64 5C 2E 20 20 54 ut \1_load\. T
00CCC0: 68 65 20 20 63 6F 6D 70 69 6C 61 74 69 6F 6E 20 he compilation
00CCD0: 20 77 69 6C 6C 20 20 63 6F 6E 74 69 6E 75 65 0D will continue.
00CCE0: 0A 20 20 75 6E 74 69 6C 20 73 63 72 65 65 6E 20 . until screen
00CCF0: 31 30 2C 20 20 74 68 65 6E 20 20 74 68 65 20 20 10, then the
00CD00: 6C 61 73 74 20 20 77 6F 72 64 20 20 28 65 73 63 last word (esc
00CD10: 64 65 6D 6F 29 20 20 77 69 6C 6C 20 20 73 65 6C demo) will sel
00CD20: 66 2D 73 74 61 72 74 2E 20 20 41 66 74 65 72 0D f-start. After.
00CD30: 0A 20 20 73 74 6F 70 70 69 6E 67 20 69 74 2C 20 . stopping it,
00CD40: 69 6E 70 75 74 20 5C 73 63 72 65 64 5C 20 20 74 input \scred\ t
00CD50: 6F 20 20 67 65 74 20 20 69 6E 74 6F 20 20 74 68 o get into th
00CD60: 65 20 20 65 64 69 74 6F 72 20 20 74 6F 20 20 73 e editor to s
00CD70: 65 65 20 20 77 68 61 74 20 20 46 4F 52 54 48 0D ee what FORTH.
00CD80: 0A 20 20 70 72 6F 67 72 61 6D 6D 69 6E 67 20 6C . programming l
00CD90: 6F 6F 6B 73 20 6C 69 6B 65 2E 20 44 6F 20 6E 6F ooks like. Do no
00CDA0: 74 20 66 6F 72 67 65 74 20 74 68 61 74 20 65 78 t forget that ex
00CDB0: 69 74 20 20 69 73 20 20 62 79 20 20 70 72 65 73 it is by pres
00CDC0: 73 69 6E 67 20 20 43 4C 52 2E 20 20 54 68 65 0D sing CLR. The.
00CDD0: 0A 20 20 65 73 63 64 65 6D 6F 20 70 72 6F 62 61 . escdemo proba
00CDE0: 62 6C 79 20 77 69 6C 6C 20 6E 6F 74 20 62 65 20 bly will not be
00CDF0: 6E 65 65 64 65 64 20 61 67 61 69 6E 2C 20 73 6F needed again, so
00CE00: 76 65 64 20 75 6E 64 65 72 20 74 68 61 74 20 6E ved under that n
00CE10: 61 6D 65 20 61 73 20 61 20 6E 65 77 20 73 79 73 ame as a new sys
00CE20: 74 65 6D 20 61 6E 64 20 74 68 65 20 65 64 69 74 tem and the edit
00CE30: 6F 72 20 77 69 6C 6C 20 20 6E 6F 74 20 20 68 61 or will not ha
00CE40: 76 65 20 20 74 6F 20 20 62 65 0D 0A 20 20 63 6F ve to be.. co
00CE50: 6D 70 69 6C 65 64 20 61 67 61 69 6E 20 77 68 65 mpiled again whe
00CE60: 6E 20 74 68 65 20 73 79 73 74 65 6D 20 69 73 20 n the system is
00CE70: 72 65 6C 6F 61 64 65 64 2E 20 4F 72 20 74 68 65 reloaded. Or the
00CE80: 20 65 64 69 74 6F 72 20 63 61 6E 20 62 65 20 72 editor can be r
00CE90: 65 6D 6F 76 65 64 20 20 62 79 0D 0A 20 20 5C 66 emoved by.. \f
00CEA0: 6F 72 67 65 74 5F 63 68 5C 20 28 63 68 20 69 73 orget_ch\ (ch is
00CEB0: 20 74 68 65 20 66 69 72 73 74 20 77 6F 72 64 20 the first word
00CEC0: 6F 66 20 74 68 65 20 65 64 69 74 6F 72 29 20 61 of the editor) a
00CED0: 6E 64 20 74 68 65 20 6B 65 72 6E 65 6C 20 61 6C nd the kernel al
00CEE0: 6F 6E 65 20 73 61 76 65 64 2E 0D 0A 20 20 49 6E one saved... In
00CEF0: 20 74 68 69 73 20 63 6F 70 79 2C 20 74 68 65 20 this copy, the
00CF00: 70 72 6F 74 65 63 74 69 6F 6E 20 6D 75 73 74 20 protection must
00CF10: 20 62 65 20 20 72 65 6D 6F 76 65 64 20 20 66 69 be removed fi
00CF20: 72 73 74 20 20 66 72 6F 6D 20 20 63 68 20 20 62 rst from ch b
00CF30: 65 66 6F 72 65 20 20 74 68 65 0D 0A 20 20 63 6F efore the.. co
00CF40: 6D 6D 61 6E 64 20 66 6F 72 67 65 74 5F 63 68 20 mmand forget_ch
00CF50: 77 69 6C 6C 20 77 6F 72 6B 2E 20 5C 73 63 72 2D will work. \scr-
00CF60: 73 61 76 65 5C 20 77 69 6C 6C 20 6D 61 6B 65 20 save\ will make
00CF70: 61 20 63 6F 70 79 20 6F 66 20 74 68 65 20 73 63 a copy of the sc
00CF80: 72 65 65 6E 73 2E 0D 0A 0D 0A 20 20 20 54 68 65 reens..... The
00CF90: 20 70 72 69 6E 74 65 72 20 6D 61 79 20 62 65 20 printer may be
00CFA0: 74 6F 67 67 6C 65 64 20 77 69 74 68 20 43 54 52 toggled with CTR
00CFB0: 4C 20 70 6C 75 73 20 59 20 28 6E 6F 74 20 50 2C L plus Y (not P,
00CFC0: 20 66 6F 72 20 20 76 61 72 69 6F 75 73 20 20 72 for various r
00CFD0: 65 61 73 6F 6E 73 29 2E 0D 0A 20 20 5C 73 63 72 easons)... \scr
00CFE0: 2D 6C 6F 61 64 5C 20 77 69 6C 6C 20 72 65 61 64 -load\ will read
00CFF0: 20 61 6E 79 20 41 53 43 49 49 20 66 69 6C 65 20 any ASCII file
00D000: 20 72 65 6D 6F 76 65 20 74 68 65 20 5C 2D 2D 2D remove the \---
00D010: 3E 5C 20 6F 6E 20 74 68 65 20 20 6C 61 73 74 0D >\ on the last.
00D020: 0A 20 20 6C 69 6E 65 20 20 6F 66 20 20 73 63 72 . line of scr
00D030: 65 65 6E 20 20 39 20 20 73 69 6D 70 6C 79 20 20 een 9 simply
00D040: 62 79 20 6F 76 65 72 73 74 72 69 6B 69 6E 67 20 by overstriking
00D050: 20 69 74 20 20 77 69 74 68 20 20 73 70 61 63 65 it with space
00D060: 73 2E 20 20 54 68 61 74 20 20 73 74 6F 70 73 0D s. That stops.
00D070: 0A 20 20 63 6F 6D 70 69 6C 61 74 69 6F 6E 20 61 . compilation a
00D080: 74 20 74 68 61 74 20 70 6F 69 6E 74 2E 0D 0A 0D t that point....
00D090: 0A 20 20 20 49 6E 20 73 63 72 65 65 6E 20 65 64 . In screen ed
00D0A0: 69 74 20 6D 6F 64 65 2C 20 74 68 65 20 69 6E 66 it mode, the inf
00D0B0: 6F 72 6D 61 74 69 6F 6E 20 61 74 20 74 68 65 20 ormation at the
00D0C0: 74 6F 70 20 6F 66 20 20 74 68 65 20 20 73 63 72 top of the scr
00D0D0: 65 65 6E 20 20 73 68 6F 77 73 20 20 74 68 65 0D een shows the.
00D0E0: 0A 20 20 70 72 6F 67 72 61 6D 20 77 69 6C 6C 20 . program will
00D0F0: 68 6F 6C 64 20 32 35 36 20 6C 69 6E 65 73 2C 20 hold 256 lines,
00D100: 74 68 65 6E 20 69 74 20 73 68 6F 77 73 20 74 68 then it shows th
00D110: 65 20 22 61 62 73 6F 6C 75 74 65 22 20 6C 69 6E e "absolute" lin
00D120: 65 20 28 74 68 65 20 6F 6E 65 20 20 74 68 65 0D e (the one the.
00D130: 0A 20 20 63 75 72 73 6F 72 20 69 73 20 6F 6E 29 . cursor is on)
00D140: 2C 20 61 6C 73 6F 20 74 68 65 20 73 63 72 65 65 , also the scree
00D150: 6E 20 6E 75 6D 62 65 72 20 61 6E 64 20 74 68 65 n number and the
00D160: 20 6C 69 6E 65 20 6E 75 6D 62 65 72 20 6F 6E 20 line number on
00D170: 74 68 61 74 20 73 63 72 65 65 6E 2E 0D 0A 0D 0A that screen.....
00D180: 20 20 20 54 68 65 20 6D 65 6E 75 20 74 69 74 6C The menu titl
00D190: 65 20 70 61 67 65 20 69 6E 64 69 63 61 74 65 73 e page indicates
00D1A0: 20 74 68 61 74 20 74 68 65 20 6E 6F 72 6D 61 6C that the normal
00D1B0: 20 63 75 72 73 6F 72 20 6B 65 79 73 20 61 72 65 cursor keys are
00D1C0: 20 75 73 65 64 20 74 6F 20 6D 6F 76 65 0D 0A 20 used to move..
00D1D0: 20 66 72 6F 6D 20 6C 69 6E 65 20 74 6F 20 6C 69 from line to li
00D1E0: 6E 65 20 61 6E 64 20 61 63 72 6F 73 73 20 74 68 ne and across th
00D1F0: 65 20 6C 69 6E 65 73 2E 20 54 68 65 20 53 48 49 e lines. The SHI
00D200: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00D210: 0B 00 01 00 02 09 4E E5 0B 00 C1 02 00 00 00 02 ......N.........
00D220: 0B 00 C6 02 00 00 00 02 0B 00 C2 02 00 00 00 02 ................
00D230: 0B 00 C7 02 00 00 00 02 0B 00 C3 02 00 00 00 02 ................
00D240: 0B 00 C8 02 00 00 00 02 0B 00 C4 02 00 00 00 02 ................
00D250: 0B 00 C9 02 00 00 00 02 0B 00 C5 02 00 00 00 02 ................
00D260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D300: 74 6F 20 74 68 65 20 63 61 70 61 63 69 74 79 20 to the capacity
00D310: 6F 66 20 74 68 65 20 73 63 72 65 65 6E 73 20 20 of the screens
00D320: 28 31 36 6B 20 20 61 74 0D 0A 20 20 74 68 65 20 (16k at.. the
00D330: 6D 6F 6D 65 6E 74 29 2E 20 53 43 52 45 44 20 63 moment). SCRED c
00D340: 61 6E 20 62 65 20 75 73 65 64 20 61 73 20 61 6E an be used as an
00D350: 20 41 53 43 49 49 20 70 72 6F 63 65 73 73 6F 72 ASCII processor
00D360: 20 6F 72 20 72 65 61 64 65 72 2C 20 62 75 74 20 or reader, but
00D370: 64 6F 65 73 20 6E 6F 74 0D 0A 20 20 75 73 65 20 does not.. use
00D380: 63 61 72 72 69 61 67 65 20 72 65 74 75 72 6E 73 carriage returns
00D390: 20 6F 72 20 6C 69 6E 65 20 66 65 65 64 73 2E 0D or line feeds..
00D3A0: 0A 0D 0A 20 20 20 20 54 68 65 20 55 4B 20 55 73 ... The UK Us
00D3B0: 65 72 20 70 75 62 6C 69 73 68 65 64 20 61 20 74 er published a t
00D3C0: 75 74 6F 72 69 61 6C 20 6F 6E 20 46 4F 52 54 48 utorial on FORTH
00D3D0: 20 66 72 6F 6D 20 4D 61 72 63 68 20 27 38 35 20 from March '85
00D3E0: 20 74 6F 20 20 41 75 67 75 73 74 20 20 27 38 35 to August '85
00D3F0: 2E 0D 0A 20 20 54 68 65 72 65 20 61 72 65 20 73 ... There are s
00D400: 6F 6D 65 20 64 69 66 66 65 72 65 6E 63 65 73 20 ome differences
00D410: 62 65 74 77 65 65 6E 20 74 68 61 74 20 6F 6E 65 between that one
00D420: 20 20 61 6E 64 20 20 74 68 69 73 2E 20 20 54 68 and this. Th
00D430: 65 20 20 62 65 73 74 20 20 73 74 61 72 74 69 6E e best startin
00D440: 67 0D 0A 20 20 62 6F 6F 6B 20 69 73 20 4C 65 6F g.. book is Leo
00D450: 20 42 72 6F 64 69 65 27 73 20 53 54 41 52 54 49 Brodie's STARTI
00D460: 4E 47 20 46 4F 52 54 48 2E 20 49 74 20 6D 61 79 NG FORTH. It may
00D470: 20 62 65 20 69 6E 20 74 68 65 20 6C 6F 63 61 6C be in the local
00D480: 20 20 6C 69 62 72 61 72 79 20 20 6F 72 20 20 69 library or i
00D490: 74 0D 0A 20 20 63 61 6E 20 62 65 20 6F 62 74 61 t.. can be obta
00D4A0: 69 6E 65 64 20 66 72 6F 6D 20 45 54 49 20 42 6F ined from ETI Bo
00D4B0: 6F 6B 20 53 61 6C 65 73 2E 0D 0A 0D 0A 20 20 20 ok Sales.....
00D4C0: 20 49 20 68 61 76 65 20 6E 6F 74 20 74 65 73 74 I have not test
00D4D0: 65 64 20 74 68 65 20 73 79 73 74 65 6D 20 6F 6E ed the system on
00D4E0: 20 74 68 65 20 36 31 32 38 2C 20 20 62 75 74 20 the 6128, but
00D4F0: 20 49 20 20 62 65 6C 69 65 76 65 20 20 69 74 20 I believe it
00D500: 61 20 67 72 61 6E 64 20 74 69 6D 65 20 20 44 45 a grand time DE
00D510: 43 50 4F 4D 50 69 6E 67 0D 0A 20 20 74 68 65 20 CPOMPing.. the
00D520: 77 6F 72 64 73 20 74 68 61 74 20 69 6E 74 65 72 words that inter
00D530: 65 73 74 20 79 6F 75 2E 20 54 68 65 20 73 79 6E est you. The syn
00D540: 74 61 78 20 69 73 20 5C 64 65 63 6F 6D 70 5F 76 tax is \decomp_v
00D550: 6C 69 73 74 5C 2C 20 65 74 63 2E 0D 0A 0D 0A 20 list\, etc.....
00D560: 20 20 48 65 72 65 20 61 72 65 20 50 65 74 72 27 Here are Petr'
00D570: 73 20 63 6F 6D 6D 65 6E 74 73 20 6F 6E 20 44 45 s comments on DE
00D580: 43 4F 4D 50 3A 0D 0A 0D 0A 20 20 2A 2A 2A 20 4C COMP:.... *** L
00D590: 4B 53 20 38 37 30 34 32 32 0D 0A 0D 0A 20 20 20 KS 870422....
00D5A0: 54 68 65 20 62 65 73 74 20 77 61 79 20 74 6F 20 The best way to
00D5B0: 6C 6F 6F 6B 20 69 6E 73 69 64 65 20 46 6F 72 74 look inside Fort
00D5C0: 68 20 69 73 20 74 6F 20 72 65 61 64 20 61 6E 20 h is to read an
00D5D0: 61 73 73 65 6D 62 6C 79 20 6C 69 73 74 69 6E 67 assembly listing
00D5E0: 2E 20 20 48 6F 77 65 76 65 72 2C 0D 0A 20 20 74 . However,.. t
00D5F0: 68 69 73 20 77 6F 75 6C 64 20 69 6E 76 6F 6C 76 his would involv
00D600: 65 20 61 20 70 72 69 6E 74 6F 75 74 20 6F 66 20 e a printout of
00D610: 61 62 6F 75 74 20 33 35 30 30 20 6C 69 6E 65 73 about 3500 lines
00D620: 2E 20 20 41 6E 20 20 2E 41 53 4D 20 20 28 73 6F . An .ASM (so
00D630: 75 72 63 65 20 20 63 6F 64 65 29 0D 0A 20 20 66 urce code).. f
00D640: 69 6C 65 20 69 73 20 61 62 6F 75 74 20 34 32 20 ile is about 42
00D650: 6B 20 6C 6F 6E 67 2C 20 61 20 2E 50 52 4E 20 66 k long, a .PRN f
00D660: 69 6C 65 20 61 62 6F 75 74 20 74 77 69 63 65 20 ile about twice
00D670: 61 73 20 6C 6F 6E 67 2E 0D 0A 0D 0A 20 20 20 54 as long..... T
00D680: 68 65 20 6E 65 78 74 20 62 65 73 74 20 77 61 79 he next best way
00D690: 20 69 73 20 74 6F 20 75 73 65 20 61 20 64 65 63 is to use a dec
00D6A0: 6F 6D 70 69 6C 65 72 2C 20 77 68 69 63 68 20 73 ompiler, which s
00D6B0: 68 6F 77 73 20 20 68 6F 77 20 20 74 68 65 20 20 hows how the
00D6C0: 68 69 67 68 2D 6C 65 76 65 6C 0D 0A 20 20 77 6F high-level.. wo
00D6D0: 72 64 73 20 61 72 65 20 63 6F 6E 73 74 72 75 63 rds are construc
00D6E0: 74 65 64 2E 20 54 68 65 20 64 65 63 6F 6D 70 69 ted. The decompi
00D6F0: 6C 65 72 20 77 69 6C 6C 20 6E 6F 74 20 64 69 73 ler will not dis
00D700: 20 73 68 6F 75 6C 64 20 20 62 65 0D 0A 20 20 63 should be.. c
00D710: 6F 6D 70 61 74 69 62 6C 65 2E 20 4F 6E 6C 79 20 ompatible. Only
00D720: 74 68 65 20 6F 66 66 69 63 69 61 6C 20 72 6F 75 the official rou
00D730: 74 69 6E 65 73 20 61 72 65 20 75 73 65 64 2E 20 tines are used.
00D740: 49 20 77 6F 75 6C 64 20 20 62 65 20 20 76 65 72 I would be ver
00D750: 79 20 20 67 72 61 74 65 66 75 6C 0D 0A 20 20 66 y grateful.. f
00D760: 6F 72 20 61 6E 79 20 63 6F 6D 6D 65 6E 74 73 20 or any comments
00D770: 61 62 6F 75 74 20 69 6D 70 72 6F 76 69 6E 67 20 about improving
00D780: 69 74 2E 20 46 4F 52 54 48 20 6E 6F 72 6D 61 6C it. FORTH normal
00D790: 6C 79 20 77 6F 72 6B 73 20 69 6E 20 20 69 6E 74 ly works in int
00D7A0: 65 67 65 72 73 2C 20 20 62 75 74 0D 0A 20 20 74 egers, but.. t
00D7B0: 68 65 72 65 20 69 73 20 61 20 66 6C 6F 61 74 69 here is a floati
00D7C0: 6E 67 20 70 6F 69 6E 74 20 70 61 63 6B 61 67 65 ng point package
00D7D0: 20 77 68 69 63 68 20 49 20 68 61 76 65 2C 20 61 which I have, a
00D7E0: 6C 6F 6E 67 20 77 69 74 68 20 61 6E 20 61 73 73 long with an ass
00D7F0: 65 6D 62 6C 65 72 20 20 61 6E 64 0D 0A 20 20 6F embler and.. o
00D800: 74 68 65 72 20 75 74 69 6C 69 74 69 65 73 2C 20 ther utilities,
00D810: 61 6C 6C 20 69 6E 20 74 68 65 20 50 75 62 6C 69 all in the Publi
00D820: 63 20 44 6F 6D 61 69 6E 2E 0D 0A 0D 0A 20 20 20 c Domain.....
00D830: 20 53 63 72 65 64 20 61 70 70 65 61 72 65 64 20 Scred appeared
00D840: 69 6E 20 74 68 65 20 41 75 73 74 2E 20 55 73 65 in the Aust. Use
00D850: 72 2C 20 62 75 74 20 74 68 69 73 20 76 65 72 73 r, but this vers
00D860: 69 6F 6E 20 68 61 73 20 65 6E 6F 75 67 68 20 20 ion has enough
00D870: 64 69 66 66 65 72 65 6E 63 65 73 0D 0A 20 20 69 differences.. i
00D880: 6E 20 69 74 20 74 6F 20 6D 61 6B 65 20 69 74 20 n it to make it
00D890: 61 20 64 69 66 66 65 72 65 6E 74 20 70 72 6F 67 a different prog
00D8A0: 72 61 6D 2E 0D 0A 0D 0A 20 20 20 20 54 68 65 20 ram..... The
00D8B0: 74 61 70 65 20 72 6F 75 74 69 6E 65 73 20 28 6E tape routines (n
00D8C0: 6F 74 20 64 69 73 6B 29 20 74 75 72 6E 20 6F 66 ot disk) turn of
00D8D0: 66 20 74 68 65 20 63 75 72 73 6F 72 20 66 6F 72 f the cursor for
00D8E0: 20 73 6F 6D 65 20 72 65 61 73 6F 6E 2E 20 20 5C some reason. \
00D8F0: 73 63 72 65 64 5C 0D 0A 20 20 77 69 6C 6C 20 74 scred\.. will t
00D900: 61 73 73 65 6D 62 6C 65 20 6D 61 63 68 69 6E 65 assemble machine
00D910: 20 20 6C 61 6E 67 75 61 67 65 0D 0A 20 20 72 6F language.. ro
00D920: 75 74 69 6E 65 73 2C 20 62 75 74 20 77 69 6C 6C utines, but will
00D930: 20 69 6E 64 69 63 61 74 65 20 77 68 65 72 65 20 indicate where
00D940: 74 68 65 79 20 61 72 65 2E 20 45 61 63 68 20 6E they are. Each n
00D950: 61 6D 65 64 20 77 6F 72 64 20 68 61 73 20 20 74 amed word has t
00D960: 77 6F 20 20 66 69 65 6C 64 73 0D 0A 20 20 6F 66 wo fields.. of
00D970: 20 68 65 61 64 65 72 2C 20 77 68 6F 73 65 20 61 header, whose a
00D980: 64 64 72 65 73 73 65 73 20 61 72 65 20 63 61 6C ddresses are cal
00D990: 6C 65 64 20 4E 46 41 20 61 6E 64 20 4C 46 41 2E led NFA and LFA.
00D9A0: 0D 0A 0D 0A 20 20 20 4E 61 6D 65 20 66 69 65 6C .... Name fiel
00D9B0: 64 20 28 4E 46 41 29 20 63 6F 6E 73 69 73 74 73 d (NFA) consists
00D9C0: 20 6F 66 20 61 20 6C 65 6E 67 74 68 20 62 79 74 of a length byt
00D9D0: 65 20 77 68 6F 73 65 20 62 69 74 20 37 20 69 73 e whose bit 7 is
00D9E0: 20 73 65 74 20 20 28 62 69 74 20 20 36 20 20 6D set (bit 6 m
00D9F0: 61 79 0D 0A 20 20 61 6C 73 6F 20 62 65 20 73 65 ay.. also be se
00DA00: 74 20 74 6F 20 69 6E 64 69 63 61 74 65 20 61 6E t to indicate an
00DA10: 20 69 6D 6D 65 64 69 61 74 65 20 77 6F 72 64 29 immediate word)
00DA20: 2C 20 74 68 65 6E 20 74 68 65 20 6E 61 6D 65 20 , then the name
00DA30: 28 75 70 20 74 6F 20 33 31 20 20 64 65 63 69 6D (up to 31 decim
00DA40: 61 6C 0D 0A 20 20 6F 72 20 31 46 20 68 65 78 61 al.. or 1F hexa
00DA50: 64 65 63 69 6D 61 6C 20 63 68 61 72 61 63 74 65 decimal characte
00DA60: 72 73 20 6C 6F 6E 67 29 20 77 69 74 68 20 74 68 rs long) with th
00DA70: 65 20 62 69 74 20 37 20 6F 66 20 74 68 65 20 6C e bit 7 of the l
00DA80: 61 73 74 20 63 68 61 72 61 63 74 65 72 20 73 65 ast character se
00DA90: 74 2E 0D 0A 0D 0A 20 20 20 4C 69 6E 6B 20 66 69 t..... Link fi
00DAA0: 65 6C 64 20 28 4C 46 41 29 20 73 74 6F 72 65 73 eld (LFA) stores
00DAB0: 20 74 68 65 20 4E 46 41 20 6F 66 20 74 68 65 20 the NFA of the
00DAC0: 70 72 65 63 65 64 69 6E 67 20 77 6F 72 64 2E 20 preceding word.
00DAD0: 54 68 65 20 62 6F 64 79 20 6F 66 20 74 68 65 20 The body of the
00DAE0: 77 6F 72 64 0D 0A 20 20 63 6F 6E 73 69 73 74 73 word.. consists
00DAF0: 20 6F 66 20 74 68 65 20 43 6F 64 65 20 46 69 65 of the Code Fie
00DB00: 75 72 6E 20 69 74 20 62 61 63 6B 20 6F 6E 2E 20 urn it back on.
00DB10: 5C 77 61 72 6D 5C 20 77 69 6C 6C 20 61 6C 73 6F \warm\ will also
00DB20: 20 64 6F 20 69 74 2E 0D 0A 0D 0A 20 20 20 20 4B do it..... K
00DB30: 65 65 70 20 79 6F 75 72 20 46 4F 52 54 48 20 66 eep your FORTH f
00DB40: 69 6C 65 73 20 69 6E 20 61 20 73 61 66 65 20 70 iles in a safe p
00DB50: 6C 61 63 65 20 61 6E 64 20 69 6E 20 74 68 65 20 lace and in the
00DB60: 6E 65 78 74 20 73 65 67 6D 65 6E 74 20 77 65 20 next segment we
00DB70: 77 69 6C 6C 20 6C 6F 6F 6B 0D 0A 20 20 61 74 20 will look.. at
00DB80: 70 75 74 74 69 6E 67 20 73 6F 6D 65 74 69 6E 67 putting someting
00DB90: 20 6F 6E 20 74 68 65 20 73 63 72 65 65 6E 2E 0D on the screen..
00DBA0: 0A 20 20 20 2D 2D 20 50 65 74 72 20 4C 75 6B 65 . -- Petr Luke
00DBB0: 73 2E 0D 0A 0D 0A 20 20 20 20 20 20 20 20 20 20 s.....
00DBC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00DBD0: 20 20 20 20 2A 2A 2A 2A 2A 2A 0D 0A 1A 20 20 20 ******...
00DBE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00DBF0: 20 20 20 20 20 20 20 74 65 6C 65 70 68 6F 6E 65 telephone
00DC00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DCA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DCB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DCC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DCD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DCE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DCF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DD00: 6C 64 2C 20 77 68 69 63 68 20 68 6F 6C 64 73 20 ld, which holds
00DD10: 74 68 65 20 61 64 64 72 65 73 73 20 6F 66 20 20 the address of
00DD20: 61 20 20 6D 61 63 68 69 6E 65 20 20 6C 61 6E 67 a machine lang
00DD30: 75 61 67 65 0D 0A 20 20 72 6F 75 74 69 6E 65 20 uage.. routine
00DD40: 77 68 69 63 68 20 69 6E 69 74 69 61 74 65 73 20 which initiates
00DD50: 74 68 65 20 70 72 6F 63 65 73 73 69 6E 67 20 6F the processing o
00DD60: 66 20 74 68 65 20 6F 6E 65 20 6F 72 20 6D 6F 72 f the one or mor
00DD70: 65 20 20 50 61 72 61 6D 65 74 65 72 20 20 46 69 e Parameter Fi
00DD80: 65 6C 64 73 0D 0A 20 20 77 68 69 63 68 20 66 6F elds.. which fo
00DD90: 6C 6C 6F 77 20 28 50 46 41 20 69 73 20 74 68 65 llow (PFA is the
00DDA0: 20 61 64 64 72 65 73 73 20 6F 66 20 74 68 65 20 address of the
00DDB0: 66 69 72 73 74 20 50 46 29 2E 0D 0A 0D 0A 20 20 first PF).....
00DDC0: 20 41 20 62 72 69 65 66 20 65 78 61 6D 70 6C 65 A brief example
00DDD0: 20 28 69 6E 20 68 65 78 29 3A 0D 0A 0D 0A 20 20 (in hex):....
00DDE0: 20 5C 64 65 63 6F 6D 70 5F 3F 73 74 72 65 61 6D \decomp_?stream
00DDF0: 5C 0D 0A 20 20 77 6F 75 6C 64 20 72 65 73 75 6C \.. would resul
00DE00: 74 20 69 6E 20 74 68 65 20 66 6F 6C 6C 6F 77 69 t in the followi
00DE10: 6E 67 20 70 72 69 6E 74 6F 75 74 3A 0D 0A 0D 0A ng printout:....
00DE20: 20 20 6E 66 61 20 20 20 64 38 31 20 20 38 37 20 nfa d81 87
00DE30: 20 3F 73 74 72 65 61 6D 20 20 20 20 20 20 6C 65 ?stream le
00DE40: 6E 67 74 68 20 62 79 74 65 20 6D 61 79 20 62 65 ngth byte may be
00DE50: 20 38 30 48 20 74 6F 20 39 66 48 0D 0A 20 20 6C 80H to 9fH.. l
00DE60: 66 61 20 20 20 64 38 39 20 64 32 64 20 20 3F 73 fa d89 d2d ?s
00DE70: 74 61 63 6B 20 20 20 20 20 20 20 6F 72 20 63 30 tack or c0
00DE80: 48 20 74 6F 20 64 66 48 20 66 6F 72 20 69 6D 6D H to dfH for imm
00DE90: 65 64 69 61 74 65 20 77 6F 72 64 73 0D 0A 20 20 ediate words..
00DEA0: 63 66 61 20 20 20 64 38 62 20 36 63 33 2C 64 6F cfa d8b 6c3,do
00DEB0: 63 6F 6C 0D 0A 20 20 70 66 61 20 20 20 64 38 64 col.. pfa d8d
00DEC0: 20 37 66 37 20 3C 61 62 6F 72 74 22 3E 0D 0A 20 7f7 <abort">..
00DED0: 20 20 20 20 20 20 20 64 38 66 20 38 20 6E 6F 5F d8f 8 no_
00DEE0: 69 6E 70 75 74 20 20 20 20 20 20 20 20 28 77 69 input (wi
00DEF0: 74 68 20 6E 6F 5F 69 6E 70 75 74 20 69 6E 20 72 th no_input in r
00DF00: 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 20 20 2A 2A .. ******.. **
00DF10: 2A 2A 2A 2A 20 46 4F 52 54 48 2C 20 50 61 72 74 **** FORTH, Part
00DF20: 20 33 2C 20 63 6F 6D 70 69 6C 65 64 20 66 72 6F 3, compiled fro
00DF30: 6D 20 66 69 6C 65 73 20 73 75 70 70 6C 69 65 64 m files supplied
00DF40: 20 62 79 20 50 65 74 72 20 4C 75 6B 65 73 2C 0D by Petr Lukes,.
00DF50: 0A 20 20 2A 2A 2A 2A 2A 2A 20 20 20 20 20 20 20 . ******
00DF60: 20 20 20 20 20 20 20 20 20 54 6F 6F 77 6F 6F 6D Toowoom
00DF70: 62 61 2E 20 20 20 20 20 20 20 4A 75 6C 79 20 31 ba. July 1
00DF80: 39 38 37 0D 0A 0D 0A 20 20 20 50 65 74 72 20 68 987.... Petr h
00DF90: 61 73 20 70 72 6F 76 69 64 65 64 20 74 77 6F 20 as provided two
00DFA0: 66 69 6C 65 73 20 74 68 69 73 20 6D 6F 6E 74 68 files this month
00DFB0: 2E 20 54 68 65 20 66 69 72 73 74 20 69 73 20 61 . The first is a
00DFC0: 20 74 65 78 74 20 20 66 69 6C 65 2C 20 20 62 75 text file, bu
00DFD0: 74 20 20 69 74 0D 0A 20 20 63 61 6E 20 62 65 20 t it.. can be
00DFE0: 72 65 61 64 20 70 72 6F 70 65 72 6C 79 20 6F 6E read properly on
00DFF0: 6C 79 20 69 6E 20 74 68 65 20 46 20 72 74 68 20 ly in the F rth
00E000: 6B 65 72 6E 65 6C 2C 20 43 50 43 46 54 48 32 2E kernel, CPCFTH2.
00E010: 46 54 48 2E 20 49 66 20 66 65 64 20 74 6F 20 61 FTH. If fed to a
00E020: 20 77 6F 72 64 0D 0A 20 20 70 72 6F 63 65 73 73 word.. process
00E030: 6F 72 20 6F 72 20 6F 75 72 20 52 45 41 44 45 52 or or our READER
00E040: 2E 42 41 53 2C 20 74 68 65 20 6C 69 6E 65 73 20 .BAS, the lines
00E050: 77 69 6C 6C 20 6E 6F 74 20 62 65 20 66 6F 72 6D will not be form
00E060: 61 74 74 65 64 20 20 63 6F 72 72 65 63 74 6C 79 atted correctly
00E070: 20 20 61 6E 64 0D 0A 20 20 74 68 65 20 74 65 78 and.. the tex
00E080: 74 20 77 69 6C 6C 20 62 65 20 64 69 66 66 69 63 t will be diffic
00E090: 75 6C 74 20 74 6F 20 72 65 61 64 2E 20 49 74 20 ult to read. It
00E0A0: 69 73 20 70 61 72 74 20 6F 66 20 6F 66 20 6F 75 is part of of ou
00E0B0: 72 20 46 6F 72 74 68 20 67 6C 6F 73 73 61 72 79 r Forth glossary
00E0C0: 20 20 61 6E 64 0D 0A 20 20 74 68 65 20 66 69 6C and.. the fil
00E0D0: 65 20 69 73 20 6E 61 6D 65 64 20 47 4C 4F 53 53 e is named GLOSS
00E0E0: 31 2E 46 54 48 2E 0D 0A 0D 0A 20 20 20 54 68 65 1.FTH..... The
00E0F0: 20 73 65 63 6F 6E 64 20 69 73 20 44 45 43 4F 4D second is DECOM
00E100: 65 76 65 72 73 65 20 76 69 64 65 6F 29 0D 0A 20 everse video)..
00E110: 20 20 20 20 20 20 20 64 39 38 20 31 33 37 65 20 d98 137e
00E120: 65 78 69 74 0D 0A 0D 0A 20 20 20 20 46 72 6F 6D exit.... From
00E130: 20 74 68 65 20 43 50 43 46 54 48 32 2E 50 52 4E the CPCFTH2.PRN
00E140: 20 66 69 6C 65 3A 0D 0A 20 20 38 37 33 46 37 33 file:.. 873F73
00E150: 37 34 37 32 71 73 74 72 65 61 6D 20 64 62 20 38 7472qstream db 8
00E160: 37 68 2C 27 3F 73 74 72 65 61 27 2C 27 6D 27 2B 7h,'?strea','m'+
00E170: 38 30 68 20 3B 20 37 73 74 72 65 61 6D 0D 0A 20 80h ; 7stream..
00E180: 20 30 44 38 39 20 32 44 30 44 20 20 64 77 20 71 0D89 2D0D dw q
00E190: 73 74 61 63 6B 6E 0D 0A 20 20 30 44 38 42 20 43 stackn.. 0D8B C
00E1A0: 33 30 36 20 20 71 73 74 72 65 61 6D 20 64 77 20 306 qstream dw
00E1B0: 64 6F 63 6F 6C 0D 0A 20 20 30 44 38 44 20 46 37 docol.. 0D8D F7
00E1C0: 30 37 20 20 64 77 20 61 61 62 6F 72 74 71 0D 0A 07 dw aabortq..
00E1D0: 20 20 30 44 38 46 20 30 38 36 45 36 46 35 46 36 0D8F 086E6F5F6
00E1E0: 39 64 62 20 38 2C 27 6E 6F 5F 69 6E 70 75 74 27 9db 8,'no_input'
00E1F0: 0D 0A 20 20 30 44 39 38 20 37 45 31 33 20 20 64 .. 0D98 7E13 d
00E200: 77 20 65 78 69 74 0D 0A 0D 0A 20 20 20 54 68 65 w exit.... The
00E210: 20 63 6F 6D 70 69 6C 65 72 20 6D 61 79 20 62 65 compiler may be
00E220: 20 75 73 65 64 20 74 6F 20 20 66 69 6E 64 20 20 used to find
00E230: 6F 75 74 20 20 61 64 64 72 65 73 73 65 73 20 20 out addresses
00E240: 77 69 74 68 69 6E 20 20 74 68 65 20 20 6B 65 72 within the ker
00E250: 6E 65 6C 20 20 61 6E 64 0D 0A 20 20 70 6F 73 73 nel and.. poss
00E260: 69 62 6C 79 20 70 61 74 63 68 20 74 68 65 6D 2E ibly patch them.
00E270: 20 54 68 65 20 72 65 70 6C 61 63 65 6D 65 6E 74 The replacement
00E280: 20 6F 66 20 74 68 65 20 20 6C 61 73 74 20 20 5C of the last \
00E290: 64 5C 20 20 69 6E 20 20 5C 64 75 70 6C 69 63 61 d\ in \duplica
00E2A0: 74 65 64 5C 20 20 61 74 0D 0A 20 20 31 30 37 34 ted\ at.. 1074
00E2B0: 48 20 77 69 74 68 20 61 20 73 70 61 63 65 20 69 H with a space i
00E2C0: 73 20 6F 6E 65 20 65 78 61 6D 70 6C 65 20 28 69 s one example (i
00E2D0: 6E 20 5C 63 72 65 61 74 65 5C 29 2E 0D 0A 0D 0A n \create\).....
00E2E0: 20 20 20 54 68 65 20 20 68 6F 74 70 61 74 63 68 The hotpatch
00E2F0: 20 20 66 6F 72 20 20 5C 74 79 70 65 5C 20 20 28 for \type\ (
00E300: 50 2E 46 54 48 2C 20 77 68 69 63 68 20 61 6C 6C P.FTH, which all
00E310: 6F 77 73 20 75 73 20 74 6F 20 65 78 61 6D 69 6E ows us to examin
00E320: 65 20 20 74 68 65 20 20 63 6F 6E 73 74 72 75 63 e the construc
00E330: 74 69 6F 6E 20 20 6F 66 0D 0A 20 20 65 61 63 68 tion of.. each
00E340: 20 77 6F 72 64 20 69 6E 20 74 68 65 20 6B 65 72 word in the ker
00E350: 6E 65 6C 27 73 20 76 6F 63 61 62 75 6C 61 72 79 nel's vocabulary
00E360: 2E 20 4C 6F 61 64 20 74 68 65 20 20 66 69 6C 65 . Load the file
00E370: 20 20 69 6E 74 6F 20 20 43 50 43 46 54 48 32 2E into CPCFTH2.
00E380: 46 54 48 20 20 28 6F 72 0D 0A 20 20 79 6F 75 72 FTH (or.. your
00E390: 20 76 65 72 73 69 6F 6E 20 6F 66 20 74 68 65 20 version of the
00E3A0: 6B 65 72 6E 65 6C 29 2C 20 74 68 65 6E 20 6C 6F kernel), then lo
00E3B0: 6F 6B 20 74 68 72 6F 75 67 68 20 74 68 65 20 73 ok through the s
00E3C0: 63 72 65 65 6E 73 20 66 69 72 73 74 20 77 69 74 creens first wit
00E3D0: 68 20 31 5F 76 69 65 77 0D 0A 20 20 65 74 63 2E h 1_view.. etc.
00E3E0: 20 54 68 65 6E 20 63 6F 6D 70 69 6C 65 20 74 68 Then compile th
00E3F0: 65 20 73 63 72 65 65 6E 73 20 77 69 74 68 20 31 e screens with 1
00E400: 5F 6C 6F 61 64 2E 20 59 6F 75 20 74 68 65 6E 20 _load. You then
00E410: 61 72 65 20 20 72 65 61 64 79 20 20 74 6F 20 20 are ready to
00E420: 6C 6F 6F 6B 20 20 61 74 0D 0A 20 20 65 61 63 68 look at.. each
00E430: 20 77 6F 72 64 20 69 6E 20 74 68 65 20 64 69 63 word in the dic
00E440: 74 69 6F 6E 61 72 79 2C 20 69 6E 63 6C 75 64 69 tionary, includi
00E450: 6E 67 20 74 68 65 20 6E 65 77 20 77 6F 72 64 73 ng the new words
00E460: 20 6C 6F 61 64 65 64 20 62 79 20 44 45 43 4F 4D loaded by DECOM
00E470: 50 2C 20 20 73 75 63 68 0D 0A 20 20 61 73 20 22 P, such.. as "
00E480: 64 65 63 6F 6D 70 22 20 69 74 73 65 6C 66 2E 20 decomp" itself.
00E490: 54 68 65 20 77 6F 72 64 20 22 76 6C 69 73 74 22 The word "vlist"
00E4A0: 20 6D 61 6B 65 73 20 69 6E 74 65 72 65 73 74 69 makes interesti
00E4B0: 6E 67 20 72 65 61 64 69 6E 67 2E 20 49 66 20 79 ng reading. If y
00E4C0: 6F 75 20 20 68 61 76 65 0D 0A 20 20 61 20 70 72 ou have.. a pr
00E4D0: 69 6E 74 2D 6F 75 74 20 6F 66 20 74 68 65 20 64 int-out of the d
00E4E0: 69 63 74 69 6F 6E 61 72 79 2C 20 74 68 65 6E 20 ictionary, then
00E4F0: 79 6F 75 20 61 72 65 20 73 65 74 20 66 6F 72 20 you are set for
00E500: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00E510: 0C 00 01 00 02 09 4E E5 0C 00 C1 02 00 00 00 02 ......N.........
00E520: 0C 00 C6 02 00 00 00 02 0C 00 C2 02 00 00 00 02 ................
00E530: 0C 00 C7 02 00 00 00 02 0C 00 C3 02 00 00 00 02 ................
00E540: 0C 00 C8 02 00 00 00 02 0C 00 C4 02 00 00 00 02 ................
00E550: 0C 00 C9 02 00 00 00 02 0C 00 C5 02 00 00 00 02 ................
00E560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E600: 69 6E 20 20 70 61 72 65 6E 74 68 65 73 65 73 20 in parentheses
00E610: 20 2D 2D 20 20 61 63 74 69 76 61 74 65 20 20 77 -- activate w
00E620: 68 65 6E 20 20 72 65 61 64 79 20 20 74 6F 0D 0A hen ready to..
00E630: 20 20 65 78 70 65 72 69 6D 65 6E 74 29 20 77 69 experiment) wi
00E640: 6C 6C 20 76 65 63 74 6F 72 20 74 68 65 20 77 6F ll vector the wo
00E650: 72 64 20 74 6F 20 5C 74 79 70 72 5C 20 73 6F 20 rd to \typr\ so
00E660: 74 68 61 74 20 61 6E 79 20 72 6F 75 74 69 6E 65 that any routine
00E670: 73 20 20 77 68 69 63 68 20 20 75 73 65 64 0D 0A s which used..
00E680: 20 20 5C 74 79 70 65 5C 20 77 69 6C 6C 20 6E 6F \type\ will no
00E690: 77 20 75 73 65 20 5C 74 79 70 72 5C 2E 20 4E 6F w use \typr\. No
00E6A0: 74 65 20 74 68 61 74 20 5C 74 79 70 72 5C 20 6D te that \typr\ m
00E6B0: 75 73 74 20 62 65 20 69 6E 20 74 68 65 20 73 79 ust be in the sy
00E6C0: 73 74 65 6D 2E 20 20 49 66 20 20 79 6F 75 0D 0A stem. If you..
00E6D0: 20 20 5C 66 6F 72 67 65 74 5C 20 69 74 20 61 6E \forget\ it an
00E6E0: 64 20 6F 76 65 72 77 72 69 74 65 20 69 74 20 77 d overwrite it w
00E6F0: 69 74 68 20 61 6E 6F 74 68 65 72 20 72 6F 75 74 ith another rout
00E700: 69 6E 65 2C 20 74 68 65 20 20 73 79 73 74 65 6D ine, the system
00E710: 20 20 77 69 6C 6C 20 20 61 6C 6D 6F 73 74 0D 0A will almost..
00E720: 20 20 63 65 72 74 61 69 6E 6C 79 20 63 72 61 73 certainly cras
00E730: 68 20 77 68 65 6E 20 5C 74 79 70 65 5C 20 69 73 h when \type\ is
00E740: 20 69 6E 76 6F 6B 65 64 2E 0D 0A 0D 0A 20 20 20 invoked.....
00E750: 49 74 20 69 73 20 6E 6F 74 20 70 6F 73 73 69 62 It is not possib
00E760: 6C 65 20 74 6F 20 63 68 61 6E 67 65 20 5C 74 79 le to change \ty
00E770: 70 65 5C 20 77 69 74 68 6F 75 74 20 72 65 61 73 pe\ without reas
00E780: 73 65 6D 62 6C 79 2C 20 62 65 63 61 75 73 65 20 sembly, because
00E790: 20 5C 74 79 70 72 5C 20 20 69 73 0D 0A 20 20 6C \typr\ is.. l
00E7A0: 6F 6E 67 65 72 20 28 72 20 69 73 20 61 20 68 69 onger (r is a hi
00E7B0: 67 68 65 72 20 6E 75 6D 62 65 72 20 74 68 61 6E gher number than
00E7C0: 20 65 29 2E 20 41 20 6D 69 73 74 61 6B 65 20 6D e). A mistake m
00E7D0: 61 79 20 6E 6F 74 20 73 68 6F 77 20 75 70 20 66 ay not show up f
00E7E0: 6F 72 20 20 61 20 20 6C 6F 6E 67 0D 0A 20 20 74 or a long.. t
00E7F0: 69 6D 65 3B 20 70 72 65 73 65 72 76 65 20 74 68 ime; preserve th
00E800: 68 69 63 68 20 61 70 70 65 61 72 65 64 20 69 6E hich appeared in
00E810: 20 74 68 65 20 55 4B 20 41 6D 73 74 72 61 64 20 the UK Amstrad
00E820: 55 73 65 72 20 62 65 67 69 6E 6E 69 6E 67 20 69 User beginning i
00E830: 6E 20 4D 61 72 63 68 20 31 39 38 35 2E 20 4D 6F n March 1985. Mo
00E840: 72 65 20 72 65 63 65 6E 74 6C 79 0D 0A 20 20 61 re recently.. a
00E850: 20 73 68 6F 72 74 20 73 65 72 69 65 73 20 68 61 short series ha
00E860: 73 20 62 65 65 6E 20 70 75 62 6C 69 73 68 65 64 s been published
00E870: 20 62 79 20 59 6F 75 72 20 43 6F 6D 70 75 74 65 by Your Compute
00E880: 72 2C 20 20 62 61 73 65 64 20 20 6F 6E 20 20 61 r, based on a
00E890: 72 74 69 63 6C 65 73 20 20 69 6E 0D 0A 20 20 42 rticles in.. B
00E8A0: 79 74 65 20 6D 61 67 61 7A 69 6E 65 20 63 2E 20 yte magazine c.
00E8B0: 31 39 38 30 2D 38 31 2E 20 53 6F 6D 65 20 6F 66 1980-81. Some of
00E8C0: 20 74 68 65 20 22 77 6F 72 64 73 22 20 6D 65 6E the "words" men
00E8D0: 74 69 6F 6E 65 64 20 69 6E 20 74 68 69 73 20 20 tioned in this
00E8E0: 73 65 72 69 65 73 20 20 6D 61 79 0D 0A 20 20 6E series may.. n
00E8F0: 6F 74 20 6D 61 74 63 68 20 74 68 65 20 77 6F 72 ot match the wor
00E900: 64 73 20 69 6E 20 43 50 43 46 54 48 32 20 28 79 ds in CPCFTH2 (y
00E910: 6F 75 20 68 61 76 65 20 62 65 65 6E 20 77 61 72 ou have been war
00E920: 6E 65 64 2C 20 73 6F 20 6E 6F 20 6D 6F 72 65 20 ned, so no more
00E930: 70 68 6F 6E 65 20 63 61 6C 6C 73 0D 0A 20 20 61 phone calls.. a
00E940: 74 20 35 20 61 2E 6D 2E 29 2E 20 41 6C 74 68 6F t 5 a.m.). Altho
00E950: 75 67 68 20 74 68 65 72 65 20 61 72 65 20 73 6F ugh there are so
00E960: 6D 65 20 64 69 66 66 65 72 65 6E 74 20 76 65 72 me different ver
00E970: 73 69 6F 6E 73 20 6F 66 20 46 6F 72 74 68 20 61 sions of Forth a
00E980: 72 6F 75 6E 64 2C 20 74 68 65 79 0D 0A 20 20 61 round, they.. a
00E990: 72 65 20 63 6C 6F 73 65 6C 79 20 72 65 6C 61 74 re closely relat
00E9A0: 65 64 20 2D 2D 20 6E 6F 74 20 6C 69 6B 65 20 74 ed -- not like t
00E9B0: 68 65 20 76 61 72 69 61 6E 74 73 20 6F 66 20 42 he variants of B
00E9C0: 61 73 69 63 2E 20 49 6E 20 74 68 65 20 20 43 50 asic. In the CP
00E9D0: 2F 4D 20 20 4C 69 62 72 61 72 79 0D 0A 20 20 66 /M Library.. f
00E9E0: 69 6C 65 73 20 74 68 65 72 65 20 69 73 20 61 20 iles there is a
00E9F0: 76 65 72 73 69 6F 6E 20 20 6F 66 20 20 46 6F 72 version of For
00EA00: 65 20 6F 72 69 67 69 6E 61 6C 20 76 65 72 73 69 e original versi
00EA10: 6F 6E 20 61 6E 64 20 6B 65 65 70 20 61 20 72 65 on and keep a re
00EA20: 63 6F 72 64 20 20 6F 66 20 20 61 6C 6C 20 20 70 cord of all p
00EA30: 61 74 63 68 65 73 20 20 66 6F 72 0D 0A 20 20 72 atches for.. r
00EA40: 65 63 6F 76 65 72 79 20 69 6E 20 63 61 73 65 20 ecovery in case
00EA50: 6F 66 20 61 20 63 72 61 73 68 2E 0D 0A 0D 0A 20 of a crash.....
00EA60: 20 20 54 68 65 20 77 6F 72 64 20 5C 7C 5C 20 28 The word \|\ (
00EA70: 6B 6E 6F 77 6E 20 61 73 20 22 62 61 72 22 20 74 known as "bar" t
00EA80: 6F 20 52 53 58 20 75 73 65 72 73 29 20 63 61 6C o RSX users) cal
00EA90: 6C 73 20 61 20 68 65 61 64 65 72 6C 65 73 73 20 ls a headerless
00EAA0: 6D 61 63 68 69 6E 65 0D 0A 20 20 6C 61 6E 67 75 machine.. langu
00EAB0: 61 67 65 20 72 6F 75 74 69 6E 65 20 6A 75 73 74 age routine just
00EAC0: 20 62 65 66 6F 72 65 20 69 74 73 20 65 78 69 74 before its exit
00EAD0: 2E 20 20 54 68 69 73 20 20 77 69 6C 6C 20 20 70 . This will p
00EAE0: 72 6F 64 75 63 65 20 20 61 20 20 6E 6F 6E 73 65 roduce a nonse
00EAF0: 6E 73 69 63 61 6C 0D 0A 20 20 6E 61 6D 65 2E 20 nsical.. name.
00EB00: 49 74 20 69 73 20 6E 6F 74 20 77 6F 72 74 68 20 It is not worth
00EB10: 65 78 74 72 61 20 70 72 6F 67 72 61 6D 69 6E 67 extra programing
00EB20: 20 74 6F 20 64 65 61 6C 20 77 69 74 68 20 65 78 to deal with ex
00EB30: 63 65 70 74 69 6F 6E 73 20 6F 66 20 74 68 69 73 ceptions of this
00EB40: 20 6B 69 6E 64 2E 0D 0A 20 20 41 6E 79 20 6E 65 kind... Any ne
00EB50: 77 20 77 6F 72 64 73 20 77 68 69 63 68 20 77 6F w words which wo
00EB60: 75 6C 64 20 64 65 66 69 6E 65 20 6E 65 77 20 20 uld define new
00EB70: 65 78 69 74 73 20 20 61 6E 64 20 20 69 6E 2D 6C exits and in-l
00EB80: 69 6E 65 20 20 70 61 72 61 6D 65 74 65 72 73 20 ine parameters
00EB90: 20 77 6F 75 6C 64 0D 0A 20 20 72 65 71 75 69 72 would.. requir
00EBA0: 65 20 61 64 64 69 74 69 6F 6E 73 20 74 6F 20 74 e additions to t
00EBB0: 68 65 20 74 77 6F 20 72 6F 75 74 69 6E 65 73 2E he two routines.
00EBC0: 0D 0A 0D 0A 20 20 2A 2A 2A 20 47 4C 4F 53 53 31 .... *** GLOSS1
00EBD0: 2E 54 58 54 0D 0A 0D 0A 20 20 20 54 68 69 73 20 .TXT.... This
00EBE0: 69 73 20 74 68 65 20 66 69 72 73 74 20 70 61 72 is the first par
00EBF0: 74 20 6F 66 20 74 68 65 20 67 6C 6F 73 73 61 72 t of the glossar
00EC00: 74 68 2C 20 20 77 69 74 68 20 20 61 20 20 6C 61 th, with a la
00EC10: 72 67 65 72 20 20 76 6F 63 61 62 75 6C 61 72 79 rger vocabulary
00EC20: 20 20 61 6E 64 20 20 28 70 61 79 0D 0A 20 20 61 and (pay.. a
00EC30: 74 74 65 6E 74 69 6F 6E 20 74 6F 20 74 68 69 73 ttention to this
00EC40: 29 20 61 6C 6C 20 69 6E 70 75 74 20 69 73 20 69 ) all input is i
00EC50: 6E 20 43 41 50 49 54 41 4C 20 6C 65 74 74 65 72 n CAPITAL letter
00EC60: 73 2E 20 54 72 79 20 5C 76 6C 69 73 74 5C 20 61 s. Try \vlist\ a
00EC70: 6E 64 20 61 6C 6C 20 20 79 6F 75 0D 0A 20 20 67 nd all you.. g
00EC80: 65 74 20 69 73 20 61 20 72 6F 77 20 6F 66 20 71 et is a row of q
00EC90: 75 65 73 74 69 6F 6E 20 6D 61 72 6B 73 2C 20 62 uestion marks, b
00ECA0: 75 74 20 5C 56 4C 49 53 54 5C 20 77 6F 72 6B 73 ut \VLIST\ works
00ECB0: 20 6E 69 63 65 6C 79 2E 0D 0A 0D 0A 20 20 20 54 nicely..... T
00ECC0: 68 65 20 73 65 63 72 65 74 20 69 6E 20 6C 65 61 he secret in lea
00ECD0: 72 6E 69 6E 67 20 69 73 20 74 6F 20 20 65 78 70 rning is to exp
00ECE0: 65 72 69 6D 65 6E 74 2E 20 20 44 6F 6E 27 74 20 eriment. Don't
00ECF0: 20 62 65 20 20 66 72 69 67 68 74 65 6E 65 64 20 be frightened
00ED00: 20 74 6F 20 20 22 6D 65 73 73 0D 0A 20 20 61 72 to "mess.. ar
00ED10: 6F 75 6E 64 22 2E 20 4B 65 65 70 20 79 6F 75 72 ound". Keep your
00ED20: 20 6F 72 69 67 69 6E 61 6C 20 66 69 6C 65 73 20 original files
00ED30: 73 61 66 65 20 6F 6E 20 61 6E 6F 74 68 65 72 20 safe on another
00ED40: 64 69 73 6B 20 6F 72 20 74 61 70 65 20 2C 20 75 disk or tape , u
00ED50: 73 65 20 61 20 20 63 6F 70 79 0D 0A 20 20 61 6E se a copy.. an
00ED60: 64 20 22 67 6F 20 66 6F 72 20 69 74 22 2E 20 53 d "go for it". S
00ED70: 6F 20 77 68 61 74 20 69 66 20 79 6F 75 20 6D 61 o what if you ma
00ED80: 6B 65 20 61 20 68 61 73 68 20 6F 66 20 69 74 3F ke a hash of it?
00ED90: 20 42 65 74 74 65 72 20 20 6C 75 63 6B 20 20 6E Better luck n
00EDA0: 65 78 74 20 20 74 69 6D 65 2E 0D 0A 20 20 28 48 ext time... (H
00EDB0: 6F 77 65 76 65 72 2C 20 74 68 65 72 65 20 61 72 owever, there ar
00EDC0: 65 20 61 20 66 65 77 20 65 78 63 65 70 74 69 6F e a few exceptio
00EDD0: 6E 73 20 74 6F 20 74 68 61 74 20 72 75 6C 65 3A ns to that rule:
00EDE0: 20 50 6C 65 61 73 65 20 64 6F 6E 27 74 20 6D 75 Please don't mu
00EDF0: 63 6B 20 20 61 72 6F 75 6E 64 0D 0A 20 20 77 69 ck around.. wi
00EE00: 79 20 66 6F 72 20 6F 75 72 20 76 65 72 73 69 6F y for our versio
00EE10: 6E 20 6F 66 20 20 46 6F 72 74 68 2E 20 20 4C 6F n of Forth. Lo
00EE20: 61 64 20 20 69 74 0D 0A 20 20 69 6E 74 6F 20 74 ad it.. into t
00EE30: 68 65 20 46 6F 72 74 68 20 6B 65 72 6E 65 6C 20 he Forth kernel
00EE40: 61 6E 64 20 72 65 61 64 20 69 74 20 62 79 20 75 and read it by u
00EE50: 73 69 6E 67 20 31 5F 6C 69 73 74 2C 20 32 5F 6C sing 1_list, 2_l
00EE60: 69 73 74 2C 20 65 74 63 2E 20 49 74 20 66 69 6C ist, etc. It fil
00EE70: 6C 73 20 20 31 31 0D 0A 20 20 73 63 72 65 65 6E ls 11.. screen
00EE80: 73 2E 20 41 20 70 72 69 6E 74 65 72 20 63 6F 70 s. A printer cop
00EE90: 79 20 6D 61 79 20 62 65 20 6D 61 64 65 20 62 79 y may be made by
00EEA0: 20 70 72 65 73 73 69 6E 67 20 74 68 65 20 43 54 pressing the CT
00EEB0: 52 4C 20 61 6E 64 20 59 20 20 6B 65 79 73 20 20 RL and Y keys
00EEC0: 62 65 66 6F 72 65 0D 0A 20 20 74 79 70 69 6E 67 before.. typing
00EED0: 20 5C 31 5F 6C 69 73 74 5C 2E 20 52 65 6D 65 6D \1_list\. Remem
00EEE0: 62 65 72 20 74 68 61 74 20 43 54 52 4C 20 50 20 ber that CTRL P
00EEF0: 64 6F 65 73 20 6E 6F 74 20 74 6F 67 67 6C 65 20 does not toggle
00EF00: 74 68 65 20 70 72 69 6E 74 65 72 20 20 77 69 74 the printer wit
00EF10: 68 20 20 6F 75 72 0D 0A 20 20 46 6F 72 74 68 2E h our.. Forth.
00EF20: 0D 0A 0D 0A 20 20 20 54 68 65 20 69 6E 74 72 6F .... The intro
00EF30: 64 75 63 74 69 6F 6E 20 74 6F 20 74 68 65 20 67 duction to the g
00EF40: 6C 6F 73 73 61 72 79 20 20 6F 75 74 6C 69 6E 65 lossary outline
00EF50: 73 20 20 74 68 65 20 20 64 69 66 66 65 72 65 6E s the differen
00EF60: 63 65 73 20 20 62 65 74 77 65 65 6E 20 20 74 68 ces between th
00EF70: 69 73 0D 0A 20 20 76 65 72 73 69 6F 6E 20 6F 66 is.. version of
00EF80: 20 46 6F 72 74 68 20 61 6E 64 20 74 68 65 20 76 Forth and the v
00EF90: 65 72 73 69 6F 6E 20 6B 6E 6F 77 6E 20 61 73 20 ersion known as
00EFA0: 46 69 67 20 46 6F 72 74 68 2E 0D 0A 0D 0A 20 20 Fig Forth.....
00EFB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00EFC0: 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 0D *****.
00EFD0: 0A 1A C9 00 00 00 1A 34 20 54 61 73 6D 61 6E 20 .......4 Tasman
00EFE0: 53 6F 66 74 77 61 72 65 20 4C 74 64 2E 0D 0A 0D Software Ltd....
00EFF0: 0A 20 20 54 68 69 73 20 41 6D 73 77 6F 72 64 20 . This Amsword
00F000: 74 68 20 6E 75 63 6C 65 61 72 20 64 65 76 69 63 th nuclear devic
00F010: 65 73 20 2D 2D 20 74 68 65 72 65 20 6D 61 79 20 es -- there may
00F020: 6E 6F 74 20 62 65 20 61 20 6E 65 78 74 20 74 69 not be a next ti
00F030: 6D 65 2E 29 0D 0A 0D 0A 20 20 20 4E 6F 77 2C 20 me.).... Now,
00F040: 70 75 74 20 79 6F 75 72 20 67 6C 61 73 73 65 73 put your glasses
00F050: 20 6F 6E 20 61 6E 64 20 70 61 79 20 61 74 74 65 on and pay atte
00F060: 6E 74 69 6F 6E 2E 20 54 68 65 20 55 4B 20 61 72 ntion. The UK ar
00F070: 74 69 63 6C 65 20 73 61 79 73 20 74 68 65 20 20 ticle says the
00F080: 6C 65 6E 67 74 68 0D 0A 20 20 6F 66 20 61 20 6E length.. of a n
00F090: 65 77 20 77 6F 72 64 20 28 63 72 65 61 74 65 64 ew word (created
00F0A0: 20 77 69 74 68 20 3A 20 61 6E 64 20 3B 20 61 73 with : and ; as
00F0B0: 20 77 65 20 64 69 73 63 6F 76 65 72 65 64 20 6C we discovered l
00F0C0: 61 73 74 20 6D 6F 6E 74 68 29 20 6D 61 79 20 63 ast month) may c
00F0D0: 6F 6E 74 61 69 6E 0D 0A 20 20 75 70 20 74 6F 20 ontain.. up to
00F0E0: 31 32 37 20 63 68 61 72 61 63 74 65 72 73 2E 20 127 characters.
00F0F0: 54 68 65 20 66 69 72 73 74 20 33 31 20 63 68 61 The first 31 cha
00F100: 72 61 63 74 65 72 73 20 20 61 72 65 20 20 73 69 racters are si
00F110: 67 6E 69 66 69 63 61 6E 74 20 20 61 73 20 20 69 gnificant as i
00F120: 73 20 20 74 68 65 0D 0A 20 20 74 6F 74 61 6C 20 s the.. total
00F130: 6E 75 6D 62 65 72 20 6F 66 20 63 68 61 72 61 63 number of charac
00F140: 74 65 72 73 20 69 6E 20 74 68 65 20 77 6F 72 64 ters in the word
00F150: 2E 20 53 6F 20 69 66 20 77 65 20 63 72 65 61 74 . So if we creat
00F160: 65 64 20 61 20 6E 65 77 20 77 6F 72 64 2C 20 74 ed a new word, t
00F170: 68 75 73 2C 20 3A 0D 0A 20 20 50 6C 65 61 73 65 hus, :.. Please
00F180: 2E 64 69 73 70 6C 61 79 2E 61 2E 6C 69 73 74 2E .display.a.list.
00F190: 6F 66 2E 74 68 65 2E 46 6F 72 74 68 2E 77 6F 72 of.the.Forth.wor
00F1A0: 64 73 20 20 76 6C 69 73 74 20 20 3B 20 20 77 65 ds vlist ; we
00F1B0: 20 20 77 6F 75 6C 64 20 20 62 65 20 20 20 65 6E would be en
00F1C0: 74 65 72 69 6E 67 0D 0A 20 20 73 6F 6D 65 74 68 tering.. someth
00F1D0: 69 6E 67 20 77 68 69 63 68 20 77 6F 75 6C 64 20 ing which would
00F1E0: 62 65 20 72 65 63 6F 67 6E 69 73 65 64 20 61 73 be recognised as
00F1F0: 20 6F 75 72 20 6F 72 69 67 69 6E 61 6C 20 20 5C our original \
00F200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F2A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F2B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F2C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F2D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F2E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F2F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F3A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F3B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F3C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F3D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F3E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F3F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00F400: 76 6C 69 73 74 5C 2E 20 20 54 79 70 65 20 20 69 vlist\. Type i
00F410: 6E 20 20 74 68 65 0D 0A 20 20 64 6F 74 73 20 62 n the.. dots b
00F420: 65 74 77 65 65 6E 20 74 68 65 20 77 6F 72 64 73 etween the words
00F430: 2C 20 20 62 65 63 61 75 73 65 20 20 77 65 20 20 , because we
00F440: 61 72 65 20 20 6E 6F 74 20 20 61 6C 6C 6F 77 65 are not allowe
00F450: 64 20 20 73 70 61 63 65 73 2E 20 20 43 6F 75 6E d spaces. Coun
00F460: 74 20 20 74 68 65 0D 0A 20 20 63 68 61 72 61 63 t the.. charac
00F470: 74 65 72 73 2C 20 69 6E 63 6C 75 64 69 6E 67 20 ters, including
00F480: 74 68 65 20 64 6F 74 73 2C 20 20 61 6E 64 20 20 the dots, and
00F490: 79 6F 75 20 20 77 69 6C 6C 20 20 66 69 6E 64 20 you will find
00F4A0: 20 34 30 2C 20 20 62 75 74 20 20 74 68 65 20 20 40, but the
00F4B0: 61 63 74 75 61 6C 0D 0A 20 20 73 69 67 6E 69 66 actual.. signif
00F4C0: 69 63 61 6E 74 20 63 68 61 72 61 63 74 65 72 73 icant characters
00F4D0: 20 67 6F 20 75 70 20 74 6F 20 33 31 2C 20 77 68 go up to 31, wh
00F4E0: 69 63 68 20 69 73 20 74 68 65 20 20 27 6F 27 20 ich is the 'o'
00F4F0: 20 69 6E 20 20 46 6F 72 74 68 2E 20 20 28 44 69 in Forth. (Di
00F500: 64 20 20 79 6F 75 0D 0A 20 20 62 65 67 69 6E 20 d you.. begin
00F510: 63 6F 75 6E 74 69 6E 67 20 61 74 20 30 20 5B 7A counting at 0 [z
00F520: 65 72 6F 5D 20 6F 72 20 31 2C 20 65 68 3F 29 0D ero] or 1, eh?).
00F530: 0A 0D 0A 20 20 20 53 6F 20 77 68 61 74 3F 20 57 ... So what? W
00F540: 65 20 73 68 61 6C 6C 20 73 65 65 2E 20 54 68 69 e shall see. Thi
00F550: 73 20 69 73 20 61 20 67 72 65 61 74 20 20 70 69 s is a great pi
00F560: 65 63 65 20 20 6F 66 20 20 6D 61 67 69 63 2E 20 ece of magic.
00F570: 20 4C 65 74 27 73 20 20 63 72 65 61 74 65 20 20 Let's create
00F580: 61 0D 0A 20 20 73 65 63 6F 6E 64 20 77 6F 72 64 a.. second word
00F590: 20 62 79 20 65 78 74 65 6E 64 69 6E 67 20 74 68 by extending th
00F5A0: 65 20 66 69 72 73 74 20 77 69 74 68 20 2E 74 6F e first with .to
00F5B0: 2E 74 68 65 2E 70 72 69 6E 74 65 72 20 61 6E 64 .the.printer and
00F5C0: 20 73 65 65 20 69 66 20 6F 75 72 20 70 72 69 64 see if our prid
00F5D0: 65 0D 0A 20 20 61 6E 64 20 6A 6F 79 20 63 61 6E e.. and joy can
00F5E0: 20 72 65 63 6F 67 6E 69 73 65 20 74 68 65 20 64 recognise the d
00F5F0: 69 66 66 65 72 65 6E 63 65 2E 20 49 66 20 69 74 ifference. If it
00F600: 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 20 20 2A 2A .. ******.. **
00F610: 2A 2A 2A 2A 20 53 6F 20 6F 6E 20 61 6E 64 20 73 **** So on and s
00F620: 6F 20 46 6F 72 74 68 20 28 4A 75 6C 79 20 31 39 o Forth (July 19
00F630: 38 37 29 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 0D 87).. ******...
00F640: 0A 20 20 20 49 66 20 79 6F 75 20 68 61 76 65 20 . If you have
00F650: 62 65 65 6E 20 66 6F 6C 6C 6F 77 69 6E 67 20 74 been following t
00F660: 68 69 73 20 73 65 72 69 65 73 20 6F 6E 20 46 6F his series on Fo
00F670: 72 74 68 20 77 69 74 68 20 72 61 70 74 20 61 74 rth with rapt at
00F680: 74 65 6E 74 69 6F 6E 2C 20 62 79 20 6E 6F 77 0D tention, by now.
00F690: 0A 20 20 79 6F 75 20 73 68 6F 75 6C 64 20 62 65 . you should be
00F6A0: 20 63 6C 6F 73 65 20 74 6F 20 22 65 78 70 65 72 close to "exper
00F6B0: 74 22 20 73 74 61 74 75 73 2E 20 41 6C 6C 20 79 t" status. All y
00F6C0: 6F 75 20 6E 65 65 64 20 64 6F 20 20 6E 6F 77 20 ou need do now
00F6D0: 20 69 73 20 20 73 74 75 64 79 20 20 74 68 65 0D is study the.
00F6E0: 0A 20 20 76 6F 63 61 62 75 6C 75 61 72 79 2C 20 . vocabuluary,
00F6F0: 74 68 65 6E 20 67 6F 20 46 6F 72 74 68 20 61 6E then go Forth an
00F700: 64 20 6D 75 6C 74 69 70 6C 79 20 28 49 20 63 6F d multiply (I co
00F710: 75 6C 6E 64 27 74 20 72 65 73 69 73 74 20 74 68 ulnd't resist th
00F720: 61 74 20 20 2D 2D 20 20 49 20 20 68 61 76 65 0D at -- I have.
00F730: 0A 20 20 62 65 65 6E 20 77 61 69 74 69 6E 67 20 . been waiting
00F740: 61 20 77 68 6F 6C 65 20 6D 6F 6E 74 68 20 74 6F a whole month to
00F750: 20 73 61 79 20 69 74 2E 29 0D 0A 0D 0A 20 20 20 say it.)....
00F760: 41 73 20 77 65 20 73 61 69 64 20 62 65 66 6F 72 As we said befor
00F770: 65 2C 20 74 68 65 20 72 6F 75 74 69 6E 65 73 20 e, the routines
00F780: 6D 65 6E 74 69 6F 6E 65 64 20 69 6E 20 74 68 69 mentioned in thi
00F790: 73 20 73 65 72 69 65 73 2C 20 77 68 69 63 68 20 s series, which
00F7A0: 69 73 20 20 72 75 6E 6E 69 6E 67 0D 0A 20 20 70 is running.. p
00F7B0: 61 72 61 6C 6C 65 6C 20 77 69 74 68 20 50 65 74 arallel with Pet
00F7C0: 72 20 4C 75 6B 65 73 27 20 66 69 6C 65 73 20 6F r Lukes' files o
00F7D0: 6E 20 46 6F 72 74 68 2C 20 61 72 65 20 62 61 73 n Forth, are bas
00F7E0: 65 64 20 6F 6E 20 20 74 68 65 20 20 46 6F 72 74 ed on the Fort
00F7F0: 68 20 20 61 72 74 69 63 6C 65 73 0D 0A 20 20 77 h articles.. w
00F800: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00F810: 0D 00 01 00 02 09 4E E5 0D 00 C1 02 00 00 00 02 ......N.........
00F820: 0D 00 C6 02 00 00 00 02 0D 00 C2 02 00 00 00 02 ................
00F830: 0D 00 C7 02 00 00 00 02 0D 00 C3 02 00 00 00 02 ................
00F840: 0D 00 C8 02 00 00 00 02 0D 00 C4 02 00 00 00 02 ................
00F850: 0D 00 C9 02 00 00 00 02 0D 00 C5 02 00 00 00 02 ................
00F860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F900: 20 6F 6E 6C 79 20 22 73 65 65 73 22 20 74 68 65 only "sees" the
00F910: 20 63 68 61 72 61 63 74 65 72 73 20 75 70 20 74 characters up t
00F920: 6F 0D 0A 20 20 33 31 2C 20 74 68 65 6E 20 68 6F o.. 31, then ho
00F930: 77 20 77 69 6C 6C 20 69 74 20 64 69 73 74 69 6E w will it distin
00F940: 67 75 69 73 68 20 62 65 74 77 65 65 6E 20 74 68 guish between th
00F950: 65 20 74 77 6F 3F 20 42 65 63 61 75 73 65 20 69 e two? Because i
00F960: 74 20 20 61 6C 73 6F 20 20 6B 65 65 70 73 20 20 t also keeps
00F970: 61 0D 0A 20 20 63 68 61 72 61 63 74 65 72 20 63 a.. character c
00F980: 6F 75 6E 74 2C 20 74 68 61 74 27 73 20 68 6F 77 ount, that's how
00F990: 2E 0D 0A 0D 0A 20 20 20 57 65 20 73 61 77 20 74 ..... We saw t
00F9A0: 68 61 74 20 77 65 20 68 61 64 20 74 6F 20 70 75 hat we had to pu
00F9B0: 74 20 64 6F 74 73 20 62 65 74 77 65 65 6E 20 74 t dots between t
00F9C0: 68 65 20 73 65 63 74 69 6F 6E 73 20 6F 66 20 74 he sections of t
00F9D0: 68 65 20 77 6F 72 64 20 62 65 63 61 75 73 65 20 he word because
00F9E0: 20 77 65 0D 0A 20 20 77 65 72 65 20 6E 6F 74 20 we.. were not
00F9F0: 61 6C 6C 6F 77 65 64 20 73 70 61 63 65 73 2C 20 allowed spaces,
00FA00: 62 75 74 20 77 65 20 63 6F 75 6C 64 20 6A 75 73 but we could jus
00FA10: 74 20 61 73 20 65 61 73 69 6C 79 20 68 61 76 65 t as easily have
00FA20: 20 75 73 65 64 20 61 6C 6C 20 74 68 65 20 41 53 used all the AS
00FA30: 43 49 49 0D 0A 20 20 63 68 61 72 61 63 74 65 72 CII.. character
00FA40: 73 2C 20 69 6E 63 6C 75 64 69 6E 67 20 2B 28 29 s, including +()
00FA50: 2C 2D 31 32 33 34 35 2C 20 41 4E 44 20 63 61 70 ,-12345, AND cap
00FA60: 69 74 61 6C 20 61 6E 64 20 6C 6F 77 65 72 20 63 ital and lower c
00FA70: 61 73 65 20 6C 65 74 74 65 72 73 2E 0D 0A 0D 0A ase letters.....
00FA80: 20 20 20 41 67 61 69 6E 20 49 20 68 65 61 72 20 Again I hear
00FA90: 79 6F 75 20 6D 75 74 74 65 72 69 6E 67 2C 20 22 you muttering, "
00FAA0: 53 6F 20 77 68 61 74 3F 22 20 57 65 6C 6C 2C 20 So what?" Well,
00FAB0: 20 69 74 20 20 69 6E 64 69 63 61 74 65 73 20 20 it indicates
00FAC0: 74 68 65 20 20 70 6F 74 65 6E 74 69 61 6C 0D 0A the potential..
00FAD0: 20 20 73 74 72 65 6E 67 74 68 20 6F 66 20 74 68 strength of th
00FAE0: 65 20 6C 61 6E 67 75 61 67 65 2E 20 57 65 20 63 e language. We c
00FAF0: 61 6E 20 64 65 66 69 6E 65 20 6C 69 74 65 72 61 an define litera
00FB00: 2E 0D 0A 0D 0A 20 20 20 57 68 65 6E 20 79 6F 75 ..... When you
00FB10: 20 73 6F 72 74 20 74 68 61 74 20 6F 75 74 2C 20 sort that out,
00FB20: 74 79 70 65 20 5C 41 6D 73 74 72 61 64 5C 20 6F type \Amstrad\ o
00FB30: 72 20 5C 76 6C 69 73 74 5C 20 74 6F 20 20 73 65 r \vlist\ to se
00FB40: 65 20 20 68 6F 77 20 20 6D 61 6E 79 20 20 74 69 e how many ti
00FB50: 6D 65 73 0D 0A 20 20 41 6D 73 74 72 61 64 20 69 mes.. Amstrad i
00FB60: 73 20 6C 69 73 74 65 64 20 69 6E 20 74 68 65 20 s listed in the
00FB70: 76 6F 63 61 62 75 6C 61 72 79 2E 20 49 74 20 73 vocabulary. It s
00FB80: 68 6F 75 6C 64 20 62 65 20 74 68 65 72 65 20 74 hould be there t
00FB90: 77 69 63 65 2E 20 4F 6E 63 65 20 77 68 65 6E 20 wice. Once when
00FBA0: 20 77 65 0D 0A 20 20 6D 61 64 65 20 61 6E 20 65 we.. made an e
00FBB0: 72 72 6F 72 20 61 6E 64 20 74 68 65 20 73 65 63 rror and the sec
00FBC0: 6F 6E 64 20 74 69 6D 65 20 77 68 65 6E 20 77 65 ond time when we
00FBD0: 20 74 72 69 65 64 20 61 67 61 69 6E 2E 20 54 68 tried again. Th
00FBE0: 65 20 74 6F 70 20 20 6F 6E 65 20 20 69 73 20 20 e top one is
00FBF0: 74 68 65 0D 0A 20 20 63 6F 72 72 65 63 74 20 6F the.. correct o
00FC00: 6E 65 2E 20 45 76 65 6E 20 74 68 6F 75 67 68 20 ne. Even though
00FC10: 74 68 65 20 6C 6F 77 65 72 20 6F 6E 65 20 77 61 the lower one wa
00FC20: 73 20 69 6E 63 6F 72 72 65 63 74 2C 20 69 74 20 s incorrect, it
00FC30: 77 61 73 20 70 6F 70 70 65 64 20 69 6E 74 6F 20 was popped into
00FC40: 74 68 65 0D 0A 20 20 76 6F 63 61 62 75 6C 61 72 the.. vocabular
00FC50: 79 20 6C 69 73 74 20 2D 2D 20 75 70 20 74 6F 20 y list -- up to
00FC60: 74 68 65 20 70 6F 69 6E 74 20 77 68 65 72 65 20 the point where
00FC70: 74 68 65 20 65 72 72 6F 72 20 77 61 73 20 6D 61 the error was ma
00FC80: 64 65 20 69 6E 20 5C 76 20 20 6C 69 73 74 5C 2E de in \v list\.
00FC90: 20 20 41 0D 0A 20 20 22 73 6D 75 64 67 65 22 20 A.. "smudge"
00FCA0: 62 69 74 20 69 73 20 73 65 74 20 61 74 20 74 68 bit is set at th
00FCB0: 65 20 62 65 67 69 6E 6E 69 6E 67 20 6F 66 20 74 e beginning of t
00FCC0: 68 61 74 20 77 6F 72 64 2C 20 77 68 69 63 68 20 hat word, which
00FCD0: 6D 65 61 6E 73 20 20 69 74 20 20 77 69 6C 6C 20 means it will
00FCE0: 20 62 65 0D 0A 20 20 69 67 6E 6F 72 65 64 20 64 be.. ignored d
00FCF0: 75 72 69 6E 67 20 61 20 73 65 61 72 63 68 20 6F uring a search o
00FD00: 6C 6C 79 20 74 68 6F 75 73 61 6E 64 73 20 6F 66 lly thousands of
00FD10: 20 77 6F 72 64 73 20 61 6E 64 20 6E 6F 74 0D 0A words and not..
00FD20: 20 20 6F 6E 65 20 77 6F 75 6C 64 20 64 75 70 6C one would dupl
00FD30: 69 63 61 74 65 20 61 6E 6F 74 68 65 72 2E 20 43 icate another. C
00FD40: 65 72 74 61 69 6E 6C 79 20 49 20 73 65 65 20 6C ertainly I see l
00FD50: 69 74 74 6C 65 20 75 73 65 20 20 66 6F 72 20 20 ittle use for
00FD60: 77 6F 72 64 73 20 20 6F 66 20 20 31 32 37 0D 0A words of 127..
00FD70: 20 20 63 68 61 72 61 63 74 65 72 73 2C 20 62 75 characters, bu
00FD80: 74 20 65 76 65 6E 20 69 66 20 77 65 20 73 74 69 t even if we sti
00FD90: 63 6B 20 74 6F 20 77 6F 72 64 73 20 6F 66 20 31 ck to words of 1
00FDA0: 32 20 20 63 68 61 72 61 63 74 65 72 73 2C 20 20 2 characters,
00FDB0: 74 68 65 20 20 70 6F 74 65 6E 74 69 61 6C 0D 0A the potential..
00FDC0: 20 20 62 65 67 69 6E 73 20 77 69 74 68 20 31 32 begins with 12
00FDD0: 20 78 20 31 32 37 2C 20 74 68 65 6E 20 6D 75 6C x 127, then mul
00FDE0: 74 69 70 6C 79 20 74 68 61 74 20 61 67 61 69 6E tiply that again
00FDF0: 20 62 79 20 31 32 37 20 2D 2D 20 61 6E 64 20 20 by 127 -- and
00FE00: 74 68 61 74 20 20 69 73 20 20 6F 6E 6C 79 0D 0A that is only..
00FE10: 20 20 74 68 65 20 62 65 67 69 6E 6E 69 6E 67 2E the beginning.
00FE20: 20 47 6F 6F 64 6E 65 73 73 2C 20 77 65 20 20 68 Goodness, we h
00FE30: 61 76 65 20 20 6D 6F 72 65 20 20 77 6F 72 64 73 ave more words
00FE40: 20 20 61 74 20 20 6F 75 72 20 20 64 69 73 70 6F at our dispo
00FE50: 73 61 6C 20 20 74 68 61 6E 20 20 74 68 65 0D 0A sal than the..
00FE60: 20 20 4D 61 71 75 61 72 69 65 20 64 69 63 74 69 Maquarie dicti
00FE70: 6F 6E 61 72 79 2E 0D 0A 0D 0A 20 20 20 59 65 73 onary..... Yes
00FE80: 2C 20 74 68 65 72 65 20 69 73 20 61 20 63 61 74 , there is a cat
00FE90: 63 68 2E 20 54 68 65 72 65 20 69 73 20 6C 69 74 ch. There is lit
00FEA0: 74 6C 65 20 75 73 65 20 6A 75 73 74 20 68 61 76 tle use just hav
00FEB0: 69 6E 67 20 77 6F 72 64 73 2C 20 77 65 20 20 6D ing words, we m
00FEC0: 75 73 74 20 20 70 75 74 0D 0A 20 20 73 6F 6D 65 ust put.. some
00FED0: 74 68 69 6E 67 20 6D 65 61 6E 69 6E 67 66 75 6C thing meaningful
00FEE0: 20 69 6E 74 6F 20 65 61 63 68 20 6F 6E 65 2C 20 into each one,
00FEF0: 74 68 65 6E 20 6C 65 61 72 6E 20 74 6F 20 73 74 then learn to st
00FF00: 66 20 74 68 65 20 64 69 63 74 69 6F 6E 61 72 79 f the dictionary
00FF10: 2E 20 49 74 20 69 73 20 6E 6F 74 20 61 20 6E 75 . It is not a nu
00FF20: 69 73 61 6E 63 65 2C 20 62 75 74 20 20 69 74 20 isance, but it
00FF30: 20 69 73 0D 0A 20 20 74 61 6B 69 6E 67 20 75 70 is.. taking up
00FF40: 20 6D 65 6D 6F 72 79 20 73 70 61 63 65 2E 20 41 memory space. A
00FF50: 72 65 20 20 79 6F 75 20 20 70 61 79 69 6E 67 20 re you paying
00FF60: 20 61 74 74 65 6E 74 69 6F 6E 3F 20 20 59 6F 75 attention? You
00FF70: 20 20 63 61 6E 6E 6F 74 20 20 64 65 6C 65 74 65 cannot delete
00FF80: 20 20 61 0D 0A 20 20 73 6D 75 64 67 65 64 20 77 a.. smudged w
00FF90: 6F 72 64 20 77 69 74 68 20 46 4F 52 47 45 54 20 ord with FORGET
00FFA0: 62 65 63 61 75 73 65 20 69 74 20 77 69 6C 6C 20 because it will
00FFB0: 6E 65 76 65 72 20 66 69 6E 64 20 20 69 74 2E 20 never find it.
00FFC0: 20 52 65 6D 65 6D 62 65 72 2C 20 20 73 6D 75 64 Remember, smud
00FFD0: 67 65 64 0D 0A 20 20 77 6F 72 64 73 20 61 72 65 ged.. words are
00FFE0: 20 69 67 6E 6F 72 65 64 20 62 79 20 61 20 64 69 ignored by a di
00FFF0: 63 74 69 6F 6E 61 72 79 20 73 65 61 72 63 68 2E ctionary search.
010000: 0D 0A 0D 0A 20 20 20 54 68 65 20 77 6F 72 64 20 .... The word
010010: 22 73 6D 75 64 67 65 22 20 77 69 6C 6C 20 68 65 "smudge" will he
010020: 6C 70 20 75 73 20 74 6F 67 67 6C 65 20 74 68 65 lp us toggle the
010030: 20 73 6D 75 64 67 65 20 62 69 74 20 73 6F 20 77 smudge bit so w
010040: 65 20 63 61 6E 20 65 78 74 72 61 63 74 20 20 74 e can extract t
010050: 68 65 0D 0A 20 20 75 6E 6E 65 63 65 73 73 61 72 he.. unnecessar
010060: 79 20 77 6F 72 64 73 20 61 6E 64 20 22 66 6F 72 y words and "for
010070: 67 65 74 22 20 74 68 65 6D 2E 20 42 75 74 20 66 get" them. But f
010080: 6F 72 20 74 68 69 73 20 72 6F 75 74 69 6E 65 20 or this routine
010090: 74 6F 20 62 65 20 20 73 75 63 63 65 73 73 66 75 to be successfu
0100A0: 6C 2C 0D 0A 20 20 77 65 20 20 6D 75 73 74 20 20 l,.. we must
0100B0: 67 6F 20 20 74 68 72 6F 75 67 68 20 20 69 74 20 go through it
0100C0: 20 69 6D 6D 65 64 69 61 74 65 6C 79 20 20 61 66 immediately af
0100D0: 74 65 72 20 20 20 6D 61 6B 69 6E 67 20 20 20 74 ter making t
0100E0: 68 65 20 20 20 65 72 72 6F 72 2E 20 20 20 54 79 he error. Ty
0100F0: 70 65 0D 0A 20 20 5C 73 6D 75 64 67 65 5F 66 6F pe.. \smudge_fo
010100: 72 69 6E 67 20 20 74 68 65 6D 20 20 74 6F 67 65 ring them toge
010110: 74 68 65 72 20 20 73 6F 0D 0A 20 20 74 68 65 79 ther so.. they
010120: 20 77 69 6C 6C 20 70 72 6F 64 75 63 65 20 74 68 will produce th
010130: 65 20 64 65 73 69 72 65 64 20 72 65 73 75 6C 74 e desired result
010140: 2E 0D 0A 0D 0A 20 20 20 49 66 2C 20 69 6E 20 74 ..... If, in t
010150: 68 65 20 6D 69 64 73 74 20 6F 66 66 20 61 6C 6C he midst off all
010160: 20 74 68 65 20 63 68 61 72 61 63 74 65 72 73 20 the characters
010170: 61 74 20 20 6F 75 72 20 20 64 69 73 70 6F 73 61 at our disposa
010180: 6C 2C 20 20 77 65 20 20 68 61 70 70 65 6E 20 20 l, we happen
010190: 74 6F 0D 0A 20 20 64 75 70 6C 69 63 61 74 65 20 to.. duplicate
0101A0: 61 20 77 6F 72 64 2C 20 73 6F 6D 65 20 76 65 72 a word, some ver
0101B0: 73 69 6F 6E 73 20 6F 66 20 46 6F 72 74 68 20 77 sions of Forth w
0101C0: 69 6C 6C 20 69 73 73 75 65 20 61 20 20 77 61 72 ill issue a war
0101D0: 6E 69 6E 67 2C 20 20 6C 69 6B 65 20 20 49 53 4E ning, like ISN
0101E0: 27 54 0D 0A 20 20 55 4E 49 51 55 45 2E 20 59 6F 'T.. UNIQUE. Yo
0101F0: 75 20 73 68 6F 75 6C 64 20 62 65 20 61 62 6C 65 u should be able
010200: 20 74 6F 20 77 6F 72 6B 20 74 68 61 74 20 6F 6E to work that on
010210: 65 20 6F 75 74 2E 0D 0A 0D 0A 20 20 20 20 49 66 e out..... If
010220: 20 20 77 65 20 20 77 61 6E 74 20 20 74 6F 20 20 we want to
010230: 67 65 74 20 20 72 69 64 20 20 6F 66 20 20 61 20 get rid of a
010240: 20 20 77 6F 72 64 20 20 20 77 65 20 20 20 68 61 word we ha
010250: 76 65 20 20 20 63 72 65 61 74 65 64 2C 20 20 20 ve created,
010260: 5C 66 6F 72 67 65 74 5F 0D 0A 20 20 50 6C 65 61 \forget_.. Plea
010270: 73 65 2E 64 69 73 70 6C 61 79 7B 65 74 63 7D 5C se.display{etc}\
010280: 20 61 6E 64 20 68 69 74 20 52 45 54 55 52 4E 20 and hit RETURN
010290: 74 6F 20 65 78 74 65 72 6D 69 6E 61 74 65 20 69 to exterminate i
0102A0: 74 2E 20 54 68 65 20 77 6F 72 64 20 22 66 6F 72 t. The word "for
0102B0: 67 65 74 22 20 20 69 73 0D 0A 20 20 65 61 73 79 get" is.. easy
0102C0: 20 74 6F 20 72 65 6D 65 6D 62 65 72 20 61 6E 64 to remember and
0102D0: 20 63 61 6E 20 63 6F 6D 65 20 69 6E 20 68 61 6E can come in han
0102E0: 64 79 20 61 74 20 74 69 6D 65 73 2E 0D 0A 0D 0A dy at times.....
0102F0: 20 20 20 42 65 66 6F 72 65 20 65 6E 64 69 6E 67 Before ending
010300: 72 67 65 74 5F 41 6D 73 74 72 61 64 5C 20 61 6E rget_Amstrad\ an
010310: 64 20 74 68 65 20 75 6E 77 61 6E 74 65 64 20 77 d the unwanted w
010320: 6F 72 64 73 20 61 72 65 20 20 73 65 6E 74 20 20 ords are sent
010330: 73 61 69 6C 69 6E 67 20 20 6F 66 66 20 20 69 6E sailing off in
010340: 74 6F 0D 0A 20 20 6F 62 6C 69 76 69 6F 6E 2E 0D to.. oblivion..
010350: 0A 0D 0A 20 20 20 41 6E 6F 74 68 65 72 20 75 73 ... Another us
010360: 65 20 66 6F 72 20 20 73 6D 75 64 67 65 20 20 69 e for smudge i
010370: 73 20 20 74 6F 20 20 74 6F 67 67 6C 65 20 20 72 s to toggle r
010380: 65 64 75 6E 64 61 6E 74 20 20 77 6F 72 64 73 20 edundant words
010390: 20 61 6C 72 65 61 64 79 20 20 69 6E 20 20 74 68 already in th
0103A0: 65 0D 0A 20 20 64 69 63 74 69 6F 6E 61 72 79 2E e.. dictionary.
0103B0: 20 57 65 20 63 61 6E 6E 6F 74 20 65 78 74 72 61 We cannot extra
0103C0: 63 74 20 74 68 65 6D 20 77 69 74 68 20 73 6D 75 ct them with smu
0103D0: 64 67 65 2C 20 62 75 74 20 77 65 20 63 61 6E 20 dge, but we can
0103E0: 20 73 6D 75 64 67 65 20 20 74 68 65 6D 20 20 73 smudge them s
0103F0: 6F 0D 0A 20 20 74 68 65 79 20 77 69 6C 6C 20 62 o.. they will b
010400: 65 20 69 67 6E 6F 72 65 64 20 64 75 72 69 6E 67 e ignored during
010410: 20 61 20 73 65 61 72 63 68 20 6F 66 20 74 68 65 a search of the
010420: 20 76 6F 63 61 62 75 6C 61 72 79 2E 20 48 6F 77 vocabulary. How
010430: 65 76 65 72 2C 20 20 77 65 20 20 73 68 6F 75 6C ever, we shoul
010440: 64 0D 0A 20 20 62 65 20 61 62 6C 65 20 74 6F 20 d.. be able to
010450: 64 65 6C 65 74 65 20 74 68 65 6D 20 77 69 74 68 delete them with
010460: 20 66 6F 72 67 65 74 20 69 66 20 77 65 20 77 61 forget if we wa
010470: 6E 74 20 74 6F 20 67 65 74 20 72 69 64 20 6F 66 nt to get rid of
010480: 20 74 68 65 6D 2E 0D 0A 0D 0A 20 20 20 54 68 61 them..... Tha
010490: 74 20 20 69 73 20 20 69 74 20 20 66 6F 72 20 20 t is it for
0104A0: 74 68 69 73 20 20 73 65 73 73 69 6F 6E 2C 20 20 this session,
0104B0: 6E 65 78 74 20 20 74 69 6D 65 20 20 77 65 20 20 next time we
0104C0: 73 68 61 6C 6C 20 20 73 61 69 6C 20 20 46 6F 72 shall sail For
0104D0: 74 68 20 20 69 6E 74 6F 0D 0A 20 20 70 72 6F 67 th into.. prog
0104E0: 72 61 6D 6D 69 6E 67 2E 20 48 61 70 70 79 20 73 ramming. Happy s
0104F0: 6D 75 64 67 69 6E 67 2E 0D 0A 0D 0A 20 20 20 20 mudging.....
010500: 20 6F 75 72 20 69 6E 74 65 6E 73 65 20 64 69 73 our intense dis
010510: 63 75 73 73 69 6F 6E 20 74 6F 64 61 79 2C 20 77 cussion today, w
010520: 65 20 77 69 6C 6C 20 20 6C 6F 6F 6B 20 20 61 74 e will look at
010530: 20 20 22 73 6D 75 64 67 65 22 2E 20 20 49 0D 0A "smudge". I..
010540: 20 20 6D 75 73 74 20 61 64 6D 69 74 20 49 20 67 must admit I g
010550: 72 65 65 74 20 74 68 61 74 20 77 6F 72 64 20 77 reet that word w
010560: 69 74 68 20 73 6F 6D 65 20 6D 65 72 72 69 6D 65 ith some merrime
010570: 6E 74 2E 20 49 20 72 65 61 6C 6C 79 20 64 6F 6E nt. I really don
010580: 27 74 20 20 6B 6E 6F 77 20 20 77 68 79 2C 0D 0A 't know why,..
010590: 20 20 65 78 63 65 70 74 20 74 68 61 74 20 69 74 except that it
0105A0: 20 73 65 65 6D 73 20 6F 75 74 20 6F 66 20 70 6C seems out of pl
0105B0: 61 63 65 20 69 6E 20 61 20 63 6F 6D 70 75 74 69 ace in a computi
0105C0: 6E 67 20 6C 61 6E 67 75 61 67 65 20 2D 2D 20 73 ng language -- s
0105D0: 6F 6D 65 68 6F 77 20 72 65 6C 61 74 65 64 0D 0A omehow related..
0105E0: 20 20 74 6F 20 66 75 64 67 65 20 61 6E 64 20 73 to fudge and s
0105F0: 6D 6F 6F 63 68 2E 20 49 74 20 69 73 20 20 74 68 mooch. It is th
010600: 65 72 65 20 20 74 6F 20 20 68 65 6C 70 20 20 75 ere to help u
010610: 73 20 20 65 72 61 73 65 20 20 6F 75 72 20 20 65 s erase our e
010620: 72 72 6F 72 73 20 20 69 6E 20 20 74 68 65 0D 0A rrors in the..
010630: 20 20 76 6F 63 61 62 75 6C 61 72 79 2E 20 53 6F vocabulary. So
010640: 20 6C 65 74 27 73 20 6D 61 6B 65 20 61 20 64 65 let's make a de
010650: 6C 69 62 65 72 61 74 65 20 65 72 72 6F 72 2E 0D liberate error..
010660: 0A 0D 0A 20 20 20 3A 20 41 6D 73 74 72 61 64 5F ... : Amstrad_
010670: 63 6C 73 5F 76 5F 6C 69 73 74 20 3B 20 28 74 68 cls_v_list ; (th
010680: 6F 73 65 20 75 6E 64 65 72 6C 69 6E 65 20 6D 61 ose underline ma
010690: 72 6B 73 20 5F 5F 20 69 6E 64 69 63 61 74 65 20 rks __ indicate
0106A0: 61 20 73 70 61 63 65 29 0D 0A 0D 0A 20 20 20 57 a space).... W
0106B0: 65 20 68 61 76 65 20 74 72 69 65 64 20 74 6F 20 e have tried to
0106C0: 6D 61 6B 65 20 61 20 6E 65 77 20 77 6F 72 64 20 make a new word
0106D0: 74 6F 20 63 6F 6D 62 69 6E 65 20 20 63 6C 73 20 to combine cls
0106E0: 20 61 6E 64 20 20 76 6C 69 73 74 2C 20 20 62 75 and vlist, bu
0106F0: 74 20 20 6D 61 64 65 20 20 61 0D 0A 20 20 6D 69 t made a.. mi
010700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
010710: 20 20 20 20 20 2A 2A 2A 2A 2A 2A 0D 0A 1A 20 73 ******... s
010720: 6F 20 46 6F 72 74 68 20 28 4A 75 6E 65 20 31 39 o Forth (June 19
010730: 38 37 29 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 0D 87).. ******...
010740: 0A 20 20 20 57 69 74 68 20 69 74 73 20 6C 69 6D . With its lim
010750: 69 74 65 64 20 61 6E 64 20 66 69 78 65 64 20 76 ited and fixed v
010760: 6F 63 61 62 75 6C 61 72 6C 79 2C 20 42 61 73 69 ocabularly, Basi
010770: 63 20 20 69 73 20 20 65 61 73 79 20 20 66 6F 72 c is easy for
010780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0107A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0107B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0107C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0107D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0107E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0107F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010800: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010820: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010830: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010840: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010850: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0108A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0108B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0108C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0108D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0108E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0108F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010900: 73 74 61 6B 65 20 62 79 20 70 75 74 74 69 6E 67 stake by putting
010910: 20 61 20 73 70 61 63 65 20 62 65 74 77 65 65 6E a space between
010920: 20 76 20 20 61 6E 64 20 20 6C 69 73 74 2E 20 20 v and list.
010930: 57 65 20 20 73 68 6F 75 6C 64 20 20 67 65 74 20 We should get
010940: 20 61 6E 20 20 65 72 72 6F 72 0D 0A 20 20 6D 65 an error.. me
010950: 73 73 61 67 65 20 69 66 20 74 68 65 20 6B 65 72 ssage if the ker
010960: 6E 65 6C 20 63 61 6E 6E 6F 74 20 66 69 6E 64 20 nel cannot find
010970: 74 68 65 20 77 6F 72 64 20 22 76 22 20 69 6E 20 the word "v" in
010980: 68 69 73 5C 68 65 72 20 76 6F 63 61 62 75 6C 61 his\her vocabula
010990: 72 79 2E 20 53 6F 20 20 77 65 0D 0A 20 20 74 72 ry. So we.. tr
0109A0: 79 20 61 67 61 69 6E 2C 20 74 79 70 65 20 74 68 y again, type th
0109B0: 65 20 73 61 6D 65 20 74 68 69 6E 67 20 61 67 61 e same thing aga
0109C0: 69 6E 2C 20 62 75 74 20 6F 6D 69 74 20 74 68 65 in, but omit the
0109D0: 20 73 70 61 63 65 20 62 65 74 77 65 65 6E 20 76 space between v
0109E0: 20 61 6E 64 20 6C 69 73 74 2E 0D 0A 0D 0A 20 20 and list.....
0109F0: 20 53 6F 20 77 68 65 6E 20 77 65 20 74 79 70 65 So when we type
010A00: 20 5C 41 6D 73 74 72 61 64 5C 20 61 74 20 63 6F \Amstrad\ at co
010A10: 6D 6D 61 6E 64 20 6C 65 76 65 6C 2C 20 74 68 65 mmand level, the
010A20: 20 20 6B 65 72 6E 65 6C 20 20 73 68 6F 75 6C 64 kernel should
010A30: 20 20 63 6C 65 61 72 20 20 74 68 65 0D 0A 20 20 clear the..
010A40: 73 63 72 65 65 6E 20 61 6E 64 20 70 72 65 73 65 screen and prese
010A50: 6E 74 20 75 73 20 77 69 74 68 20 61 20 6C 69 73 nt us with a lis
010A60: 74 20 6F 66 20 77 6F 72 64 73 20 69 6E 20 74 68 t of words in th
010A70: 65 20 76 6F 63 61 62 75 6C 61 72 79 2E 20 49 74 e vocabulary. It
010A80: 20 77 69 6C 6C 20 20 63 6C 65 61 72 0D 0A 20 20 will clear..
010A90: 74 68 65 20 73 63 72 65 65 6E 20 69 66 20 69 74 the screen if it
010AA0: 20 72 65 63 6F 67 6E 69 73 65 73 20 63 6C 73 20 recognises cls
010AB0: 2D 2D 20 63 6F 6E 73 75 6C 74 20 77 69 74 68 20 -- consult with
010AC0: 79 6F 75 72 20 20 6B 65 72 6E 65 6C 20 20 61 6E your kernel an
010AD0: 64 20 20 73 65 65 20 20 77 68 61 74 0D 0A 20 20 d see what..
010AE0: 77 6F 72 64 20 69 73 20 75 73 65 64 20 74 6F 20 word is used to
010AF0: 63 6C 65 61 72 20 74 68 65 20 73 63 72 65 65 6E clear the screen
010B00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
010B10: 0E 00 01 00 02 09 4E E5 0E 00 C1 02 00 00 00 02 ......N.........
010B20: 0E 00 C6 02 00 00 00 02 0E 00 C2 02 00 00 00 02 ................
010B30: 0E 00 C7 02 00 00 00 02 0E 00 C3 02 00 00 00 02 ................
010B40: 0E 00 C8 02 00 00 00 02 0E 00 C4 02 00 00 00 02 ................
010B50: 0E 00 C9 02 00 00 00 02 0E 00 C5 02 00 00 00 02 ................
010B60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010B70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010B80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010B90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C00: 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 20 20 2B 2B .. ******.. ++
010C10: 2B 2B 2B 2B 20 46 6F 72 74 68 2C 20 41 75 67 75 ++++ Forth, Augu
010C20: 73 74 20 31 39 38 37 2C 20 77 69 74 68 20 50 65 st 1987, with Pe
010C30: 74 72 20 4C 75 6B 65 73 0D 0A 20 20 2A 2A 2A 2A tr Lukes.. ****
010C40: 2A 2A 0D 0A 0D 0A 20 20 20 20 28 28 54 68 72 65 **.... ((Thre
010C50: 65 20 22 70 65 72 6D 75 74 61 74 69 6F 6E 22 20 e "permutation"
010C60: 70 72 6F 67 72 61 6D 73 20 61 72 65 20 69 6E 63 programs are inc
010C70: 6C 75 64 65 64 20 69 6E 20 74 68 65 20 6A 6F 75 luded in the jou
010C80: 72 6E 61 6C 20 74 68 69 73 20 6D 6F 6E 74 68 2E rnal this month.
010C90: 20 54 68 65 0D 0A 20 20 66 69 72 73 74 2C 20 50 The.. first, P
010CA0: 45 52 4D 53 2E 42 41 53 20 69 73 20 69 6E 20 74 ERMS.BAS is in t
010CB0: 77 6F 20 70 61 72 74 73 2E 20 54 6F 20 73 65 65 wo parts. To see
010CC0: 20 74 68 65 20 72 65 73 75 6C 74 20 6F 66 20 73 the result of s
010CD0: 74 72 75 63 74 75 72 65 64 20 42 61 73 69 63 2C tructured Basic,
010CE0: 20 72 75 6E 0D 0A 20 20 50 45 52 4D 53 2E 42 41 run.. PERMS.BA
010CF0: 53 20 69 6E 20 74 68 65 20 6E 6F 72 6D 61 6C 20 S in the normal
010D00: 6D 61 6E 6E 65 72 2E 20 57 68 65 6E 20 79 6F 75 manner. When you
010D10: 20 68 61 76 65 20 67 69 76 65 6E 20 69 74 20 73 have given it s
010D20: 6F 6D 65 20 6C 65 74 74 65 72 73 20 61 6E 64 20 ome letters and
010D30: 73 65 65 6E 0D 0A 20 20 68 6F 77 20 6D 61 6E 79 seen.. how many
010D40: 20 63 6F 6D 62 69 6E 61 74 69 6F 6E 73 20 69 74 combinations it
010D50: 20 63 61 6E 20 61 72 72 61 6E 67 65 20 74 68 65 can arrange the
010D60: 6D 20 69 6E 2C 20 68 69 74 20 45 53 43 20 45 53 m in, hit ESC ES
010D70: 43 20 61 6E 64 20 74 79 70 65 20 47 4F 54 4F 20 C and type GOTO
010D80: 33 39 30 2E 0D 0A 20 20 54 68 61 74 20 77 69 6C 390... That wil
010D90: 6C 20 72 75 6E 20 74 68 65 20 73 65 63 6F 6E 64 l run the second
010DA0: 20 70 61 72 74 20 6F 66 20 74 68 65 20 42 61 73 part of the Bas
010DB0: 69 63 20 66 69 6C 65 2C 20 74 68 65 20 75 6E 73 ic file, the uns
010DC0: 74 72 75 63 74 75 72 65 64 20 50 45 52 4D 53 2E tructured PERMS.
010DD0: 0D 0A 20 20 20 20 54 68 65 20 74 68 69 72 64 20 .. The third
010DE0: 69 73 20 50 45 52 4D 53 2E 46 54 48 2C 20 77 68 is PERMS.FTH, wh
010DF0: 69 63 68 20 20 6D 75 73 74 20 20 62 65 20 20 6C ich must be l
010E00: 4F 54 4F 73 20 62 79 20 73 65 74 74 69 6E 67 20 OTOs by setting
010E10: 66 6C 61 67 73 20 61 6E 64 20 75 73 69 6E 67 20 flags and using
010E20: 6F 74 68 65 72 20 73 74 72 61 74 65 67 65 6D 73 other strategems
010E30: 20 28 65 76 65 6E 0D 0A 20 20 6A 75 6D 70 69 6E (even.. jumpin
010E40: 67 20 20 6F 75 74 20 20 6F 66 20 20 75 6E 66 69 g out of unfi
010E50: 6E 69 73 68 65 64 20 20 6C 6F 6F 70 73 2C 20 20 nished loops,
010E60: 75 73 69 6E 67 20 20 6D 75 6C 74 69 70 6C 65 20 using multiple
010E70: 20 65 78 69 74 73 20 20 20 61 6E 64 20 20 20 73 exits and s
010E80: 69 6D 69 6C 61 72 0D 0A 20 20 61 62 6F 6D 69 6E imilar.. abomin
010E90: 61 74 69 6F 6E 73 29 20 61 6E 64 20 69 6E 20 74 ations) and in t
010EA0: 68 65 20 70 72 6F 63 65 73 73 20 61 6C 6D 6F 73 he process almos
010EB0: 74 20 74 6F 74 61 6C 6C 79 20 6F 62 73 63 75 72 t totally obscur
010EC0: 65 73 20 20 74 68 65 20 20 66 6C 6F 77 20 20 6F es the flow o
010ED0: 66 20 20 74 68 65 0D 0A 20 20 70 72 6F 67 72 61 f the.. progra
010EE0: 6D 2E 0D 0A 0D 0A 20 20 20 20 54 68 65 20 74 72 m..... The tr
010EF0: 61 64 69 74 69 6F 6E 61 6C 20 42 61 73 69 63 20 aditional Basic
010F00: 6C 61 6E 67 75 61 67 65 73 20 20 6C 61 63 6B 20 languages lack
010F10: 20 74 68 65 20 20 6E 65 63 65 73 73 61 72 79 20 the necessary
010F20: 20 63 6F 6E 74 72 6F 6C 20 20 73 74 72 75 63 74 control struct
010F30: 75 72 65 73 0D 0A 20 20 77 68 69 63 68 20 77 6F ures.. which wo
010F40: 75 6C 64 20 6D 61 6B 65 20 47 4F 54 4F 20 72 65 uld make GOTO re
010F50: 64 75 6E 64 61 6E 74 20 28 73 75 63 68 20 61 73 dundant (such as
010F60: 20 6C 6F 6E 67 20 49 66 2C 20 77 68 69 63 68 20 long If, which
010F70: 63 6F 75 6C 64 20 73 70 61 6E 20 6D 6F 72 65 20 could span more
010F80: 74 68 61 6E 0D 0A 20 20 6F 6E 65 20 6C 69 6E 65 than.. one line
010F90: 2C 20 61 6E 64 20 66 6C 65 78 69 62 6C 65 20 6C , and flexible l
010FA0: 6F 6F 70 20 20 63 6F 6E 73 74 72 75 63 74 73 29 oop constructs)
010FB0: 2E 20 20 54 68 65 20 20 75 73 65 20 20 6F 66 20 . The use of
010FC0: 20 47 4F 54 4F 20 20 69 73 20 20 74 68 65 20 20 GOTO is the
010FD0: 6F 6E 6C 79 0D 0A 20 20 73 65 6E 73 69 62 6C 65 only.. sensible
010FE0: 20 77 61 79 20 6F 66 20 69 6D 70 6C 65 6D 65 6E way of implemen
010FF0: 74 69 6E 67 20 74 68 65 6D 2E 0D 0A 0D 0A 20 20 ting them.....
011000: 6F 61 64 65 64 20 20 69 6E 74 6F 20 20 74 68 65 oaded into the
011010: 20 20 46 6F 72 74 68 20 20 6B 65 72 6E 65 6C 2C Forth kernel,
011020: 0D 0A 20 20 43 50 43 46 54 48 32 2E 42 49 4E 2E .. CPCFTH2.BIN.
011030: 20 49 74 20 69 73 20 74 68 65 20 73 74 72 75 63 It is the struc
011040: 74 75 72 65 64 20 46 6F 72 74 68 20 76 65 72 73 tured Forth vers
011050: 69 6F 6E 20 6F 66 20 22 70 65 72 6D 75 74 61 74 ion of "permutat
011060: 69 6F 6E 73 22 2E 29 29 0D 0A 0D 0A 20 20 20 20 ions".))....
011070: 50 45 52 4D 53 20 69 73 20 61 20 70 72 6F 67 72 PERMS is a progr
011080: 61 6D 20 77 68 69 63 68 20 70 72 6F 64 75 63 65 am which produce
011090: 73 20 61 6C 6C 20 70 6F 73 73 69 62 6C 65 20 70 s all possible p
0110A0: 65 72 6D 75 74 61 74 69 6F 6E 73 20 28 6F 72 64 ermutations (ord
0110B0: 65 72 69 6E 67 73 29 20 6F 66 0D 0A 20 20 61 20 erings) of.. a
0110C0: 73 74 72 69 6E 67 20 6F 66 20 65 6C 65 6D 65 6E string of elemen
0110D0: 74 73 2E 20 49 74 20 69 73 20 63 6F 64 65 64 20 ts. It is coded
0110E0: 69 6E 20 42 61 73 69 63 20 61 6E 64 20 20 46 6F in Basic and Fo
0110F0: 72 74 68 2E 20 20 42 6F 74 68 20 20 76 65 72 73 rth. Both vers
011100: 69 6F 6E 73 20 20 68 61 76 65 0D 0A 20 20 76 69 ions have.. vi
011110: 72 74 75 61 6C 6C 79 20 69 64 65 6E 74 69 63 61 rtually identica
011120: 6C 20 73 74 72 75 63 74 75 72 65 73 2E 20 53 63 l structures. Sc
011130: 72 61 62 62 6C 65 20 70 6C 61 79 65 72 73 20 61 rabble players a
011140: 6E 64 20 73 6F 6C 76 65 72 73 20 6F 66 20 77 6F nd solvers of wo
011150: 72 64 20 70 75 7A 7A 6C 65 73 0D 0A 20 20 6D 69 rd puzzles.. mi
011160: 67 68 74 20 66 69 6E 64 20 69 74 20 75 73 65 66 ght find it usef
011170: 75 6C 20 66 6F 72 20 66 69 6E 64 69 6E 67 20 77 ul for finding w
011180: 6F 72 64 73 20 69 6E 20 61 20 6A 75 6D 62 6C 65 ords in a jumble
011190: 20 6F 66 20 6C 65 74 74 65 72 73 2E 0D 0A 0D 0A of letters.....
0111A0: 20 20 20 20 54 68 65 20 6F 72 69 67 69 6E 61 6C The original
0111B0: 20 70 72 6F 67 72 61 6D 20 62 79 20 4A 6F 6E 65 program by Jone
0111C0: 73 20 69 73 20 69 6E 20 74 68 65 20 73 65 63 6F s is in the seco
0111D0: 6E 64 20 20 68 61 6C 66 20 20 6F 66 20 20 50 45 nd half of PE
0111E0: 52 4D 53 2E 42 41 53 20 20 28 66 72 6F 6D 0D 0A RMS.BAS (from..
0111F0: 20 20 6C 69 6E 65 20 33 39 30 20 6F 6E 77 61 72 line 390 onwar
011200: 20 20 4E 61 74 75 72 61 6C 6C 79 2C 20 74 68 65 Naturally, the
011210: 20 47 4F 54 4F 20 6D 75 73 74 20 61 69 6D 61 20 GOTO must aima
011220: 20 61 74 20 20 61 20 20 73 74 61 74 65 6D 65 6E at a statemen
011230: 74 20 20 77 69 74 68 69 6E 20 20 69 74 73 20 20 t within its
011240: 6F 77 6E 20 20 6D 6F 64 75 6C 65 3B 0D 0A 20 20 own module;..
011250: 6A 75 6D 70 69 6E 67 20 69 6E 74 6F 20 6F 74 68 jumping into oth
011260: 65 72 20 6D 6F 64 75 6C 65 73 20 69 73 20 64 65 er modules is de
011270: 66 69 6E 69 74 65 6C 79 20 75 6E 73 74 72 75 63 finitely unstruc
011280: 74 75 72 65 64 2E 0D 0A 0D 0A 20 20 20 20 49 6E tured..... In
011290: 63 69 64 65 6E 74 61 6C 6C 79 2C 20 65 76 65 72 cidentally, ever
0112A0: 79 20 69 74 65 72 61 74 69 6F 6E 20 63 6F 6E 74 y iteration cont
0112B0: 61 69 6E 73 20 20 61 6E 20 20 75 6E 63 6F 6E 64 ains an uncond
0112C0: 69 74 69 6F 6E 61 6C 20 20 6A 75 6D 70 20 20 64 itional jump d
0112D0: 69 73 67 75 69 73 65 64 0D 0A 20 20 77 69 74 68 isguised.. with
0112E0: 69 6E 20 74 68 65 20 73 74 72 75 63 74 75 72 65 in the structure
0112F0: 2E 0D 0A 0D 0A 20 20 20 20 55 73 65 72 73 20 6F ..... Users o
011300: 66 20 46 6F 72 74 68 20 63 61 6E 20 64 65 63 6F f Forth can deco
011310: 6D 70 69 6C 65 20 20 61 20 20 77 6F 72 64 20 20 mpile a word
011320: 77 69 74 68 20 20 61 20 20 6C 6F 6F 70 20 20 63 with a loop c
011330: 6F 6E 73 74 72 75 63 74 20 20 61 6E 64 20 20 66 onstruct and f
011340: 69 6E 64 0D 0A 20 20 22 62 72 61 6E 63 68 22 2C ind.. "branch",
011350: 20 77 68 69 63 68 20 69 73 20 73 69 6D 70 6C 79 which is simply
011360: 20 61 20 22 47 4F 54 4F 20 61 6E 20 61 64 64 72 a "GOTO an addr
011370: 65 73 73 22 2E 0D 0A 0D 0A 20 20 20 20 54 68 69 ess"..... Thi
011380: 73 20 20 68 6F 6D 69 6C 79 20 20 28 22 74 65 64 s homily ("ted
011390: 69 6F 75 73 20 20 6D 6F 72 61 6C 69 73 69 6E 67 ious moralising
0113A0: 20 20 64 69 73 63 6F 75 72 73 65 22 20 20 2D 2D discourse" --
0113B0: 20 20 54 68 65 20 20 43 6F 6E 63 69 73 65 20 20 The Concise
0113C0: 20 4F 78 66 6F 72 64 0D 0A 20 20 44 69 63 74 69 Oxford.. Dicti
0113D0: 6F 6E 61 72 79 29 20 69 73 20 74 6F 20 66 6F 72 onary) is to for
0113E0: 65 73 74 61 6C 6C 20 61 6E 79 20 61 62 75 73 65 estall any abuse
0113F0: 20 66 6F 72 20 61 70 70 6C 79 69 6E 67 20 74 68 for applying th
011400: 64 29 20 61 6E 64 20 69 73 20 68 69 67 68 6C 79 d) and is highly
011410: 20 75 6E 73 74 72 75 63 74 75 72 65 64 2E 20 4D unstructured. M
011420: 79 20 61 64 61 70 74 61 74 69 6F 6E 20 66 6F 72 y adaptation for
011430: 6D 73 20 20 74 68 65 20 20 66 69 72 73 74 0D 0A ms the first..
011440: 20 20 68 61 6C 66 20 61 6E 64 20 49 20 68 61 76 half and I hav
011450: 65 20 73 74 72 75 63 74 75 72 65 64 20 69 74 20 e structured it
011460: 73 6F 20 69 74 20 63 6F 75 6C 64 20 62 65 20 74 so it could be t
011470: 72 61 6E 73 6C 61 74 65 64 20 20 69 6E 74 6F 20 ranslated into
011480: 20 46 6F 72 74 68 2C 20 20 77 68 69 63 68 0D 0A Forth, which..
011490: 20 20 77 69 6C 6C 20 6E 6F 74 20 61 63 63 65 70 will not accep
0114A0: 74 20 75 6E 73 74 72 75 63 74 75 72 65 64 20 70 t unstructured p
0114B0: 72 6F 67 72 61 6D 6D 69 6E 67 2E 0D 0A 0D 0A 20 rogramming.....
0114C0: 20 20 20 53 74 72 75 63 74 75 72 65 64 20 70 72 Structured pr
0114D0: 6F 67 72 61 6D 6D 69 6E 67 20 69 73 20 61 20 6D ogramming is a m
0114E0: 65 74 68 6F 64 20 6F 66 20 77 72 69 74 69 6E 67 ethod of writing
0114F0: 20 70 72 6F 67 72 61 6D 73 20 77 68 69 63 68 20 programs which
011500: 61 72 65 20 20 65 61 73 79 20 20 74 6F 0D 0A 20 are easy to..
011510: 20 64 65 62 75 67 20 61 6E 64 20 74 6F 20 6D 61 debug and to ma
011520: 69 6E 74 61 69 6E 2E 20 49 74 20 69 6E 76 6F 6C intain. It invol
011530: 76 65 73 20 64 69 76 69 64 69 6E 67 20 74 68 65 ves dividing the
011540: 20 20 74 61 73 6B 20 20 69 6E 74 6F 20 20 69 74 task into it
011550: 73 20 20 63 6F 6D 70 6F 6E 65 6E 74 73 0D 0A 20 s components..
011560: 20 28 69 6E 69 74 69 61 6C 69 73 65 2C 20 69 6E (initialise, in
011570: 70 75 74 2C 20 70 72 6F 63 65 73 73 2C 20 6F 75 put, process, ou
011580: 74 70 75 74 2C 20 63 6C 6F 73 65 29 20 61 6E 64 tput, close) and
011590: 20 20 64 65 73 69 67 6E 69 6E 67 20 20 61 20 20 designing a
0115A0: 68 69 65 72 61 72 63 68 79 20 20 6F 66 0D 0A 20 hierarchy of..
0115B0: 20 6D 6F 64 75 6C 65 73 2C 20 65 61 63 68 20 77 modules, each w
0115C0: 69 74 68 20 69 74 73 20 6F 77 6E 20 77 65 6C 6C ith its own well
0115D0: 2D 64 65 66 69 6E 65 64 20 74 61 73 6B 2C 20 6F -defined task, o
0115E0: 6E 65 20 65 6E 74 72 79 20 61 6E 64 20 6F 6E 65 ne entry and one
0115F0: 20 65 78 69 74 20 20 70 6F 69 6E 74 2C 0D 0A 20 exit point,..
011600: 65 20 74 65 72 6D 20 22 73 74 72 75 63 74 75 72 e term "structur
011610: 65 64 22 20 20 74 6F 0D 0A 20 20 61 20 70 72 6F ed" to.. a pro
011620: 67 72 61 6D 20 77 68 69 63 68 20 75 74 69 6C 69 gram which utili
011630: 73 65 73 20 47 4F 54 4F 73 2E 0D 0A 0D 0A 20 20 ses GOTOs.....
011640: 20 20 41 66 74 65 72 20 6C 6F 61 64 69 6E 67 20 After loading
011650: 50 45 52 4D 53 2E 46 54 48 20 69 6E 74 6F 20 74 PERMS.FTH into t
011660: 68 65 20 20 6B 65 72 6E 65 6C 2C 20 20 62 65 67 he kernel, beg
011670: 69 6E 20 20 74 68 65 20 20 72 6F 75 74 69 6E 65 in the routine
011680: 20 20 62 79 20 20 74 79 70 69 6E 67 0D 0A 20 20 by typing..
011690: 2F 70 65 72 6D 73 2F 2E 20 49 74 20 63 61 6E 20 /perms/. It can
0116A0: 62 65 20 20 73 74 75 64 69 65 64 20 20 66 72 6F be studied fro
0116B0: 6D 20 20 74 68 65 20 20 63 6F 6D 6D 61 6E 64 20 m the command
0116C0: 20 6D 6F 64 65 20 20 62 79 20 20 74 79 70 69 6E mode by typin
0116D0: 67 20 20 2F 31 5F 6C 69 73 74 2F 2C 0D 0A 20 20 g /1_list/,..
0116E0: 2F 32 5F 6C 69 73 74 2F 2C 20 65 74 63 2E 0D 0A /2_list/, etc...
0116F0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
011700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A **
011710: 2A 2A 2A 2A 0D 0A 1A 20 20 20 20 20 20 20 20 20 ****...
011720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
011730: 20 2A 2A 2A 2A 2A 2A 0D 0A 1A F0 F4 0D 00 00 70 ******........p
011740: FA F4 0F 29 2C FF 0C 28 0D 00 00 F8 F7 1A 00 01 ...),..(........
011750: 29 01 C9 00 00 00 1A 34 20 54 61 73 6D 61 6E 20 )......4 Tasman
011760: 53 6F 66 74 77 61 72 65 20 4C 74 64 2E 0D 0A 0D Software Ltd....
011770: 0A 20 20 54 68 69 73 20 41 6D 73 77 6F 72 64 20 . This Amsword
011780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0117A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0117B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0117C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0117D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0117E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0117F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011800: 20 6F 6E 6C 79 20 72 65 63 65 69 76 69 6E 67 20 only receiving
011810: 61 6E 64 20 72 65 74 75 72 6E 69 6E 67 20 70 72 and returning pr
011820: 6F 63 65 73 73 65 64 20 64 61 74 61 20 74 6F 20 ocessed data to
011830: 69 74 73 20 63 6F 6E 74 72 6F 6C 6C 69 6E 67 20 its controlling
011840: 6D 6F 64 75 6C 65 2E 0D 0A 0D 0A 20 20 20 20 53 module..... S
011850: 75 63 68 20 20 64 65 73 69 67 6E 20 20 70 72 6F uch design pro
011860: 64 75 63 65 73 20 20 53 74 72 75 63 74 75 72 65 duces Structure
011870: 20 20 43 68 61 72 74 73 2C 20 20 20 77 68 69 63 Charts, whic
011880: 68 20 20 20 73 68 6F 77 20 20 20 74 68 65 20 20 h show the
011890: 20 6F 76 65 72 2D 61 6C 6C 0D 0A 20 20 6F 72 67 over-all.. org
0118A0: 61 6E 69 73 61 74 69 6F 6E 20 6F 66 20 74 68 65 anisation of the
0118B0: 20 70 72 6F 67 72 61 6D 2E 20 53 6F 6D 65 20 6D program. Some m
0118C0: 6F 64 75 6C 65 73 20 6D 61 79 20 6E 65 65 64 20 odules may need
0118D0: 6D 6F 72 65 20 20 64 65 74 61 69 6C 69 6E 67 20 more detailing
0118E0: 20 6F 6E 20 20 46 6C 6F 77 0D 0A 20 20 43 68 61 on Flow.. Cha
0118F0: 72 74 73 20 6F 72 20 69 6E 20 50 73 65 75 64 6F rts or in Pseudo
011900: 63 6F 64 65 2E 20 41 74 20 61 20 6C 6F 77 65 72 code. At a lower
011910: 20 6C 65 76 65 6C 2C 20 74 68 65 20 6D 6F 64 75 level, the modu
011920: 6C 65 73 20 73 68 6F 75 6C 64 20 62 65 20 63 6F les should be co
011930: 64 65 64 20 75 73 69 6E 67 0D 0A 20 20 6F 6E 6C ded using.. onl
011940: 79 20 74 68 65 20 74 68 72 65 65 20 73 74 72 75 y the three stru
011950: 63 74 75 72 65 73 20 77 68 69 63 68 20 61 72 65 ctures which are
011960: 20 6E 65 63 65 73 73 61 72 79 20 74 6F 20 65 78 necessary to ex
011970: 70 72 65 73 73 20 70 72 6F 67 72 61 6D 6D 69 6E press programmin
011980: 67 20 6C 6F 67 69 63 2C 0D 0A 20 20 72 65 67 61 g logic,.. rega
011990: 72 64 6C 65 73 73 20 6F 66 20 69 74 73 20 63 6F rdless of its co
0119A0: 6D 70 6C 65 78 69 74 79 20 28 70 72 6F 76 65 6E mplexity (proven
0119B0: 20 62 79 20 42 6F 68 6D 20 61 6E 64 20 20 4A 61 by Bohm and Ja
0119C0: 63 6F 70 69 6E 69 20 20 69 6E 20 20 31 39 36 34 copini in 1964
0119D0: 29 2E 20 20 54 68 65 79 0D 0A 20 20 61 72 65 3A ). They.. are:
0119E0: 20 20 53 45 51 55 45 4E 43 45 20 20 28 65 78 65 SEQUENCE (exe
0119F0: 63 75 74 69 6E 67 20 20 20 6F 6E 65 20 20 20 73 cuting one s
011A00: 20 20 2A 2A 2A 2A 2A 2A 0D 0A 20 20 2B 2B 2B 2B ******.. ++++
011A10: 2B 2B 20 49 6E 74 72 6F 64 75 63 74 69 6F 6E 20 ++ Introduction
011A20: 74 6F 20 74 68 65 20 46 6F 72 74 68 20 6C 61 6E to the Forth lan
011A30: 67 75 61 67 65 2C 20 50 61 72 74 20 33 2C 20 41 guage, Part 3, A
011A40: 75 67 75 73 74 20 31 39 38 37 0D 0A 20 20 2A 2A ugust 1987.. **
011A50: 2A 2A 2A 2A 0D 0A 0D 0A 20 20 20 20 49 6E 20 74 ****.... In t
011A60: 68 65 20 70 72 65 76 69 6F 75 73 20 73 65 67 6D he previous segm
011A70: 65 6E 74 20 77 65 20 6C 6F 6F 6B 65 64 20 61 74 ent we looked at
011A80: 20 63 72 65 61 74 69 6E 67 20 77 6F 72 64 73 20 creating words
011A90: 69 6E 20 46 6F 72 74 68 20 61 6E 64 20 20 73 6F in Forth and so
011AA0: 6D 65 20 20 6F 66 0D 0A 20 20 74 68 65 20 28 73 me of.. the (s
011AB0: 6D 75 64 67 65 2C 20 73 6D 75 64 67 65 2C 20 77 mudge, smudge, w
011AC0: 69 6E 6B 2C 20 77 69 6E 6B 29 20 63 6F 6D 6D 6F ink, wink) commo
011AD0: 6E 20 77 6F 72 64 73 20 61 6E 64 20 77 6F 72 64 n words and word
011AE0: 2D 73 79 6D 62 6F 6C 73 2E 20 4E 6F 77 20 77 65 -symbols. Now we
011AF0: 20 20 6D 6F 76 65 0D 0A 20 20 61 6C 6F 6E 67 20 move.. along
011B00: 74 6F 20 74 68 65 20 61 6C 6C 20 69 6D 70 6F 72 to the all impor
011B10: 74 61 6E 74 20 73 74 61 63 6B 73 2E 20 46 6F 72 tant stacks. For
011B20: 74 68 20 68 61 73 20 20 74 77 6F 20 20 73 74 61 th has two sta
011B30: 63 6B 73 2C 20 20 62 6F 74 68 20 20 75 73 69 6E cks, both usin
011B40: 67 20 20 74 68 65 0D 0A 20 20 6C 61 73 74 2D 69 g the.. last-i
011B50: 6E 20 20 66 69 72 73 74 2D 6F 75 74 20 20 28 6F n first-out (o
011B60: 72 20 20 4C 49 46 4F 29 20 20 70 72 69 6E 63 69 r LIFO) princi
011B70: 70 6C 65 2E 20 20 54 68 65 20 20 50 61 72 61 6D ple. The Param
011B80: 65 74 65 72 20 20 73 74 61 63 6B 20 20 69 73 20 eter stack is
011B90: 20 77 68 65 72 65 0D 0A 20 20 63 61 6C 63 75 6C where.. calcul
011BA0: 61 74 69 6F 6E 73 20 61 6E 64 20 6F 70 65 72 61 ations and opera
011BB0: 74 69 6F 6E 73 20 61 72 65 20 70 65 72 66 6F 72 tions are perfor
011BC0: 6D 65 64 2E 20 54 68 65 20 52 65 74 75 72 6E 20 med. The Return
011BD0: 73 74 61 63 6B 20 69 73 20 20 77 68 65 72 65 20 stack is where
011BE0: 20 46 6F 72 74 68 0D 0A 20 20 73 74 6F 72 65 73 Forth.. stores
011BF0: 20 61 64 64 72 65 73 73 65 73 20 61 6E 64 20 6C addresses and l
011C00: 74 61 74 65 6D 65 6E 74 20 20 20 61 66 74 65 72 tatement after
011C10: 20 20 20 61 6E 6F 74 68 65 72 29 2C 20 20 20 53 another), S
011C20: 45 4C 45 43 54 49 4F 4E 0D 0A 20 20 28 69 66 2D ELECTION.. (if-
011C30: 74 68 65 6E 2D 65 6C 73 65 29 20 61 6E 64 20 49 then-else) and I
011C40: 54 45 52 41 54 49 4F 4E 20 28 64 6F 2D 6C 6F 6F TERATION (do-loo
011C50: 70 73 29 2E 0D 0A 0D 0A 20 20 20 20 49 6E 20 31 ps)..... In 1
011C60: 39 36 38 20 61 20 6C 65 74 74 65 72 20 20 62 79 968 a letter by
011C70: 20 20 50 72 6F 66 65 73 73 6F 72 20 20 44 69 6A Professor Dij
011C80: 6B 73 74 72 61 2C 20 20 22 47 4F 20 20 54 4F 20 kstra, "GO TO
011C90: 20 53 74 61 74 65 6D 65 6E 74 20 20 43 6F 6E 73 Statement Cons
011CA0: 69 64 65 72 65 64 0D 0A 20 20 48 61 72 6D 66 75 idered.. Harmfu
011CB0: 6C 22 2C 20 61 64 76 6F 63 61 74 65 64 20 74 68 l", advocated th
011CC0: 65 20 61 62 6F 6C 69 74 69 6F 6E 20 6F 66 20 47 e abolition of G
011CD0: 4F 54 4F 20 66 72 6F 6D 20 20 61 6C 6C 20 20 6C OTO from all l
011CE0: 61 6E 67 75 61 67 65 73 2E 20 20 53 69 6E 63 65 anguages. Since
011CF0: 20 20 74 68 65 6E 0D 0A 20 20 6D 61 6E 79 20 70 then.. many p
011D00: 65 6F 70 6C 65 20 68 61 76 65 20 65 71 75 61 74 eople have equat
011D10: 65 64 20 47 4F 54 4F 2D 6C 65 73 73 20 70 72 6F ed GOTO-less pro
011D20: 67 72 61 6D 6D 69 6E 67 20 77 69 74 68 20 73 74 gramming with st
011D30: 72 75 63 74 75 72 65 64 20 20 70 72 6F 67 72 61 ructured progra
011D40: 6D 6D 69 6E 67 2C 0D 0A 20 20 77 68 69 63 68 2C mming,.. which,
011D50: 20 6F 66 20 63 6F 75 72 73 65 2C 20 69 6D 70 6C of course, impl
011D60: 69 65 73 20 6D 75 63 68 20 6D 6F 72 65 2E 20 45 ies much more. E
011D70: 76 65 72 79 20 6E 6F 77 20 61 6E 64 20 74 68 65 very now and the
011D80: 6E 20 61 20 6D 61 67 61 7A 69 6E 65 20 70 75 62 n a magazine pub
011D90: 6C 69 73 68 65 73 0D 0A 20 20 61 20 42 61 73 69 lishes.. a Basi
011DA0: 63 20 47 4F 54 4F 2D 6C 65 73 73 20 70 72 6F 67 c GOTO-less prog
011DB0: 72 61 6D 20 69 6E 20 77 68 69 63 68 20 74 68 65 ram in which the
011DC0: 20 61 75 74 68 6F 72 20 68 61 73 20 65 6E 67 61 author has enga
011DD0: 67 65 64 20 20 69 6E 20 20 65 78 74 72 61 6F 72 ged in extraor
011DE0: 64 69 6E 61 72 79 0D 0A 20 20 63 6F 6E 74 6F 72 dinary.. contor
011DF0: 74 69 6F 6E 73 20 74 6F 20 61 76 6F 69 64 20 47 tions to avoid G
011E00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
011E10: 0F 00 01 00 02 09 4E E5 0F 00 C1 02 00 00 00 02 ......N.........
011E20: 0F 00 C6 02 00 00 00 02 0F 00 C2 02 00 00 00 02 ................
011E30: 0F 00 C7 02 00 00 00 02 0F 00 C3 02 00 00 00 02 ................
011E40: 0F 00 C8 02 00 00 00 02 0F 00 C4 02 00 00 00 02 ................
011E50: 0F 00 C9 02 00 00 00 02 0F 00 C5 02 00 00 00 02 ................
011E60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011E70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011E80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011E90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011F00: 69 6E 6B 61 67 65 20 69 6E 66 6F 72 6D 61 74 69 inkage informati
011F10: 6F 6E 2E 0D 0A 0D 0A 20 20 20 20 49 6E 20 6D 6F on..... In mo
011F20: 73 74 20 6C 61 6E 67 61 67 75 65 73 2C 20 65 78 st langagues, ex
011F30: 63 65 70 74 20 6D 61 63 68 69 6E 65 20 63 6F 64 cept machine cod
011F40: 65 20 70 72 6F 67 72 61 6D 6D 69 6E 67 2C 20 74 e programming, t
011F50: 68 65 20 6F 70 65 72 61 74 69 6E 67 20 20 73 79 he operating sy
011F60: 73 74 65 6D 73 0D 0A 20 20 6C 6F 6F 6B 20 61 66 stems.. look af
011F70: 74 65 72 20 74 68 65 20 73 74 61 63 6B 73 2E 20 ter the stacks.
011F80: 49 6E 20 46 6F 72 74 68 2C 20 6C 69 6B 65 20 6D In Forth, like m
011F90: 61 63 68 69 6E 65 20 63 6F 64 65 2C 20 74 68 65 achine code, the
011FA0: 20 70 72 6F 67 72 61 6D 65 72 20 68 61 73 20 20 programer has
011FB0: 74 68 6F 73 65 0D 0A 20 20 77 6F 72 72 69 65 73 those.. worries
011FC0: 2E 20 4F 6E 20 74 68 65 20 63 72 65 64 69 74 20 . On the credit
011FD0: 73 69 64 65 20 69 73 20 66 61 73 74 65 72 20 63 side is faster c
011FE0: 6F 64 65 20 77 68 65 6E 20 74 68 65 20 70 72 6F ode when the pro
011FF0: 67 72 61 6D 20 69 73 20 72 75 6E 2E 0D 0A 0D 0A gram is run.....
012000: 20 20 20 20 42 65 66 6F 72 65 20 67 6F 69 6E 67 Before going
012010: 20 69 6E 74 6F 20 74 68 65 20 73 74 61 63 6B 2C into the stack,
012020: 20 6C 65 74 27 73 20 61 64 64 20 74 68 65 20 77 let's add the w
012030: 6F 72 64 20 20 2F 70 65 65 6B 2F 20 20 74 6F 20 ord /peek/ to
012040: 20 74 68 65 20 20 6B 65 72 6E 65 6C 27 73 0D 0A the kernel's..
012050: 20 20 76 6F 63 61 62 75 6C 61 72 79 3A 0D 0A 20 vocabulary:..
012060: 20 20 20 3A 20 70 65 65 6B 20 63 72 20 63 72 20 : peek cr cr
012070: 31 2B 20 73 77 61 70 20 64 6F 20 69 20 63 40 20 1+ swap do i c@
012080: 2E 20 6C 6F 6F 70 20 63 72 20 63 72 20 3B 0D 0A . loop cr cr ;..
012090: 20 20 20 20 28 52 65 6D 65 6D 62 65 72 20 74 68 (Remember th
0120A0: 61 74 20 73 70 61 63 65 73 20 61 72 65 20 69 6D at spaces are im
0120B0: 70 6F 72 74 61 6E 74 20 69 6E 20 46 6F 72 74 68 portant in Forth
0120C0: 20 61 6E 64 20 74 68 61 74 20 40 20 63 68 61 72 and that @ char
0120D0: 61 63 74 65 72 20 6E 65 78 74 20 20 74 6F 0D 0A acter next to..
0120E0: 20 20 74 68 65 20 63 20 69 73 20 74 6F 20 74 68 the c is to th
0120F0: 65 20 72 69 67 68 74 20 6F 66 20 74 68 65 20 22 e right of the "
012100: 77 65 6E 74 20 77 65 6C 6C 20 28 77 68 79 20 64 went well (why d
012110: 69 64 20 4D 72 20 53 75 67 61 72 20 72 65 6E 61 id Mr Sugar rena
012120: 6D 65 20 74 68 65 20 45 4E 54 45 52 20 6B 65 79 me the ENTER key
012130: 3F 29 2C 20 77 65 20 20 73 68 6F 75 6C 64 20 20 ?), we should
012140: 67 65 74 0D 0A 20 20 31 32 20 32 35 20 6F 6B 20 get.. 12 25 ok
012150: 77 68 65 6E 20 77 65 20 65 6E 74 65 72 20 2F 2E when we enter /.
012160: 73 2F 2E 0D 0A 0D 0A 20 20 20 20 49 74 20 73 65 s/..... It se
012170: 65 6D 73 20 74 68 61 74 20 69 6E 20 74 68 65 20 ems that in the
012180: 55 4B 20 61 72 74 69 63 6C 65 2C 20 74 68 65 20 UK article, the
012190: 74 6F 70 20 6F 66 20 73 74 61 63 6B 20 28 54 4F top of stack (TO
0121A0: 53 29 20 20 69 73 20 20 6F 6E 20 20 74 68 65 20 S) is on the
0121B0: 20 6C 65 66 74 0D 0A 20 20 73 69 64 65 2E 20 46 left.. side. F
0121C0: 6F 72 67 69 76 65 20 6D 65 20 69 66 20 49 27 6D orgive me if I'm
0121D0: 20 6D 69 73 74 61 6B 65 6E 2C 20 62 75 74 20 74 mistaken, but t
0121E0: 68 65 20 54 4F 53 20 6F 6E 20 6D 79 20 6D 61 63 he TOS on my mac
0121F0: 68 69 6E 65 20 69 73 20 6F 6E 20 74 68 65 20 72 hine is on the r
012200: 69 67 68 74 2E 0D 0A 20 20 49 20 74 68 6F 75 67 ight... I thoug
012210: 68 74 20 61 74 20 66 69 72 73 74 20 69 74 20 6D ht at first it m
012220: 61 79 20 62 65 20 64 75 65 20 74 6F 20 74 68 65 ay be due to the
012230: 20 50 6F 6D 6D 79 20 69 64 65 61 20 6F 66 20 64 Pommy idea of d
012240: 72 69 76 69 6E 67 20 20 6F 6E 20 20 74 68 65 20 riving on the
012250: 20 6C 65 66 74 0D 0A 20 20 73 69 64 65 20 6F 66 left.. side of
012260: 20 74 68 65 20 72 6F 61 64 2C 20 75 6E 74 69 6C the road, until
012270: 20 49 20 72 65 6D 65 6D 62 65 72 65 64 20 74 68 I remembered th
012280: 61 74 20 41 75 73 73 69 65 27 73 20 64 6F 20 20 at Aussie's do
012290: 74 68 61 74 2C 20 20 74 6F 6F 2E 20 20 41 68 68 that, too. Ahh
0122A0: 2C 20 20 74 6F 0D 0A 20 20 73 70 65 6E 64 20 66 , to.. spend f
0122B0: 69 76 65 20 6D 69 6E 75 74 65 73 20 69 6E 20 61 ive minutes in a
0122C0: 20 77 6F 72 6C 64 20 77 69 74 68 20 61 74 20 6C world with at l
0122D0: 65 61 73 74 20 31 20 64 65 67 72 65 65 20 6F 66 east 1 degree of
0122E0: 20 63 6F 6E 66 6F 72 6D 69 74 79 21 0D 0A 0D 0A conformity!....
0122F0: 20 20 20 20 59 6F 75 20 70 72 6F 62 61 62 6C 79 You probably
012300: 50 22 20 6F 6E 20 74 68 65 20 6B 65 79 62 6F 61 P" on the keyboa
012310: 72 64 2E 20 57 61 74 63 68 20 22 64 6F 74 22 20 rd. Watch "dot"
012320: 61 66 74 65 72 20 74 68 65 20 40 2E 29 0D 0A 0D after the @.)...
012330: 0A 20 20 20 20 54 68 65 20 55 4B 20 41 6D 73 74 . The UK Amst
012340: 72 61 64 20 55 73 65 72 20 67 69 76 65 73 20 75 rad User gives u
012350: 73 20 61 20 22 70 72 69 6E 74 20 73 74 61 63 6B s a "print stack
012360: 22 20 77 6F 72 64 2C 20 6B 6E 6F 77 6E 20 61 73 " word, known as
012370: 20 2F 2E 73 2F 2C 20 20 62 75 74 20 20 77 65 0D /.s/, but we.
012380: 0A 20 20 68 61 76 65 20 69 74 20 61 6C 72 65 61 . have it alrea
012390: 64 79 2E 20 49 6E 63 69 64 65 6E 74 61 6C 6C 79 dy. Incidentally
0123A0: 2C 20 69 66 20 79 6F 75 20 68 61 76 65 20 74 68 , if you have th
0123B0: 61 74 20 61 72 74 69 63 6C 65 2C 20 41 70 72 69 at article, Apri
0123C0: 6C 20 27 38 35 20 20 55 4B 20 20 6D 61 67 2C 0D l '85 UK mag,.
0123D0: 0A 20 20 64 6F 6E 27 74 20 74 79 70 65 20 69 6E . don't type in
0123E0: 20 74 68 65 20 2E 73 20 6C 69 73 74 69 6E 67 2E the .s listing.
0123F0: 20 49 74 20 63 6F 6E 74 61 69 6E 73 20 77 6F 72 It contains wor
012400: 64 73 20 6E 6F 74 20 69 6E 20 20 6F 75 72 20 20 ds not in our
012410: 76 6F 63 61 62 75 6C 61 72 79 2E 20 20 49 6E 0D vocabulary. In.
012420: 0A 20 20 66 61 63 74 2C 20 6D 6F 73 74 20 6F 66 . fact, most of
012430: 20 74 68 65 20 61 72 74 69 63 6C 65 20 69 73 20 the article is
012440: 6C 69 74 74 65 72 65 64 20 77 69 74 68 20 65 72 littered with er
012450: 72 6F 72 73 20 61 73 20 20 77 65 6C 6C 20 20 61 rors as well a
012460: 73 20 20 61 20 20 64 69 66 66 65 72 65 6E 74 0D s a different.
012470: 0A 20 20 76 6F 63 61 62 75 6C 61 72 79 2E 0D 0A . vocabulary...
012480: 0D 0A 20 20 20 20 54 68 65 20 6E 65 77 20 77 6F .. The new wo
012490: 72 64 20 77 65 20 63 72 65 61 74 65 64 2C 20 70 rd we created, p
0124A0: 65 65 6B 2C 20 69 73 20 73 69 6D 69 6C 61 72 20 eek, is similar
0124B0: 74 6F 20 50 45 45 4B 20 69 6E 20 42 61 73 69 63 to PEEK in Basic
0124C0: 20 61 6E 64 20 69 73 20 75 73 65 64 20 20 69 6E and is used in
0124D0: 0D 0A 20 20 74 68 65 20 73 61 6D 65 20 77 61 79 .. the same way
0124E0: 2C 20 74 6F 20 6C 6F 6F 6B 20 61 74 20 77 68 61 , to look at wha
0124F0: 74 20 69 73 20 69 6E 20 61 20 6D 65 6D 6F 72 79 t is in a memory
012500: 20 77 69 6C 6C 20 73 6F 6F 6E 20 74 69 72 65 20 will soon tire
012510: 28 74 79 72 65 3F 29 20 6F 66 20 65 6E 74 65 72 (tyre?) of enter
012520: 69 6E 67 20 6E 75 6D 62 65 72 73 2C 20 74 68 65 ing numbers, the
012530: 6E 20 74 79 70 69 6E 67 20 2F 2E 73 2F 2C 0D 0A n typing /.s/,..
012540: 20 20 73 6F 20 6C 65 74 27 73 20 6D 61 72 63 68 so let's march
012550: 20 6F 6E 2E 20 57 65 20 63 61 6E 20 6C 6F 6F 6B on. We can look
012560: 20 61 74 20 2F 64 75 70 2F 2C 20 20 2F 64 72 6F at /dup/, /dro
012570: 70 2F 2C 20 20 2F 73 77 61 70 2F 20 20 28 6E 6F p/, /swap/ (no
012580: 2C 20 20 69 74 20 20 69 73 20 20 6E 6F 74 0D 0A , it is not..
012590: 20 20 73 77 6F 70 29 2C 20 2F 6F 76 65 72 2F 20 swop), /over/
0125A0: 61 6E 64 20 2F 72 6F 74 2F 2C 20 65 6E 74 65 72 and /rot/, enter
0125B0: 69 6E 67 20 6E 75 6D 62 65 72 73 2C 20 74 68 65 ing numbers, the
0125C0: 6E 20 75 73 69 6E 67 20 20 2F 2E 73 2F 20 20 74 n using /.s/ t
0125D0: 6F 20 20 70 72 6F 76 65 20 20 74 68 65 79 0D 0A o prove they..
0125E0: 20 20 72 65 61 6C 6C 79 20 77 6F 72 6B 2E 20 57 really work. W
0125F0: 65 20 63 6F 75 6C 64 20 61 6C 73 6F 20 70 72 6F e could also pro
012600: 76 65 20 74 68 61 74 20 54 4F 53 20 69 73 20 6F ve that TOS is o
012610: 6E 20 74 68 65 20 72 69 67 68 74 20 28 6F 72 20 n the right (or
012620: 69 73 20 20 69 74 20 20 6C 65 66 74 29 2C 0D 0A is it left),..
012630: 20 20 73 6F 20 6B 65 65 70 20 79 6F 75 72 20 6D so keep your m
012640: 69 6E 64 73 20 6F 70 65 6E 2E 0D 0A 0D 0A 20 20 inds open.....
012650: 20 20 44 55 50 20 77 69 6C 6C 20 64 75 70 6C 69 DUP will dupli
012660: 63 61 74 65 20 74 68 65 20 6E 75 6D 62 65 72 20 cate the number
012670: 63 75 72 72 65 6E 74 6C 79 20 54 4F 53 2E 20 42 currently TOS. B
012680: 65 67 69 6E 20 20 77 69 74 68 20 20 61 6E 20 20 egin with an
012690: 65 6D 70 74 79 20 20 73 74 61 63 6B 0D 0A 20 20 empty stack..
0126A0: 2F 73 70 21 2F 20 61 6E 64 20 65 6E 74 65 72 20 /sp!/ and enter
0126B0: 20 31 30 5F 31 32 2E 20 20 45 6E 74 65 72 20 20 10_12. Enter
0126C0: 2F 64 75 70 5F 2E 73 2F 20 20 61 6E 64 20 20 72 /dup_.s/ and r
0126D0: 65 61 64 20 20 74 68 65 20 20 72 65 73 75 6C 74 ead the result
0126E0: 20 20 28 49 27 6D 20 20 74 6F 6F 0D 0A 20 20 65 (I'm too.. e
0126F0: 6D 62 61 72 72 61 73 73 65 64 20 74 6F 20 6C 6F mbarrassed to lo
012700: 20 6C 6F 63 61 74 69 6F 6E 2E 20 41 6C 6C 20 77 location. All w
012710: 65 20 6E 65 65 64 20 20 64 6F 20 20 69 73 0D 0A e need do is..
012720: 20 20 73 74 61 74 65 20 74 68 65 20 73 74 61 72 state the star
012730: 74 20 61 6E 64 20 65 6E 64 20 61 64 64 72 65 73 t and end addres
012740: 73 65 73 2E 20 46 6F 72 20 65 78 61 6D 70 6C 65 ses. For example
012750: 2C 20 2F 31 5F 31 30 30 5F 70 65 65 6B 2F 20 20 , /1_100_peek/
012760: 77 69 6C 6C 20 20 67 69 76 65 20 20 75 73 0D 0A will give us..
012770: 20 20 74 68 65 20 63 6F 6E 74 65 6E 74 73 20 6F the contents o
012780: 66 20 74 68 65 20 66 69 72 73 74 20 20 31 30 30 f the first 100
012790: 20 20 6D 65 6D 6F 72 79 20 20 6C 6F 63 61 74 69 memory locati
0127A0: 6F 6E 73 2E 20 20 52 65 6D 65 6D 62 65 72 20 20 ons. Remember
0127B0: 74 68 65 20 20 75 6E 64 65 72 6C 69 6E 65 0D 0A the underline..
0127C0: 20 20 73 79 6D 62 6F 6C 20 69 73 20 75 73 65 64 symbol is used
0127D0: 20 74 6F 20 69 6E 64 69 63 61 74 65 20 61 20 22 to indicate a "
0127E0: 73 70 61 63 65 22 20 2D 2D 20 64 6F 6E 27 74 20 space" -- don't
0127F0: 74 79 70 65 20 69 6E 20 74 68 65 20 75 6E 64 65 type in the unde
012800: 72 6C 69 6E 65 2E 20 49 66 20 20 79 6F 75 0D 0A rline. If you..
012810: 20 20 68 61 76 65 20 61 20 6A 75 6D 62 6C 65 20 have a jumble
012820: 6F 66 20 6E 75 6D 62 65 72 73 20 6F 6E 20 74 68 of numbers on th
012830: 65 20 73 63 72 65 65 6E 2C 20 74 68 61 74 27 73 e screen, that's
012840: 20 67 6F 6F 64 2C 20 62 75 74 20 64 6F 6E 27 74 good, but don't
012850: 20 61 73 6B 20 20 6D 65 20 20 77 68 61 74 0D 0A ask me what..
012860: 20 20 74 6F 20 64 6F 20 77 69 74 68 20 74 68 65 to do with the
012870: 6D 2E 20 4A 75 73 74 20 61 64 6D 69 72 65 20 74 m. Just admire t
012880: 68 65 6D 20 77 69 74 68 20 74 68 61 74 20 73 6D hem with that sm
012890: 75 67 20 6C 6F 6F 6B 20 6F 66 20 73 75 63 63 65 ug look of succe
0128A0: 73 73 2E 0D 0A 0D 0A 20 20 20 20 53 6F 20 74 68 ss..... So th
0128B0: 61 74 20 69 73 20 61 6C 6C 20 74 68 65 72 65 20 at is all there
0128C0: 69 73 20 74 6F 20 69 74 2E 20 4E 6F 77 20 6F 6E is to it. Now on
0128D0: 20 74 6F 20 2F 2E 73 2F 20 77 68 69 63 68 20 69 to /.s/ which i
0128E0: 73 20 6D 6F 72 65 20 20 65 6E 74 65 72 74 61 69 s more entertai
0128F0: 6E 69 6E 67 2E 0D 0A 20 20 41 73 20 77 65 20 73 ning... As we s
012900: 6F 6B 29 2E 0D 0A 0D 0A 20 20 20 20 44 55 50 20 ok)..... DUP
012910: 63 72 6F 70 73 20 75 70 20 66 72 65 71 75 65 6E crops up frequen
012920: 74 6C 79 20 69 6E 20 46 6F 72 74 68 2C 20 73 6F tly in Forth, so
012930: 20 72 65 6D 65 6D 62 65 72 20 74 68 61 74 20 69 remember that i
012940: 74 20 64 75 70 6C 69 63 61 74 65 73 2E 20 20 50 t duplicates. P
012950: 65 72 68 61 70 73 0D 0A 20 20 77 65 20 73 68 6F erhaps.. we sho
012960: 75 6C 64 20 63 68 61 6E 67 65 20 69 74 20 74 6F uld change it to
012970: 20 52 41 42 42 49 54 2E 20 57 68 65 6E 20 61 20 RABBIT. When a
012980: 6E 75 6D 62 65 72 20 6F 6E 20 74 68 65 20 54 4F number on the TO
012990: 53 20 69 73 20 70 72 69 6E 74 65 64 20 6F 75 74 S is printed out
0129A0: 20 6F 72 20 20 61 0D 0A 20 20 74 65 73 74 20 69 or a.. test i
0129B0: 73 20 64 6F 6E 65 20 6F 6E 20 69 74 2C 20 74 68 s done on it, th
0129C0: 61 74 20 6E 75 6D 62 65 72 20 69 73 20 72 65 6D at number is rem
0129D0: 6F 76 65 64 20 66 72 6F 6D 20 74 68 65 20 54 4F oved from the TO
0129E0: 53 2E 20 49 66 20 79 6F 75 20 77 61 6E 74 20 74 S. If you want t
0129F0: 6F 20 6B 65 65 70 0D 0A 20 20 69 74 20 74 68 65 o keep.. it the
012A00: 72 65 2C 20 79 6F 75 20 6D 75 73 74 20 44 55 50 re, you must DUP
012A10: 20 69 74 20 74 6F 20 6B 65 65 70 20 61 20 63 6F it to keep a co
012A20: 70 79 2E 20 41 6E 6F 74 68 65 72 20 77 6F 72 64 py. Another word
012A30: 2C 20 2F 64 64 75 70 2F 2C 20 63 6F 70 69 65 73 , /ddup/, copies
012A40: 20 61 20 20 33 32 0D 0A 20 20 62 69 74 20 6E 75 a 32.. bit nu
012A50: 6D 62 65 72 20 74 68 61 74 20 69 73 20 20 54 4F mber that is TO
012A60: 53 2E 20 20 49 74 20 20 79 6F 75 20 20 77 61 6E S. It you wan
012A70: 74 20 20 74 6F 20 20 63 72 65 61 74 65 20 20 44 t to create D
012A80: 44 55 50 2C 20 20 79 6F 75 20 20 77 6F 75 6C 64 DUP, you would
012A90: 20 20 74 79 70 65 0D 0A 20 20 3A 5F 64 64 75 70 type.. :_ddup
012AA0: 5F 6F 76 65 72 5F 20 6F 76 65 72 5F 3B 20 62 75 _over_ over_; bu
012AB0: 74 20 79 6F 75 20 73 68 6F 75 6C 64 6E 27 74 20 t you shouldn't
012AC0: 68 61 76 65 20 74 6F 2C 20 62 65 63 61 75 73 65 have to, because
012AD0: 20 69 74 20 61 6C 72 65 61 64 79 20 69 73 20 20 it already is
012AE0: 74 68 65 72 65 2E 0D 0A 20 20 42 75 74 20 74 72 there... But tr
012AF0: 79 20 69 74 20 61 6E 79 77 61 79 20 28 62 65 20 y it anyway (be
012B00: 61 69 64 20 62 65 66 6F 72 65 2C 20 69 74 20 6D aid before, it m
012B10: 65 61 6E 73 20 70 72 69 6E 74 2D 73 74 61 63 6B eans print-stack
012B20: 2C 20 61 6E 64 20 64 6F 65 73 20 6E 6F 74 20 63 , and does not c
012B30: 68 61 6E 67 65 20 74 68 65 20 73 74 61 63 6B 2E hange the stack.
012B40: 20 57 68 65 6E 0D 0A 20 20 70 72 6F 67 72 61 6D When.. program
012B50: 6D 69 6E 67 20 69 6E 20 46 6F 72 74 68 2C 20 77 ming in Forth, w
012B60: 65 20 77 61 6E 74 20 74 6F 20 28 71 75 69 74 65 e want to (quite
012B70: 20 66 72 65 71 75 65 6E 74 6C 79 2C 20 69 6E 20 frequently, in
012B80: 66 61 63 74 29 20 73 65 65 20 20 77 68 61 74 27 fact) see what'
012B90: 73 20 20 69 6E 0D 0A 20 20 74 68 65 20 73 74 61 s in.. the sta
012BA0: 63 6B 20 61 6E 64 20 6D 6F 73 74 20 69 6D 70 6F ck and most impo
012BB0: 72 74 61 6E 74 6C 79 20 20 77 68 61 74 20 20 69 rtantly what i
012BC0: 73 20 20 6F 6E 20 20 74 6F 70 2E 20 20 41 66 74 s on top. Aft
012BD0: 65 72 20 20 61 6C 6C 2C 20 20 69 74 20 20 69 73 er all, it is
012BE0: 20 20 6F 75 72 0D 0A 20 20 72 65 73 70 6F 6E 73 our.. respons
012BF0: 69 62 69 6C 69 74 79 20 74 6F 20 6B 65 65 70 20 ibility to keep
012C00: 74 68 65 20 73 74 61 63 6B 20 69 6E 20 6F 72 64 the stack in ord
012C10: 65 72 2E 20 53 6F 20 2F 2E 73 2F 20 69 73 20 61 er. So /.s/ is a
012C20: 20 77 65 6C 63 6F 6D 65 20 66 72 69 65 6E 64 2E welcome friend.
012C30: 20 20 54 68 65 0D 0A 20 20 22 64 6F 74 22 2C 20 The.. "dot",
012C40: 79 6F 75 20 6D 61 79 20 72 65 6D 65 6D 62 65 72 you may remember
012C50: 2C 20 6D 65 61 6E 73 20 22 70 72 69 6E 74 22 20 , means "print"
012C60: 61 6E 64 20 73 20 69 73 20 20 61 20 20 63 6F 6E and s is a con
012C70: 76 65 6E 69 65 6E 74 20 20 61 62 62 72 65 76 69 venient abbrevi
012C80: 61 74 69 6F 6E 0D 0A 20 20 66 6F 72 20 73 74 61 ation.. for sta
012C90: 63 6B 20 2D 2D 20 72 65 73 75 6C 74 69 6E 67 20 ck -- resulting
012CA0: 69 6E 20 2E 73 2E 0D 0A 0D 0A 20 20 20 20 54 6F in .s..... To
012CB0: 20 63 6C 65 61 72 20 74 68 65 20 73 74 61 63 6B clear the stack
012CC0: 20 62 65 66 6F 72 65 20 77 65 20 62 65 67 69 6E before we begin
012CD0: 20 6F 75 72 20 65 78 70 65 72 69 6D 65 6E 74 73 our experiments
012CE0: 20 28 61 6E 64 20 72 65 6D 65 6D 62 65 72 20 74 (and remember t
012CF0: 6F 20 20 63 6C 65 61 72 0D 0A 20 20 69 74 20 6C o clear.. it l
012D00: 61 20 6C 69 74 74 6C 65 20 64 65 76 69 6C 29 2C a little devil),
012D10: 20 6A 75 73 74 20 74 6F 20 73 65 65 20 77 68 61 just to see wha
012D20: 74 20 68 61 70 70 65 6E 73 2E 0D 0A 0D 0A 20 20 t happens.....
012D30: 20 20 43 6C 65 61 72 20 74 68 65 20 73 74 61 63 Clear the stac
012D40: 6B 20 61 67 61 69 6E 2C 20 2F 73 70 21 2F 20 61 k again, /sp!/ a
012D50: 6E 64 20 74 79 70 65 20 69 6E 20 73 6F 6D 65 20 nd type in some
012D60: 6E 65 77 20 6E 75 6D 62 65 72 73 2C 20 20 79 6F new numbers, yo
012D70: 75 72 20 20 61 67 65 20 20 61 6E 64 0D 0A 20 20 ur age and..
012D80: 74 68 65 20 6C 61 73 74 20 74 77 6F 20 6E 75 6D the last two num
012D90: 62 65 72 73 20 6F 66 20 74 68 65 20 79 65 61 72 bers of the year
012DA0: 2E 20 4E 6F 77 20 20 74 79 70 65 20 20 2F 64 72 . Now type /dr
012DB0: 6F 70 5F 2E 73 2F 20 20 74 6F 20 20 70 72 6F 76 op_.s/ to prov
012DC0: 65 20 20 6F 6E 20 20 77 68 69 63 68 0D 0A 20 20 e on which..
012DD0: 70 6F 6C 69 74 69 63 61 6C 20 73 69 64 65 20 74 political side t
012DE0: 68 65 20 54 4F 53 20 73 74 61 6E 64 73 2E 20 44 he TOS stands. D
012DF0: 52 4F 50 20 64 69 73 63 61 72 64 73 20 74 68 65 ROP discards the
012E00: 20 54 4F 53 2C 20 73 6F 20 77 68 61 74 65 76 65 TOS, so whateve
012E10: 72 20 20 79 6F 75 20 20 68 61 76 65 0D 0A 20 20 r you have..
012E20: 6C 65 66 74 20 69 73 20 4E 4F 57 20 74 68 65 20 left is NOW the
012E30: 54 4F 53 2E 20 50 61 72 64 6F 6E 20 6D 65 20 66 TOS. Pardon me f
012E40: 6F 72 20 63 72 79 69 6E 67 2C 20 62 75 74 20 74 or crying, but t
012E50: 68 61 74 20 64 69 64 6E 27 74 20 20 70 72 6F 76 hat didn't prov
012E60: 65 20 20 61 6E 79 74 68 69 6E 67 2C 0D 0A 20 20 e anything,..
012E70: 65 78 63 65 70 74 20 79 6F 75 20 6E 6F 77 20 68 except you now h
012E80: 61 76 65 20 6F 6E 65 20 6E 75 6D 62 65 72 2C 20 ave one number,
012E90: 77 68 65 6E 20 79 6F 75 20 74 79 70 65 64 20 69 when you typed i
012EA0: 6E 20 74 77 6F 20 28 69 66 20 79 6F 75 20 77 65 n two (if you we
012EB0: 72 65 20 6E 6F 74 20 20 6C 61 7A 79 0D 0A 20 20 re not lazy..
012EC0: 61 6E 64 20 74 79 70 65 64 20 69 6E 20 6F 6E 6C and typed in onl
012ED0: 79 20 6F 6E 65 29 2E 0D 0A 0D 0A 20 20 20 20 45 y one)..... E
012EE0: 6E 6F 75 67 68 20 66 6F 6F 6C 69 73 68 6E 65 73 nough foolishnes
012EF0: 73 2E 20 44 6F 77 6E 20 74 6F 20 62 75 73 69 6E s. Down to busin
012F00: 61 74 65 72 20 74 6F 20 67 65 74 20 66 72 65 73 ater to get fres
012F10: 68 20 22 70 61 70 65 72 22 29 2C 20 75 73 65 20 h "paper"), use
012F20: 20 2F 73 70 21 2F 2E 20 20 49 66 20 20 79 6F 75 /sp!/. If you
012F30: 20 20 67 65 74 20 20 61 20 20 63 75 72 74 20 20 get a curt
012F40: 22 6F 6B 22 20 20 69 6E 0D 0A 20 20 72 65 73 70 "ok" in.. resp
012F50: 6F 6E 73 65 2C 20 74 68 65 6E 20 74 68 65 20 73 onse, then the s
012F60: 74 61 63 6B 20 73 68 6F 75 6C 64 20 62 65 20 63 tack should be c
012F70: 6C 65 61 72 2E 20 4E 6F 77 20 74 79 70 65 20 69 lear. Now type i
012F80: 6E 20 61 20 63 6F 75 70 6C 65 20 20 6F 66 20 20 n a couple of
012F90: 6E 75 6D 62 65 72 73 2E 0D 0A 20 20 59 6F 75 20 numbers... You
012FA0: 63 61 6E 20 74 79 70 65 20 74 68 65 6D 20 69 6E can type them in
012FB0: 64 69 76 69 64 75 61 6C 6C 79 2C 20 68 69 74 74 dividually, hitt
012FC0: 69 6E 67 20 45 4E 54 45 52 20 28 6F 72 20 20 52 ing ENTER (or R
012FD0: 45 54 55 52 4E 29 20 20 61 66 74 65 72 20 20 65 ETURN) after e
012FE0: 61 63 68 2C 20 20 6F 72 0D 0A 20 20 74 79 70 65 ach, or.. type
012FF0: 20 74 68 65 6D 20 6F 6E 20 6F 6E 65 20 6C 69 6E them on one lin
013000: 65 20 77 69 74 68 20 61 20 73 70 61 63 65 20 62 e with a space b
013010: 65 74 77 65 65 6E 2C 20 74 68 65 6E 20 68 69 74 etween, then hit
013020: 20 20 45 4E 54 45 52 20 20 77 68 65 6E 20 20 66 ENTER when f
013030: 69 6E 69 73 68 65 64 2E 0D 0A 20 20 4C 65 74 27 inished... Let'
013040: 73 20 74 72 79 20 73 6F 6D 65 74 68 69 6E 67 20 s try something
013050: 6C 69 6B 65 20 31 32 5F 32 35 20 3C 63 72 3E 2E like 12_25 <cr>.
013060: 20 28 4E 6F 2C 20 64 6F 6E 27 74 20 74 79 70 65 (No, don't type
013070: 20 3C 63 72 3E 2C 20 20 74 68 61 74 20 20 6D 65 <cr>, that me
013080: 61 6E 73 20 20 68 69 74 0D 0A 20 20 45 4E 54 45 ans hit.. ENTE
013090: 52 20 6F 72 20 52 45 54 55 52 4E 20 2D 2D 20 6F R or RETURN -- o
0130A0: 72 20 77 68 61 74 65 76 65 72 20 20 74 68 65 20 r whatever the
0130B0: 20 64 61 6D 6E 20 20 74 68 69 6E 67 20 20 69 73 damn thing is
0130C0: 20 20 63 61 6C 6C 65 64 20 20 6F 6E 20 20 79 6F called on yo
0130D0: 75 72 20 20 72 69 67 2E 0D 0A 20 20 43 6F 6E 66 ur rig... Conf
0130E0: 75 73 69 6E 67 2C 20 69 73 6E 27 74 20 69 74 3F using, isn't it?
0130F0: 29 0D 0A 0D 0A 20 20 20 20 49 66 20 61 6C 6C 20 ).... If all
013100: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
013110: 10 00 01 00 02 09 4E E5 10 00 C1 02 00 00 00 02 ......N.........
013120: 10 00 C6 02 00 00 00 02 10 00 C2 02 00 00 00 02 ................
013130: 10 00 C7 02 00 00 00 02 10 00 C3 02 00 00 00 02 ................
013140: 10 00 C8 02 00 00 00 02 10 00 C4 02 00 00 00 02 ................
013150: 10 00 C9 02 00 00 00 02 10 00 C5 02 00 00 00 02 ................
013160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
013170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
013180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
013190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
013200: 65 73 73 2E 20 4E 6F 77 2C 20 74 68 69 73 20 63 ess. Now, this c
013210: 6F 75 6C 64 20 62 65 20 74 68 65 20 70 72 6F 6F ould be the proo
013220: 66 2E 20 20 43 6C 65 61 72 0D 0A 20 20 74 68 65 f. Clear.. the
013230: 20 73 74 61 63 6B 20 61 6E 64 20 74 79 70 65 20 stack and type
013240: 74 77 6F 20 6E 75 6D 62 65 72 73 20 61 67 61 69 two numbers agai
013250: 6E 2E 20 54 79 70 65 20 2F 2E 73 2F 20 74 6F 20 n. Type /.s/ to
013260: 20 67 65 74 20 20 61 20 20 6C 69 73 74 69 6E 67 get a listing
013270: 20 20 6F 6E 20 20 74 68 65 0D 0A 20 20 73 63 72 on the.. scr
013280: 65 65 6E 20 73 6F 20 79 6F 75 20 63 61 6E 20 73 een so you can s
013290: 65 65 20 77 68 61 74 20 6F 72 64 65 72 20 74 68 ee what order th
0132A0: 65 79 20 61 72 65 20 69 6E 2E 20 4E 6F 77 20 74 ey are in. Now t
0132B0: 79 70 65 20 20 2F 73 77 61 70 5F 2E 73 2F 20 20 ype /swap_.s/
0132C0: 61 6E 64 20 20 72 65 61 64 0D 0A 20 20 74 68 65 and read.. the
0132D0: 20 6E 75 6D 62 65 72 73 20 61 67 61 69 6E 2E 20 numbers again.
0132E0: 57 68 61 74 65 76 65 72 20 77 61 73 20 6F 6E 20 Whatever was on
0132F0: 54 4F 53 20 62 65 66 6F 72 65 2C 20 68 61 73 20 TOS before, has
013300: 62 65 65 6E 20 64 65 6D 6F 74 65 64 20 20 74 6F been demoted to
013310: 20 20 4E 6F 2E 20 20 32 2E 0D 0A 20 20 45 6E 74 No. 2... Ent
013320: 65 72 20 61 6E 6F 74 68 65 72 20 6E 75 6D 62 65 er another numbe
013330: 72 2C 20 70 72 6F 76 65 20 79 6F 75 20 68 61 76 r, prove you hav
013340: 65 20 74 68 72 65 65 20 6E 75 6D 62 65 72 73 20 e three numbers
013350: 77 69 74 68 20 2F 2E 73 2F 2C 20 74 68 65 6E 20 with /.s/, then
013360: 20 67 6F 20 20 69 6E 74 6F 0D 0A 20 20 74 68 65 go into.. the
013370: 20 53 57 41 50 20 72 6F 75 74 69 6E 65 2E 20 4E SWAP routine. N
013380: 6F 77 2C 20 77 68 6F 20 69 73 20 6F 6E 20 74 6F ow, who is on to
013390: 70 3F 0D 0A 0D 0A 20 20 20 20 54 68 69 73 20 73 p?.... This s
0133A0: 68 6F 75 6C 64 20 63 6F 6E 66 75 73 65 20 79 6F hould confuse yo
0133B0: 75 2E 20 43 6C 65 61 72 20 74 68 65 20 73 74 61 u. Clear the sta
0133C0: 63 6B 2C 20 70 75 74 20 69 6E 20 74 77 6F 20 20 ck, put in two
0133D0: 6E 75 6D 62 65 72 73 2C 20 20 74 68 65 6E 20 20 numbers, then
0133E0: 74 79 70 65 0D 0A 20 20 2F 6F 76 65 72 5F 2E 73 type.. /over_.s
0133F0: 2F 20 74 6F 20 64 75 70 6C 69 63 61 74 65 20 74 / to duplicate t
013400: 72 65 2C 20 74 6F 20 74 68 65 20 72 69 67 68 74 re, to the right
013410: 20 6F 66 20 74 68 65 20 22 50 22 20 6F 6E 20 74 of the "P" on t
013420: 68 65 20 6B 65 79 62 6F 61 72 64 2E 29 0D 0A 0D he keyboard.)...
013430: 0A 20 20 20 20 59 6F 75 20 70 72 6F 62 61 62 6C . You probabl
013440: 79 20 6E 6F 74 69 63 65 64 20 77 65 20 73 61 69 y noticed we sai
013450: 64 20 2F 34 5F 70 69 63 6B 2F 20 69 6E 73 74 65 d /4_pick/ inste
013460: 61 64 20 6F 66 20 22 70 69 63 6B 20 34 22 2C 20 ad of "pick 4",
013470: 77 68 69 63 68 20 6C 65 61 64 73 20 20 75 73 0D which leads us.
013480: 0A 20 20 6E 65 61 74 6C 79 20 69 6E 74 6F 20 72 . neatly into r
013490: 65 76 65 72 73 65 20 50 6F 6C 69 73 68 20 6E 6F everse Polish no
0134A0: 74 61 74 69 6F 6E 2E 20 4D 6F 73 74 20 70 65 6F tation. Most peo
0134B0: 70 6C 65 20 61 72 65 20 66 61 6D 69 6C 69 61 72 ple are familiar
0134C0: 20 77 69 74 68 20 20 69 74 2C 20 20 62 75 74 0D with it, but.
0134D0: 0A 20 20 77 6F 6E 27 74 20 61 64 6D 69 74 20 69 . won't admit i
0134E0: 74 2E 20 49 6E 20 66 61 63 74 2C 20 20 69 74 20 t. In fact, it
0134F0: 20 69 73 20 20 74 68 65 20 20 63 6F 6D 70 75 74 is the comput
013500: 65 72 27 73 20 20 6D 65 74 68 6F 64 20 20 6F 66 er's method of
013510: 20 20 64 65 61 6C 69 6E 67 20 20 77 69 74 68 0D dealing with.
013520: 0A 20 20 6E 75 6D 62 65 72 73 2E 20 49 6E 20 42 . numbers. In B
013530: 61 73 69 63 20 77 65 20 65 6E 74 65 72 20 32 20 asic we enter 2
013540: 2A 20 35 20 77 68 65 6E 20 77 65 20 77 61 6E 74 * 5 when we want
013550: 20 74 68 65 20 72 65 73 75 6C 74 20 6F 66 20 66 the result of f
013560: 69 76 65 20 20 6D 75 6C 74 69 70 6C 69 65 64 0D ive multiplied.
013570: 0A 20 20 74 77 69 63 65 2E 20 54 68 65 20 42 61 . twice. The Ba
013580: 73 69 63 20 69 6E 74 65 72 70 72 65 74 65 72 20 sic interpreter
013590: 63 68 61 6E 67 65 73 20 74 68 61 74 20 74 6F 20 changes that to
0135A0: 32 20 35 20 2A 2E 20 46 6F 72 74 68 20 20 77 61 2 5 *. Forth wa
0135B0: 73 20 20 77 72 69 74 74 65 6E 20 20 66 6F 72 0D s written for.
0135C0: 0A 20 20 73 70 65 65 64 2C 20 73 6F 20 74 68 65 . speed, so the
0135D0: 20 6F 62 76 69 6F 75 73 20 63 6F 75 72 73 65 20 obvious course
0135E0: 77 61 73 20 74 6F 20 65 6E 74 65 72 20 64 61 74 was to enter dat
0135F0: 61 20 69 6E 20 74 68 65 20 77 61 79 20 74 68 65 a in the way the
013600: 68 65 20 73 65 63 6F 6E 64 20 76 61 6C 75 65 20 he second value
013610: 6F 6E 20 74 68 65 20 73 74 61 63 6B 2E 20 49 74 on the stack. It
013620: 20 73 65 65 6D 73 20 74 68 61 74 20 77 68 65 6E seems that when
013630: 20 4E 4F 2E 0D 0A 20 20 32 20 69 73 20 64 75 70 NO... 2 is dup
013640: 6C 69 63 61 74 65 64 2C 20 74 68 65 20 64 75 70 licated, the dup
013650: 6C 69 63 61 74 65 20 69 73 20 70 75 74 20 6F 6E licate is put on
013660: 20 74 68 65 20 54 4F 53 2E 0D 0A 0D 0A 20 20 20 the TOS.....
013670: 20 57 68 69 63 68 20 62 72 69 6E 67 73 20 75 73 Which brings us
013680: 20 74 6F 20 52 4F 54 2C 20 6F 72 20 72 6F 74 61 to ROT, or rota
013690: 74 65 2E 20 49 74 73 20 70 75 72 70 6F 73 65 20 te. Its purpose
0136A0: 69 73 20 74 6F 20 6D 6F 76 65 20 74 68 65 20 20 is to move the
0136B0: 74 68 69 72 64 20 20 69 74 65 6D 0D 0A 20 20 6F third item.. o
0136C0: 6E 20 74 68 65 20 73 74 61 63 6B 20 74 6F 20 74 n the stack to t
0136D0: 68 65 20 54 4F 53 2E 20 49 6E 20 74 68 65 20 67 he TOS. In the g
0136E0: 61 6D 65 20 6F 66 20 6F 6E 65 2D 75 70 6D 61 6E ame of one-upman
0136F0: 73 68 69 70 2C 20 20 69 74 20 20 6D 61 6B 65 73 ship, it makes
013700: 20 20 61 20 20 62 69 67 67 65 72 0D 0A 20 20 6A a bigger.. j
013710: 75 6D 70 20 74 68 61 6E 20 4F 56 45 52 2E 20 45 ump than OVER. E
013720: 6E 74 65 72 20 73 6F 6D 65 20 6E 75 6D 62 65 72 nter some number
013730: 73 2C 20 74 79 70 65 20 2F 72 6F 74 5F 2E 73 2F s, type /rot_.s/
013740: 20 61 6E 64 20 6F 62 73 65 72 76 65 20 74 68 65 and observe the
013750: 20 72 65 73 75 6C 74 2E 0D 0A 0D 0A 20 20 20 20 result.....
013760: 53 6F 20 69 74 20 69 73 20 74 68 61 74 20 73 69 So it is that si
013770: 6D 70 6C 65 2E 20 41 6C 6C 20 79 6F 75 20 68 61 mple. All you ha
013780: 76 65 20 74 6F 20 64 6F 20 6E 6F 77 20 69 73 20 ve to do now is
013790: 75 73 65 20 74 68 65 20 72 69 67 68 74 20 77 6F use the right wo
0137A0: 72 64 73 20 61 74 20 74 68 65 0D 0A 20 20 72 69 rds at the.. ri
0137B0: 67 68 74 20 74 69 6D 65 20 61 6E 64 20 79 6F 75 ght time and you
0137C0: 20 63 61 6E 20 73 61 79 20 70 72 6F 67 72 61 6D can say program
0137D0: 6D 69 6E 67 20 69 6E 20 46 6F 72 74 68 20 69 73 ming in Forth is
0137E0: 20 61 20 62 72 65 65 7A 65 20 2D 2D 20 61 74 20 a breeze -- at
0137F0: 6C 65 61 73 74 20 77 68 65 6E 0D 0A 20 20 75 73 least when.. us
013800: 20 63 6F 6D 70 75 74 65 72 20 6C 69 6B 65 73 0D computer likes.
013810: 0A 20 20 74 6F 20 70 72 6F 63 65 73 73 20 69 74 . to process it
013820: 2E 20 49 74 20 69 73 20 20 6E 6F 74 20 20 22 62 . It is not "b
013830: 61 63 6B 77 61 72 64 73 22 2C 20 20 62 75 74 20 ackwards", but
013840: 20 61 20 20 71 75 69 63 6B 65 72 20 20 77 61 79 a quicker way
013850: 20 20 6F 66 20 20 63 72 75 6E 63 68 69 6E 67 0D of crunching.
013860: 0A 20 20 6E 75 6D 62 65 72 73 2E 20 4C 6F 6F 6B . numbers. Look
013870: 20 61 74 20 74 68 65 20 70 72 6F 62 6C 65 6D 20 at the problem
013880: 66 72 6F 6D 20 74 68 65 20 5A 38 30 27 73 20 70 from the Z80's p
013890: 6F 69 6E 74 20 6F 66 20 76 69 65 77 2E 20 49 74 oint of view. It
0138A0: 20 77 6F 72 6B 73 20 20 77 69 74 68 20 20 61 0D works with a.
0138B0: 0A 20 20 73 74 61 63 6B 20 74 68 65 20 73 61 6D . stack the sam
0138C0: 65 20 61 73 20 46 6F 72 74 68 2E 20 41 63 74 75 e as Forth. Actu
0138D0: 61 6C 6C 79 2C 20 74 68 61 74 20 69 73 20 74 68 ally, that is th
0138E0: 65 20 6F 74 68 65 72 20 20 77 61 79 20 20 61 72 e other way ar
0138F0: 6F 75 6E 64 20 20 2D 2D 20 20 46 6F 72 74 68 0D ound -- Forth.
013900: 0A 20 20 64 65 61 6C 73 20 77 69 74 68 20 73 74 . deals with st
013910: 61 63 6B 73 20 74 68 65 20 73 61 6D 65 20 77 61 acks the same wa
013920: 79 20 61 73 20 74 68 65 20 5A 38 30 2E 20 53 6F y as the Z80. So
013930: 2C 20 74 68 65 20 20 62 69 67 20 20 63 68 69 65 , the big chie
013940: 66 20 20 69 73 20 20 67 69 76 65 6E 20 20 61 0D f is given a.
013950: 0A 20 20 6E 75 6D 62 65 72 2C 20 73 75 63 68 20 . number, such
013960: 61 73 20 32 2E 20 48 65 2F 73 68 65 20 73 65 74 as 2. He/she set
013970: 73 20 70 75 74 73 20 69 74 20 61 74 20 74 68 65 s puts it at the
013980: 20 54 4F 53 20 20 61 6E 64 20 20 61 73 6B 73 20 TOS and asks
013990: 20 66 6F 72 20 20 74 68 65 20 20 6E 65 78 74 0D for the next.
0139A0: 0A 20 20 6E 75 6D 62 65 72 2E 20 54 68 65 20 73 . number. The s
0139B0: 65 63 6F 6E 64 20 6E 75 6D 62 65 72 20 63 6F 6D econd number com
0139C0: 65 73 20 73 68 6F 6F 74 69 6E 67 20 64 6F 77 6E es shooting down
0139D0: 20 74 68 65 20 6C 69 6E 65 20 61 6E 64 20 6F 6E the line and on
0139E0: 74 6F 20 20 74 68 65 20 20 73 74 61 63 6B 2C 0D to the stack,.
0139F0: 0A 20 20 64 69 73 70 6C 61 63 69 6E 67 20 74 68 . displacing th
013A00: 69 6E 67 20 74 68 65 20 63 6F 6D 6D 6F 6E 20 77 ing the common w
013A10: 6F 72 64 73 20 66 6F 72 20 6D 61 6E 69 70 75 6C ords for manipul
013A20: 61 74 69 6E 67 20 6E 75 6D 62 65 72 73 20 6E 65 ating numbers ne
013A30: 61 72 20 20 74 68 65 20 20 54 4F 53 2E 20 20 46 ar the TOS. F
013A40: 6F 72 74 75 6E 61 74 65 6C 79 0D 0A 20 20 66 6F ortunately.. fo
013A50: 72 20 75 73 2C 20 6D 6F 73 74 20 6F 66 20 74 68 r us, most of th
013A60: 65 20 61 63 74 69 6F 6E 20 74 61 6B 65 73 20 70 e action takes p
013A70: 6C 61 63 65 20 61 74 20 74 68 65 20 54 4F 53 20 lace at the TOS
013A80: 6F 72 20 74 77 6F 20 20 6F 72 20 20 74 68 72 65 or two or thre
013A90: 65 20 20 6E 75 6D 62 65 72 73 0D 0A 20 20 64 6F e numbers.. do
013AA0: 77 6E 2E 20 4F 74 68 65 72 77 69 73 65 20 77 65 wn. Otherwise we
013AB0: 20 77 6F 75 6C 64 20 67 6F 20 6E 75 74 74 79 20 would go nutty
013AC0: 74 72 79 69 6E 67 20 74 6F 20 72 65 6D 65 6D 62 trying to rememb
013AD0: 65 72 20 77 68 65 72 65 20 74 68 65 79 20 20 61 er where they a
013AE0: 72 65 20 20 2D 2D 20 20 6F 72 0D 0A 20 20 62 65 re -- or.. be
013AF0: 74 74 65 72 20 73 74 69 6C 6C 2C 20 67 65 74 20 tter still, get
013B00: 61 20 63 6F 6D 70 75 74 65 72 20 74 6F 20 68 65 a computer to he
013B10: 6C 70 20 75 73 2E 0D 0A 0D 0A 20 20 20 20 49 66 lp us..... If
013B20: 2C 20 68 6F 72 72 6F 72 73 2C 20 79 6F 75 20 77 , horrors, you w
013B30: 61 6E 74 20 61 20 6E 75 6D 62 65 72 20 64 65 65 ant a number dee
013B40: 70 65 72 20 74 68 61 6E 20 4E 6F 2E 20 33 20 6F per than No. 3 o
013B50: 6E 20 74 68 65 20 73 74 61 63 6B 2C 20 20 75 73 n the stack, us
013B60: 65 20 20 50 49 43 4B 2E 0D 0A 20 20 54 6F 20 73 e PICK... To s
013B70: 70 75 72 20 74 68 65 20 70 69 63 6B 20 69 6E 74 pur the pick int
013B80: 6F 20 61 63 74 69 6F 6E 2C 20 77 6F 72 6B 20 6F o action, work o
013B90: 75 74 20 28 73 6F 6D 65 68 6F 77 29 20 77 68 61 ut (somehow) wha
013BA0: 74 20 20 70 6F 73 69 74 69 6F 6E 20 20 74 68 65 t position the
013BB0: 20 20 6E 75 6D 62 65 72 0D 0A 20 20 73 68 6F 75 number.. shou
013BC0: 6C 64 20 62 65 20 61 74 2E 20 46 6F 72 20 65 78 ld be at. For ex
013BD0: 61 6D 70 6C 65 2C 20 69 66 20 77 65 20 74 68 69 ample, if we thi
013BE0: 6E 6B 20 69 74 20 69 73 20 4E 6F 2E 20 34 2C 20 nk it is No. 4,
013BF0: 20 77 65 20 20 74 79 70 65 20 20 2F 34 5F 70 69 we type /4_pi
013C00: 65 20 66 69 72 73 74 20 61 72 72 69 76 61 6C 2E e first arrival.
013C10: 20 57 65 20 77 69 6C 6C 20 73 61 79 20 69 74 20 We will say it
013C20: 69 73 20 66 69 76 65 20 28 61 6E 79 20 68 69 67 is five (any hig
013C30: 68 65 72 20 61 6E 64 20 20 49 20 20 6D 61 79 0D her and I may.
013C40: 0A 20 20 6E 6F 74 20 62 65 20 61 62 6C 65 20 74 . not be able t
013C50: 6F 20 66 69 6E 64 20 74 68 65 20 61 6E 73 77 65 o find the answe
013C60: 72 2E 20 54 68 65 6E 2C 20 73 77 6F 6F 73 68 2C r. Then, swoosh,
013C70: 20 61 6E 20 6F 70 65 72 61 74 6F 72 20 63 6F 6D an operator com
013C80: 65 73 20 73 77 6F 6F 70 69 6E 67 20 20 69 6E 0D es swooping in.
013C90: 0A 20 20 61 74 20 63 6C 6F 73 65 20 74 6F 20 74 . at close to t
013CA0: 68 65 20 73 70 65 65 64 20 6F 66 20 6C 69 67 68 he speed of ligh
013CB0: 74 2E 20 49 74 20 69 73 20 61 20 20 6D 75 6C 74 t. It is a mult
013CC0: 69 70 6C 69 65 72 2C 20 20 77 68 69 63 68 20 20 iplier, which
013CD0: 6D 65 61 6E 73 20 20 74 68 65 20 20 5A 38 30 0D means the Z80.
013CE0: 0A 20 20 73 77 69 6E 67 73 20 69 6E 74 6F 20 61 . swings into a
013CF0: 63 74 69 6F 6E 2C 20 73 65 65 73 20 74 68 61 74 ction, sees that
013D00: 20 69 74 20 6D 75 73 74 20 61 64 64 20 74 68 65 it must add the
013D10: 20 66 69 76 65 20 74 77 6F 20 74 69 6D 65 73 20 five two times
013D20: 28 32 2A 35 20 3D 20 35 2B 35 2C 20 20 6F 72 0D (2*5 = 5+5, or.
013D30: 0A 20 20 69 66 20 69 74 20 77 65 72 65 20 35 2A . if it were 5*
013D40: 35 2C 20 5A 38 30 20 77 6F 75 6C 64 20 61 64 64 5, Z80 would add
013D50: 20 66 69 76 65 20 66 69 76 65 20 74 69 6D 65 73 five five times
013D60: 2C 20 74 68 75 73 20 35 2B 35 2B 35 2B 35 2B 35 , thus 5+5+5+5+5
013D70: 29 20 74 6F 20 70 72 6F 64 75 63 65 20 20 61 0D ) to produce a.
013D80: 0A 20 20 72 65 73 75 6C 74 20 6F 66 20 32 35 2E . result of 25.
013D90: 20 57 61 6E 74 69 6E 67 20 74 6F 20 6B 65 65 70 Wanting to keep
013DA0: 20 61 20 63 6C 65 61 6E 20 68 6F 75 73 65 2C 20 a clean house,
013DB0: 69 74 20 74 68 72 6F 77 73 20 6F 75 74 20 74 68 it throws out th
013DC0: 65 20 20 74 77 6F 2C 20 20 65 6A 65 63 74 73 0D e two, ejects.
013DD0: 0A 20 20 74 68 65 20 66 69 76 65 2C 20 73 6D 75 . the five, smu
013DE0: 64 67 65 73 20 74 68 65 20 6F 70 65 72 61 74 6F dges the operato
013DF0: 72 20 61 6E 64 20 63 61 72 65 66 75 6C 6C 79 20 r and carefully
013E00: 63 6B 2F 20 20 61 6E 64 0D 0A 20 20 72 65 61 64 ck/ and.. read
013E10: 20 74 68 65 20 72 65 73 75 6C 74 2E 20 49 66 20 the result. If
013E20: 74 68 61 74 20 69 73 20 6E 6F 74 20 74 68 65 20 that is not the
013E30: 6E 75 6D 62 65 72 20 77 65 20 77 61 6E 74 65 64 number we wanted
013E40: 2C 20 74 72 79 2C 20 74 72 79 20 61 67 61 69 6E , try, try again
013E50: 2E 20 49 66 20 79 6F 75 0D 0A 20 20 75 73 65 64 . If you.. used
013E60: 20 2F 31 5F 70 69 63 6B 2F 20 28 6F 6E 65 20 64 /1_pick/ (one d
013E70: 6F 77 6E 20 66 72 6F 6D 20 74 68 65 20 54 4F 53 own from the TOS
013E80: 29 2C 20 79 6F 75 20 63 6F 75 6C 64 20 68 61 76 ), you could hav
013E90: 65 20 75 73 65 64 20 44 55 50 20 61 6E 64 20 74 e used DUP and t
013EA0: 68 65 20 20 73 61 6D 65 0D 0A 20 20 77 69 74 68 he same.. with
013EB0: 20 2F 32 5F 70 69 63 6B 2F 2C 20 77 68 69 63 68 /2_pick/, which
013EC0: 20 72 65 70 6C 61 63 65 73 20 4F 56 45 52 2E 0D replaces OVER..
013ED0: 0A 0D 0A 20 20 20 20 49 66 20 50 49 43 4B 20 69 ... If PICK i
013EE0: 73 20 6E 6F 74 20 69 6E 20 79 6F 75 72 20 76 6F s not in your vo
013EF0: 63 61 62 75 6C 61 72 79 2C 20 74 68 69 73 20 69 cabulary, this i
013F00: 73 20 68 6F 77 20 74 6F 20 69 6E 63 6C 75 64 65 s how to include
013F10: 20 69 74 3A 0D 0A 20 20 20 20 3A 20 70 69 63 6B it:.. : pick
013F20: 20 64 75 70 20 31 20 3C 20 69 66 20 2E 22 20 50 dup 1 < if ." P
013F30: 49 43 4B 20 76 61 6C 75 65 20 74 6F 6F 20 53 4D ICK value too SM
013F40: 41 4C 4C 20 22 20 3C 63 72 3E 0D 0A 20 20 20 20 ALL " <cr>..
013F50: 64 72 6F 70 20 65 6C 73 65 20 32 20 2A 20 73 70 drop else 2 * sp
013F60: 40 20 2B 20 40 20 74 68 65 6E 20 3B 0D 0A 0D 0A @ + @ then ;....
013F70: 20 20 20 20 28 57 61 74 63 68 20 74 68 65 20 6C (Watch the l
013F80: 65 73 73 2D 74 68 61 6E 20 61 72 72 6F 77 20 61 ess-than arrow a
013F90: 6E 64 20 73 70 61 63 65 20 62 65 74 77 65 65 6E nd space between
013FA0: 20 74 68 65 20 70 72 69 6E 74 2D 71 75 6F 74 65 the print-quote
013FB0: 3B 20 20 2F 2E 22 2F 20 20 69 73 20 20 61 0D 0A ; /."/ is a..
013FC0: 20 20 77 6F 72 64 20 61 6E 64 20 6D 75 73 74 20 word and must
013FD0: 62 65 20 73 65 70 61 72 61 74 65 64 20 66 72 6F be separated fro
013FE0: 6D 20 20 61 64 6A 6F 69 6E 69 6E 67 20 20 77 6F m adjoining wo
013FF0: 72 64 73 20 20 62 79 20 20 73 70 61 63 65 73 2E rds by spaces.
014000: 70 6C 61 63 65 73 20 31 30 20 6F 6E 20 20 74 68 places 10 on th
014010: 65 20 20 74 6F 70 20 20 6F 66 20 20 74 68 65 0D e top of the.
014020: 0A 20 20 73 74 61 63 6B 2E 20 28 41 63 74 75 61 . stack. (Actua
014030: 6C 6C 79 2C 20 5A 38 30 20 77 6F 75 6C 64 20 75 lly, Z80 would u
014040: 73 65 20 69 74 73 20 72 65 67 69 73 74 65 72 73 se its registers
014050: 20 66 6F 72 20 73 75 63 68 20 61 20 20 73 69 6D for such a sim
014060: 70 6C 65 20 20 6F 70 65 72 61 74 69 6F 6E 2C 0D ple operation,.
014070: 0A 20 20 62 75 74 20 74 68 65 20 70 72 6F 63 65 . but the proce
014080: 73 73 20 69 73 20 73 69 6D 69 6C 61 72 2E 20 49 ss is similar. I
014090: 66 20 74 68 65 20 20 61 72 69 74 68 6D 65 74 69 f the arithmeti
0140A0: 63 20 20 77 61 73 20 20 66 6F 72 20 20 61 20 20 c was for a
0140B0: 6C 6F 6E 67 20 20 65 71 75 61 74 69 6F 6E 2C 0D long equation,.
0140C0: 0A 20 20 6E 65 69 74 68 65 72 20 5A 38 30 20 6E . neither Z80 n
0140D0: 6F 72 20 46 6F 72 74 68 20 77 6F 75 6C 64 20 67 or Forth would g
0140E0: 65 74 20 65 78 63 69 74 65 64 2E 20 49 74 20 77 et excited. It w
0140F0: 6F 75 6C 64 20 68 61 6E 64 6C 65 20 65 61 63 68 ould handle each
014100: 20 73 65 67 6D 65 6E 74 20 61 73 20 20 69 74 0D segment as it.
014110: 0A 20 20 61 72 72 69 76 65 64 20 61 6E 64 20 6B . arrived and k
014120: 65 65 70 20 75 73 69 6E 67 20 74 68 65 20 72 65 eep using the re
014130: 73 75 6C 74 20 6F 66 20 74 68 65 20 70 72 65 76 sult of the prev
014140: 69 6F 75 73 20 6F 70 65 72 61 74 69 6F 6E 20 74 ious operation t
014150: 6F 20 77 6F 72 6B 20 77 69 74 68 20 74 68 65 0D o work with the.
014160: 0A 20 20 6E 65 78 74 2E 0D 0A 0D 0A 20 20 20 20 . next.....
014170: 49 74 20 6D 61 79 20 62 65 20 6F 6E 6C 79 20 61 It may be only a
014180: 20 6D 61 74 74 65 72 20 6F 66 20 6E 61 6E 6F 73 matter of nanos
014190: 65 63 6F 6E 64 73 2C 20 62 75 74 20 69 66 20 79 econds, but if y
0141A0: 6F 75 20 75 73 65 64 20 61 20 63 6F 6D 70 75 74 ou used a comput
0141B0: 65 72 20 64 61 79 20 20 69 6E 0D 0A 20 20 61 6E er day in.. an
0141C0: 64 20 64 61 79 20 20 6F 75 74 20 20 66 6F 72 20 d day out for
0141D0: 20 6E 75 6D 62 65 72 20 20 63 72 75 6E 63 68 69 number crunchi
0141E0: 6E 67 2C 20 20 74 68 6F 73 65 20 20 6C 69 74 74 ng, those litt
0141F0: 6C 65 20 20 62 69 74 73 20 20 6F 66 20 20 74 69 le bits of ti
014200: 20 20 48 69 74 74 69 6E 67 20 20 74 68 65 0D 0A Hitting the..
014210: 20 20 63 61 72 72 69 61 67 65 20 72 65 74 75 72 carriage retur
014220: 6E 20 69 6E 20 74 68 65 20 6D 69 64 64 6C 65 20 n in the middle
014230: 6F 66 20 61 20 77 6F 72 64 20 64 65 66 69 6E 69 of a word defini
014240: 74 69 6F 6E 20 69 73 20 61 6C 6C 20 72 69 67 68 tion is all righ
014250: 74 2C 20 74 68 65 20 20 6B 65 72 6E 65 6C 0D 0A t, the kernel..
014260: 20 20 64 6F 65 73 20 6E 6F 74 20 74 61 6B 65 20 does not take
014270: 61 63 74 69 6F 6E 20 75 6E 74 69 6C 20 69 74 20 action until it
014280: 73 65 65 73 20 74 68 65 20 22 3B 22 2C 20 61 6C sees the ";", al
014290: 74 68 6F 75 67 68 20 69 66 20 61 6E 20 65 72 72 though if an err
0142A0: 6F 72 20 77 61 73 20 6D 61 64 65 20 69 6E 0D 0A or was made in..
0142B0: 20 20 74 68 65 20 70 72 69 6E 74 69 6E 67 20 6F the printing o
0142C0: 66 20 74 68 65 20 66 69 72 73 74 20 6C 69 6E 65 f the first line
0142D0: 2C 20 6F 72 20 74 68 65 20 6E 65 77 20 77 6F 72 , or the new wor
0142E0: 64 20 65 78 69 73 74 73 20 61 6C 72 65 61 64 79 d exists already
0142F0: 2C 20 20 74 68 65 20 20 6B 65 72 6E 65 6C 0D 0A , the kernel..
014300: 20 20 77 69 6C 6C 20 69 6E 66 6F 72 6D 20 79 6F will inform yo
014310: 75 2E 20 45 72 72 6F 72 73 20 75 73 75 61 6C 6C u. Errors usuall
014320: 79 20 61 72 65 20 66 6C 61 67 67 65 64 20 77 69 y are flagged wi
014330: 74 68 20 61 6E 20 75 6E 64 65 72 6C 69 6E 65 20 th an underline
014340: 6F 66 20 61 72 72 6F 77 73 2E 20 20 49 6E 0D 0A of arrows. In..
014350: 20 20 74 68 65 20 73 65 63 6F 6E 64 20 6C 69 6E the second lin
014360: 65 20 77 61 74 63 68 20 74 68 65 20 20 6D 75 6C e watch the mul
014370: 74 69 70 6C 69 63 61 74 69 6F 6E 20 20 73 79 6D tiplication sym
014380: 62 6F 6C 2C 20 20 74 68 65 20 20 2A 2C 20 20 61 bol, the *, a
014390: 6E 64 20 20 74 68 65 20 20 66 75 6E 6E 79 0D 0A nd the funny..
0143A0: 20 20 63 68 61 72 61 63 74 65 72 20 28 77 68 61 character (wha
0143B0: 74 65 76 65 72 20 69 73 20 74 68 65 20 6E 61 6D tever is the nam
0143C0: 65 20 66 6F 72 20 20 69 74 3F 29 20 20 73 70 40 e for it?) sp@
0143D0: 20 20 2B 20 20 40 2E 20 20 49 74 20 20 69 73 20 + @. It is
0143E0: 20 74 68 61 74 20 20 6F 6E 65 20 20 77 65 0D 0A that one we..
0143F0: 20 20 6D 65 6E 74 69 6F 6E 65 64 20 62 65 66 6F mentioned befo
014400: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
014410: 11 00 01 00 02 09 4E E5 11 00 C1 02 00 00 00 02 ......N.........
014420: 11 00 C6 02 00 00 00 02 11 00 C2 02 00 00 00 02 ................
014430: 11 00 C7 02 00 00 00 02 11 00 C3 02 00 00 00 02 ................
014440: 11 00 C8 02 00 00 00 02 11 00 C4 02 00 00 00 02 ................
014450: 11 00 C9 02 00 00 00 02 11 00 C5 02 00 00 00 02 ................
014460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
014470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
014480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
014490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
014500: 6D 65 20 20 62 65 63 6F 6D 65 0D 0A 20 20 6D 65 me become.. me
014510: 61 6E 69 6E 67 66 75 6C 2E 20 49 66 20 79 6F 75 aningful. If you
014520: 20 70 72 6F 67 72 61 6D 6D 65 64 20 69 6E 20 42 programmed in B
014530: 61 73 69 63 2C 20 79 6F 75 20 77 6F 75 6C 64 20 asic, you would
014540: 73 65 6E 64 20 6C 6F 6E 67 20 65 71 75 61 74 69 send long equati
014550: 6F 6E 73 2C 20 20 77 69 74 68 0D 0A 20 20 73 6F ons, with.. so
014560: 6D 65 20 73 65 67 6D 65 6E 74 73 20 69 6E 20 62 me segments in b
014570: 72 61 63 6B 65 74 73 2C 20 65 76 65 6E 20 6D 75 rackets, even mu
014580: 6C 74 69 70 6C 65 20 62 72 61 63 6B 65 74 73 2E ltiple brackets.
014590: 20 44 6F 6E 27 74 20 74 72 79 20 20 69 74 20 20 Don't try it
0145A0: 69 6E 20 20 46 6F 72 74 68 2E 0D 0A 20 20 45 61 in Forth... Ea
0145B0: 63 68 20 70 72 6F 62 6C 65 6D 20 69 73 20 61 63 ch problem is ac
0145C0: 74 65 64 20 6F 6E 20 69 6E 20 73 65 71 75 65 6E ted on in sequen
0145D0: 63 65 2C 20 73 6F 20 6F 62 76 69 6F 75 73 6C 79 ce, so obviously
0145E0: 20 65 61 63 68 20 70 72 6F 62 6C 65 6D 20 6D 75 each problem mu
0145F0: 73 74 20 20 61 72 72 69 76 65 0D 0A 20 20 69 6E st arrive.. in
014600: 20 73 65 71 75 65 6E 63 65 2E 20 49 6E 20 42 61 sequence. In Ba
014610: 73 69 63 20 79 6F 75 20 63 6F 75 6C 64 20 65 6E sic you could en
014620: 74 65 72 20 50 52 49 4E 54 20 33 2B 34 2A 35 2B ter PRINT 3+4*5+
014630: 36 20 61 6E 64 20 69 74 20 77 6F 75 6C 64 20 70 6 and it would p
014640: 72 6F 64 75 63 65 20 20 61 6E 0D 0A 20 20 61 6E roduce an.. an
014650: 73 77 65 72 20 6F 66 20 32 39 2E 20 54 68 65 20 swer of 29. The
014660: 6D 75 6C 74 69 70 6C 69 65 72 20 68 61 73 20 70 multiplier has p
014670: 72 69 6F 72 69 74 79 20 6F 76 65 72 20 61 64 64 riority over add
014680: 69 74 69 6F 6E 2E 20 49 66 20 79 6F 75 20 20 77 ition. If you w
014690: 61 6E 74 65 64 20 20 74 68 65 0D 0A 20 20 61 6E anted the.. an
0146A0: 73 77 65 72 20 74 6F 20 63 6F 6D 65 20 20 6F 75 swer to come ou
0146B0: 74 20 20 64 69 66 66 65 72 65 6E 74 6C 79 2C 20 t differently,
0146C0: 20 65 6E 63 6C 6F 73 65 20 20 74 68 65 20 20 74 enclose the t
0146D0: 77 6F 20 20 61 64 64 69 74 69 6F 6E 20 20 70 72 wo addition pr
0146E0: 6F 62 6C 65 6D 73 20 20 69 6E 0D 0A 20 20 62 72 oblems in.. br
0146F0: 61 63 6B 65 74 73 2C 20 74 68 75 73 20 50 52 49 ackets, thus PRI
014700: 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 20 20 2A 2A .. ******.. **
014710: 2A 2A 2A 2A 20 46 6F 72 74 68 2C 20 77 69 74 68 **** Forth, with
014720: 20 50 65 74 72 20 4C 75 6B 65 73 2C 20 53 65 70 Petr Lukes, Sep
014730: 74 65 6D 62 65 72 20 31 39 38 37 0D 0A 20 20 2A tember 1987.. *
014740: 2A 2A 2A 2A 2A 0D 0A 0D 0A 20 20 20 20 54 68 65 *****.... The
014750: 20 74 65 78 74 20 66 6F 72 20 50 65 74 72 27 73 text for Petr's
014760: 20 70 72 6F 67 72 61 6D 20 74 68 69 73 20 77 65 program this we
014770: 65 6B 20 69 73 20 63 6F 6E 74 61 69 6E 65 64 20 ek is contained
014780: 69 6E 20 22 73 63 72 65 65 6E 73 22 20 74 6F 20 in "screens" to
014790: 62 65 20 72 65 61 64 0D 0A 20 20 69 6E 74 6F 20 be read.. into
0147A0: 74 68 65 20 46 6F 72 74 68 20 6B 65 72 6E 65 6C the Forth kernel
0147B0: 2C 20 43 50 43 46 54 48 32 2E 42 49 4E 2C 20 61 , CPCFTH2.BIN, a
0147C0: 6E 64 20 69 73 20 61 20 64 69 73 63 75 73 73 69 nd is a discussi
0147D0: 6F 6E 20 6F 66 20 74 68 65 20 20 73 6F 75 72 63 on of the sourc
0147E0: 65 20 20 66 69 6C 65 0D 0A 20 20 5C 68 61 6E 6F e file.. \hano
0147F0: 69 5C 20 77 68 69 63 68 20 66 6F 6C 6C 6F 77 73 i\ which follows
014800: 2E 20 54 68 65 72 65 20 61 72 65 20 6E 6F 20 70 . There are no p
014810: 72 6F 62 6C 65 6D 73 20 77 69 74 68 20 74 68 69 roblems with thi
014820: 73 20 6D 65 74 68 6F 64 2E 20 57 68 65 6E 20 79 s method. When y
014830: 6F 75 20 20 61 72 65 0D 0A 20 20 72 65 61 64 79 ou are.. ready
014840: 20 74 6F 20 63 6F 6D 70 69 6C 65 20 48 61 6E 6F to compile Hano
014850: 69 2C 20 74 79 70 65 20 74 68 65 20 75 73 75 61 i, type the usua
014860: 6C 20 63 6F 6D 70 69 6C 65 72 20 69 6E 73 74 72 l compiler instr
014870: 75 63 74 69 6F 6E 2C 20 20 5C 31 5F 6C 6F 61 64 uction, \1_load
014880: 5C 2C 20 20 61 6E 64 0D 0A 20 20 69 74 20 77 69 \, and.. it wi
014890: 6C 6C 20 73 6B 69 70 20 6F 76 65 72 20 74 68 65 ll skip over the
0148A0: 20 74 65 78 74 20 75 6E 74 69 6C 20 69 74 20 67 text until it g
0148B0: 65 74 73 20 74 6F 20 74 68 65 20 73 6F 75 72 63 ets to the sourc
0148C0: 65 20 63 6F 64 65 2E 0D 0A 0D 0A 20 20 20 20 52 e code..... R
0148D0: 65 6D 65 6D 62 65 72 2C 20 74 6F 20 6C 6F 61 64 emember, to load
0148E0: 20 74 68 65 20 66 69 6C 65 20 48 41 4E 4F 49 2E the file HANOI.
0148F0: 46 54 48 20 69 6E 74 6F 20 74 68 65 20 6B 65 72 FTH into the ker
014900: 4E 54 20 28 33 2B 34 29 20 2A 20 28 35 2B 36 29 NT (3+4) * (5+6)
014910: 20 77 6F 75 6C 64 20 70 72 6F 64 75 63 65 20 37 would produce 7
014920: 37 2E 20 20 54 68 69 6E 6B 0D 0A 20 20 61 62 6F 7. Think.. abo
014930: 75 74 20 69 74 2E 20 49 6E 20 74 68 65 20 66 69 ut it. In the fi
014940: 72 73 74 20 70 72 6F 62 6C 65 6D 2C 20 42 61 73 rst problem, Bas
014950: 69 63 20 77 6F 75 6C 64 20 6D 75 6C 74 69 70 6C ic would multipl
014960: 79 20 34 2A 35 2C 20 74 68 65 6E 20 61 64 64 20 y 4*5, then add
014970: 20 33 2C 20 20 74 68 65 6E 0D 0A 20 20 61 64 64 3, then.. add
014980: 20 36 2E 20 49 6E 20 74 68 65 20 73 65 63 6F 6E 6. In the secon
014990: 64 20 65 78 61 6D 70 6C 65 2C 20 74 68 65 20 70 d example, the p
0149A0: 72 6F 62 6C 65 6D 73 20 65 6E 63 6C 6F 73 65 64 roblems enclosed
0149B0: 20 69 6E 20 20 62 72 61 63 6B 65 74 73 20 20 61 in brackets a
0149C0: 72 65 20 20 64 65 61 6C 74 0D 0A 20 20 77 69 74 re dealt.. wit
0149D0: 68 20 66 69 72 73 74 2E 20 53 6F 2C 20 33 2B 34 h first. So, 3+4
0149E0: 20 70 72 6F 64 75 63 65 73 20 37 2C 20 35 2B 36 produces 7, 5+6
0149F0: 20 70 72 6F 64 75 63 65 73 20 31 31 2C 20 74 68 produces 11, th
014A00: 65 6E 20 37 2A 31 31 20 67 69 76 65 73 20 74 68 en 7*11 gives th
014A10: 65 20 72 65 73 75 6C 74 2E 0D 0A 20 20 48 6F 77 e result... How
014A20: 20 6F 66 74 65 6E 20 68 61 76 65 20 77 65 20 68 often have we h
014A30: 65 61 72 64 20 74 68 61 74 20 79 6F 75 20 6F 6E eard that you on
014A40: 6C 79 20 67 65 74 20 6F 75 74 20 6F 66 20 61 20 ly get out of a
014A50: 20 63 6F 6D 70 75 74 65 72 20 20 77 68 61 74 20 computer what
014A60: 20 79 6F 75 20 20 70 75 74 0D 0A 20 20 69 6E 74 you put.. int
014A70: 6F 20 69 74 3F 0D 0A 0D 0A 20 20 20 20 54 6F 20 o it?.... To
014A80: 63 75 74 20 73 68 6F 72 74 20 74 68 69 73 20 64 cut short this d
014A90: 69 73 63 75 73 73 69 6F 6E 20 28 49 20 63 61 6E iscussion (I can
014AA0: 20 68 65 61 72 20 79 6F 75 20 79 61 77 6E 69 6E hear you yawnin
014AB0: 67 29 2C 20 42 61 73 69 63 20 61 63 63 65 70 74 g), Basic accept
014AC0: 73 20 20 73 75 63 68 0D 0A 20 20 70 72 6F 62 6C s such.. probl
014AD0: 65 6D 73 20 61 6E 64 20 73 65 6E 64 73 20 74 68 ems and sends th
014AE0: 65 6D 20 69 6E 20 74 68 61 74 20 66 6F 72 6D 20 em in that form
014AF0: 74 6F 20 74 68 65 20 69 6E 74 65 72 70 72 65 74 to the interpret
014B00: 6E 65 6C 2C 20 74 79 70 65 20 5C 73 63 72 2D 6C nel, type \scr-l
014B10: 6F 61 64 5C 2E 20 20 49 66 0D 0A 20 20 79 6F 75 oad\. If.. you
014B20: 20 77 61 6E 74 20 74 6F 20 72 65 61 64 20 74 68 want to read th
014B30: 65 20 74 65 78 74 2C 20 74 79 70 65 20 5C 31 5F e text, type \1_
014B40: 6C 69 73 74 5C 2C 20 5C 32 5F 6C 69 73 74 5C 2C list\, \2_list\,
014B50: 20 65 74 63 2E 20 20 55 73 65 20 20 74 68 65 20 etc. Use the
014B60: 20 5C 31 5F 6C 6F 61 64 5C 0D 0A 20 20 69 6E 73 \1_load\.. ins
014B70: 74 72 75 63 74 69 6F 6E 20 74 6F 20 63 6F 6D 70 truction to comp
014B80: 69 6C 65 2E 20 57 68 65 6E 20 63 6F 6D 70 69 6C ile. When compil
014B90: 69 6E 67 20 69 73 20 63 6F 6D 70 6C 65 74 65 2C ing is complete,
014BA0: 20 74 68 65 20 20 6B 65 72 6E 65 6C 20 20 73 61 the kernel sa
014BB0: 79 73 20 20 22 6F 6B 22 2E 0D 0A 20 20 54 68 65 ys "ok"... The
014BC0: 6E 20 74 79 70 65 20 5C 68 61 6E 6F 69 5C 2E 20 n type \hanoi\.
014BD0: 53 65 6C 65 63 74 20 74 68 65 20 6E 75 6D 62 65 Select the numbe
014BE0: 72 20 6F 66 20 64 69 73 6B 73 20 28 62 65 73 74 r of disks (best
014BF0: 20 74 6F 20 62 65 67 69 6E 20 77 69 74 68 20 74 to begin with t
014C00: 68 72 65 65 29 20 61 6E 64 0D 0A 20 20 22 6D 22 hree) and.. "m"
014C10: 20 66 6F 72 20 6D 61 6E 75 61 6C 2E 20 41 6C 6C for manual. All
014C20: 20 6F 74 68 65 72 20 6B 65 79 73 20 73 65 6C 65 other keys sele
014C30: 63 74 20 61 75 74 6F 6D 61 74 69 63 2E 20 4D 61 ct automatic. Ma
014C40: 79 20 62 65 20 62 65 73 74 20 74 6F 20 6C 65 74 y be best to let
014C50: 20 20 69 74 20 20 72 75 6E 0D 0A 20 20 61 75 74 it run.. aut
014C60: 6F 6D 61 74 69 63 61 6C 6C 79 20 74 68 65 20 66 omatically the f
014C70: 69 72 73 74 20 74 69 6D 65 2E 0D 0A 0D 0A 20 20 irst time.....
014C80: 20 20 4E 65 78 74 20 6D 6F 6E 74 68 20 77 65 20 Next month we
014C90: 68 61 76 65 20 61 20 46 6F 72 74 68 20 64 65 62 have a Forth deb
014CA0: 75 67 67 65 72 2E 0D 0A 0D 0A 20 20 20 20 20 20 ugger.....
014CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A *
014CC0: 2A 2A 2A 2A 2A 2A 0D 0A 1A 00 00 F8 F7 1A 00 01 ******..........
014CD0: 29 01 C9 00 00 00 1A 34 20 54 61 73 6D 61 6E 20 )......4 Tasman
014CE0: 53 6F 66 74 77 61 72 65 20 4C 74 64 2E 0D 0A 0D Software Ltd....
014CF0: 0A 20 20 54 68 69 73 20 41 6D 73 77 6F 72 64 20 . This Amsword
014D00: 65 72 2C 20 77 68 69 63 68 20 6D 75 73 74 20 73 er, which must s
014D10: 6F 72 74 20 6F 75 74 0D 0A 20 20 77 68 61 74 20 ort out.. what
014D20: 69 74 20 74 68 69 6E 6B 73 20 79 6F 75 20 77 61 it thinks you wa
014D30: 6E 74 20 64 6F 6E 65 2E 20 54 68 65 20 5A 38 30 nt done. The Z80
014D40: 20 63 68 69 70 20 74 68 65 6E 20 20 67 6F 65 73 chip then goes
014D50: 20 20 74 6F 20 20 77 6F 72 6B 20 20 69 6E 20 20 to work in
014D60: 73 69 6D 69 6C 61 72 0D 0A 20 20 66 61 73 68 69 similar.. fashi
014D70: 6F 6E 20 74 6F 20 74 68 65 20 77 61 79 20 77 65 on to the way we
014D80: 20 6D 75 73 74 20 65 6E 74 65 72 20 74 68 65 20 must enter the
014D90: 70 72 6F 62 6C 65 6D 20 69 6E 74 6F 20 46 6F 72 problem into For
014DA0: 74 68 2C 20 74 68 75 73 3A 20 33 20 34 20 2B 20 th, thus: 3 4 +
014DB0: 35 20 36 20 2B 20 2A 0D 0A 20 20 61 6E 64 20 74 5 6 + *.. and t
014DC0: 68 65 20 61 63 74 69 6F 6E 20 69 73 20 33 20 34 he action is 3 4
014DD0: 20 2B 20 65 71 75 61 6C 73 20 37 20 28 74 6F 70 + equals 7 (top
014DE0: 20 6F 66 20 73 74 61 63 6B 29 3B 20 20 35 20 20 of stack); 5
014DF0: 28 74 6F 70 29 20 20 37 20 20 28 66 69 72 73 74 (top) 7 (first
014E00: 20 20 62 65 6C 6F 77 0D 0A 20 20 74 6F 70 29 3B below.. top);
014E10: 20 74 68 65 6E 20 73 69 78 20 61 72 72 69 76 65 then six arrive
014E20: 73 20 61 6E 64 20 73 69 74 73 20 6F 6E 20 74 68 s and sits on th
014E30: 65 20 54 4F 53 2C 20 77 69 74 68 20 35 20 6F 6E e TOS, with 5 on
014E40: 65 20 75 6E 64 65 72 20 61 6E 64 20 20 73 65 76 e under and sev
014E50: 65 6E 20 20 74 77 6F 0D 0A 20 20 75 6E 64 65 72 en two.. under
014E60: 2E 20 54 68 65 20 61 64 64 69 74 69 6F 6E 20 74 . The addition t
014E70: 61 6B 65 73 20 70 6C 61 63 65 20 62 65 74 77 65 akes place betwe
014E80: 65 6E 20 74 68 65 20 74 6F 70 20 74 77 6F 2C 20 en the top two,
014E90: 35 20 36 20 2B 20 65 71 75 61 6C 73 20 31 31 3B 5 6 + equals 11;
014EA0: 20 73 6F 20 31 31 0D 0A 20 20 69 73 20 6F 6E 20 so 11.. is on
014EB0: 74 68 65 20 54 4F 53 20 61 6E 64 20 73 65 76 65 the TOS and seve
014EC0: 6E 20 69 73 20 6F 6E 65 20 75 6E 64 65 72 2E 20 n is one under.
014ED0: 54 68 65 20 6E 65 78 74 20 6F 70 65 72 61 74 6F The next operato
014EE0: 72 20 20 61 72 72 69 76 65 73 2C 20 20 6D 75 6C r arrives, mul
014EF0: 74 69 70 6C 79 2C 0D 0A 20 20 73 6F 20 6C 6C 20 tiply,.. so ll
014F00: 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 20 20 2B 2B .. ******.. ++
014F10: 2B 2B 2B 2B 20 49 6E 74 72 6F 64 75 63 74 69 6F ++++ Introductio
014F20: 6E 20 74 6F 20 46 6F 72 74 68 2C 20 50 61 72 74 n to Forth, Part
014F30: 20 34 2C 20 53 65 70 74 65 6D 62 65 72 20 31 39 4, September 19
014F40: 38 37 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 87.. ******....
014F50: 20 20 20 20 57 6F 72 6B 69 6E 67 20 74 68 72 6F Working thro
014F60: 75 67 68 20 74 68 65 20 73 74 61 63 6B 73 20 69 ugh the stacks i
014F70: 6E 20 46 6F 72 74 68 20 6C 61 73 74 20 6D 6F 6E n Forth last mon
014F80: 74 68 2C 20 77 65 20 72 61 6E 20 6F 75 74 20 6F th, we ran out o
014F90: 66 20 73 70 61 63 65 20 62 65 66 6F 72 65 0D 0A f space before..
014FA0: 20 20 6C 6F 6F 6B 69 6E 67 20 61 74 20 61 20 6C looking at a l
014FB0: 69 74 74 6C 65 20 70 72 6F 67 72 61 6D 20 77 68 ittle program wh
014FC0: 69 63 68 20 70 72 69 6E 74 73 20 6F 75 74 20 74 ich prints out t
014FD0: 68 65 20 6E 75 6D 62 65 72 20 6F 6E 20 74 68 65 he number on the
014FE0: 20 74 6F 70 20 6F 66 20 20 73 74 61 63 6B 0D 0A top of stack..
014FF0: 20 20 28 54 4F 53 29 20 6E 65 61 74 6C 79 20 69 (TOS) neatly i
015000: 6E 20 62 69 6E 61 72 79 2C 20 64 65 63 69 6D 61 n binary, decima
015010: 6C 20 61 6E 64 20 68 65 78 69 64 65 63 69 6D 61 l and hexidecima
015020: 6C 2E 0D 0A 0D 0A 20 20 20 20 41 6E 20 69 6E 74 l..... An int
015030: 65 72 65 73 74 69 6E 67 20 61 73 70 65 63 74 20 eresting aspect
015040: 6F 66 20 46 6F 72 74 68 20 69 73 20 74 68 61 74 of Forth is that
015050: 20 77 65 20 63 61 6E 20 77 6F 72 6B 20 20 69 6E we can work in
015060: 20 20 61 6E 79 20 20 6E 75 6D 62 65 72 20 20 62 any number b
015070: 61 73 65 2C 0D 0A 20 20 66 72 6F 6D 20 74 77 6F ase,.. from two
015080: 20 74 6F 20 32 35 35 2E 20 54 68 65 20 77 6F 72 to 255. The wor
015090: 64 20 42 41 53 45 20 69 6E 20 46 6F 72 74 68 20 d BASE in Forth
0150A0: 69 73 20 6B 6E 6F 77 6E 20 61 73 20 61 20 75 73 is known as a us
0150B0: 65 72 20 76 61 72 69 61 62 6C 65 2E 0D 0A 0D 0A er variable.....
0150C0: 20 20 20 20 57 68 65 6E 20 77 65 20 74 79 70 65 When we type
0150D0: 20 2F 62 61 73 65 2F 2C 20 74 68 65 20 61 64 64 /base/, the add
0150E0: 72 65 73 73 20 6F 66 20 74 68 65 20 20 76 61 72 ress of the var
0150F0: 69 61 62 6C 65 20 20 42 41 53 45 20 20 69 73 20 iable BASE is
015100: 69 73 20 61 64 64 65 64 20 74 6F 20 69 74 73 65 is added to itse
015110: 6C 66 20 74 68 65 20 6E 75 6D 62 65 72 20 6F 66 lf the number of
015120: 20 74 69 6D 65 73 20 69 6E 64 69 63 61 74 65 64 times indicated
015130: 20 20 62 79 20 20 74 68 65 20 20 6E 75 6D 62 65 by the numbe
015140: 72 20 20 6F 6E 65 0D 0A 20 20 75 6E 64 65 72 20 r one.. under
015150: 74 68 65 20 54 4F 53 2C 20 77 68 69 63 68 20 69 the TOS, which i
015160: 73 20 73 65 76 65 6E 20 28 77 68 69 72 72 2C 20 s seven (whirr,
015170: 67 72 69 6E 64 29 20 31 31 2B 31 31 2B 31 31 2B grind) 11+11+11+
015180: 31 31 2B 31 31 2B 31 31 2B 31 31 2C 20 70 72 6F 11+11+11+11, pro
015190: 64 75 63 69 6E 67 0D 0A 20 20 74 68 65 20 72 65 ducing.. the re
0151A0: 73 75 6C 74 2C 20 37 37 2C 20 77 68 69 63 68 20 sult, 77, which
0151B0: 69 73 20 6E 65 61 74 6C 79 20 77 72 61 70 70 65 is neatly wrappe
0151C0: 64 20 61 6E 64 20 70 75 74 20 6F 6E 20 74 68 65 d and put on the
0151D0: 20 54 4F 53 20 77 61 69 74 69 6E 67 20 20 66 6F TOS waiting fo
0151E0: 72 20 20 74 68 65 0D 0A 20 20 6E 65 78 74 20 69 r the.. next i
0151F0: 6E 73 74 72 75 63 74 69 6F 6E 2C 20 77 68 69 63 nstruction, whic
015200: 68 20 6D 61 79 20 62 65 20 61 20 6D 6F 76 65 2C h may be a move,
015210: 20 65 78 65 63 75 74 65 2C 20 64 6F 20 6F 72 20 execute, do or
015220: 20 77 68 61 74 65 76 65 72 20 20 2D 2D 20 20 69 whatever -- i
015230: 74 20 20 6D 61 79 0D 0A 20 20 65 76 65 6E 20 62 t may.. even b
015240: 65 20 61 6E 6F 74 68 65 72 20 6E 75 6D 62 65 72 e another number
015250: 20 61 73 20 74 68 65 20 66 69 72 73 74 20 70 61 as the first pa
015260: 72 74 20 6F 66 20 73 6F 6D 65 20 6D 6F 72 65 20 rt of some more
015270: 61 72 69 74 68 6D 65 74 69 63 2E 0D 0A 0D 0A 20 arithmetic.....
015280: 20 20 20 49 74 20 6D 61 79 20 73 65 65 6D 20 70 It may seem p
015290: 65 63 75 6C 69 61 72 20 61 74 20 66 69 72 73 74 eculiar at first
0152A0: 2C 20 62 75 74 20 72 65 61 6C 6C 79 20 69 74 20 , but really it
0152B0: 69 73 20 71 75 69 74 65 20 6C 6F 67 69 63 61 6C is quite logical
0152C0: 2E 20 4E 6F 77 20 79 6F 75 20 63 61 6E 0D 0A 20 . Now you can..
0152D0: 20 65 78 70 65 72 69 6D 65 6E 74 20 77 69 74 68 experiment with
0152E0: 20 74 68 65 20 64 69 66 66 65 72 65 6E 74 20 6F the different o
0152F0: 70 65 72 61 74 6F 72 73 2C 20 2B 20 2A 20 2D 20 perators, + * -
015300: 20 6C 65 66 74 20 20 6F 6E 20 20 74 68 65 0D 0A left on the..
015310: 20 20 73 74 61 63 6B 2E 20 42 79 20 73 65 74 74 stack. By sett
015320: 69 6E 67 20 42 41 53 45 20 74 6F 20 61 20 76 61 ing BASE to a va
015330: 6C 75 65 20 28 6E 6F 6D 69 6E 61 74 65 64 20 62 lue (nominated b
015340: 79 20 75 73 29 2C 20 74 68 65 6E 20 20 77 65 20 y us), then we
015350: 20 63 61 6E 20 20 77 6F 72 6B 20 20 69 6E 0D 0A can work in..
015360: 20 20 74 68 61 74 20 6E 75 6D 62 65 72 20 62 61 that number ba
015370: 73 65 2E 0D 0A 0D 0A 20 20 20 20 48 65 78 20 69 se..... Hex i
015380: 73 20 61 20 73 74 61 6E 64 61 72 64 20 46 6F 72 s a standard For
015390: 74 68 20 77 6F 72 64 20 77 68 69 63 68 20 73 65 th word which se
0153A0: 74 73 20 42 41 53 45 20 74 6F 20 31 36 2E 20 49 ts BASE to 16. I
0153B0: 66 20 77 65 20 74 79 70 65 20 20 48 45 58 2C 20 f we type HEX,
0153C0: 20 74 68 65 6E 0D 0A 20 20 61 6C 6C 20 6E 75 6D then.. all num
0153D0: 62 65 72 73 20 69 6E 70 75 74 20 6F 72 20 6F 75 bers input or ou
0153E0: 74 70 75 74 20 77 69 6C 6C 20 62 65 20 74 72 65 tput will be tre
0153F0: 61 74 65 64 20 61 73 20 68 65 78 61 64 65 63 69 ated as hexadeci
015400: 6D 61 6C 2E 20 54 68 65 72 65 20 69 73 20 6E 6F mal. There is no
015410: 20 6E 65 65 64 0D 0A 20 20 74 6F 20 75 73 65 20 need.. to use
015420: 74 68 65 20 70 72 65 66 69 78 20 22 26 22 20 61 the prefix "&" a
015430: 73 20 69 6E 20 42 61 73 69 63 2E 20 42 69 6E 61 s in Basic. Bina
015440: 72 79 20 28 62 61 73 65 20 32 29 20 61 6E 64 20 ry (base 2) and
015450: 4F 63 74 61 6C 20 28 62 61 73 65 20 38 29 20 63 Octal (base 8) c
015460: 61 6E 20 62 65 0D 0A 20 20 73 65 74 20 62 79 20 an be.. set by
015470: 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 77 6F the following wo
015480: 72 64 73 20 69 66 20 62 69 6E 61 72 79 20 61 6E rds if binary an
015490: 64 20 6F 63 74 61 6C 20 61 72 65 20 20 6E 6F 74 d octal are not
0154A0: 20 20 69 6E 20 20 6F 75 72 20 20 64 69 63 74 69 in our dicti
0154B0: 6F 6E 61 72 79 0D 0A 20 20 61 6C 72 65 61 64 79 onary.. already
0154C0: 2E 0D 0A 0D 0A 20 20 20 20 3A 20 62 69 6E 61 72 ..... : binar
0154D0: 79 20 32 20 62 61 73 65 20 63 21 20 3B 0D 0A 20 y 2 base c! ;..
0154E0: 20 20 20 3A 20 6F 63 74 61 6C 20 38 20 62 61 73 : octal 8 bas
0154F0: 65 20 63 21 20 3B 0D 0A 0D 0A 20 20 20 20 54 68 e c! ;.... Th
015500: 2F 2C 20 75 73 69 6E 67 20 2F 2E 73 2F 20 74 6F /, using /.s/ to
015510: 20 73 65 65 20 77 68 61 74 20 20 69 73 0D 0A 20 see what is..
015520: 20 68 61 70 70 65 6E 69 6E 67 20 6F 6E 20 74 68 happening on th
015530: 65 20 73 74 61 63 6B 2E 0D 0A 20 20 20 20 20 20 e stack...
015540: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
015550: 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 0D 0A 1A ******...
015560: 53 6F 66 74 77 61 72 65 20 4C 74 64 2E 0D 0A 0D Software Ltd....
015570: 0A 20 20 54 68 69 73 20 41 6D 73 77 6F 72 64 20 . This Amsword
015580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0155A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0155B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0155C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0155D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0155E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0155F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0156A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0156B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0156C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0156D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0156E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0156F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015700: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
015710: 12 00 01 00 02 09 4E E5 12 00 C1 02 00 00 00 02 ......N.........
015720: 12 00 C6 02 00 00 00 02 12 00 C2 02 00 00 00 02 ................
015730: 12 00 C7 02 00 00 00 02 12 00 C3 02 00 00 00 02 ................
015740: 12 00 C8 02 00 00 00 02 12 00 C4 02 00 00 00 02 ................
015750: 12 00 C9 02 00 00 00 02 12 00 C5 02 00 00 00 02 ................
015760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015800: 65 20 76 61 6C 75 65 20 74 6F 20 73 65 74 20 42 e value to set B
015810: 41 53 45 20 69 73 20 70 75 74 20 6F 6E 20 74 68 ASE is put on th
015820: 65 20 73 74 61 63 6B 20 66 69 72 73 74 2E 20 54 e stack first. T
015830: 68 65 20 77 6F 72 64 20 42 41 53 45 20 74 68 65 he word BASE the
015840: 6E 20 70 6C 61 63 65 73 0D 0A 20 20 74 68 65 20 n places.. the
015850: 61 64 64 72 65 73 73 20 6F 66 20 42 41 53 45 20 address of BASE
015860: 6F 6E 74 6F 20 74 68 65 20 73 74 61 63 6B 2E 20 onto the stack.
015870: 20 43 21 20 69 73 20 61 20 46 6F 72 74 68 20 77 C! is a Forth w
015880: 6F 72 64 20 74 6F 20 20 73 74 6F 72 65 20 20 74 ord to store t
015890: 68 65 20 20 62 79 74 65 0D 0A 20 20 74 68 61 74 he byte.. that
0158A0: 20 69 73 20 73 65 63 6F 6E 64 20 6F 6E 20 74 68 is second on th
0158B0: 65 20 73 74 61 63 6B 20 74 6F 20 74 68 65 20 61 e stack to the a
0158C0: 64 64 72 65 73 73 20 74 68 61 74 20 69 73 20 6F ddress that is o
0158D0: 6E 20 74 68 65 20 54 4F 53 2E 20 49 6E 20 65 66 n the TOS. In ef
0158E0: 66 65 63 74 20 20 69 74 0D 0A 20 20 69 73 20 74 fect it.. is t
0158F0: 68 65 20 73 61 6D 65 20 61 73 20 74 68 65 20 42 he same as the B
015900: 61 73 69 63 20 50 4F 4B 45 2E 20 54 72 79 20 62 asic POKE. Try b
015910: 69 6E 61 72 79 20 61 6E 64 20 6F 63 74 61 6C 20 inary and octal
015920: 74 6F 20 73 65 65 20 77 68 61 74 20 68 61 70 70 to see what happ
015930: 65 6E 73 2E 0D 0A 0D 0A 20 20 20 20 41 20 77 6F ens..... A wo
015940: 72 64 20 6F 66 20 77 61 72 6E 69 6E 67 3A 20 49 rd of warning: I
015950: 66 20 77 65 20 61 72 65 20 77 6F 72 6B 69 6E 67 f we are working
015960: 20 69 6E 20 42 49 4E 41 52 59 2C 20 74 68 65 6E in BINARY, then
015970: 20 20 61 6C 6C 20 20 76 61 6C 75 65 73 20 20 65 all values e
015980: 6E 74 65 72 65 64 0D 0A 20 20 6D 75 73 74 20 62 ntered.. must b
015990: 65 20 69 6E 20 42 49 4E 41 52 59 2C 20 74 68 61 e in BINARY, tha
0159A0: 74 20 69 73 20 31 20 6F 72 20 30 2E 20 54 6F 20 t is 1 or 0. To
0159B0: 72 65 74 75 72 6E 20 74 6F 20 74 68 65 20 75 73 return to the us
0159C0: 75 61 6C 20 62 61 73 65 20 6F 66 20 20 31 30 2C ual base of 10,
0159D0: 20 20 74 79 70 65 0D 0A 20 20 2F 64 65 63 69 6D type.. /decim
0159E0: 61 6C 2F 20 2D 2D 20 77 68 69 63 68 20 69 73 20 al/ -- which is
0159F0: 61 20 73 74 61 6E 64 61 72 64 20 77 6F 72 64 20 a standard word
015A00: 75 63 74 69 6F 6E 20 61 74 20 61 20 74 69 6D 65 uction at a time
015A10: 2E 20 20 20 20 52 65 61 64 20 74 68 65 20 74 65 . Read the te
015A20: 78 74 20 69 6E 20 74 68 65 20 6B 65 72 6E 65 6C xt in the kernel
015A30: 20 77 69 74 68 20 74 68 65 20 63 6F 6D 6D 61 6E with the comman
015A40: 64 73 0D 0A 20 20 2F 31 5F 6C 69 73 74 2F 2C 20 ds.. /1_list/,
015A50: 2F 32 5F 6C 69 73 74 2F 20 65 74 63 2E 0D 0A 0D /2_list/ etc....
015A60: 0A 20 20 20 20 49 20 61 73 6B 65 64 20 50 65 74 . I asked Pet
015A70: 72 20 69 66 20 74 68 65 72 65 20 65 78 69 73 74 r if there exist
015A80: 65 64 20 61 20 63 6F 6D 70 69 6C 65 72 20 77 68 ed a compiler wh
015A90: 69 63 68 20 63 6F 75 6C 64 20 62 65 20 75 73 65 ich could be use
015AA0: 64 20 69 6E 0D 0A 20 20 63 6F 6E 6A 75 6E 63 74 d in.. conjunct
015AB0: 69 6F 6E 20 77 69 74 68 20 74 68 65 20 6B 65 72 ion with the ker
015AC0: 6E 65 6C 20 74 6F 20 63 72 65 61 74 65 20 62 69 nel to create bi
015AD0: 6E 61 72 79 20 66 69 6C 65 73 20 6F 66 20 46 6F nary files of Fo
015AE0: 72 74 68 20 70 72 6F 67 72 61 6D 73 2C 20 73 75 rth programs, su
015AF0: 63 68 0D 0A 20 20 61 73 20 48 41 4E 4F 49 2E 46 ch.. as HANOI.F
015B00: 54 48 2E 20 54 68 65 20 68 6F 70 65 20 77 61 73 TH. The hope was
015B10: 20 74 68 61 74 20 73 75 63 68 20 61 20 62 69 6E that such a bin
015B20: 61 72 79 20 66 69 6C 65 20 63 6F 75 6C 64 20 74 ary file could t
015B30: 68 65 6E 20 62 65 20 72 75 6E 0D 0A 20 20 77 68 hen be run.. wh
015B40: 69 6C 65 20 69 6E 20 42 61 73 69 63 2C 20 77 69 ile in Basic, wi
015B50: 74 68 6F 75 74 20 74 68 65 20 6E 65 65 64 20 74 thout the need t
015B60: 6F 20 6C 6F 61 64 20 74 68 65 20 6B 65 72 6E 65 o load the kerne
015B70: 6C 20 66 69 72 73 74 2E 20 50 65 74 72 27 73 20 l first. Petr's
015B80: 72 65 70 6C 79 3A 0D 0A 0D 0A 20 20 20 20 20 22 reply:.... "
015B90: 54 68 65 72 65 20 69 73 20 61 20 70 72 6F 67 72 There is a progr
015BA0: 61 6D 20 77 68 69 63 68 20 77 69 6C 6C 20 74 61 am which will ta
015BB0: 6B 65 20 61 20 46 6F 72 74 68 20 73 79 73 74 65 ke a Forth syste
015BC0: 6D 20 28 6B 65 72 6E 65 6C 20 77 69 74 68 20 63 m (kernel with c
015BD0: 6F 6D 70 69 6C 65 64 0D 0A 20 20 61 70 70 6C 69 ompiled.. appli
015BE0: 63 61 74 69 6F 6E 29 20 61 6E 64 20 63 72 65 61 cation) and crea
015BF0: 74 65 20 61 6E 6F 74 68 65 72 20 73 79 73 74 65 te another syste
015C00: 69 6E 20 6D 6F 73 74 20 46 6F 72 74 68 20 76 6F in most Forth vo
015C10: 63 61 62 75 6C 61 72 69 65 73 2E 0D 0A 0D 0A 20 cabularies.....
015C20: 20 20 20 4E 6F 77 20 74 6F 20 6F 75 72 20 6E 65 Now to our ne
015C30: 77 20 77 6F 72 64 20 28 72 6F 75 74 69 6E 65 29 w word (routine)
015C40: 2E 20 4D 61 6B 65 20 73 75 72 65 20 20 42 49 4E . Make sure BIN
015C50: 41 52 59 20 20 69 73 20 20 69 6E 20 20 74 68 65 ARY is in the
015C60: 20 20 64 69 63 74 69 6F 6E 61 72 79 2E 0D 0A 20 dictionary...
015C70: 20 44 65 63 69 6D 61 6C 20 61 6E 64 20 68 65 78 Decimal and hex
015C80: 61 64 65 63 69 6D 61 6C 20 73 68 6F 75 6C 64 20 adecimal should
015C90: 62 65 20 74 68 65 72 65 20 61 6C 72 65 61 64 79 be there already
015CA0: 2E 20 4F 75 72 20 77 6F 72 64 20 77 69 6C 6C 20 . Our word will
015CB0: 62 65 20 20 6B 6E 6F 77 6E 20 20 61 73 0D 0A 20 be known as..
015CC0: 20 2F 2E 6E 2F 20 61 6E 64 20 77 69 6C 6C 20 74 /.n/ and will t
015CD0: 61 6B 65 20 74 68 65 20 6E 75 6D 62 65 72 20 6F ake the number o
015CE0: 66 66 20 74 68 65 20 74 6F 70 20 6F 66 20 74 68 ff the top of th
015CF0: 65 20 73 74 61 63 6B 20 61 6E 64 20 70 72 69 6E e stack and prin
015D00: 74 20 69 74 20 20 6F 75 74 20 20 69 6E 0D 0A 20 t it out in..
015D10: 20 62 69 6E 61 72 79 2C 20 64 65 63 69 6D 61 6C binary, decimal
015D20: 20 61 6E 64 20 68 65 78 20 72 65 67 61 72 64 6C and hex regardl
015D30: 65 73 73 20 6F 66 20 74 68 65 20 63 75 72 72 65 ess of the curre
015D40: 6E 74 20 42 41 53 45 2E 0D 0A 0D 0A 20 20 20 20 nt BASE.....
015D50: 3A 20 2E 6E 20 62 61 73 65 20 63 40 20 3E 72 20 : .n base c@ >r
015D60: 62 69 6E 61 72 79 20 64 75 70 20 63 72 20 63 72 binary dup cr cr
015D70: 0D 0A 20 20 20 20 20 20 2E 22 20 42 49 4E 3D 20 .. ." BIN=
015D80: 22 20 75 2E 20 63 72 20 64 65 63 69 6D 61 6C 20 " u. cr decimal
015D90: 64 75 70 0D 0A 20 20 20 20 20 20 2E 22 20 44 45 dup.. ." DE
015DA0: 43 3D 20 22 20 75 2E 20 63 72 20 68 65 78 20 64 C= " u. cr hex d
015DB0: 75 70 0D 0A 20 20 20 20 20 20 2E 22 20 48 45 58 up.. ." HEX
015DC0: 3D 20 22 20 75 2E 20 63 72 20 63 72 0D 0A 20 20 = " u. cr cr..
015DD0: 20 20 20 20 72 3E 20 62 61 73 65 20 63 21 20 3B r> base c! ;
015DE0: 0D 0A 0D 0A 20 20 20 20 4E 65 78 74 20 6D 6F 6E .... Next mon
015DF0: 74 68 20 77 65 20 62 65 67 69 6E 20 6C 6F 6F 6B th we begin look
015E00: 6D 20 77 68 69 63 68 20 69 6E 63 6C 75 64 65 73 m which includes
015E10: 20 6F 6E 6C 79 20 74 68 65 20 77 6F 72 64 73 0D only the words.
015E20: 0A 20 20 61 63 74 75 61 6C 6C 79 20 75 73 65 64 . actually used
015E30: 2C 20 62 75 74 20 69 74 20 69 73 20 61 20 76 65 , but it is a ve
015E40: 72 79 20 6C 65 6E 67 74 68 79 20 70 72 6F 63 65 ry lengthy proce
015E50: 64 75 72 65 20 61 6E 64 20 64 65 66 69 6E 69 74 dure and definit
015E60: 65 6C 79 20 72 65 71 75 69 72 65 73 0D 0A 20 20 ely requires..
015E70: 43 50 2F 4D 2C 20 70 72 65 66 65 72 61 62 6C 79 CP/M, preferably
015E80: 20 77 69 74 68 20 74 77 6F 20 64 72 69 76 65 73 with two drives
015E90: 2E 20 42 75 74 20 74 68 65 72 65 20 69 73 20 6E . But there is n
015EA0: 6F 20 72 65 61 73 6F 6E 20 77 68 79 20 61 20 63 o reason why a c
015EB0: 6F 6D 70 69 6C 65 64 0D 0A 20 20 61 70 70 6C 69 ompiled.. appli
015EC0: 63 61 74 69 6F 6E 20 63 6F 75 6C 64 20 6E 6F 74 cation could not
015ED0: 20 62 65 20 73 61 76 65 64 20 74 6F 67 65 74 68 be saved togeth
015EE0: 65 72 20 77 69 74 68 20 74 68 65 20 6B 65 72 6E er with the kern
015EF0: 65 6C 20 61 73 20 61 20 6E 65 77 20 73 79 73 74 el as a new syst
015F00: 65 6D 2E 0D 0A 20 20 41 73 73 75 6D 69 6E 67 20 em... Assuming
015F10: 74 68 61 74 20 79 6F 75 20 77 61 6E 74 65 64 20 that you wanted
015F20: 74 6F 20 70 6C 61 79 20 48 41 4E 4F 49 20 6F 66 to play HANOI of
015F30: 74 65 6E 2C 20 63 6F 6D 70 69 6C 65 20 69 74 2C ten, compile it,
015F40: 20 74 68 65 6E 20 2F 73 61 76 65 2D 66 6F 72 74 then /save-fort
015F50: 68 2F 0D 0A 20 20 75 6E 64 65 72 20 61 6E 6F 74 h/.. under anot
015F60: 68 65 72 20 6E 61 6D 65 2C 20 73 61 79 20 48 41 her name, say HA
015F70: 4E 4F 49 52 55 4E 2E 20 54 68 65 6E 2C 20 52 55 NOIRUN. Then, RU
015F80: 4E 22 48 41 4E 4F 49 52 55 4E 20 61 66 74 65 72 N"HANOIRUN after
015F90: 20 73 77 69 74 63 68 2D 6F 6E 20 77 6F 75 6C 64 switch-on would
015FA0: 0D 0A 20 20 6C 6F 61 64 20 61 6E 64 20 73 74 61 .. load and sta
015FB0: 72 74 20 46 6F 72 74 68 3B 20 6F 6E 63 65 20 6C rt Forth; once l
015FC0: 6F 61 64 65 64 2C 20 2F 68 61 6E 6F 69 2F 20 77 oaded, /hanoi/ w
015FD0: 6F 75 6C 64 20 73 74 61 72 74 20 74 68 65 20 67 ould start the g
015FE0: 61 6D 65 20 61 73 20 6E 6F 72 6D 61 6C 2E 0D 0A ame as normal...
015FF0: 0D 0A 20 20 20 20 20 22 54 68 65 72 65 20 69 73 .. "There is
016000: 69 6E 67 20 61 74 20 6C 6F 6F 70 73 20 61 6E 64 ing at loops and
016010: 20 6F 74 68 65 72 20 72 6F 75 74 69 6E 65 73 20 other routines
016020: 69 6E 20 46 6F 72 74 68 2E 20 4B 65 65 70 20 74 in Forth. Keep t
016030: 68 65 0D 0A 20 20 66 6C 61 67 20 66 6C 79 69 6E he.. flag flyin
016040: 67 2E 0D 0A 0D 0A 20 20 20 20 20 20 20 20 20 20 g.....
016050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A *
016060: 2A 2A 2A 2A 2A 0D 0A 1A 20 4C 74 64 2E 0D 0A 0D *****... Ltd....
016070: 0A 20 20 54 68 69 73 20 41 6D 73 77 6F 72 64 20 . This Amsword
016080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0160A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0160B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0160C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0160D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0160E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0160F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0161A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0161B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0161C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0161D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0161E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0161F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016200: 20 61 20 77 61 79 20 74 6F 20 6D 61 6B 65 20 69 a way to make i
016210: 74 20 73 65 6C 66 2D 73 74 61 72 74 69 6E 67 2E t self-starting.
016220: 20 20 42 65 66 6F 72 65 20 74 79 70 69 6E 67 20 Before typing
016230: 2F 73 61 76 65 2D 66 6F 72 74 68 2F 2C 0D 0A 20 /save-forth/,..
016240: 20 65 6E 74 65 72 20 2F 27 5F 68 61 6E 6F 69 5F enter /'_hanoi_
016250: 63 66 61 5F 27 5F 72 75 6E 5F 21 2F 2E 20 20 54 cfa_'_run_!/. T
016260: 68 69 73 20 77 69 6C 6C 20 73 74 6F 72 65 20 74 his will store t
016270: 68 65 20 43 6F 64 65 20 46 69 65 6C 64 20 41 64 he Code Field Ad
016280: 64 72 65 73 73 20 6F 66 0D 0A 20 20 2F 68 61 6E dress of.. /han
016290: 6F 69 2F 20 69 6E 20 74 68 65 20 50 61 72 61 6D oi/ in the Param
0162A0: 65 74 65 72 20 46 69 65 6C 64 20 41 64 64 72 65 eter Field Addre
0162B0: 73 73 20 6F 66 20 74 68 65 20 77 6F 72 64 20 2F ss of the word /
0162C0: 72 75 6E 2F 2C 20 77 68 69 63 68 20 69 73 20 69 run/, which is i
0162D0: 6E 63 6C 75 64 65 64 0D 0A 20 20 69 6E 20 74 68 ncluded.. in th
0162E0: 65 20 73 74 61 72 74 2D 75 70 20 77 6F 72 64 20 e start-up word
0162F0: 2F 63 6F 6C 64 2F 2E 20 48 6F 77 65 76 65 72 2C /cold/. However,
016300: 20 49 20 74 68 69 6E 6B 20 69 74 20 69 73 20 6E I think it is n
016310: 6F 74 20 77 6F 72 74 68 20 74 68 65 20 74 72 6F ot worth the tro
016320: 75 62 6C 65 0D 0A 20 20 2D 2D 20 61 6E 64 20 63 uble.. -- and c
016330: 61 72 65 20 69 73 20 72 65 71 75 69 72 65 64 20 are is required
016340: 28 70 61 72 74 69 63 75 6C 61 72 6C 79 20 73 69 (particularly si
016350: 6E 63 65 20 49 20 64 69 64 20 6E 6F 74 20 74 72 nce I did not tr
016360: 79 20 69 74 29 2E 20 20 49 20 72 65 6D 65 6D 62 y it). I rememb
016370: 65 72 0D 0A 20 20 74 68 69 6E 6B 69 6E 67 20 61 er.. thinking a
016380: 62 6F 75 74 20 69 74 20 77 68 65 6E 20 49 20 70 bout it when I p
016390: 75 74 20 2F 72 75 6E 2F 20 69 6E 74 6F 20 2F 63 ut /run/ into /c
0163A0: 6F 6C 64 2F 2E 20 49 20 68 61 76 65 20 63 6F 6D old/. I have com
0163B0: 65 20 61 63 72 6F 73 73 20 61 20 75 74 69 6C 69 e across a utili
0163C0: 74 79 0D 0A 20 20 77 68 69 63 68 20 61 6C 6C 6F ty.. which allo
0163D0: 77 73 20 73 61 76 69 6E 67 20 61 20 63 6F 6D 70 ws saving a comp
0163E0: 69 6C 65 64 20 61 70 70 6C 69 63 61 74 69 6F 6E iled application
0163F0: 20 61 73 20 61 20 62 69 6E 61 72 79 20 69 6D 61 as a binary ima
016400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0164A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0164B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0164C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0164D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0164E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0164F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0165A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0165B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0165C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0165D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0165E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0165F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016600: 67 65 20 61 6E 64 0D 0A 20 20 73 75 62 73 65 71 ge and.. subseq
016610: 75 65 6E 74 6C 79 20 72 65 6C 6F 61 64 69 6E 67 uently reloading
016620: 20 69 74 20 61 6E 64 20 74 68 72 65 61 64 69 6E it and threadin
016630: 67 20 69 74 20 69 6E 74 6F 20 74 68 65 20 6B 65 g it into the ke
016640: 72 6E 65 6C 2C 20 62 75 74 20 69 74 20 77 6F 75 rnel, but it wou
016650: 6C 64 0D 0A 20 20 6E 65 65 64 20 73 6F 6D 65 20 ld.. need some
016660: 61 64 61 70 74 61 74 69 6F 6E 2E 22 0D 0A 0D 0A adaptation."....
016670: 20 20 20 20 49 6E 63 69 64 65 6E 74 61 6C 6C 79 Incidentally
016680: 2C 20 6F 74 68 65 72 20 75 73 65 72 73 20 77 69 , other users wi
016690: 74 68 20 70 72 6F 67 72 61 6D 73 20 77 72 69 74 th programs writ
0166A0: 74 65 6E 20 69 6E 20 46 6F 72 74 68 20 61 72 65 ten in Forth are
0166B0: 20 69 6E 76 69 74 65 64 20 74 6F 0D 0A 20 20 73 invited to.. s
0166C0: 65 6E 64 20 74 68 65 6D 20 69 6E 20 66 6F 72 20 end them in for
0166D0: 70 6F 73 73 69 62 6C 65 20 69 6E 63 6C 75 73 69 possible inclusi
0166E0: 6F 6E 20 69 6E 20 74 68 65 20 6A 6F 75 72 6E 61 on in the journa
0166F0: 6C 2E 20 49 20 6B 6E 6F 77 20 50 65 74 72 20 69 l. I know Petr i
016700: 73 20 6B 65 65 6E 20 74 6F 0D 0A 20 20 73 65 65 s keen to.. see
016710: 20 77 6F 72 6B 20 66 72 6F 6D 20 6F 74 68 65 72 work from other
016720: 20 70 65 6F 70 6C 65 20 61 73 20 74 68 65 72 65 people as there
016730: 20 69 73 20 6E 6F 74 20 6D 75 63 68 20 61 76 61 is not much ava
016740: 69 6C 61 62 6C 65 20 69 6E 20 41 75 73 74 72 61 ilable in Austra
016750: 6C 69 61 2E 0D 0A 0D 0A 20 20 20 20 50 65 6F 70 lia..... Peop
016760: 6C 65 20 69 6E 74 65 72 65 73 74 65 64 20 69 6E le interested in
016770: 20 66 75 72 74 68 65 72 20 73 74 75 64 69 65 73 further studies
016780: 20 6F 66 20 46 6F 72 74 68 20 6D 61 79 20 6C 69 of Forth may li
016790: 6B 65 20 74 6F 20 6A 6F 69 6E 20 74 68 65 20 46 ke to join the F
0167A0: 6F 72 74 68 0D 0A 20 20 49 6E 74 65 72 73 74 20 orth.. Interst
0167B0: 47 72 6F 75 70 20 28 46 69 67 29 2C 20 77 68 6F Group (Fig), who
0167C0: 73 65 20 61 64 64 72 65 73 73 20 69 73 20 50 4F se address is PO
0167D0: 20 42 6F 78 20 38 32 33 31 2C 20 53 61 6E 20 4A Box 8231, San J
0167E0: 6F 73 65 2C 20 43 61 6C 69 66 6F 72 6E 69 61 0D ose, California.
0167F0: 0A 20 20 39 35 31 35 35 2E 20 4D 65 6D 62 65 72 . 95155. Member
016800: 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 20 20 2A 2A .. ******.. **
016810: 2A 2A 2A 2A 20 46 6F 72 74 68 2C 20 73 65 67 6D **** Forth, segm
016820: 65 6E 74 20 36 20 28 4F 63 74 6F 62 65 72 20 31 ent 6 (October 1
016830: 39 38 37 29 0D 0A 20 20 2A 2A 2A 2A 2A 2A 0D 0A 987).. ******..
016840: 0D 0A 20 20 20 20 4D 61 79 20 74 68 65 20 46 6F .. May the Fo
016850: 72 74 68 20 62 65 20 77 69 74 68 20 79 6F 75 21 rth be with you!
016860: 20 20 28 57 6F 72 64 73 20 6F 6E 20 61 20 54 2D (Words on a T-
016870: 73 68 69 72 74 20 73 6F 6C 64 20 62 79 20 74 68 shirt sold by th
016880: 65 20 46 69 67 20 46 6F 72 74 68 20 75 73 65 72 e Fig Forth user
016890: 0D 0A 20 20 67 72 6F 75 70 20 2D 2D 20 77 69 74 .. group -- wit
0168A0: 68 20 22 46 69 67 22 20 6D 65 61 6E 69 6E 67 20 h "Fig" meaning
0168B0: 46 6F 72 74 68 20 49 6E 74 65 72 65 73 74 20 47 Forth Interest G
0168C0: 72 6F 75 70 2E 29 0D 0A 0D 0A 20 20 20 20 54 68 roup.).... Th
0168D0: 65 20 70 72 6F 67 72 61 6D 20 66 72 6F 6D 20 50 e program from P
0168E0: 65 74 72 20 4C 75 6B 65 73 20 74 68 69 73 20 6D etr Lukes this m
0168F0: 6F 6E 74 68 20 69 73 20 44 45 42 55 47 2E 46 54 onth is DEBUG.FT
016900: 48 2C 20 77 68 69 63 68 20 63 6F 6E 74 61 69 6E H, which contain
016910: 73 20 74 68 65 0D 0A 20 20 74 65 78 74 20 61 73 s the.. text as
016920: 20 77 65 6C 6C 20 61 73 20 74 68 65 20 64 65 62 well as the deb
016930: 75 67 67 65 72 2E 20 20 20 49 74 20 6D 75 73 74 ugger. It must
016940: 20 62 65 20 6C 6F 61 64 65 64 20 69 6E 74 6F 20 be loaded into
016950: 74 68 65 20 46 6F 72 74 68 20 6B 65 72 6E 65 6C the Forth kernel
016960: 2C 0D 0A 20 20 43 50 43 46 54 48 32 2E 42 49 4E ,.. CPCFTH2.BIN
016970: 20 28 4D 61 79 38 37 20 6A 6F 75 72 6E 61 6C 29 (May87 journal)
016980: 20 6F 72 20 74 68 65 20 65 78 70 61 6E 64 65 64 or the expanded
016990: 20 76 65 72 73 69 6F 6E 20 61 6E 64 20 77 6F 72 version and wor
0169A0: 6B 73 20 77 69 74 68 20 77 6F 72 64 73 20 69 6E ks with words in
0169B0: 0D 0A 20 20 48 41 4E 4F 49 2E 46 54 48 20 28 53 .. HANOI.FTH (S
0169C0: 65 70 38 37 20 6A 6F 75 72 6E 61 6C 29 2E 20 20 ep87 journal).
0169D0: 20 44 45 42 55 47 20 73 74 65 70 73 20 74 68 72 DEBUG steps thr
0169E0: 6F 75 67 68 20 61 20 63 68 6F 73 65 6E 20 77 6F ough a chosen wo
0169F0: 72 64 2C 20 6F 6E 65 0D 0A 20 20 69 6E 73 74 72 rd, one.. instr
016A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
016A10: 13 00 01 00 02 09 4E E5 13 00 C1 02 00 00 00 02 ......N.........
016A20: 13 00 C6 02 00 00 00 02 13 00 C2 02 00 00 00 02 ................
016A30: 13 00 C7 02 00 00 00 02 13 00 C3 02 00 00 00 02 ................
016A40: 13 00 C8 02 00 00 00 02 13 00 C4 02 00 00 00 02 ................
016A50: 13 00 C9 02 00 00 00 02 13 00 C5 02 00 00 00 02 ................
016A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016B00: 73 68 69 70 20 66 6F 72 20 72 65 73 69 64 65 6E ship for residen
016B10: 74 73 20 6F 66 20 74 68 65 20 4E 6F 72 74 68 20 ts of the North
016B20: 41 6D 65 72 69 63 61 6E 20 63 6F 6E 74 69 6E 65 American contine
016B30: 6E 74 20 69 73 20 24 33 30 20 61 0D 0A 20 20 79 nt is $30 a.. y
016B40: 65 61 72 2C 20 77 68 69 6C 65 20 66 6F 72 20 6F ear, while for o
016B50: 76 65 72 73 65 61 73 20 70 65 6F 70 6C 65 20 28 verseas people (
016B60: 68 6F 77 20 64 61 72 65 20 74 68 65 79 20 63 61 how dare they ca
016B70: 6C 6C 20 75 73 20 66 6F 72 65 69 67 6E 65 72 73 ll us foreigners
016B80: 29 20 74 68 65 0D 0A 20 20 63 6F 73 74 20 69 73 ) the.. cost is
016B90: 20 24 34 32 20 61 20 79 65 61 72 20 69 6E 20 59 $42 a year in Y
016BA0: 61 6E 6B 69 65 20 67 72 65 65 6E 62 61 63 6B 73 ankie greenbacks
016BB0: 2E 0D 0A 0D 0A 20 20 20 20 46 69 67 20 68 61 73 ..... Fig has
016BC0: 20 61 76 61 69 6C 61 62 6C 65 20 6D 61 6E 79 20 available many
016BD0: 70 75 62 6C 69 63 61 74 69 6F 6E 73 2C 20 69 6E publications, in
016BE0: 63 6C 75 64 69 6E 67 20 62 61 63 6B 20 63 6F 70 cluding back cop
016BF0: 69 65 73 20 6F 66 20 69 74 73 20 6A 6F 75 72 6E ies of its journ
016C00: 61 6C 2C 0D 0A 20 20 46 6F 72 74 68 20 44 69 6D al,.. Forth Dim
016C10: 65 6E 73 69 6F 6E 73 20 28 73 69 78 20 69 73 73 ensions (six iss
016C20: 75 65 73 20 74 6F 20 61 20 76 6F 6C 75 6D 65 20 ues to a volume
016C30: 66 6F 72 20 24 55 53 31 38 20 61 69 72 6D 61 69 for $US18 airmai
016C40: 6C 20 6F 76 65 72 73 65 61 73 20 65 61 63 68 2C l overseas each,
016C50: 0D 0A 20 20 77 69 74 68 20 65 69 67 68 74 20 76 .. with eight v
016C60: 6F 6C 75 6D 65 73 20 61 6C 72 65 61 64 79 20 70 olumes already p
016C70: 75 62 6C 69 73 68 65 64 29 2E 20 4D 65 6D 62 65 ublished). Membe
016C80: 72 73 20 72 65 63 65 69 76 65 20 73 69 78 20 69 rs receive six i
016C90: 73 73 75 65 73 20 6F 66 20 46 6F 72 74 68 0D 0A ssues of Forth..
016CA0: 20 20 44 69 6D 65 6E 73 69 6F 6E 73 20 61 20 79 Dimensions a y
016CB0: 65 61 72 2E 20 20 20 54 68 65 20 22 62 69 62 6C ear. The "bibl
016CC0: 65 22 20 6F 66 20 46 6F 72 74 68 20 70 72 6F 67 e" of Forth prog
016CD0: 72 61 6D 65 72 73 2C 20 22 53 74 61 72 74 69 6E ramers, "Startin
016CE0: 67 20 46 6F 72 74 68 22 2C 20 68 61 73 0D 0A 20 g Forth", has..
016CF0: 20 62 65 65 6E 20 72 65 76 69 73 65 64 20 61 6E been revised an
016D00: 46 47 4C 4F 53 31 74 78 20 20 20 20 20 4C 4B 53 FGLOS1tx LKS
016D10: 20 38 37 30 35 30 38 20 20 20 20 20 20 20 20 20 870508
016D20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
016D30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
016D40: 54 68 69 73 20 69 73 20 61 20 70 61 72 74 69 61 This is a partia
016D50: 6C 20 67 6C 6F 73 73 61 72 79 20 6F 66 20 77 6F l glossary of wo
016D60: 72 64 73 20 75 73 65 64 20 69 6E 20 63 70 63 46 rds used in cpcF
016D70: 54 48 32 2C 20 77 68 69 63 68 20 69 73 20 20 20 TH2, which is
016D80: 61 64 61 70 74 65 64 20 66 72 6F 6D 20 4D 56 50 adapted from MVP
016D90: 2D 46 4F 52 54 48 20 62 79 20 44 72 2E 20 47 6C -FORTH by Dr. Gl
016DA0: 65 6E 20 48 61 79 64 6F 6E 2E 20 20 4D 56 50 2D en Haydon. MVP-
016DB0: 46 4F 52 54 48 20 63 6F 6E 66 6F 72 6D 73 20 20 FORTH conforms
016DC0: 74 6F 20 37 39 2D 53 54 41 4E 44 41 52 44 2C 20 to 79-STANDARD,
016DD0: 65 78 63 65 70 74 20 74 68 61 74 20 44 72 2E 20 except that Dr.
016DE0: 48 61 79 64 6F 6E 20 68 61 73 20 63 68 6F 73 65 Haydon has chose
016DF0: 6E 20 74 6F 20 70 72 65 66 69 78 20 20 20 20 20 n to prefix
016E00: 61 6C 6C 20 64 6F 75 62 6C 65 20 6E 75 6D 62 65 all double numbe
016E10: 72 20 6F 70 65 72 61 74 6F 72 73 20 62 79 20 22 r operators by "
016E20: 44 22 20 72 61 74 68 65 72 20 74 68 61 6E 20 22 D" rather than "
016E30: 32 22 20 28 74 68 75 73 20 44 44 55 50 20 20 20 2" (thus DDUP
016E40: 69 6E 73 74 65 61 64 20 6F 66 20 32 44 55 50 29 instead of 2DUP)
016E50: 2E 20 54 68 65 20 6D 61 69 6E 20 64 69 66 66 65 . The main diffe
016E60: 72 65 6E 63 65 73 20 62 65 74 77 65 65 6E 20 66 rences between f
016E70: 69 67 2D 53 54 41 4E 44 41 52 44 20 61 6E 64 20 ig-STANDARD and
016E80: 37 39 2D 53 54 41 4E 44 41 52 44 20 61 72 65 20 79-STANDARD are
016E90: 69 6E 20 43 52 45 41 54 45 20 61 6E 64 20 57 4F in CREATE and WO
016EA0: 52 44 2E 20 20 54 68 65 20 66 69 67 20 43 52 45 RD. The fig CRE
016EB0: 41 54 45 20 77 69 6C 6C 20 63 72 61 73 68 20 20 ATE will crash
016EC0: 74 68 69 73 20 73 79 73 74 65 6D 20 2D 20 75 73 this system - us
016ED0: 65 20 48 58 43 4F 44 45 20 69 6E 73 74 65 61 64 e HXCODE instead
016EE0: 2E 20 54 68 65 20 66 69 67 20 57 4F 52 44 20 64 . The fig WORD d
016EF0: 6F 65 73 20 6E 6F 74 20 6C 65 61 76 65 20 20 20 oes not leave
016F00: 64 20 69 73 20 61 76 61 69 6C 61 62 6C 65 20 74 d is available t
016F10: 68 72 6F 75 67 68 20 46 69 67 20 61 74 20 24 55 hrough Fig at $U
016F20: 53 33 30 20 61 69 72 6D 61 69 6C 20 6F 76 65 72 S30 airmail over
016F30: 73 65 61 73 20 28 24 32 31 20 73 65 61 0D 0A 20 seas ($21 sea..
016F40: 20 6D 61 69 6C 29 2E 20 22 49 6E 20 74 68 69 73 mail). "In this
016F50: 20 6E 65 77 20 65 64 69 74 69 6F 6E 20 28 6F 66 new edition (of
016F60: 20 4C 65 6F 20 42 72 6F 64 69 65 27 73 29 20 70 Leo Brodie's) p
016F70: 6F 70 75 6C 61 72 20 61 6E 64 20 63 6F 6D 70 6C opular and compl
016F80: 65 74 65 0D 0A 20 20 69 6E 74 72 6F 64 75 63 74 ete.. introduct
016F90: 69 6F 6E 20 74 6F 20 46 6F 72 74 68 2C 20 73 79 ion to Forth, sy
016FA0: 6E 74 61 78 20 68 61 73 20 62 65 65 6E 20 65 78 ntax has been ex
016FB0: 70 61 6E 64 65 64 20 74 6F 20 69 6E 63 6C 75 64 panded to includ
016FC0: 65 20 74 68 65 20 6E 65 77 20 46 6F 72 74 68 20 e the new Forth
016FD0: 27 38 33 0D 0A 20 20 73 74 61 6E 64 61 72 64 2C '83.. standard,
016FE0: 22 20 74 68 65 20 62 72 6F 63 68 75 72 65 20 73 " the brochure s
016FF0: 61 79 73 2E 20 49 74 20 61 6C 73 6F 20 65 78 70 ays. It also exp
017000: 6C 61 69 6E 73 20 74 68 65 20 64 69 66 66 65 72 lains the differ
017010: 65 6E 63 65 73 20 62 65 74 77 65 65 6E 20 46 69 ences between Fi
017020: 67 0D 0A 20 20 46 6F 72 74 68 2C 20 27 37 39 20 g.. Forth, '79
017030: 46 6F 72 74 68 2C 20 50 6F 6C 79 20 46 6F 72 74 Forth, Poly Fort
017040: 68 20 61 6E 64 20 74 68 65 20 61 6C 72 65 61 64 h and the alread
017050: 79 20 6D 65 6E 74 69 6F 6E 65 64 20 31 39 38 33 y mentioned 1983
017060: 20 76 65 72 73 69 6F 6E 2E 0D 0A 0D 0A 20 20 20 version.....
017070: 20 50 65 6F 70 6C 65 20 77 61 6E 74 69 6E 67 20 People wanting
017080: 6D 6F 72 65 20 64 65 74 61 69 6C 73 20 6F 66 20 more details of
017090: 46 69 67 20 63 61 6E 20 64 69 73 63 75 73 73 20 Fig can discuss
0170A0: 74 68 65 20 67 72 6F 75 70 20 77 69 74 68 20 50 the group with P
0170B0: 65 74 72 20 4C 75 6B 65 73 2C 0D 0A 20 20 32 36 etr Lukes,.. 26
0170C0: 20 4E 6F 6C 6C 20 53 74 2C 20 54 6F 6F 77 6F 6F Noll St, Toowoo
0170D0: 6D 62 61 20 51 6C 64 20 34 33 35 30 2E 20 49 20 mba Qld 4350. I
0170E0: 61 6D 20 63 65 72 74 61 69 6E 20 50 65 74 72 20 am certain Petr
0170F0: 77 6F 75 6C 64 20 62 65 20 70 6C 65 61 73 65 64 would be pleased
017100: 74 68 65 20 48 45 52 45 20 61 64 64 72 65 73 73 the HERE address
017110: 20 6F 6E 20 74 68 65 20 73 74 61 63 6B 2E 20 20 on the stack.
017120: 54 68 65 20 63 75 72 72 65 6E 74 20 38 33 2D 53 The current 83-S
017130: 54 41 4E 44 41 52 44 20 68 61 73 20 20 20 20 20 TANDARD has
017140: 61 67 61 69 6E 20 72 65 64 65 66 69 6E 65 64 20 again redefined
017150: 73 6F 6D 65 20 77 6F 72 64 73 20 61 6E 64 20 61 some words and a
017160: 64 64 65 64 20 61 20 6E 75 6D 62 65 72 20 6F 66 dded a number of
017170: 20 6E 65 77 20 6F 6E 65 73 3B 20 73 6F 6D 65 20 new ones; some
017180: 63 6F 6E 76 65 72 73 69 6F 6E 73 20 6D 61 79 20 conversions may
017190: 62 65 20 73 69 6D 70 6C 65 2C 20 73 6F 6D 65 20 be simple, some
0171A0: 76 69 72 74 75 61 6C 6C 79 20 69 6D 70 6F 73 73 virtually imposs
0171B0: 69 62 6C 65 2E 20 20 20 20 20 20 20 20 20 20 20 ible.
0171C0: 54 68 65 20 6B 65 79 77 6F 72 64 73 20 69 6E 20 The keywords in
0171D0: 74 68 69 73 20 67 6C 6F 73 73 61 72 79 20 61 72 this glossary ar
0171E0: 65 20 73 68 6F 77 6E 20 69 6E 20 75 70 70 65 72 e shown in upper
0171F0: 20 63 61 73 65 2C 20 61 6C 74 68 6F 75 67 68 20 case, although
017200: 74 68 65 20 64 69 63 74 69 6F 6E 61 72 79 20 69 the dictionary i
017210: 73 20 69 6E 20 6C 6F 77 65 72 20 63 61 73 65 2E s in lower case.
017220: 20 20 54 68 65 20 64 69 63 74 69 6F 6E 61 72 79 The dictionary
017230: 20 63 61 6E 20 62 65 20 20 20 20 20 20 20 20 20 can be
017240: 63 6F 6E 76 65 72 74 65 64 20 74 6F 20 75 70 70 converted to upp
017250: 65 72 20 20 63 61 73 65 2C 20 62 75 74 20 43 41 er case, but CA
017260: 53 45 46 4C 49 50 20 70 75 62 6C 69 73 68 65 64 SEFLIP published
017270: 20 69 6E 20 54 41 55 2C 20 4F 63 74 20 38 36 2C in TAU, Oct 86,
017280: 6E 65 65 64 73 20 61 64 61 70 74 69 6E 67 20 66 needs adapting f
017290: 6F 72 20 74 68 65 20 63 70 63 46 54 48 32 20 28 or the cpcFTH2 (
0172A0: 69 74 20 77 61 73 20 77 72 69 74 74 65 6E 20 69 it was written i
0172B0: 6E 20 61 6D 73 2D 46 4F 52 54 48 29 2E 20 20 20 n ams-FORTH).
0172C0: 4D 4F 55 4E 54 41 49 4E 20 56 49 45 57 20 50 52 MOUNTAIN VIEW PR
0172D0: 45 53 53 2C 20 50 4F 20 42 6F 78 20 34 36 35 36 ESS, PO Box 4656
0172E0: 2C 20 4D 6F 75 6E 74 61 69 6E 20 56 69 65 77 2C , Mountain View,
0172F0: 20 43 41 20 39 34 30 34 30 2C 20 55 53 41 2C 20 CA 94040, USA,
017300: 20 74 6F 20 68 65 61 72 0D 0A 20 20 66 72 6F 6D to hear.. from
017310: 20 46 6F 72 74 68 20 70 72 6F 67 72 61 6D 65 72 Forth programer
017320: 73 2C 20 62 75 64 64 69 6E 67 20 6F 72 20 65 78 s, budding or ex
017330: 70 65 72 69 65 6E 63 65 64 2E 0D 0A 0D 0A 20 20 perienced.....
017340: 20 20 49 6E 20 6C 6F 6F 6B 69 6E 67 20 74 68 72 In looking thr
017350: 6F 75 67 68 20 74 68 65 20 46 69 67 20 63 61 74 ough the Fig cat
017360: 61 6C 6F 67 75 65 2C 20 49 20 61 6D 20 63 65 72 alogue, I am cer
017370: 74 61 69 6E 20 74 68 61 74 20 6D 6F 73 74 2C 20 tain that most,
017380: 69 66 20 6E 6F 74 20 61 6C 6C 2C 0D 0A 20 20 62 if not all,.. b
017390: 6F 6F 6B 73 20 61 6E 64 20 6D 61 6E 79 20 72 65 ooks and many re
0173A0: 70 72 69 6E 74 73 20 6F 66 20 41 6D 65 72 69 63 prints of Americ
0173B0: 61 6E 20 6D 61 67 61 7A 69 6E 65 20 61 72 74 69 an magazine arti
0173C0: 63 6C 65 73 20 64 69 73 63 75 73 73 69 6E 67 20 cles discussing
0173D0: 46 6F 72 74 68 20 61 72 65 0D 0A 20 20 69 6E 63 Forth are.. inc
0173E0: 6C 75 64 65 64 2C 20 65 76 65 6E 20 74 68 65 20 luded, even the
0173F0: 68 69 73 74 6F 72 69 63 20 70 75 62 6C 69 63 61 historic publica
017400: 74 69 6F 6E 73 20 6F 6E 20 75 73 69 6E 67 20 46 tions on using F
017410: 6F 72 74 68 20 69 6E 20 61 73 74 72 6F 6E 6F 6D orth in astronom
017420: 79 2E 0D 0A 0D 0A 20 20 20 20 46 69 6E 61 6C 6C y..... Finall
017430: 79 20 69 6E 20 74 68 65 20 46 6F 72 74 68 20 63 y in the Forth c
017440: 6F 72 6E 65 72 20 74 68 69 73 20 6D 6F 6E 74 68 orner this month
017450: 2C 20 50 65 74 72 20 67 69 76 65 73 20 75 73 20 , Petr gives us
017460: 73 6F 6D 65 20 61 64 64 69 74 69 6F 6E 61 6C 0D some additional.
017470: 0A 20 20 69 6E 66 6F 72 6D 61 74 69 6F 6E 20 6F . information o
017480: 6E 20 74 68 65 20 77 6F 72 64 20 42 41 53 45 2E n the word BASE.
017490: 0D 0A 0D 0A 20 20 20 20 22 53 6F 6D 65 20 73 79 .... "Some sy
0174A0: 73 74 65 6D 73 20 75 73 65 20 6A 75 73 74 20 6F stems use just o
0174B0: 6E 65 20 62 79 74 65 2C 20 62 75 74 20 6F 75 72 ne byte, but our
0174C0: 73 20 69 73 20 61 20 66 75 6C 6C 20 74 77 6F 2D s is a full two-
0174D0: 62 79 74 65 20 6E 75 6D 62 65 72 20 73 6F 0D 0A byte number so..
0174E0: 20 20 74 68 61 74 20 69 74 20 63 61 6E 20 62 65 that it can be
0174F0: 20 69 6E 20 74 68 65 20 72 61 6E 67 65 20 2D 33 in the range -3
017500: 70 75 62 6C 69 73 68 65 64 20 41 4C 4C 20 41 42 published ALL AB
017510: 4F 55 54 20 46 4F 52 54 48 20 62 79 20 47 2E 20 OUT FORTH by G.
017520: 48 61 79 64 6F 6E 2E 20 20 49 74 20 69 73 20 61 Haydon. It is a
017530: 20 76 65 72 79 20 64 65 74 61 69 6C 65 64 20 20 very detailed
017540: 67 6C 6F 73 73 61 72 79 20 6F 66 20 74 68 65 20 glossary of the
017550: 4D 56 50 2D 46 4F 52 54 48 2C 20 62 75 74 20 69 MVP-FORTH, but i
017560: 74 20 69 73 20 6E 6F 74 20 61 20 74 65 61 63 68 t is not a teach
017570: 69 6E 67 20 74 65 78 74 2E 20 20 49 74 20 20 20 ing text. It
017580: 69 73 20 72 65 6C 65 61 73 65 64 20 77 69 74 68 is released with
017590: 6F 75 74 20 72 65 73 74 72 69 63 74 69 6F 6E 2C out restriction,
0175A0: 20 77 68 69 63 68 20 6D 65 61 6E 73 20 74 68 61 which means tha
0175B0: 74 20 69 74 20 63 61 6E 20 62 65 20 20 20 20 20 t it can be
0175C0: 64 75 70 6C 69 63 61 74 65 64 20 66 72 65 65 6C duplicated freel
0175D0: 79 20 28 73 65 65 6D 69 6E 67 6C 79 20 73 6F 6D y (seemingly som
0175E0: 65 62 6F 64 79 20 72 65 70 72 69 6E 74 65 64 20 ebody reprinted
0175F0: 66 6F 72 20 70 72 6F 66 69 74 29 2E 20 20 20 20 for profit).
017600: 49 74 20 61 6E 64 20 6F 74 68 65 72 20 70 75 62 It and other pub
017610: 6C 69 63 61 74 69 6F 6E 73 20 6D 61 79 20 62 65 lications may be
017620: 20 61 76 61 69 6C 61 62 6C 65 20 66 72 6F 6D 20 available from
017630: 46 49 47 20 2D 20 4D 65 6C 62 6F 75 72 6E 65 20 FIG - Melbourne
017640: 43 68 61 70 74 65 72 2C 20 63 6F 6E 74 61 63 74 Chapter, contact
017650: 20 4C 61 6E 63 65 20 43 6F 6C 6C 69 6E 73 2C 20 Lance Collins,
017660: 36 35 20 4D 61 72 74 69 6E 20 52 64 2E 2C 20 47 65 Martin Rd., G
017670: 4C 45 4E 20 49 52 49 53 2C 20 33 31 34 36 20 20 LEN IRIS, 3146
017680: 28 74 65 6C 2E 20 28 30 33 29 20 32 39 20 32 36 (tel. (03) 29 26
017690: 30 30 29 2E 20 20 20 20 20 20 20 20 20 20 20 20 00).
0176A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0176B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0176C0: 54 68 65 20 4D 56 50 2D 46 4F 52 54 48 20 75 73 The MVP-FORTH us
0176D0: 65 73 20 64 69 73 63 20 62 6C 6F 63 6B 73 20 61 es disc blocks a
0176E0: 73 20 65 78 74 65 72 6E 61 6C 20 6D 65 6D 6F 72 s external memor
0176F0: 79 2C 20 75 6E 64 65 72 20 43 50 2F 4D 2E 20 20 y, under CP/M.
017700: 32 37 36 38 20 74 6F 20 2B 33 32 37 36 37 20 28 2768 to +32767 (
017710: 75 73 65 20 2F 21 2F 20 2F 40 2F 2C 20 4E 4F 54 use /!/ /@/, NOT
017720: 20 2F 63 21 2F 20 2F 63 40 2F 20 2D 2D 0D 0A 20 /c!/ /c@/ --..
017730: 20 69 6E 20 6F 74 68 65 72 20 77 6F 72 64 73 2C in other words,
017740: 20 6C 65 61 76 65 20 6F 75 74 20 74 68 65 20 22 leave out the "
017750: 63 22 29 2E 20 54 68 65 20 63 6F 6D 6D 61 6E 64 c"). The command
017760: 20 2F 62 61 73 65 5F 40 5F 2E 2F 20 77 69 6C 6C /base_@_./ will
017770: 20 61 6C 77 61 79 73 20 70 72 69 6E 74 0D 0A 20 always print..
017780: 20 22 31 30 22 2E 20 54 68 65 20 70 72 61 63 74 "10". The pract
017790: 69 63 61 6C 20 6C 69 6D 69 74 73 20 61 72 65 20 ical limits are
0177A0: 32 20 74 6F 20 33 36 2C 20 69 66 20 77 65 20 77 2 to 36, if we w
0177B0: 61 6E 74 20 74 6F 20 75 73 65 20 6F 6E 6C 79 20 ant to use only
0177C0: 74 68 65 20 6E 75 6D 65 72 61 6C 73 0D 0A 20 20 the numerals..
0177D0: 30 20 74 6F 20 39 20 61 6E 64 20 6C 65 74 74 65 0 to 9 and lette
0177E0: 72 73 20 61 20 74 6F 20 7A 20 61 73 20 64 69 67 rs a to z as dig
0177F0: 69 74 73 2E 20 45 6E 74 65 72 20 2F 64 65 63 69 its. Enter /deci
017800: 6D 61 6C 5F 33 35 5F 33 36 5F 62 61 73 65 5F 21 mal_35_36_base_!
017810: 5F 2E 5F 64 65 63 69 6D 61 6C 2F 0D 0A 20 20 74 _._decimal/.. t
017820: 6F 20 67 65 74 20 74 68 65 20 61 6E 73 77 65 72 o get the answer
017830: 20 22 7A 22 20 61 6E 64 20 72 65 73 65 74 20 74 "z" and reset t
017840: 6F 20 64 65 63 69 6D 61 6C 2E 0D 0A 0D 0A 20 20 o decimal.....
017850: 20 20 22 49 6E 63 69 64 65 6E 74 61 6C 6C 79 2C "Incidentally,
017860: 20 74 68 65 72 65 20 69 73 20 74 68 65 20 77 6F there is the wo
017870: 72 64 20 2F 64 62 68 2F 20 69 6E 20 41 4D 45 4E rd /dbh/ in AMEN
017880: 44 31 2E 46 54 48 20 74 68 61 74 20 77 69 6C 6C D1.FTH that will
017890: 20 70 72 69 6E 74 20 61 0D 0A 20 20 6E 75 6D 62 print a.. numb
0178A0: 65 72 20 69 6E 20 64 65 63 69 6D 61 6C 2C 20 62 er in decimal, b
0178B0: 69 6E 61 72 79 20 61 6E 64 20 68 65 78 61 64 65 inary and hexade
0178C0: 63 69 6D 61 6C 2E 20 42 79 20 63 6F 6E 76 65 6E cimal. By conven
0178D0: 74 69 6F 6E 20 69 74 20 73 68 6F 75 6C 64 20 68 tion it should h
0178E0: 61 76 65 20 62 65 65 6E 0D 0A 20 20 63 61 6C 6C ave been.. call
0178F0: 65 64 20 2F 2E 64 62 68 2F 20 74 6F 20 69 6E 64 ed /.dbh/ to ind
017900: 54 68 65 20 6D 61 69 6E 20 6D 6F 64 69 66 69 63 The main modific
017910: 61 74 69 6F 6E 20 69 73 20 74 68 65 20 72 65 6D ation is the rem
017920: 6F 76 61 6C 20 6F 66 20 64 65 70 65 6E 64 65 6E oval of dependen
017930: 63 65 20 6F 6E 20 43 50 2F 4D 20 61 6E 64 20 20 ce on CP/M and
017940: 74 68 65 20 75 73 65 20 6F 66 20 6E 61 6D 65 64 the use of named
017950: 20 66 69 6C 65 73 20 66 6F 72 20 65 78 74 65 72 files for exter
017960: 6E 61 6C 20 73 74 6F 72 61 67 65 2E 20 20 54 68 nal storage. Th
017970: 65 20 74 72 61 64 69 74 69 6F 6E 61 6C 20 20 20 e traditional
017980: 64 69 76 69 73 69 6F 6E 20 69 6E 74 6F 20 62 6C division into bl
017990: 6F 63 6B 73 20 6F 72 20 73 63 72 65 65 6E 73 20 ocks or screens
0179A0: 69 73 20 72 65 74 61 69 6E 65 64 2C 20 62 75 74 is retained, but
0179B0: 20 6F 6E 6C 79 20 61 73 20 61 20 20 20 20 20 20 only as a
0179C0: 73 75 62 64 69 76 69 73 69 6F 6E 20 6F 66 20 74 subdivision of t
0179D0: 68 65 20 66 69 6C 65 20 77 68 69 63 68 20 69 73 he file which is
0179E0: 20 69 6E 20 6D 65 6D 6F 72 79 2E 20 20 20 20 20 in memory.
0179F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017A00: 54 68 65 20 46 4F 52 54 48 20 73 79 73 74 65 6D The FORTH system
017A10: 20 63 6F 6E 73 69 73 74 73 20 6F 66 20 74 77 6F consists of two
017A20: 20 70 61 72 74 73 3A 20 74 68 65 20 6B 65 72 6E parts: the kern
017A30: 65 6C 20 61 6E 64 20 20 20 20 20 20 20 20 20 20 el and
017A40: 65 78 74 65 6E 73 69 6F 6E 73 2E 20 20 54 68 65 extensions. The
017A50: 20 65 78 74 65 6E 73 69 6F 6E 73 20 63 61 6E 20 extensions can
017A60: 62 65 20 72 65 61 64 69 6C 79 20 6D 6F 64 69 66 be readily modif
017A70: 69 65 64 20 62 79 20 20 20 20 20 20 20 20 20 20 ied by
017A80: 46 4F 52 47 45 54 74 69 6E 67 20 74 68 65 6D 20 FORGETting them
017A90: 61 6E 64 20 63 6F 6D 70 69 6C 69 6E 67 20 6E 65 and compiling ne
017AA0: 77 20 64 65 66 69 6E 69 74 69 6F 6E 73 2E 20 20 w definitions.
017AB0: 41 20 77 6F 72 6B 69 6E 67 20 20 20 20 20 20 20 A working
017AC0: 65 78 61 6D 70 6C 65 20 69 73 20 69 6E 20 41 4D example is in AM
017AD0: 45 4E 44 31 2E 20 20 54 68 65 20 6B 65 72 6E 65 END1. The kerne
017AE0: 6C 20 65 6E 64 73 20 77 69 74 68 20 74 68 65 20 l ends with the
017AF0: 77 6F 72 64 20 5D 20 61 6E 64 20 20 20 20 20 20 word ] and
017B00: 69 63 61 74 65 20 74 68 61 74 20 69 74 20 70 72 icate that it pr
017B10: 69 6E 74 73 20 61 20 6E 75 6D 62 65 72 2E 22 0D ints a number.".
017B20: 0A 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ...
017B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A *
017B40: 2A 2A 2A 2A 2A 0D 0A 1A 0D 00 00 F8 F7 1A 00 01 *****...........
017B50: 29 01 C9 00 00 00 1A 34 20 54 61 73 6D 61 6E 20 )......4 Tasman
017B60: 53 6F 66 74 77 61 72 65 20 4C 74 64 2E 0D 0A 0D Software Ltd....
017B70: 0A 20 20 54 68 69 73 20 41 6D 73 77 6F 72 64 20 . This Amsword
017B80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017B90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017BA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017BB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017BC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017BD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017BE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017BF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017CE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017D00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
017D10: 14 00 01 00 02 09 4E E5 14 00 C1 02 00 00 00 02 ......N.........
017D20: 14 00 C6 02 00 00 00 02 14 00 C2 02 00 00 00 02 ................
017D30: 14 00 C7 02 00 00 00 02 14 00 C3 02 00 00 00 02 ................
017D40: 14 00 C8 02 00 00 00 02 14 00 C4 02 00 00 00 02 ................
017D50: 14 00 C9 02 00 00 00 02 14 00 C5 02 00 00 00 02 ................
017D60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017E00: 63 61 6E 20 6F 6E 6C 79 20 62 65 20 6D 6F 64 69 can only be modi
017E10: 66 69 65 64 20 62 79 20 68 6F 74 70 61 74 63 68 fied by hotpatch
017E20: 69 6E 67 2C 20 73 68 6F 72 74 20 6F 66 20 63 68 ing, short of ch
017E30: 61 6E 67 69 6E 67 20 61 6E 64 20 20 20 20 20 20 anging and
017E40: 72 65 61 73 73 65 6D 62 6C 69 6E 67 20 74 68 65 reassembling the
017E50: 20 6F 72 69 67 69 6E 61 6C 20 2E 41 53 4D 20 66 original .ASM f
017E60: 69 6C 65 2E 20 20 54 68 65 20 63 68 6F 69 63 65 ile. The choice
017E70: 20 6F 66 20 65 78 74 65 6E 73 69 6F 6E 73 20 20 of extensions
017E80: 69 6E 63 6C 75 64 65 64 20 69 6E 20 74 68 65 20 included in the
017E90: 73 79 73 74 65 6D 20 69 73 20 75 70 20 74 6F 20 system is up to
017EA0: 79 6F 75 2E 20 20 20 20 20 20 20 20 20 20 20 20 you.
017EB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017EC0: 4D 61 69 6E 20 64 69 66 66 65 72 65 6E 63 65 73 Main differences
017ED0: 20 62 65 74 77 65 65 6E 20 66 69 67 2D 20 61 6E between fig- an
017EE0: 64 20 37 39 2D 53 54 41 4E 44 41 52 44 3A 20 20 d 79-STANDARD:
017EF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017F00: 43 52 45 41 54 45 20 78 78 78 20 20 20 20 20 20 CREATE xxx
017F10: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 72 65 6E ( -- ) ren
017F20: 61 6D 65 64 20 66 69 67 20 3C 42 55 49 4C 44 53 amed fig <BUILDS
017F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017F40: 20 20 43 72 65 61 74 65 73 20 61 20 64 69 63 74 Creates a dict
017F50: 69 6F 6E 61 72 79 20 65 6E 74 72 79 20 77 69 74 ionary entry wit
017F60: 68 20 6E 6F 20 70 61 72 61 6D 65 74 65 72 20 73 h no parameter s
017F70: 70 61 63 65 20 72 65 73 65 72 76 65 64 2E 20 20 pace reserved.
017F80: 20 20 45 78 65 63 75 74 69 6F 6E 20 6F 66 20 78 Execution of x
017F90: 78 78 20 6C 65 61 76 65 73 20 74 68 65 20 61 64 xx leaves the ad
017FA0: 64 72 65 73 73 20 6F 66 20 70 61 72 61 6D 65 74 dress of paramet
017FB0: 65 72 20 66 69 65 6C 64 2E 20 20 20 20 20 20 20 er field.
017FC0: 57 4F 52 44 20 20 20 20 20 20 20 20 20 20 20 20 WORD
017FD0: 20 20 20 28 20 63 68 61 72 20 2D 2D 20 61 64 64 ( char -- add
017FE0: 72 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r)
017FF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018000: 20 20 66 66 6C 61 67 20 20 69 66 20 6F 70 65 6E fflag if open
018010: 20 6E 6F 74 20 73 75 63 63 65 73 73 66 75 6C 2E not successful.
018020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018040: 43 41 53 4F 55 54 44 49 52 45 43 54 20 20 20 20 CASOUTDIRECT
018050: 20 20 20 28 20 66 72 6F 6D 2D 61 64 64 72 20 20 ( from-addr
018060: 6C 65 6E 67 74 68 20 20 65 6E 74 72 79 20 20 74 length entry t
018070: 79 70 65 20 2D 2D 20 6E 20 29 20 20 20 20 20 20 ype -- n )
018080: 20 20 57 72 69 74 65 73 20 66 69 6C 65 20 64 69 Writes file di
018090: 72 65 63 74 6C 79 20 66 72 6F 6D 20 73 74 6F 72 rectly from stor
0180A0: 65 2E 20 6E 20 3D 20 65 72 72 6F 72 20 6E 75 6D e. n = error num
0180B0: 62 65 72 2E 20 20 20 20 20 20 20 20 20 20 20 20 ber.
0180C0: 45 53 43 44 49 53 20 61 6E 64 20 45 53 43 45 4E ESCDIS and ESCEN
0180D0: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 20 ( -- )
0180E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0180F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018100: 20 20 44 69 73 61 62 6C 65 73 2F 65 6E 61 62 6C Disables/enabl
018110: 65 73 20 74 68 65 20 45 53 43 20 72 6F 75 74 69 es the ESC routi
018120: 6E 65 20 63 61 6C 6C 65 64 20 6F 6E 20 65 61 63 ne called on eac
018130: 68 20 70 61 73 73 20 74 68 72 6F 75 67 68 20 20 h pass through
018140: 20 20 74 68 65 20 69 6E 6E 65 72 20 69 6E 74 65 the inner inte
018150: 72 70 72 65 74 65 72 20 28 61 74 20 74 68 65 20 rpreter (at the
018160: 61 64 64 72 65 73 73 20 4E 45 58 54 29 2E 20 20 address NEXT).
018170: 57 68 65 6E 20 65 6E 61 62 6C 65 64 2C 20 20 20 When enabled,
018180: 20 20 70 72 65 73 73 69 6E 67 20 74 68 65 20 45 pressing the E
018190: 53 43 20 6B 65 79 20 6F 6E 63 65 20 70 61 75 73 SC key once paus
0181A0: 65 73 20 74 68 65 20 70 72 6F 67 72 61 6D 6D 65 es the programme
0181B0: 3B 20 70 72 65 73 73 69 6E 67 20 45 53 43 20 20 ; pressing ESC
0181C0: 20 20 61 67 61 69 6E 20 77 69 6C 6C 20 74 75 72 again will tur
0181D0: 6E 20 70 72 69 6E 74 65 72 20 6F 66 66 20 61 6E n printer off an
0181E0: 64 20 73 74 6F 70 20 74 68 65 20 70 72 6F 67 72 d stop the progr
0181F0: 61 6D 6D 65 20 62 79 20 20 20 20 20 20 20 20 20 amme by
018200: 20 20 52 65 61 64 73 20 6E 65 78 74 20 77 6F 72 Reads next wor
018210: 64 20 66 72 6F 6D 20 69 6E 70 75 74 20 73 74 72 d from input str
018220: 65 61 6D 20 75 73 69 6E 67 20 63 68 61 72 20 61 eam using char a
018230: 73 20 64 65 6C 69 6D 69 74 65 72 2C 20 20 20 20 s delimiter,
018240: 20 20 6F 72 20 75 6E 74 69 6C 20 6E 75 6C 6C 2E or until null.
018250: 20 20 4C 65 61 76 65 73 20 61 64 64 72 65 73 73 Leaves address
018260: 20 6F 66 20 63 68 61 72 61 63 74 65 72 20 63 6F of character co
018270: 75 6E 74 20 28 48 45 52 45 20 69 6E 20 20 20 20 unt (HERE in
018280: 20 20 74 68 69 73 20 69 6D 70 6C 65 6D 65 6E 74 this implement
018290: 61 74 69 6F 6E 2C 20 74 65 78 74 20 73 74 61 72 ation, text star
0182A0: 74 73 20 61 74 20 48 45 52 45 2B 31 29 2E 20 20 ts at HERE+1).
0182B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0182C0: 43 50 43 20 73 70 65 63 69 66 69 63 20 77 6F 72 CPC specific wor
0182D0: 64 73 20 69 6E 20 6B 65 72 6E 65 6C 3A 20 20 20 ds in kernel:
0182E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0182F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018300: 48 58 43 4F 44 45 20 78 78 78 20 20 20 20 20 20 HXCODE xxx
018310: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 73 69 6D ( -- ) sim
018320: 69 6C 61 72 20 74 6F 20 66 69 67 20 43 52 45 41 ilar to fig CREA
018330: 54 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TE
018340: 20 20 53 65 74 73 20 42 41 53 45 20 74 6F 20 68 Sets BASE to h
018350: 65 78 2C 20 63 72 65 61 74 65 73 20 61 20 73 6D ex, creates a sm
018360: 75 64 67 65 64 20 64 69 63 74 69 6F 6E 61 72 79 udged dictionary
018370: 20 68 65 61 64 65 72 20 20 20 20 20 20 20 20 20 header
018380: 20 20 77 69 74 68 20 74 68 65 20 63 6F 64 65 20 with the code
018390: 66 69 65 6C 64 20 70 6F 69 6E 74 69 6E 67 20 74 field pointing t
0183A0: 6F 20 74 68 65 20 70 61 72 61 6D 65 74 65 72 20 o the parameter
0183B0: 66 69 65 6C 64 2E 20 20 20 20 20 20 20 20 20 20 field.
0183C0: 20 20 4E 6F 20 70 61 72 61 6D 65 74 65 72 20 73 No parameter s
0183D0: 70 61 63 65 20 69 73 20 61 6C 6C 6F 74 74 65 64 pace is allotted
0183E0: 2E 20 20 55 73 65 20 66 6F 72 20 6D 2F 6C 20 64 . Use for m/l d
0183F0: 65 66 69 6E 69 74 69 6F 6E 73 2E 20 20 20 20 20 efinitions.
018400: 20 20 65 78 65 63 75 74 69 6E 67 20 51 55 49 54 executing QUIT
018410: 2C 20 61 6E 79 20 6F 74 68 65 72 20 6B 65 79 20 , any other key
018420: 77 69 6C 6C 20 72 65 73 74 61 72 74 2E 20 20 54 will restart. T
018430: 68 65 72 65 20 69 73 20 6E 6F 20 77 61 79 20 20 here is no way
018440: 20 20 74 6F 20 73 74 6F 70 20 61 20 72 75 6E 2D to stop a run-
018450: 61 77 61 79 20 70 72 6F 67 72 61 6D 6D 65 20 77 away programme w
018460: 68 65 6E 20 64 69 73 61 62 6C 65 64 2E 20 20 45 hen disabled. E
018470: 53 43 20 45 53 43 20 64 6F 65 73 20 6E 6F 74 20 SC ESC does not
018480: 20 20 63 6C 65 61 72 20 74 68 65 20 70 61 72 61 clear the para
018490: 6D 65 74 65 72 20 73 74 61 63 6B 20 28 51 55 49 meter stack (QUI
0184A0: 54 20 63 6C 65 61 72 73 20 74 68 65 20 72 65 74 T clears the ret
0184B0: 75 72 6E 20 73 74 61 63 6B 29 20 61 6E 64 20 20 urn stack) and
0184C0: 20 20 6C 65 61 76 65 73 20 74 68 65 20 72 65 74 leaves the ret
0184D0: 75 72 6E 20 61 64 64 72 65 73 73 20 28 4E 45 58 urn address (NEX
0184E0: 54 2B 33 29 20 6F 6E 20 74 6F 70 20 6F 66 20 70 T+3) on top of p
0184F0: 61 72 61 6D 65 74 65 72 20 73 74 61 63 6B 2E 20 arameter stack.
018500: 43 50 43 20 73 70 65 63 69 66 69 63 20 77 6F 72 CPC specific wor
018510: 64 73 20 69 6E 20 65 78 74 65 6E 73 69 6F 6E 3A ds in extension:
018520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018540: 4E 41 4D 45 55 50 20 20 20 20 20 20 20 20 20 20 NAMEUP
018550: 20 20 20 28 20 20 20 2D 2D 20 6E 61 6D 65 2D 61 ( -- name-a
018560: 64 64 72 20 20 6E 61 6D 65 2D 6C 65 6E 67 74 68 ddr name-length
018570: 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
018580: 20 20 41 63 63 65 70 74 73 20 61 20 77 6F 72 64 Accepts a word
018590: 20 66 72 6F 6D 20 74 68 65 20 74 65 72 6D 69 6E from the termin
0185A0: 61 6C 2C 20 63 6F 6E 76 65 72 74 73 20 69 74 20 al, converts it
0185B0: 74 6F 20 75 70 70 65 72 20 63 61 73 65 2E 20 20 to upper case.
0185C0: 20 20 6E 61 6D 65 2D 61 64 64 72 20 3D 20 50 41 name-addr = PA
0185D0: 44 20 2B 20 31 2E 20 20 20 20 20 20 20 20 20 20 D + 1.
0185E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0185F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018600: 49 4E 49 54 20 20 20 20 20 20 20 20 20 20 20 20 INIT
018610: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 20 ( -- )
018620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018640: 20 20 49 6E 69 74 69 61 6C 69 7A 65 73 20 66 69 Initializes fi
018650: 72 6D 77 61 72 65 3A 20 73 6F 75 6E 64 2C 20 6B rmware: sound, k
018660: 6D 2C 20 74 78 74 2C 20 67 72 61 2C 20 63 61 73 m, txt, gra, cas
018670: 2C 20 74 78 74 20 69 6E 76 65 72 73 65 2E 20 20 , txt inverse.
018680: 4D 4F 44 45 20 20 20 20 20 20 20 20 20 20 20 20 MODE
018690: 20 20 20 28 20 6E 20 2D 2D 20 29 20 20 20 20 20 ( n -- )
0186A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0186B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0186C0: 20 20 53 65 6C 65 63 74 73 20 64 69 73 70 6C 61 Selects displa
0186D0: 79 20 6D 6F 64 65 2C 20 74 75 72 6E 73 20 6F 6E y mode, turns on
0186E0: 20 63 75 72 73 6F 72 2E 20 20 20 20 20 20 20 20 cursor.
0186F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018700: 4E 4F 4F 50 20 20 20 20 20 20 20 20 20 20 20 20 NOOP
018710: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 20 ( -- )
018720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018740: 20 20 44 6F 65 73 20 6E 6F 74 68 69 6E 67 20 2D Does nothing -
018750: 20 63 6F 75 6C 64 20 62 65 20 75 73 65 64 20 66 could be used f
018760: 6F 72 20 63 68 61 6E 67 69 6E 67 20 74 68 65 20 or changing the
018770: 61 63 74 69 6F 6E 20 6F 66 20 77 6F 72 64 73 2E action of words.
018780: 52 55 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 RUN
018790: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 20 ( -- )
0187A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0187B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0187C0: 20 20 43 6F 6D 70 69 6C 65 64 20 61 73 20 20 3A Compiled as :
0187D0: 20 52 55 4E 20 45 58 49 54 20 3B 20 20 20 49 6E RUN EXIT ; In
0187E0: 63 6C 75 64 65 64 20 69 6E 20 43 4F 4C 44 2E 20 cluded in COLD.
0187F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018800: 7C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |
018810: 20 20 20 28 20 2D 2D 20 29 20 28 62 65 65 70 73 ( -- ) (beeps
018820: 20 69 66 20 73 75 63 63 65 73 73 66 75 6C 2C 20 if successful,
018830: 70 72 69 6E 74 73 20 3F 20 69 66 20 6E 6F 74 29 prints ? if not)
018840: 20 20 45 78 74 65 72 6E 61 6C 20 63 6F 6D 6D 61 External comma
018850: 6E 64 20 70 72 6F 63 65 73 73 6F 72 2E 20 20 55 nd processor. U
018860: 73 65 73 20 4E 41 4D 45 55 50 20 74 6F 20 67 65 ses NAMEUP to ge
018870: 74 20 6E 61 6D 65 20 61 6E 64 20 20 20 20 20 20 t name and
018880: 20 20 63 6F 6E 76 65 72 74 20 69 74 20 74 6F 20 convert it to
018890: 75 70 70 65 72 20 63 61 73 65 2C 20 73 65 74 73 upper case, sets
0188A0: 20 62 69 74 20 37 20 6F 66 20 6C 61 73 74 20 63 bit 7 of last c
0188B0: 68 61 72 61 63 74 65 72 2C 20 20 20 20 20 20 20 haracter,
0188C0: 20 20 63 61 6C 6C 73 20 4B 4C 5F 46 49 4E 44 5F calls KL_FIND_
0188D0: 43 4F 4D 4D 41 4E 44 2C 20 65 78 65 63 75 74 65 COMMAND, execute
0188E0: 73 20 63 6F 6D 6D 61 6E 64 20 69 66 20 66 6F 75 s command if fou
0188F0: 6E 64 2E 20 20 54 68 65 72 65 20 69 73 20 20 20 nd. There is
018900: 20 20 6E 6F 20 70 72 6F 76 69 73 69 6F 6E 20 66 no provision f
018910: 6F 72 20 70 61 72 61 6D 65 74 65 72 20 70 61 73 or parameter pas
018920: 73 69 6E 67 2C 20 74 68 65 72 65 66 6F 72 65 20 sing, therefore
018930: 63 61 6E 20 65 78 65 63 75 74 65 20 20 20 20 20 can execute
018940: 20 20 7C 20 54 41 50 45 20 20 62 75 74 20 6E 6F | TAPE but no
018950: 74 20 7C 20 45 52 41 2C 40 7A 24 2E 20 20 20 20 t | ERA,@z$.
018960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018980: 53 43 52 2D 4C 4F 41 44 20 20 20 20 20 20 20 20 SCR-LOAD
018990: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 28 ( -- ) (
0189A0: 41 4D 45 4E 44 31 29 20 20 20 20 20 20 20 20 20 AMEND1)
0189B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0189C0: 20 20 4C 6F 61 64 73 20 61 20 66 69 6C 65 20 69 Loads a file i
0189D0: 6E 74 6F 20 73 63 72 65 65 6E 73 2E 20 4F 70 74 nto screens. Opt
0189E0: 69 6F 6E 61 6C 6C 79 20 63 6C 65 61 72 73 20 74 ionally clears t
0189F0: 68 65 20 73 63 72 65 65 6E 73 20 6F 72 20 20 20 he screens or
018A00: 20 20 43 6F 75 6C 64 20 62 65 20 75 73 65 64 20 Could be used
018A10: 74 6F 20 73 65 6C 66 2D 73 74 61 72 74 20 61 20 to self-start a
018A20: 70 72 6F 67 72 61 6D 6D 65 20 62 79 20 72 65 70 programme by rep
018A30: 6C 61 63 69 6E 67 20 74 68 65 20 20 20 20 20 20 lacing the
018A40: 20 20 61 64 64 72 65 73 73 20 6F 66 20 45 58 49 address of EXI
018A50: 54 20 77 69 74 68 20 74 68 65 20 61 64 64 72 65 T with the addre
018A60: 73 73 20 6F 66 20 74 68 65 20 73 74 61 72 74 2D ss of the start-
018A70: 75 70 20 77 6F 72 64 2E 20 20 20 20 20 20 20 20 up word.
018A80: 57 41 52 4D 20 20 20 20 20 20 20 20 20 20 20 20 WARM
018A90: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 20 ( -- )
018AA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018AC0: 20 20 55 73 65 73 20 49 4E 49 54 2C 20 73 65 74 Uses INIT, set
018AD0: 73 20 75 70 20 6D 6F 64 65 20 32 2C 20 64 69 73 s up mode 2, dis
018AE0: 70 6C 61 79 73 20 73 69 67 6E 2D 6F 6E 20 6D 65 plays sign-on me
018AF0: 73 73 61 67 65 2E 20 20 20 20 20 20 20 20 20 20 ssage.
018B00: 43 41 54 20 20 20 20 20 20 20 20 20 20 20 20 20 CAT
018B10: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 20 ( -- )
018B20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018B40: 20 20 43 61 74 61 6C 6F 67 75 65 73 20 74 61 70 Catalogues tap
018B50: 65 2F 64 69 73 63 2C 20 75 73 69 6E 67 20 62 75 e/disc, using bu
018B60: 66 66 65 72 20 61 74 20 48 45 52 45 2E 20 20 4D ffer at HERE. M
018B70: 61 79 20 6F 76 65 72 2D 77 72 69 74 65 20 20 20 ay over-write
018B80: 20 20 66 69 72 73 74 20 74 77 6F 20 73 63 72 65 first two scre
018B90: 65 6E 73 20 69 66 20 28 46 49 52 53 54 20 2D 20 ens if (FIRST -
018BA0: 48 45 52 45 29 20 69 73 20 6C 65 73 73 20 74 68 HERE) is less th
018BB0: 61 6E 20 32 6B 2E 20 20 20 20 20 20 20 20 20 20 an 2k.
018BC0: 43 41 53 49 4E 4F 50 45 4E 20 20 20 20 20 20 20 CASINOPEN
018BD0: 20 20 20 28 20 6E 61 6D 65 2D 61 64 64 72 20 20 ( name-addr
018BE0: 62 75 66 66 2D 61 64 64 72 20 2D 2D 20 66 6C 61 buff-addr -- fla
018BF0: 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 g )
018C00: 20 20 61 70 70 65 6E 64 73 20 74 6F 20 65 78 69 appends to exi
018C10: 73 74 69 6E 67 20 66 69 6C 65 20 69 6E 20 6D 65 sting file in me
018C20: 6D 6F 72 79 2E 20 20 20 20 20 20 20 20 20 20 20 mory.
018C30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018C40: 20 20 55 73 65 73 20 4E 41 4D 45 55 50 20 74 6F Uses NAMEUP to
018C50: 20 67 65 74 20 66 69 6C 65 20 6E 61 6D 65 3B 20 get file name;
018C60: 43 41 53 49 4E 4F 50 45 4E 20 74 6F 20 6F 70 65 CASINOPEN to ope
018C70: 6E 20 74 68 65 20 20 20 20 20 20 20 20 20 20 20 n the
018C80: 20 20 6E 61 6D 65 64 20 66 69 6C 65 3B 20 43 41 named file; CA
018C90: 53 49 4E 43 48 41 52 20 74 6F 20 72 65 61 64 20 SINCHAR to read
018CA0: 74 68 65 20 66 69 6C 65 20 74 6F 20 74 68 65 20 the file to the
018CB0: 73 63 72 65 65 6E 73 2E 20 20 20 20 20 20 20 20 screens.
018CC0: 20 20 62 75 66 66 2D 61 64 64 72 20 3D 20 63 30 buff-addr = c0
018CD0: 30 30 48 20 28 64 69 73 70 6C 61 79 20 6D 65 6D 00H (display mem
018CE0: 6F 72 79 29 20 20 20 20 20 20 20 20 20 20 20 20 ory)
018CF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018D00: 20 20 6D 61 78 2D 6C 65 6E 67 74 68 20 3D 20 66 max-length = f
018D10: 72 6F 6D 20 6E 65 78 74 20 63 6C 65 61 72 20 6C rom next clear l
018D20: 69 6E 65 20 74 6F 20 65 6E 64 20 6F 66 20 73 63 ine to end of sc
018D30: 72 65 65 6E 73 20 20 20 20 20 20 20 20 20 20 20 reens
018D40: 20 20 73 74 6F 72 65 2D 61 64 64 72 20 3D 20 46 store-addr = F
018D50: 49 52 53 54 20 28 20 73 74 61 72 74 20 6F 66 20 IRST ( start of
018D60: 73 63 72 65 65 6E 73 20 29 20 6F 72 20 6E 65 78 screens ) or nex
018D70: 74 20 63 6C 65 61 72 20 6C 69 6E 65 2E 20 20 20 t clear line.
018D80: 53 43 52 2D 53 41 56 45 20 20 20 20 20 20 20 20 SCR-SAVE
018D90: 20 20 20 28 20 2D 2D 20 29 20 20 20 28 41 4D 45 ( -- ) (AME
018DA0: 4E 44 31 29 20 20 20 20 20 20 20 20 20 20 20 20 ND1)
018DB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018DC0: 20 20 4F 70 74 69 6F 6E 61 6C 6C 79 20 77 72 69 Optionally wri
018DD0: 74 65 73 20 61 6C 6C 20 6F 72 20 70 61 72 74 20 tes all or part
018DE0: 6F 66 20 74 68 65 20 73 63 72 65 65 6E 73 20 74 of the screens t
018DF0: 6F 20 74 61 70 65 2F 64 69 73 63 2E 20 20 20 20 o tape/disc.
018E00: 20 20 4F 70 65 6E 73 20 74 61 70 65 2F 64 69 73 Opens tape/dis
018E10: 63 20 69 6E 70 75 74 20 73 74 72 65 61 6D 2E 20 c input stream.
018E20: 20 41 63 63 65 70 74 73 20 6E 61 6D 65 20 74 6F Accepts name to
018E30: 20 31 32 20 63 68 61 72 73 2E 20 20 20 20 20 20 12 chars.
018E40: 20 20 66 66 6C 61 67 20 69 66 20 6F 70 65 6E 20 fflag if open
018E50: 6E 6F 74 20 73 75 63 63 65 73 73 66 75 6C 20 28 not successful (
018E60: 20 65 2E 67 2E 20 69 6C 6C 65 67 61 6C 20 6E 61 e.g. illegal na
018E70: 6D 65 20 29 2E 20 20 20 20 20 20 20 20 20 20 20 me ).
018E80: 43 41 53 49 4E 43 48 41 52 20 20 20 20 20 20 20 CASINCHAR
018E90: 20 20 20 28 20 6D 61 78 2D 6C 65 6E 67 74 68 20 ( max-length
018EA0: 20 73 74 6F 72 65 2D 61 64 64 72 20 2D 2D 20 20 store-addr --
018EB0: 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
018EC0: 20 20 52 65 61 64 73 20 66 69 6C 65 20 63 68 61 Reads file cha
018ED0: 72 61 63 74 65 72 2D 62 79 2D 63 68 61 72 61 63 racter-by-charac
018EE0: 74 65 72 20 69 6E 74 6F 20 62 75 66 66 2D 61 64 ter into buff-ad
018EF0: 64 72 20 75 6E 74 69 6C 20 65 6F 66 20 20 20 20 dr until eof
018F00: 20 20 6F 72 20 6D 61 78 2D 6C 65 6E 67 74 68 20 or max-length
018F10: 69 73 20 72 65 61 63 68 65 64 2C 20 73 74 6F 72 is reached, stor
018F20: 69 6E 67 20 63 68 61 72 61 63 74 65 72 73 20 73 ing characters s
018F30: 74 61 72 74 69 6E 67 20 61 74 20 20 20 20 20 20 tarting at
018F40: 20 20 73 74 6F 72 65 2D 61 64 64 72 2E 20 20 20 store-addr.
018F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018F60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018F80: 43 41 53 4F 55 54 4F 50 45 4E 20 20 20 20 20 20 CASOUTOPEN
018F90: 20 20 20 28 20 6E 61 6D 65 2D 61 64 64 72 20 20 ( name-addr
018FA0: 62 75 66 66 2D 61 64 64 72 20 2D 2D 20 66 6C 61 buff-addr -- fla
018FB0: 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 g )
018FC0: 20 20 4F 70 65 6E 73 20 74 61 70 65 2F 64 69 73 Opens tape/dis
018FD0: 63 20 6F 75 74 70 75 74 20 73 74 72 65 61 6D 20 c output stream
018FE0: 2E 20 41 63 63 65 70 74 73 20 6E 61 6D 65 20 74 . Accepts name t
018FF0: 6F 20 31 32 20 63 68 61 72 73 2E 20 20 20 20 20 o 12 chars.
019000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
019010: 15 00 01 00 02 09 4E E5 15 00 C1 02 00 00 00 02 ......N.........
019020: 15 00 C6 02 00 00 00 02 15 00 C2 02 00 00 00 02 ................
019030: 15 00 C7 02 00 00 00 02 15 00 C3 02 00 00 00 02 ................
019040: 15 00 C8 02 00 00 00 02 15 00 C4 02 00 00 00 02 ................
019050: 15 00 C9 02 00 00 00 02 15 00 C5 02 00 00 00 02 ................
019060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019100: 20 20 55 73 65 73 20 4E 41 4D 45 55 50 20 74 6F Uses NAMEUP to
019110: 20 67 65 74 20 66 69 6C 65 20 6E 61 6D 65 3B 20 get file name;
019120: 43 41 53 4F 55 54 4F 50 45 4E 20 74 6F 20 6F 70 CASOUTOPEN to op
019130: 65 6E 20 74 68 65 20 20 20 20 20 20 20 20 20 20 en the
019140: 20 20 6E 61 6D 65 64 20 66 69 6C 65 3B 20 43 41 named file; CA
019150: 53 4F 55 54 44 49 52 45 43 54 20 74 6F 20 77 72 SOUTDIRECT to wr
019160: 69 74 65 20 74 68 65 20 63 6F 6E 74 65 6E 74 73 ite the contents
019170: 20 6F 66 20 73 63 72 65 65 6E 73 2E 20 20 20 20 of screens.
019180: 20 20 66 72 6F 6D 2D 61 64 64 72 20 3D 20 46 49 from-addr = FI
019190: 52 53 54 20 6F 72 20 73 65 6C 65 63 74 65 64 20 RST or selected
0191A0: 6C 69 6E 65 20 20 20 20 20 20 20 20 20 20 20 20 line
0191B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0191C0: 20 20 6C 65 6E 67 74 68 20 61 73 20 64 65 74 65 length as dete
0191D0: 72 6D 69 6E 65 64 20 62 79 20 2D 54 52 41 49 4C rmined by -TRAIL
0191E0: 20 28 61 20 63 6F 64 65 20 76 65 72 73 69 6F 6E (a code version
0191F0: 20 6F 66 20 2D 54 52 41 49 4C 49 4E 47 29 20 20 of -TRAILING)
019200: 20 20 65 6E 74 72 79 20 3D 20 30 30 30 30 20 20 entry = 0000
019210: 20 20 20 20 74 79 70 65 20 3D 20 31 36 48 20 28 type = 16H (
019220: 20 61 6E 20 41 53 43 49 49 20 66 69 6C 65 20 29 an ASCII file )
019230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019240: 53 41 56 45 2D 46 4F 52 54 48 20 20 20 20 20 20 SAVE-FORTH
019250: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 20 ( -- )
019260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019280: 20 20 55 73 65 73 20 46 52 45 45 5A 45 20 74 6F Uses FREEZE to
019290: 20 69 6E 63 6C 75 64 65 20 61 6C 6C 20 63 75 72 include all cur
0192A0: 72 65 6E 74 20 64 65 66 69 6E 69 74 69 6F 6E 73 rent definitions
0192B0: 3B 20 4E 41 4D 45 55 50 20 74 6F 20 67 65 74 20 ; NAMEUP to get
0192C0: 20 20 66 69 6C 65 20 6E 61 6D 65 3B 20 43 41 53 file name; CAS
0192D0: 4F 55 54 4F 50 45 4E 20 74 6F 20 6F 70 65 6E 20 OUTOPEN to open
0192E0: 74 68 65 20 6E 61 6D 65 64 20 66 69 6C 65 3B 20 the named file;
0192F0: 43 41 53 4F 55 54 44 49 52 45 43 54 20 74 6F 20 CASOUTDIRECT to
019300: 20 28 20 69 6E 20 6C 2C 5B 63 5D 20 3A 20 72 65 ( in l,[c] : re
019310: 61 64 20 70 6F 72 74 29 20 20 20 20 20 20 20 20 ad port)
019320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019330: 20 20 20 65 64 20 63 2C 20 36 38 20 63 2C 20 20 ed c, 68 c,
019340: 20 28 20 6C 64 20 68 2C 30 20 20 70 6F 70 20 62 ( ld h,0 pop b
019350: 63 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c)
019360: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 36 20 26
019370: 63 2C 20 30 30 20 63 2C 20 63 31 20 63 2C 20 20 c, 00 c, c1 c,
019380: 20 28 20 6A 75 6D 70 20 74 6F 20 68 70 75 73 68 ( jump to hpush
019390: 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
0193A0: 20 20 20 20 20 20 20 20 20 20 63 33 20 63 2C 20 c3 c,
0193B0: 68 70 75 73 68 20 2C 20 73 6D 75 64 67 65 20 20 hpush , smudge
0193C0: 68 78 63 6F 64 65 20 70 21 20 28 20 62 20 70 6F hxcode p! ( b po
0193D0: 72 74 5F 61 64 64 72 20 2D 2D 20 29 20 28 20 6F rt_addr -- ) ( o
0193E0: 75 74 70 75 74 20 62 79 74 65 20 74 6F 20 70 6F utput byte to po
0193F0: 72 74 29 20 20 20 20 20 20 20 20 20 20 20 20 20 rt)
019400: 20 28 20 70 6F 70 20 68 6C 20 20 70 6F 70 20 64 ( pop hl pop d
019410: 65 20 3A 20 61 64 64 72 65 73 73 2C 20 62 79 74 e : address, byt
019420: 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 e )
019430: 20 20 20 65 31 20 63 2C 20 64 31 20 63 2C 20 20 e1 c, d1 c,
019440: 20 28 20 70 75 73 68 20 62 63 20 3A 20 73 61 76 ( push bc : sav
019450: 65 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e)
019460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019470: 20 20 20 20 20 20 20 20 20 63 35 20 63 2C 20 20 c5 c,
019480: 20 28 20 6C 64 20 62 2C 68 20 20 6C 64 20 63 2C ( ld b,h ld c,
019490: 6C 20 3A 20 61 64 64 72 65 73 73 20 74 6F 20 62 l : address to b
0194A0: 63 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c)
0194B0: 20 20 20 34 34 20 63 2C 20 34 64 20 63 2C 20 20 44 c, 4d c,
0194C0: 20 28 20 6F 75 74 20 5B 63 5D 2C 65 20 3A 20 77 ( out [c],e : w
0194D0: 72 69 74 65 20 74 6F 20 70 6F 72 74 29 20 20 20 rite to port)
0194E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0194F0: 20 20 20 65 64 20 63 2C 20 35 39 20 63 2C 20 20 ed c, 59 c,
019500: 20 20 77 72 69 74 65 20 61 20 62 69 6E 61 72 79 write a binary
019510: 20 69 6D 61 67 65 20 6F 66 20 63 70 63 46 4F 52 image of cpcFOR
019520: 54 48 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 TH.
019530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019540: 20 20 66 72 6F 6D 2D 61 64 64 72 20 3D 20 6F 72 from-addr = or
019550: 67 20 3D 20 31 30 30 48 20 20 20 20 20 20 6C 65 g = 100H le
019560: 6E 67 74 68 20 3D 20 48 45 52 45 20 2D 20 6F 72 ngth = HERE - or
019570: 67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 g
019580: 20 20 65 6E 74 72 79 20 3D 20 6F 72 67 20 20 20 entry = org
019590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 79 ty
0195A0: 70 65 20 3D 20 30 32 48 20 28 20 61 20 62 69 6E pe = 02H ( a bin
0195B0: 61 72 79 20 66 69 6C 65 20 29 20 20 20 20 20 20 ary file )
0195C0: 53 43 52 2D 4C 49 53 54 20 20 20 20 20 20 20 20 SCR-LIST
0195D0: 20 20 20 28 20 2D 2D 20 29 20 20 20 20 20 20 20 ( -- )
0195E0: 20 20 28 41 4D 45 4E 44 31 20 6F 6E 6C 79 29 20 (AMEND1 only)
0195F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019600: 20 20 4C 69 73 74 73 20 61 6C 6C 20 73 63 72 65 Lists all scre
019610: 65 6E 73 20 6F 72 20 73 65 6C 65 63 74 65 64 20 ens or selected
019620: 6C 69 6E 65 73 20 74 6F 20 74 65 72 6D 69 6E 61 lines to termina
019630: 6C 2F 70 72 69 6E 74 65 72 2E 20 20 20 20 20 20 l/printer.
019640: 54 68 65 20 74 65 72 6D 69 6E 61 6C 20 69 6E 70 The terminal inp
019650: 75 74 20 72 6F 75 74 69 6E 65 20 3C 45 58 50 45 ut routine <EXPE
019660: 43 54 3E 20 28 76 65 63 74 6F 72 65 64 20 66 72 CT> (vectored fr
019670: 6F 6D 20 45 58 50 45 43 54 29 20 20 20 20 20 20 om EXPECT)
019680: 75 73 65 73 20 3C 4B 45 59 3E 20 28 76 65 63 74 uses <KEY> (vect
019690: 6F 72 65 64 20 66 72 6F 6D 20 4B 45 59 29 20 74 ored from KEY) t
0196A0: 6F 20 61 63 63 65 70 74 20 63 68 61 72 61 63 74 o accept charact
0196B0: 65 72 73 20 66 72 6F 6D 20 74 68 65 20 20 20 20 ers from the
0196C0: 6B 65 79 62 6F 61 72 64 2E 20 20 43 6F 64 65 73 keyboard. Codes
0196D0: 20 6C 65 73 73 20 74 68 61 6E 20 33 32 44 2C 20 less than 32D,
0196E0: 77 69 74 68 20 74 68 65 20 65 78 63 65 70 74 69 with the excepti
0196F0: 6F 6E 20 6F 66 20 38 20 28 42 53 29 20 61 72 65 on of 8 (BS) are
019700: 20 28 20 70 6F 70 20 62 63 20 20 6A 75 6D 70 20 ( pop bc jump
019710: 74 6F 20 6E 65 78 74 29 20 20 20 20 20 20 20 20 to next)
019720: 20 20 20 20 20 20 63 31 20 63 2C 20 63 33 20 63 c1 c, c3 c
019730: 2C 20 6E 65 78 74 20 2C 20 73 6D 75 64 67 65 20 , next , smudge
019740: 20 63 72 20 20 2E 22 20 54 65 73 74 20 66 6F 72 cr ." Test for
019750: 20 70 40 20 61 6E 64 20 70 21 20 2D 20 63 6C 69 p@ and p! - cli
019760: 63 6B 73 20 74 61 70 65 20 72 65 6C 61 79 20 6F cks tape relay o
019770: 6E 2F 6F 66 66 22 20 20 63 72 20 20 20 20 20 20 n/off" cr
019780: 20 68 65 78 20 20 66 36 30 30 20 70 40 20 31 30 hex f600 p@ 10
019790: 20 6F 72 20 66 36 30 30 20 70 21 20 66 36 30 30 or f600 p! f600
0197A0: 20 70 40 20 31 30 20 78 6F 72 20 66 36 30 30 20 p@ 10 xor f600
0197B0: 70 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 p!
0197C0: 3A 20 70 72 69 6E 74 65 72 2D 62 75 73 79 34 20 : printer-busy4
0197D0: 28 20 2D 2D 20 66 6C 29 20 28 20 74 65 73 74 73 ( -- fl) ( tests
0197E0: 20 62 69 74 20 36 20 6F 66 20 63 68 61 6E 6E 65 bit 6 of channe
0197F0: 6C 20 42 20 6F 66 20 38 32 35 35 20 50 50 49 29 l B of 8255 PPI)
019800: 20 20 20 66 35 30 30 20 70 40 20 34 30 20 61 6E f500 p@ 40 an
019810: 64 20 30 3D 20 3B 20 20 28 20 6E 6F 74 20 73 75 d 0= ; ( not su
019820: 72 65 20 69 66 20 69 74 20 77 6F 72 6B 73 20 6F re if it works o
019830: 6E 20 36 31 32 38 29 20 20 20 20 20 20 20 20 20 n 6128)
019840: 68 78 63 6F 64 65 20 70 72 69 6E 74 65 72 2D 62 hxcode printer-b
019850: 75 73 79 36 20 28 20 2D 2D 20 66 6C 29 20 28 20 usy6 ( -- fl) (
019860: 75 73 65 73 20 6A 75 6D 70 20 62 6C 6F 63 6B 2C uses jump block,
019870: 20 74 66 20 3D 20 6E 6F 74 20 62 75 73 79 29 20 tf = not busy)
019880: 20 28 20 63 61 6C 6C 20 6D 63 5F 62 75 73 79 5F ( call mc_busy_
019890: 70 72 69 6E 74 65 72 29 20 20 20 20 20 20 20 20 printer)
0198A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0198B0: 20 20 63 64 20 63 2C 20 62 64 32 65 20 2C 20 20 cd c, bd2e ,
0198C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
0198D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0198E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0198F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
019900: 64 65 65 6D 65 64 20 74 6F 20 62 65 20 69 6E 70 deemed to be inp
019910: 75 74 20 74 65 72 6D 69 6E 61 74 6F 72 73 20 28 ut terminators (
019920: 65 71 75 69 76 61 6C 65 6E 74 20 74 6F 20 70 72 equivalent to pr
019930: 65 73 73 69 6E 67 20 45 4E 54 45 52 29 2C 20 20 essing ENTER),
019940: 63 6F 64 65 73 20 67 72 65 61 74 65 72 20 74 68 codes greater th
019950: 61 6E 20 31 32 36 44 20 61 72 65 20 74 72 65 61 an 126D are trea
019960: 74 65 64 20 61 73 20 44 45 4C 20 63 6F 64 65 2E ted as DEL code.
019970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019980: 54 68 65 20 6B 65 79 20 63 6F 6D 62 69 6E 61 74 The key combinat
019990: 69 6F 6E 20 43 54 52 4C 2B 59 20 74 6F 67 67 6C ion CTRL+Y toggl
0199A0: 65 73 20 74 68 65 20 70 72 69 6E 74 65 72 20 66 es the printer f
0199B0: 6C 61 67 20 45 50 52 49 4E 54 20 77 68 65 6E 20 lag EPRINT when
0199C0: 74 68 65 20 6B 65 79 20 62 6F 61 72 64 20 69 73 the key board is
0199D0: 20 73 63 61 6E 6E 65 64 2E 20 20 49 66 20 74 68 scanned. If th
0199E0: 65 20 70 72 69 6E 74 65 72 20 69 73 20 74 6F 67 e printer is tog
0199F0: 67 6C 65 64 20 6F 6E 20 62 75 74 20 6E 6F 74 20 gled on but not
019A00: 63 6F 6E 6E 65 63 74 65 64 2C 20 74 68 65 20 70 connected, the p
019A10: 72 6F 67 72 61 6D 6D 65 20 77 69 6C 6C 20 66 72 rogramme will fr
019A20: 65 65 7A 65 20 77 68 65 6E 20 69 74 20 74 72 69 eeze when it tri
019A30: 65 73 20 74 6F 20 73 65 6E 64 20 61 20 20 20 20 es to send a
019A40: 63 68 61 72 61 63 74 65 72 20 74 6F 20 74 68 65 character to the
019A50: 20 70 72 69 6E 74 65 72 20 2D 20 63 6C 65 61 72 printer - clear
019A60: 20 62 79 20 45 53 43 20 45 53 43 20 28 74 68 69 by ESC ESC (thi
019A70: 73 20 77 6F 72 6B 73 20 65 76 65 6E 20 20 20 20 s works even
019A80: 77 68 65 6E 20 45 53 43 20 69 73 20 64 69 73 61 when ESC is disa
019A90: 62 6C 65 64 29 2E 20 20 41 20 62 65 74 74 65 72 bled). A better
019AA0: 20 73 6F 6C 75 74 69 6F 6E 20 66 6F 72 20 74 6F solution for to
019AB0: 67 67 6C 69 6E 67 20 74 68 65 20 20 20 20 20 20 ggling the
019AC0: 70 72 69 6E 74 65 72 20 69 73 20 73 75 67 67 65 printer is sugge
019AD0: 73 74 65 64 20 6F 6E 20 66 6F 6C 6C 6F 77 69 6E sted on followin
019AE0: 67 20 73 63 72 65 65 6E 73 2E 20 20 20 20 20 20 g screens.
019AF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019B00: 20 28 20 6C 64 20 68 6C 2C 30 30 30 30 20 20 6A ( ld hl,0000 j
019B10: 72 20 63 2C 31 20 20 20 69 6E 63 20 6C 29 20 20 r c,1 inc l)
019B20: 20 20 32 31 20 63 2C 20 30 30 20 2C 20 33 38 20 21 c, 00 , 38
019B30: 63 2C 20 30 31 20 63 2C 20 32 63 20 63 2C 20 20 c, 01 c, 2c c,
019B40: 20 28 20 6A 75 6D 70 20 74 6F 20 68 70 75 73 68 ( jump to hpush
019B50: 20 74 6F 20 6C 65 61 76 65 20 66 6C 61 67 29 20 to leave flag)
019B60: 20 20 20 20 20 20 20 20 20 20 20 63 33 20 63 2C c3 c,
019B70: 20 68 70 75 73 68 20 2C 20 73 6D 75 64 67 65 20 hpush , smudge
019B80: 3A 20 70 72 69 6E 74 65 72 2D 6F 66 66 20 28 20 : printer-off (
019B90: 2D 2D 20 29 20 28 20 64 65 61 63 74 69 76 61 74 -- ) ( deactivat
019BA0: 65 20 70 72 69 6E 74 65 72 29 20 20 30 20 65 70 e printer) 0 ep
019BB0: 72 69 6E 74 20 21 20 3B 20 20 20 20 20 20 20 20 rint ! ;
019BC0: 3A 20 70 72 69 6E 74 65 72 2D 6F 6E 20 20 28 20 : printer-on (
019BD0: 2D 2D 20 29 20 28 20 61 63 74 69 76 61 74 65 20 -- ) ( activate
019BE0: 6F 75 74 70 75 74 20 74 6F 20 70 72 69 6E 74 65 output to printe
019BF0: 72 29 20 20 70 72 69 6E 74 65 72 2D 6F 66 66 20 r) printer-off
019C00: 20 20 20 70 72 69 6E 74 65 72 2D 62 75 73 79 34 printer-busy4
019C10: 20 20 20 20 20 20 20 20 28 20 74 65 73 74 20 42 ( test B
019C20: 55 53 59 20 6C 69 6E 65 20 6F 66 20 70 72 69 6E USY line of prin
019C30: 74 65 72 20 70 6F 72 74 20 29 20 20 20 20 20 20 ter port )
019C40: 20 20 20 69 66 20 31 20 65 70 72 69 6E 74 20 21 if 1 eprint !
019C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019C60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019C70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019C80: 20 20 20 65 6C 73 65 20 20 66 66 66 20 30 20 64 else fff 0 d
019C90: 6F 20 6C 6F 6F 70 20 28 20 77 61 69 74 29 20 20 o loop ( wait)
019CA0: 20 70 72 69 6E 74 65 72 2D 62 75 73 79 34 20 20 printer-busy4
019CB0: 20 20 20 28 20 74 72 79 20 61 67 61 69 6E 29 20 ( try again)
019CC0: 20 20 20 20 20 69 66 20 31 20 65 70 72 69 6E 74 if 1 eprint
019CD0: 20 21 20 65 6C 73 65 20 2E 22 20 50 72 69 6E 74 ! else ." Print
019CE0: 65 72 20 6F 66 66 2D 6C 69 6E 65 22 20 61 62 6F er off-line" abo
019CF0: 72 74 20 74 68 65 6E 20 20 20 20 20 20 20 20 20 rt then
019D00: 28 20 50 72 69 6E 74 65 72 20 6F 6E 2F 6F 66 66 ( Printer on/off
019D10: 20 73 77 69 74 63 68 20 20 20 4C 4B 53 20 38 37 switch LKS 87
019D20: 30 35 30 37 29 20 20 20 20 68 65 78 20 20 20 20 0507) hex
019D30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019D40: 3A 20 70 72 69 6E 74 65 72 2D 74 6F 67 67 6C 65 : printer-toggle
019D50: 2D 6E 6F 62 62 6C 65 20 28 20 2D 2D 20 29 20 28 -nobble ( -- ) (
019D60: 20 64 69 73 61 62 6C 65 20 43 54 52 4C 2B 59 29 disable CTRL+Y)
019D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019D80: 20 20 20 27 20 3C 6B 65 79 3E 20 30 36 20 2B 20 ' <key> 06 +
019D90: 64 75 70 20 20 20 20 28 20 61 64 64 72 65 73 73 dup ( address
019DA0: 20 6F 66 20 63 6F 6E 64 69 74 69 6F 6E 61 6C 20 of conditional
019DB0: 4A 55 4D 50 29 20 20 20 20 20 20 20 20 20 20 20 JUMP)
019DC0: 20 20 20 63 40 20 63 32 20 3D 20 20 20 20 20 20 c@ c2 =
019DD0: 20 20 20 20 20 20 20 28 20 6D 61 6B 65 20 73 75 ( make su
019DE0: 72 65 20 69 74 20 69 73 20 74 68 65 20 63 6F 72 re it is the cor
019DF0: 72 65 63 74 20 6F 6E 65 29 20 20 20 20 20 20 20 rect one)
019E00: 20 20 20 20 20 20 69 66 20 63 33 20 73 77 61 70 if c3 swap
019E10: 20 63 21 20 20 20 20 28 20 72 65 70 6C 61 63 65 c! ( replace
019E20: 20 77 69 74 68 20 75 6E 63 6F 6E 64 69 74 69 6F with unconditio
019E30: 6E 61 6C 20 4A 55 4D 50 29 20 20 20 20 20 20 20 nal JUMP)
019E40: 20 20 20 20 20 20 65 6C 73 65 20 64 72 6F 70 20 else drop
019E50: 37 20 65 6D 69 74 20 74 68 65 6E 20 3B 20 20 20 7 emit then ;
019E60: 20 20 28 20 65 6C 73 65 20 62 65 65 70 29 20 20 ( else beep)
019E70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
019E80: 3A 20 70 72 69 6E 74 65 72 2D 74 6F 67 67 6C 65 : printer-toggle
019E90: 2D 75 6E 6E 6F 62 62 6C 65 20 20 28 20 2D 2D 20 -unnobble ( --
019EA0: 29 20 20 28 20 72 65 73 74 6F 72 65 20 43 54 52 ) ( restore CTR
019EB0: 4C 2B 59 29 20 20 20 20 20 20 20 20 20 20 20 20 L+Y)
019EC0: 20 20 20 27 20 3C 6B 65 79 3E 20 30 36 20 2B 20 ' <key> 06 +
019ED0: 64 75 70 20 20 20 20 28 20 61 64 64 72 65 73 73 dup ( address
019EE0: 20 6F 66 20 75 6E 63 6F 6E 64 69 74 69 6F 6E 61 of unconditiona
019EF0: 6C 20 4A 55 4D 50 29 20 20 20 20 20 20 20 20 20 l JUMP)
019F00: 20 20 20 74 68 65 6E 20 3B 20 28 20 72 65 70 6C then ; ( repl
019F10: 61 63 65 20 70 72 69 6E 74 65 72 2D 62 75 73 79 ace printer-busy
019F20: 34 20 62 79 20 70 72 69 6E 74 65 72 2D 62 75 73 4 by printer-bus
019F30: 79 36 20 69 66 20 6E 65 63 65 73 73 61 72 79 29 y6 if necessary)
019F40: 64 65 63 69 6D 61 6C 20 20 65 78 69 74 1A 69 61 decimal exit.ia
019F50: 6C 20 67 6C 6F 73 73 61 72 79 20 6F 66 20 77 6F l glossary of wo
019F60: 72 64 73 20 75 73 65 64 20 69 6E 20 63 70 63 46 rds used in cpcF
019F70: 54 48 32 2C 20 77 68 69 63 68 20 69 73 20 20 20 TH2, which is
019F80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019F90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019FA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019FB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019FC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019FD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019FE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019FF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A0A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A0B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A0C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A0D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A0E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A0F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A100: 20 20 20 63 40 20 63 33 20 3D 20 20 20 20 20 20 c@ c3 =
01A110: 20 20 20 20 20 20 20 28 20 6D 61 6B 65 20 73 75 ( make su
01A120: 72 65 20 69 74 20 69 73 20 74 68 65 20 63 6F 72 re it is the cor
01A130: 72 65 63 74 20 6F 6E 65 29 20 20 20 20 20 20 20 rect one)
01A140: 20 20 20 20 20 20 69 66 20 63 32 20 73 77 61 70 if c2 swap
01A150: 20 63 21 20 20 20 20 28 20 72 65 70 6C 61 63 65 c! ( replace
01A160: 20 77 69 74 68 20 63 6F 6E 64 69 74 69 6F 6E 61 with conditiona
01A170: 6C 20 4A 55 4D 50 29 20 20 20 20 20 20 20 20 20 l JUMP)
01A180: 20 20 20 20 20 20 65 6C 73 65 20 64 72 6F 70 20 else drop
01A190: 37 20 65 6D 69 74 20 74 68 65 6E 20 3B 20 20 20 7 emit then ;
01A1A0: 20 20 28 20 65 6C 73 65 20 62 65 65 70 29 20 20 ( else beep)
01A1B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A1C0: 20 28 20 47 65 6E 65 72 61 6C 20 72 6F 75 74 69 ( General routi
01A1D0: 6E 65 73 20 74 6F 20 61 63 63 65 73 73 20 70 6F nes to access po
01A1E0: 72 74 73 29 20 20 20 20 20 20 20 20 20 20 20 20 rts)
01A1F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A200: 68 78 63 6F 64 65 20 70 40 20 28 20 70 6F 72 74 hxcode p@ ( port
01A210: 5F 61 64 64 72 20 2D 2D 20 62 29 20 28 20 69 6E _addr -- b) ( in
01A220: 70 75 74 20 62 79 74 65 20 66 72 6F 6D 20 70 6F put byte from po
01A230: 72 74 29 20 20 20 20 20 20 20 20 20 20 20 20 20 rt)
01A240: 20 28 20 70 6F 70 20 68 6C 20 20 70 75 73 68 20 ( pop hl push
01A250: 62 63 20 3A 20 67 65 74 20 61 64 64 72 65 73 73 bc : get address
01A260: 2C 20 73 61 76 65 20 62 63 20 29 20 20 20 20 20 , save bc )
01A270: 20 20 20 65 31 20 63 2C 20 63 35 20 63 2C 20 20 e1 c, c5 c,
01A280: 20 28 20 6C 64 20 62 2C 68 20 20 6C 64 20 63 2C ( ld b,h ld c,
01A290: 6C 20 3A 20 61 64 64 72 65 73 73 20 74 6F 20 62 l : address to b
01A2A0: 63 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c)
01A2B0: 20 20 20 34 34 20 63 2C 20 34 64 20 63 2C 20 20 44 c, 4d c,
01A2C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01A2D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A2E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A2F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
01A300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01A310: 16 00 01 00 02 09 4E E5 16 00 C1 02 00 00 00 02 ......N.........
01A320: 16 00 C6 02 00 00 00 02 16 00 C2 02 00 00 00 02 ................
01A330: 16 00 C7 02 00 00 00 02 16 00 C3 02 00 00 00 02 ................
01A340: 16 00 C8 02 00 00 00 02 16 00 C4 02 00 00 00 02 ................
01A350: 16 00 C9 02 00 00 00 02 16 00 C5 02 00 00 00 02 ................
01A360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A400: 28 20 47 4F 20 20 20 4C 4B 53 20 38 37 31 32 30 ( GO LKS 87120
01A410: 33 29 20 20 20 20 20 64 65 63 69 6D 61 6C 20 20 3) decimal
01A420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A440: 31 39 20 63 6F 6E 73 74 61 6E 74 20 73 69 7A 65 19 constant size
01A450: 20 20 28 20 73 69 7A 65 20 6F 66 20 62 6F 61 72 ( size of boar
01A460: 64 2C 20 31 39 20 6D 61 78 2C 20 39 20 6D 69 6E d, 19 max, 9 min
01A470: 29 20 30 20 63 6F 6E 73 74 61 6E 74 20 73 71 20 ) 0 constant sq
01A480: 32 33 33 20 63 6F 6E 73 74 61 6E 74 20 62 6B 73 233 constant bks
01A490: 20 20 32 30 32 20 63 6F 6E 73 74 61 6E 74 20 77 202 constant w
01A4A0: 68 73 20 20 31 34 34 20 63 6F 6E 73 74 61 6E 74 hs 144 constant
01A4B0: 20 66 72 73 20 20 20 20 20 20 20 20 20 20 20 20 frs
01A4C0: 3A 20 62 6B 20 73 70 61 63 65 20 62 6B 73 20 65 : bk space bks e
01A4D0: 6D 69 74 20 3B 20 3A 20 77 68 20 73 70 61 63 65 mit ; : wh space
01A4E0: 20 77 68 73 20 65 6D 69 74 20 3B 20 20 20 20 20 whs emit ;
01A4F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A500: 3A 20 66 72 20 73 70 61 63 65 20 66 72 73 20 65 : fr space frs e
01A510: 6D 69 74 20 3B 20 20 20 28 20 64 69 73 70 6C 61 mit ; ( displa
01A520: 79 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 y)
01A530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A540: 3A 20 69 6E 74 72 6F 20 20 32 20 6D 6F 64 65 20 : intro 2 mode
01A550: 2E 22 20 20 47 4F 20 69 6E 20 46 4F 52 54 48 2C ." GO in FORTH,
01A560: 20 61 66 74 65 72 20 44 72 2E 20 43 2E 48 2E 20 after Dr. C.H.
01A570: 54 69 6E 67 2C 22 20 20 20 20 20 20 20 20 20 20 Ting,"
01A580: 20 20 20 2E 22 20 20 69 6E 20 44 72 2E 20 44 6F ." in Dr. Do
01A590: 62 62 27 73 20 54 6F 6F 6C 62 6F 6F 6B 20 6F 66 bb's Toolbook of
01A5A0: 20 46 6F 72 74 68 2E 22 20 63 72 20 20 20 20 20 Forth." cr
01A5B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A5C0: 20 20 20 2E 22 20 20 43 6F 6D 70 75 74 65 72 20 ." Computer
01A5D0: 75 73 65 73 22 20 62 6B 20 63 72 20 20 20 2E 22 uses" bk cr ."
01A5E0: 20 20 50 6C 61 79 65 72 20 75 73 65 73 22 20 77 Player uses" w
01A5F0: 68 20 63 72 20 20 20 20 20 20 20 20 20 20 20 20 h cr
01A600: 3A 20 70 75 74 20 20 73 77 61 70 20 64 6F 20 63 : put swap do c
01A610: 6F 6C 6F 75 72 20 40 20 6D 61 70 20 69 20 2B 20 olour @ map i +
01A620: 63 21 20 6C 6F 6F 70 20 3B 20 20 20 20 20 20 20 c! loop ;
01A630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A640: 3A 20 6B 6D 61 72 6B 20 20 6D 61 70 20 2B 20 64 : kmark map + d
01A650: 75 70 20 63 40 20 36 34 20 6F 72 20 73 77 61 70 up c@ 64 or swap
01A660: 20 63 21 20 3B 20 20 20 20 20 20 20 20 20 20 20 c! ;
01A670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A680: 3A 20 75 6E 6D 61 72 6B 20 28 20 70 61 74 74 65 : unmark ( patte
01A690: 72 6E 20 2D 2D 20 29 20 20 6D 61 70 20 20 73 71 rn -- ) map sq
01A6A0: 20 6F 76 65 72 20 2B 20 73 77 61 70 20 64 6F 20 over + swap do
01A6B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A6C0: 20 20 20 69 20 63 40 20 6F 76 65 72 20 3D 20 20 i c@ over =
01A6D0: 69 66 20 69 20 63 40 20 33 20 61 6E 64 20 69 20 if i c@ 3 and i
01A6E0: 63 21 20 74 68 65 6E 20 20 6C 6F 6F 70 20 20 64 c! then loop d
01A6F0: 72 6F 70 20 3B 20 20 20 20 20 20 20 20 20 20 20 rop ;
01A700: 3A 20 64 65 73 69 67 6E 61 74 65 20 20 20 6C 69 : designate li
01A710: 6D 69 74 73 20 64 6F 20 20 69 20 3F 73 74 6F 6E mits do i ?ston
01A720: 65 20 31 32 38 20 3D 20 20 20 20 20 20 20 20 20 e 128 =
01A730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A740: 20 20 20 69 66 20 20 62 6C 61 63 6B 20 69 20 70 if black i p
01A750: 6C 61 63 65 20 6C 65 61 76 65 20 74 68 65 6E 20 lace leave then
01A760: 20 6C 6F 6F 70 20 3B 20 20 20 20 20 20 20 20 20 loop ;
01A770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A780: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01A790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A7A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A7B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A7C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A7D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A7E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A7F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A800: 20 20 20 2E 22 20 20 46 72 65 65 20 70 6F 73 69 ." Free posi
01A810: 74 69 6F 6E 22 20 66 72 20 63 72 20 20 20 20 20 tion" fr cr
01A820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A840: 20 20 20 2E 22 20 20 54 68 65 20 62 6F 61 72 64 ." The board
01A850: 20 69 73 20 73 75 72 72 6F 75 6E 64 65 64 20 62 is surrounded b
01A860: 79 20 63 6F 6D 70 75 74 65 72 27 73 20 73 74 6F y computer's sto
01A870: 6E 65 73 2E 22 20 63 72 20 20 20 20 20 20 20 20 nes." cr
01A880: 20 20 20 2E 22 20 20 45 6E 74 65 72 20 65 61 63 ." Enter eac
01A890: 68 20 6D 6F 76 65 20 61 73 20 72 6F 77 20 63 6F h move as row co
01A8A0: 6C 75 6D 6E 20 28 65 2E 67 2E 20 31 32 29 22 20 lumn (e.g. 12)"
01A8B0: 63 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 cr
01A8C0: 20 20 20 2E 22 20 20 41 6E 20 69 6C 6C 65 67 61 ." An illega
01A8D0: 6C 20 6D 6F 76 65 20 65 6E 74 72 79 20 28 65 2E l move entry (e.
01A8E0: 67 2E 20 78 78 29 20 77 69 6C 6C 20 73 74 6F 70 g. xx) will stop
01A8F0: 20 74 68 65 20 67 61 6D 65 2C 22 20 20 20 20 20 the game,"
01A900: 20 20 20 2E 22 20 20 72 65 73 74 61 72 74 20 62 ." restart b
01A910: 79 20 63 6F 6E 74 22 20 63 72 20 63 72 20 20 20 y cont" cr cr
01A920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A940: 20 20 20 2E 22 20 45 6E 74 65 72 20 62 6F 61 72 ." Enter boar
01A950: 64 20 73 69 7A 65 20 28 39 20 74 6F 20 31 39 29 d size (9 to 19)
01A960: 20 3A 20 22 20 64 65 63 69 6D 61 6C 20 71 75 65 : " decimal que
01A970: 72 79 20 62 6C 20 77 6F 72 64 20 20 20 20 20 20 ry bl word
01A980: 20 20 20 6E 75 6D 62 65 72 20 64 72 6F 70 20 39 number drop 9
01A990: 20 6D 61 78 20 31 39 20 6D 69 6E 20 27 20 73 69 max 19 min ' si
01A9A0: 7A 65 20 21 20 73 69 7A 65 20 64 75 70 20 2A 20 ze ! size dup *
01A9B0: 27 20 73 71 20 21 20 3B 20 20 20 20 20 20 20 20 ' sq ! ;
01A9C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01A9D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A9E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01A9F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AA00: 3A 20 72 65 6D 6F 76 65 20 28 20 6E 20 2D 2D 20 : remove ( n --
01AA10: 29 20 20 20 3F 6F 75 74 20 20 69 66 20 64 72 6F ) ?out if dro
01AA20: 70 20 65 78 69 74 20 74 68 65 6E 20 20 20 20 20 p exit then
01AA30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AA40: 20 20 20 20 64 75 70 20 3F 73 74 6F 6E 65 20 36 dup ?stone 6
01AA50: 37 20 61 6E 64 20 20 63 6F 6C 6F 75 72 20 40 20 7 and colour @
01AA60: 3D 20 69 66 20 20 20 20 20 20 20 20 20 20 20 20 = if
01AA70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AA80: 20 20 20 20 64 75 70 20 6B 6D 61 72 6B 20 20 64 dup kmark d
01AA90: 75 70 20 6E 6F 72 74 68 20 72 65 63 75 72 20 20 up north recur
01AAA0: 64 75 70 20 65 61 73 74 20 72 65 63 75 72 20 20 dup east recur
01AAB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AAC0: 20 20 20 20 64 75 70 20 73 6F 75 74 68 20 72 65 dup south re
01AAD0: 63 75 72 20 20 64 75 70 20 77 65 73 74 20 72 65 cur dup west re
01AAE0: 63 75 72 20 20 6B 73 74 6F 6E 65 20 65 6C 73 65 cur kstone else
01AAF0: 20 64 72 6F 70 20 74 68 65 6E 20 20 3B 20 20 20 drop then ;
01AB00: 76 61 72 69 61 62 6C 65 20 62 65 73 74 2D 6D 6F variable best-mo
01AB10: 76 65 20 20 76 61 72 69 61 62 6C 65 20 62 65 73 ve variable bes
01AB20: 74 2D 6C 69 62 65 72 74 69 65 73 20 20 20 20 20 t-liberties
01AB30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AB40: 76 61 72 69 61 62 6C 65 20 62 65 73 74 2D 63 6F variable best-co
01AB50: 75 6E 74 20 20 76 61 72 69 61 62 6C 65 20 21 63 unt variable !c
01AB60: 6F 6C 6F 75 72 20 20 20 20 20 20 20 20 20 20 20 olour
01AB70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AB80: 3A 20 6C 6F 6F 6B 61 68 65 61 64 20 28 20 6D 6F : lookahead ( mo
01AB90: 76 65 20 2D 2D 20 6C 69 62 65 72 74 79 29 20 20 ve -- liberty)
01ABA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01ABB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01ABC0: 20 20 20 62 6C 61 63 6B 20 6F 76 65 72 20 70 6C black over pl
01ABD0: 61 63 65 20 20 63 6F 6C 6F 75 72 20 40 20 21 63 ace colour @ !c
01ABE0: 6F 6C 6F 75 72 20 21 20 20 62 6C 61 63 6B 20 63 olour ! black c
01ABF0: 6F 6C 6F 75 72 20 21 20 20 20 20 20 20 20 20 20 olour !
01AC00: 76 61 72 69 61 62 6C 65 20 63 6F 6C 6F 75 72 20 variable colour
01AC10: 76 61 72 69 61 62 6C 65 20 6C 69 62 65 72 74 79 variable liberty
01AC20: 20 20 76 61 72 69 61 62 6C 65 20 6D 61 70 20 33 variable map 3
01AC30: 36 30 20 61 6C 6C 6F 74 20 20 20 20 20 20 20 20 60 allot
01AC40: 31 20 63 6F 6E 73 74 61 6E 74 20 62 6C 61 63 6B 1 constant black
01AC50: 20 20 20 32 20 63 6F 6E 73 74 61 6E 74 20 77 68 2 constant wh
01AC60: 69 74 65 20 20 20 20 20 20 20 20 20 20 20 20 20 ite
01AC70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AC80: 3A 20 3F 6F 75 74 20 20 64 75 70 20 30 3C 20 6F : ?out dup 0< o
01AC90: 76 65 72 20 73 71 20 31 2D 20 3E 20 6F 72 20 3B ver sq 1- > or ;
01ACA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01ACB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01ACC0: 3A 20 3F 73 74 6F 6E 65 20 20 28 20 6E 20 2D 2D : ?stone ( n --
01ACD0: 20 63 6F 64 65 29 20 20 6D 61 70 20 2B 20 63 40 code) map + c@
01ACE0: 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01ACF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AD00: 3A 20 6E 6F 72 74 68 20 28 20 6E 31 20 2D 2D 20 : north ( n1 --
01AD10: 6E 32 29 20 20 73 69 7A 65 20 2D 20 3B 20 20 20 n2) size - ;
01AD20: 20 20 3A 20 73 6F 75 74 68 20 20 73 69 7A 65 20 : south size
01AD30: 2B 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 + ;
01AD40: 3A 20 65 61 73 74 20 20 64 75 70 20 73 69 7A 65 : east dup size
01AD50: 20 6D 6F 64 20 73 69 7A 65 20 31 2D 20 3D 20 20 mod size 1- =
01AD60: 69 66 20 64 72 6F 70 20 31 30 30 30 20 65 6C 73 if drop 1000 els
01AD70: 65 20 31 2B 20 74 68 65 6E 20 3B 20 20 20 20 20 e 1+ then ;
01AD80: 3A 20 77 65 73 74 20 20 64 75 70 20 73 69 7A 65 : west dup size
01AD90: 20 6D 6F 64 20 20 69 66 20 31 2D 20 65 6C 73 65 mod if 1- else
01ADA0: 20 64 72 6F 70 20 31 30 30 30 20 74 68 65 6E 20 drop 1000 then
01ADB0: 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01ADC0: 3A 20 6D 61 72 6B 20 20 6D 61 70 20 2B 20 64 75 : mark map + du
01ADD0: 70 20 63 40 20 31 32 38 20 6F 72 20 73 77 61 70 p c@ 128 or swap
01ADE0: 20 63 21 20 3B 20 20 20 20 20 20 20 20 20 20 20 c! ;
01ADF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AE00: 20 20 20 30 20 6C 69 62 65 72 74 79 20 21 20 20 0 liberty !
01AE10: 31 32 38 20 75 6E 6D 61 72 6B 20 20 31 32 39 20 128 unmark 129
01AE20: 75 6E 6D 61 72 6B 20 20 20 20 20 20 20 20 20 20 unmark
01AE30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AE40: 20 20 20 64 75 70 20 63 6F 75 6E 74 73 20 20 6B dup counts k
01AE50: 73 74 6F 6E 65 20 21 63 6F 6C 6F 75 72 20 40 20 stone !colour @
01AE60: 63 6F 6C 6F 75 72 20 21 20 20 6C 69 62 65 72 74 colour ! libert
01AE70: 79 20 40 20 3B 20 20 20 20 20 20 20 20 20 20 20 y @ ;
01AE80: 3A 20 65 76 61 6C 20 28 20 6D 6F 76 65 20 6C 69 : eval ( move li
01AE90: 62 65 72 74 79 20 2D 2D 20 29 20 20 20 20 20 20 berty -- )
01AEA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AEB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AEC0: 20 20 20 6F 76 65 72 20 6C 6F 6F 6B 61 68 65 61 over lookahea
01AED0: 64 20 20 3E 72 20 20 69 20 62 65 73 74 2D 63 6F d >r i best-co
01AEE0: 75 6E 74 20 40 20 31 20 6D 61 78 20 3E 20 20 20 unt @ 1 max >
01AEF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AF00: 20 20 20 6F 76 65 72 20 62 65 73 74 2D 6C 69 62 over best-lib
01AF10: 65 72 74 69 65 73 20 40 20 3E 20 30 3D 20 61 6E erties @ > 0= an
01AF20: 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d
01AF30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AF40: 20 20 20 69 66 20 62 65 73 74 2D 6C 69 62 65 72 if best-liber
01AF50: 74 69 65 73 20 21 20 62 65 73 74 2D 6D 6F 76 65 ties ! best-move
01AF60: 20 21 20 20 72 3E 20 62 65 73 74 2D 63 6F 75 6E ! r> best-coun
01AF70: 74 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 t !
01AF80: 20 20 20 65 6C 73 65 20 64 64 72 6F 70 20 72 3E else ddrop r>
01AF90: 20 64 72 6F 70 20 74 68 65 6E 20 3B 20 20 20 20 drop then ;
01AFA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AFB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AFC0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01AFD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AFE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01AFF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B000: 3A 20 72 65 63 75 72 20 20 6C 61 74 65 73 74 20 : recur latest
01B010: 70 66 61 20 63 66 61 20 2C 20 3B 20 20 69 6D 6D pfa cfa , ; imm
01B020: 65 64 69 61 74 65 20 20 20 20 20 20 20 20 20 20 ediate
01B030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B040: 3A 20 63 6F 75 6E 74 73 20 20 3F 6F 75 74 20 69 : counts ?out i
01B050: 66 20 64 72 6F 70 20 65 78 69 74 20 74 68 65 6E f drop exit then
01B060: 20 20 64 75 70 20 3F 73 74 6F 6E 65 20 63 6F 6C dup ?stone col
01B070: 6F 75 72 20 40 20 3D 20 69 66 20 20 20 20 20 20 our @ = if
01B080: 20 20 20 20 20 20 20 20 20 20 64 75 70 20 6D 61 dup ma
01B090: 72 6B 20 64 75 70 20 6E 6F 72 74 68 20 72 65 63 rk dup north rec
01B0A0: 75 72 20 20 64 75 70 20 65 61 73 74 20 72 65 63 ur dup east rec
01B0B0: 75 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ur
01B0C0: 20 20 20 20 20 20 20 20 20 20 64 75 70 20 73 6F dup so
01B0D0: 75 74 68 20 72 65 63 75 72 20 20 77 65 73 74 20 uth recur west
01B0E0: 72 65 63 75 72 20 20 20 65 6C 73 65 20 20 20 20 recur else
01B0F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B100: 20 20 20 20 20 20 20 20 20 20 64 75 70 20 3F 73 dup ?s
01B110: 74 6F 6E 65 20 30 3D 20 69 66 20 6D 61 72 6B 20 tone 0= if mark
01B120: 31 20 6C 69 62 65 72 74 79 20 2B 21 20 20 65 6C 1 liberty +! el
01B130: 73 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 se
01B140: 20 20 20 20 20 20 20 20 20 20 64 72 6F 70 20 20 drop
01B150: 74 68 65 6E 20 74 68 65 6E 20 3B 20 20 20 20 20 then then ;
01B160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B180: 3A 20 6C 69 6D 69 74 73 20 20 20 73 71 20 30 20 : limits sq 0
01B190: 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01B1A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B1B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B1C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01B1D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B1E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B1F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B200: 68 65 78 20 76 61 72 69 61 62 6C 65 20 70 61 74 hex variable pat
01B210: 74 65 72 6E 20 31 34 20 2C 20 34 34 20 2C 20 31 tern 14 , 44 , 1
01B220: 34 30 30 20 2C 20 34 34 30 30 20 2C 20 31 30 30 400 , 4400 , 100
01B230: 31 20 2C 20 30 31 31 30 20 2C 20 20 20 20 20 20 1 , 0110 ,
01B240: 20 34 30 34 20 2C 20 34 30 31 20 2C 20 31 30 31 404 , 401 , 101
01B250: 20 2C 20 31 30 34 20 2C 20 31 30 31 30 20 2C 20 , 104 , 1010 ,
01B260: 20 31 30 31 30 20 70 61 74 74 65 72 6E 20 21 20 1010 pattern !
01B270: 20 64 65 63 69 6D 61 6C 20 20 20 20 20 20 20 20 decimal
01B280: 3A 20 3F 72 61 6E 67 65 20 28 20 6E 20 2D 2D 20 : ?range ( n --
01B290: 63 6F 64 65 29 20 20 3F 6F 75 74 20 69 66 20 64 code) ?out if d
01B2A0: 72 6F 70 20 62 6C 61 63 6B 20 20 20 20 20 20 20 rop black
01B2B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B2C0: 20 20 20 20 65 6C 73 65 20 3F 73 74 6F 6E 65 20 else ?stone
01B2D0: 33 20 61 6E 64 20 74 68 65 6E 20 3B 20 20 20 20 3 and then ;
01B2E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B2F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B300: 3A 20 3F 6E 20 20 6E 6F 72 74 68 20 3F 72 61 6E : ?n north ?ran
01B310: 67 65 20 3B 20 20 20 20 20 3A 20 3F 65 20 20 65 ge ; : ?e e
01B320: 61 73 74 20 3F 72 61 6E 67 65 20 3B 20 20 20 20 ast ?range ;
01B330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B340: 3A 20 3F 73 20 20 73 6F 75 74 68 20 3F 72 61 6E : ?s south ?ran
01B350: 67 65 20 3B 20 20 20 20 20 3A 20 3F 77 20 20 77 ge ; : ?w w
01B360: 65 73 74 20 3F 72 61 6E 67 65 20 3B 20 20 20 20 est ?range ;
01B370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B380: 3A 20 2B 34 2A 20 20 30 20 20 38 20 30 20 64 6F : +4* 0 8 0 do
01B390: 20 20 64 75 70 20 2B 20 64 75 70 20 2B 20 2B 20 dup + dup + +
01B3A0: 6C 6F 6F 70 20 3B 20 20 20 20 20 20 20 20 20 20 loop ;
01B3B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B3C0: 3A 20 70 6E 6F 72 74 68 20 28 20 6D 6F 76 65 20 : pnorth ( move
01B3D0: 2D 2D 20 70 61 74 74 65 72 6E 29 20 20 64 75 70 -- pattern) dup
01B3E0: 20 3F 6E 20 69 66 20 64 72 6F 70 20 30 20 65 78 ?n if drop 0 ex
01B3F0: 69 74 20 74 68 65 6E 20 20 20 20 20 20 20 20 20 it then
01B400: 3A 20 69 6E 64 20 20 63 72 20 20 20 73 70 61 63 : ind cr spac
01B410: 65 20 20 73 69 7A 65 20 30 20 64 6F 20 69 20 32 e size 0 do i 2
01B420: 20 2E 72 20 6C 6F 6F 70 20 3B 20 20 20 20 20 20 .r loop ;
01B430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B440: 3A 20 62 6F 61 72 64 20 20 33 30 20 65 6D 69 74 : board 30 emit
01B450: 20 69 6E 64 20 20 6C 69 6D 69 74 73 20 64 6F 20 ind limits do
01B460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B480: 20 20 20 20 20 20 20 20 20 69 20 73 69 7A 65 20 i size
01B490: 2F 6D 6F 64 20 73 77 61 70 20 30 3D 20 20 69 66 /mod swap 0= if
01B4A0: 20 63 72 20 31 20 2E 72 20 65 6C 73 65 20 64 72 cr 1 .r else dr
01B4B0: 6F 70 20 74 68 65 6E 20 20 20 20 20 20 20 20 20 op then
01B4C0: 20 20 20 20 20 20 20 20 20 69 20 3F 73 74 6F 6E i ?ston
01B4D0: 65 20 33 20 61 6E 64 20 64 75 70 20 30 3D 20 20 e 3 and dup 0=
01B4E0: 69 66 20 66 72 20 64 72 6F 70 20 20 20 20 65 6C if fr drop el
01B4F0: 73 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 se
01B500: 20 20 20 20 20 20 20 20 20 62 6C 61 63 6B 20 3D black =
01B510: 20 69 66 20 62 6B 20 65 6C 73 65 20 77 68 20 20 if bk else wh
01B520: 74 68 65 6E 20 74 68 65 6E 20 20 6C 6F 6F 70 20 then then loop
01B530: 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01B540: 3A 20 70 6C 61 63 65 20 28 20 63 6F 64 65 20 6E : place ( code n
01B550: 20 2D 2D 20 29 20 20 20 6D 61 70 20 2B 20 63 21 -- ) map + c!
01B560: 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01B570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B580: 3A 20 63 6C 72 6D 61 70 20 20 6D 61 70 20 33 36 : clrmap map 36
01B590: 32 20 30 20 66 69 6C 6C 20 3B 20 20 20 20 20 20 2 0 fill ;
01B5A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B5B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B5C0: 3A 20 6B 73 74 6F 6E 65 20 28 20 6E 20 2D 2D 20 : kstone ( n --
01B5D0: 29 20 20 6D 61 70 20 2B 20 30 20 73 77 61 70 20 ) map + 0 swap
01B5E0: 63 21 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 c! ;
01B5F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01B610: 17 00 01 00 02 09 4E E5 17 00 C1 02 00 00 00 02 ......N.........
01B620: 17 00 C6 02 00 00 00 02 17 00 C2 02 00 00 00 02 ................
01B630: 17 00 C7 02 00 00 00 02 17 00 C3 02 00 00 00 02 ................
01B640: 17 00 C8 02 00 00 00 02 17 00 C4 02 00 00 00 02 ................
01B650: 17 00 C9 02 00 00 00 02 17 00 C5 02 00 00 00 02 ................
01B660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B700: 20 20 20 3E 72 20 20 69 20 6E 6F 72 74 68 20 3F >r i north ?
01B710: 65 20 20 69 20 3F 65 20 20 69 20 6E 6F 72 74 68 e i ?e i north
01B720: 20 65 61 73 74 20 64 75 70 20 3F 65 20 20 20 20 east dup ?e
01B730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B740: 20 20 20 73 77 61 70 20 3F 6E 20 20 69 20 6E 6F swap ?n i no
01B750: 72 74 68 20 3F 77 20 20 69 20 3F 77 20 20 72 3E rth ?w i ?w r>
01B760: 20 6E 6F 72 74 68 20 77 65 73 74 20 64 75 70 20 north west dup
01B770: 3F 77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ?w
01B780: 20 20 20 73 77 61 70 20 3F 6E 20 2B 34 2A 20 20 swap ?n +4*
01B790: 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01B7A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B7B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B7C0: 3A 20 70 65 61 73 74 20 20 64 75 70 20 3F 65 20 : peast dup ?e
01B7D0: 69 66 20 64 72 6F 70 20 30 20 65 78 69 74 20 74 if drop 0 exit t
01B7E0: 68 65 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 hen
01B7F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B800: 20 20 20 3E 72 20 20 69 20 65 61 73 74 20 20 3F >r i east ?
01B810: 73 20 20 69 20 3F 73 20 20 69 20 65 61 73 74 20 s i ?s i east
01B820: 20 73 6F 75 74 68 20 3F 73 20 20 20 20 20 20 20 south ?s
01B830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B840: 20 20 20 69 20 65 61 73 74 20 73 6F 75 74 68 20 i east south
01B850: 3F 65 20 69 20 65 61 73 74 20 3F 6E 20 69 20 3F ?e i east ?n i ?
01B860: 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n
01B870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B880: 20 20 20 69 20 65 61 73 74 20 6E 6F 72 74 68 20 i east north
01B890: 3F 6E 20 20 72 3E 20 65 61 73 74 20 6E 6F 72 74 ?n r> east nort
01B8A0: 68 20 3F 65 20 2B 34 2A 20 3B 20 20 20 20 20 20 h ?e +4* ;
01B8B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B8C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01B8D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B8E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B8F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B900: 3A 20 2E 62 65 73 74 20 20 20 20 73 70 61 63 65 : .best space
01B910: 20 20 62 65 73 74 2D 6D 6F 76 65 20 3F 20 62 65 best-move ? be
01B920: 73 74 2D 63 6F 75 6E 74 20 3F 20 62 65 73 74 2D st-count ? best-
01B930: 6C 69 62 65 72 74 69 65 73 20 3F 20 3B 20 20 20 liberties ? ;
01B940: 3A 20 3F 6D 6F 76 65 20 20 62 65 67 69 6E 20 63 : ?move begin c
01B950: 72 20 2E 22 20 59 6F 75 72 20 6D 6F 76 65 3A 20 r ." Your move:
01B960: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "
01B970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B980: 20 20 20 20 71 75 65 72 79 20 62 6C 20 77 6F 72 query bl wor
01B990: 64 20 6E 75 6D 62 65 72 20 64 72 6F 70 20 20 32 d number drop 2
01B9A0: 30 20 65 6D 69 74 20 20 20 20 20 20 20 20 20 20 0 emit
01B9B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01B9C0: 20 20 20 20 64 75 70 20 3F 73 74 6F 6E 65 20 33 dup ?stone 3
01B9D0: 20 61 6E 64 20 30 3D 20 69 66 20 77 68 69 74 65 and 0= if white
01B9E0: 20 73 77 61 70 20 70 6C 61 63 65 20 31 20 20 20 swap place 1
01B9F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BA00: 20 20 20 20 65 6C 73 65 20 2E 22 20 6F 63 63 75 else ." occu
01BA10: 70 69 65 64 2E 22 20 64 72 6F 70 20 30 20 74 68 pied." drop 0 th
01BA20: 65 6E 20 20 20 20 75 6E 74 69 6C 20 3B 20 20 20 en until ;
01BA30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BA40: 3A 20 67 6F 62 61 73 65 20 20 73 69 7A 65 20 62 : gobase size b
01BA50: 61 73 65 20 21 20 3B 20 20 20 20 20 20 20 20 20 ase ! ;
01BA60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BA70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BA80: 3A 20 63 6F 6E 74 20 20 20 20 65 73 63 64 69 73 : cont escdis
01BA90: 20 20 31 20 6D 6F 64 65 20 20 2E 22 20 47 4F 22 1 mode ." GO"
01BAA0: 20 67 6F 62 61 73 65 20 20 20 20 20 20 20 20 20 gobase
01BAB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BAC0: 20 20 20 62 65 67 69 6E 20 62 6F 61 72 64 20 3F begin board ?
01BAD0: 6D 6F 76 65 20 31 20 3F 73 74 6F 70 20 21 20 20 move 1 ?stop !
01BAE0: 30 20 62 65 73 74 2D 63 6F 75 6E 74 20 21 20 20 0 best-count !
01BAF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BB00: 3A 20 70 73 6F 75 74 68 20 20 64 75 70 20 3F 73 : psouth dup ?s
01BB10: 20 69 66 20 64 72 6F 70 20 30 20 65 78 69 74 20 if drop 0 exit
01BB20: 74 68 65 6E 20 20 20 20 20 20 20 20 20 20 20 20 then
01BB30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BB40: 20 20 20 3E 72 20 20 69 20 73 6F 75 74 68 20 3F >r i south ?
01BB50: 65 20 69 20 3F 65 20 20 69 20 73 6F 75 74 68 20 e i ?e i south
01BB60: 65 61 73 74 20 3F 65 20 69 20 73 6F 75 74 68 20 east ?e i south
01BB70: 65 61 73 74 20 3F 73 20 20 20 20 20 20 20 20 20 east ?s
01BB80: 20 20 20 69 20 73 6F 75 74 68 20 3F 77 20 20 69 i south ?w i
01BB90: 20 3F 77 20 69 20 73 6F 75 74 68 20 77 65 73 74 ?w i south west
01BBA0: 20 3F 77 20 72 3E 20 73 6F 75 74 68 20 77 65 73 ?w r> south wes
01BBB0: 74 20 3F 73 20 2B 34 2A 20 20 3B 20 20 20 20 20 t ?s +4* ;
01BBC0: 3A 20 70 77 65 73 74 20 20 20 64 75 70 20 3F 77 : pwest dup ?w
01BBD0: 20 20 69 66 20 64 72 6F 70 20 30 20 65 78 69 74 if drop 0 exit
01BBE0: 20 74 68 65 6E 20 20 20 20 20 20 20 20 20 20 20 then
01BBF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BC00: 20 20 20 3E 72 20 20 69 20 77 65 73 74 20 3F 73 >r i west ?s
01BC10: 20 69 20 3F 73 20 20 69 20 77 65 73 74 20 73 6F i ?s i west so
01BC20: 75 74 68 20 3F 73 20 69 20 77 65 73 74 20 73 6F uth ?s i west so
01BC30: 75 74 68 20 3F 77 20 20 20 20 20 20 20 20 20 20 uth ?w
01BC40: 20 20 20 69 20 77 65 73 74 20 3F 6E 20 20 69 20 i west ?n i
01BC50: 3F 6E 20 20 69 20 77 65 73 74 20 6E 6F 72 74 68 ?n i west north
01BC60: 20 3F 6E 20 72 3E 20 77 65 73 74 20 6E 6F 72 74 ?n r> west nort
01BC70: 68 20 3F 77 20 2B 34 2A 20 3B 20 20 20 20 20 20 h ?w +4* ;
01BC80: 3A 20 66 69 78 20 20 64 75 70 20 72 6F 74 20 61 : fix dup rot a
01BC90: 6E 64 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 nd ;
01BCA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BCB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BCC0: 3A 20 6D 61 74 63 68 20 28 20 70 61 74 74 65 72 : match ( patter
01BCD0: 6E 20 2D 2D 20 66 6C 29 20 64 75 70 20 69 66 20 n -- fl) dup if
01BCE0: 30 20 20 31 32 20 30 20 64 6F 20 6F 76 65 72 20 0 12 0 do over
01BCF0: 70 61 74 74 65 72 6E 20 69 20 32 2A 20 20 20 20 pattern i 2*
01BD00: 20 20 20 77 65 66 66 65 63 74 20 2E 62 65 73 74 weffect .best
01BD10: 20 62 65 66 66 65 63 74 20 2E 62 65 73 74 20 20 beffect .best
01BD20: 3F 73 74 6F 70 20 40 20 69 66 20 70 61 74 73 20 ?stop @ if pats
01BD30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BD40: 20 20 20 62 6C 61 63 6B 20 62 65 73 74 2D 6D 6F black best-mo
01BD50: 76 65 20 40 20 2E 62 65 73 74 20 70 6C 61 63 65 ve @ .best place
01BD60: 20 20 74 68 65 6E 20 20 20 61 67 61 69 6E 20 3B then again ;
01BD70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BD80: 3A 20 68 61 6E 64 69 63 61 70 20 20 5B 20 31 39 : handicap [ 19
01BD90: 20 62 61 73 65 20 21 20 5D 20 20 20 33 33 20 33 base ! ] 33 3
01BDA0: 39 20 33 66 20 39 33 20 39 39 20 39 66 20 66 33 9 3f 93 99 9f f3
01BDB0: 20 66 39 20 66 66 20 20 20 20 20 20 20 20 20 20 f9 ff
01BDC0: 20 20 20 20 39 20 30 20 64 6F 20 62 6C 61 63 6B 9 0 do black
01BDD0: 20 73 77 61 70 20 70 6C 61 63 65 20 6C 6F 6F 70 swap place loop
01BDE0: 20 3B 20 20 20 64 65 63 69 6D 61 6C 20 20 20 20 ; decimal
01BDF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BE00: 3A 20 67 6F 20 20 73 70 21 20 30 20 3E 69 6E 20 : go sp! 0 >in
01BE10: 21 20 69 6E 74 72 6F 20 63 6C 72 6D 61 70 20 20 ! intro clrmap
01BE20: 67 6F 62 61 73 65 20 20 62 61 73 65 20 40 20 31 gobase base @ 1
01BE30: 39 20 3D 20 20 20 20 20 20 20 20 20 20 20 20 20 9 =
01BE40: 20 20 20 20 69 66 20 68 61 6E 64 69 63 61 70 20 if handicap
01BE50: 65 6C 73 65 20 62 6C 61 63 6B 20 73 71 20 32 2F else black sq 2/
01BE60: 20 70 6C 61 63 65 20 74 68 65 6E 20 20 20 20 20 place then
01BE70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BE80: 20 20 20 20 30 20 62 65 73 74 2D 6D 6F 76 65 20 0 best-move
01BE90: 21 20 63 6F 6E 74 20 3B 1A FF FF FF FF FF FF FF ! cont ;........
01BEA0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
01BEB0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
01BEC0: 00 00 00 00 FF FF FB FB 00 00 00 00 FF FF FF FF ................
01BED0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
01BEE0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
01BEF0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
01BF00: 20 20 20 2B 20 40 20 66 69 78 20 3D 20 69 66 20 + @ fix = if
01BF10: 31 2B 20 6C 65 61 76 65 20 74 68 65 6E 20 20 6C 1+ leave then l
01BF20: 6F 6F 70 20 20 73 77 61 70 20 64 72 6F 70 20 74 oop swap drop t
01BF30: 68 65 6E 20 3B 20 20 20 20 20 20 20 20 20 20 20 hen ;
01BF40: 3A 20 65 76 70 61 74 20 20 31 20 62 65 73 74 2D : evpat 1 best-
01BF50: 63 6F 75 6E 74 20 21 20 32 20 65 76 61 6C 20 3B count ! 2 eval ;
01BF60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BF70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01BF80: 3A 20 70 61 74 73 20 20 6C 69 6D 69 74 73 20 64 : pats limits d
01BF90: 6F 20 69 20 3F 73 74 6F 6E 65 20 77 68 69 74 65 o i ?stone white
01BFA0: 20 61 6E 64 20 69 66 20 69 20 70 6E 6F 72 74 68 and if i pnorth
01BFB0: 20 6D 61 74 63 68 20 20 20 20 20 20 20 20 20 20 match
01BFC0: 20 20 20 69 66 20 69 20 6E 6F 72 74 68 20 65 76 if i north ev
01BFD0: 70 61 74 20 6C 65 61 76 65 20 20 65 6C 73 65 20 pat leave else
01BFE0: 69 20 70 65 61 73 74 20 20 6D 61 74 63 68 20 20 i peast match
01BFF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C000: 20 20 20 69 66 20 69 20 65 61 73 74 20 20 65 76 if i east ev
01C010: 70 61 74 20 6C 65 61 76 65 20 20 65 6C 73 65 20 pat leave else
01C020: 69 20 70 73 6F 75 74 68 20 6D 61 74 63 68 20 20 i psouth match
01C030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C040: 20 20 20 69 66 20 69 20 73 6F 75 74 68 20 65 76 if i south ev
01C050: 70 61 74 20 6C 65 61 76 65 20 20 65 6C 73 65 20 pat leave else
01C060: 69 20 70 77 65 73 74 20 20 6D 61 74 63 68 20 20 i pwest match
01C070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C080: 20 20 20 69 66 20 69 20 77 65 73 74 20 20 65 76 if i west ev
01C090: 70 61 74 20 6C 65 61 76 65 20 20 74 68 65 6E 20 pat leave then
01C0A0: 74 68 65 6E 20 74 68 65 6E 20 74 68 65 6E 20 74 then then then t
01C0B0: 68 65 6E 20 6C 6F 6F 70 20 3B 20 20 20 20 20 20 hen loop ;
01C0C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01C0D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C0E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C0F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C100: 0D 0A 20 2A 2A 2A 2A 2A 2A 20 46 6F 72 74 68 20 .. ****** Forth
01C110: 28 66 72 6F 6D 20 50 45 54 52 20 4C 55 4B 45 53 (from PETR LUKES
01C120: 29 2C 20 4A 61 6E 75 61 72 79 20 31 39 38 38 0D ), January 1988.
01C130: 0A 0D 0A 20 20 20 28 46 69 6C 65 73 20 72 65 66 ... (Files ref
01C140: 65 72 72 65 64 20 74 6F 20 61 72 65 20 74 68 65 erred to are the
01C150: 20 46 6F 72 74 68 20 6B 65 72 6E 65 6C 20 69 6E Forth kernel in
01C160: 20 4D 61 79 38 37 20 61 6E 64 20 47 4F 2E 46 54 May87 and GO.FT
01C170: 48 2E 29 0D 0A 0D 0A 20 20 20 57 65 20 68 61 76 H.).... We hav
01C180: 65 20 61 20 72 65 71 75 65 73 74 20 66 6F 72 20 e a request for
01C190: 67 61 6D 65 73 20 77 72 69 74 74 65 6E 20 69 6E games written in
01C1A0: 20 46 6F 72 74 68 2E 20 55 6E 66 6F 72 74 75 6E Forth. Unfortun
01C1B0: 61 74 65 6C 79 2C 20 74 68 65 20 67 72 6F 75 70 ately, the group
01C1C0: 20 64 6F 65 73 0D 0A 20 6E 6F 74 20 68 61 76 65 does.. not have
01C1D0: 20 61 20 6C 69 62 72 61 72 79 20 6F 66 20 46 6F a library of Fo
01C1E0: 72 74 68 20 70 72 6F 67 72 61 6D 73 2C 20 61 70 rth programs, ap
01C1F0: 61 72 74 20 66 72 6F 6D 20 74 68 65 20 6F 6E 65 art from the one
01C200: 73 20 50 65 74 72 20 4C 75 6B 65 73 20 61 6C 72 s Petr Lukes alr
01C210: 65 61 64 79 0D 0A 20 68 61 73 20 73 65 6E 74 2C eady.. has sent,
01C220: 20 61 6E 64 20 50 65 74 72 20 73 61 79 73 20 68 and Petr says h
01C230: 65 20 68 61 73 20 6E 6F 74 20 6D 75 63 68 20 69 e has not much i
01C240: 6E 74 65 72 65 73 74 20 69 6E 20 67 61 6D 65 73 nterest in games
01C250: 2E 20 54 68 65 20 6F 6E 6C 79 20 6F 6E 65 20 68 . The only one h
01C260: 65 20 68 61 73 0D 0A 20 69 73 20 61 20 46 6F 72 e has.. is a For
01C270: 74 68 20 76 65 72 73 69 6F 6E 20 6F 66 20 61 20 th version of a
01C280: 73 74 72 61 74 65 67 79 20 67 61 6D 65 2C 20 47 strategy game, G
01C290: 6F 2E 20 48 6F 77 65 76 65 72 2C 20 6E 65 69 74 o. However, neit
01C2A0: 68 65 72 20 77 65 20 6E 6F 72 20 50 65 74 72 20 her we nor Petr
01C2B0: 6B 6E 6F 77 73 0D 0A 20 74 68 65 20 72 75 6C 65 knows.. the rule
01C2C0: 73 20 74 6F 20 74 68 65 20 67 61 6D 65 2E 0D 0A s to the game...
01C2D0: 0D 0A 20 20 20 22 49 74 20 73 65 65 6D 73 20 74 .. "It seems t
01C2E0: 6F 20 62 65 20 64 6F 69 6E 67 20 73 6F 6D 65 74 o be doing somet
01C2F0: 68 69 6E 67 20 73 6F 20 49 20 68 6F 70 65 20 69 hing so I hope i
01C300: 76 61 72 69 61 62 6C 65 20 3F 73 74 6F 70 20 20 variable ?stop
01C310: 20 3A 20 73 74 6F 70 20 30 20 3F 73 74 6F 70 20 : stop 0 ?stop
01C320: 21 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 ! ;
01C330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C340: 3A 20 75 6E 6D 61 72 6B 73 20 28 20 63 6F 6C 6F : unmarks ( colo
01C350: 75 72 20 2D 2D 20 29 20 20 31 32 39 20 75 6E 6D ur -- ) 129 unm
01C360: 61 72 6B 20 31 33 30 20 75 6E 6D 61 72 6B 20 63 ark 130 unmark c
01C370: 6F 6C 6F 75 72 20 21 20 3B 20 20 20 20 20 20 20 olour ! ;
01C380: 3A 20 65 78 61 6D 69 6E 65 20 31 32 38 20 75 6E : examine 128 un
01C390: 6D 61 72 6B 20 20 30 20 6C 69 62 65 72 74 79 20 mark 0 liberty
01C3A0: 21 20 20 63 6F 75 6E 74 73 20 6C 69 62 65 72 74 ! counts libert
01C3B0: 79 20 40 20 3B 20 20 20 20 20 20 20 20 20 20 20 y @ ;
01C3C0: 3A 20 77 63 68 6F 20 20 30 20 20 73 71 20 73 69 : wcho 0 sq si
01C3D0: 7A 65 20 2D 20 31 2D 20 73 69 7A 65 20 64 6F 20 ze - 1- size do
01C3E0: 69 20 73 69 7A 65 20 6D 6F 64 20 3F 64 75 70 20 i size mod ?dup
01C3F0: 69 66 20 73 69 7A 65 20 31 2D 20 2D 20 20 20 20 if size 1- -
01C400: 20 20 20 69 66 20 69 20 3F 73 74 6F 6E 65 20 31 if i ?stone 1
01C410: 32 38 20 3D 20 69 66 20 69 20 74 68 65 6E 20 74 28 = if i then t
01C420: 68 65 6E 20 74 68 65 6E 20 6C 6F 6F 70 20 3B 20 hen then loop ;
01C430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C440: 3A 20 63 68 6F 20 20 20 62 65 67 69 6E 20 3F 64 : cho begin ?d
01C450: 75 70 20 77 68 69 6C 65 20 6C 69 62 65 72 74 79 up while liberty
01C460: 20 40 20 65 76 61 6C 20 72 65 70 65 61 74 20 3B @ eval repeat ;
01C470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C480: 3A 20 3F 63 68 6F 20 20 62 65 73 74 2D 6C 69 62 : ?cho best-lib
01C490: 65 72 74 69 65 73 20 40 20 6C 69 62 65 72 74 79 erties @ liberty
01C4A0: 20 40 20 3C 20 30 3D 20 3B 20 20 20 20 20 20 20 @ < 0= ;
01C4B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C4C0: 3A 20 62 63 68 6F 20 20 30 20 20 6C 69 6D 69 74 : bcho 0 limit
01C4D0: 73 20 64 6F 20 69 20 3F 73 74 6F 6E 65 20 31 32 s do i ?stone 12
01C4E0: 38 20 3D 20 69 66 20 69 20 74 68 65 6E 20 20 6C 8 = if i then l
01C4F0: 6F 6F 70 20 3B 20 20 20 20 20 20 20 20 20 20 20 oop ;
01C500: 74 20 69 73 20 72 69 67 68 74 2C 22 20 50 65 74 t is right," Pet
01C510: 72 20 73 61 79 73 2E 20 22 50 65 72 68 61 70 73 r says. "Perhaps
01C520: 0D 0A 20 61 20 47 6F 20 65 78 70 65 72 74 20 63 .. a Go expert c
01C530: 6F 75 6C 64 20 70 61 73 73 20 61 6E 20 6F 70 69 ould pass an opi
01C540: 6E 69 6F 6E 20 6F 6E 20 69 74 20 61 6E 64 20 65 nion on it and e
01C550: 78 70 6C 61 69 6E 20 68 6F 77 20 74 6F 20 70 6C xplain how to pl
01C560: 61 79 20 69 74 2E 20 54 68 65 0D 0A 20 70 72 6F ay it. The.. pro
01C570: 67 72 61 6D 20 69 73 20 63 6F 70 79 72 69 67 68 gram is copyrigh
01C580: 74 2C 20 62 75 74 20 44 72 20 54 69 6E 67 20 68 t, but Dr Ting h
01C590: 61 73 20 72 65 6C 65 61 73 65 64 20 69 74 20 66 as released it f
01C5A0: 6F 72 20 6E 6F 6E 2D 63 6F 6D 6D 65 72 63 69 61 or non-commercia
01C5B0: 6C 20 75 73 65 2E 22 0D 0A 0D 0A 20 20 20 44 6F l use.".... Do
01C5C0: 20 77 65 20 68 61 76 65 20 61 20 47 6F 20 65 78 we have a Go ex
01C5D0: 70 65 72 74 3F 20 49 20 68 61 76 65 20 74 69 6E pert? I have tin
01C5E0: 6B 65 72 65 64 20 77 69 74 68 20 69 74 20 61 6E kered with it an
01C5F0: 64 20 6F 6E 65 20 6F 66 20 74 68 65 20 6F 62 6A d one of the obj
01C600: 65 63 74 73 20 73 65 65 6D 73 0D 0A 20 74 6F 20 ects seems.. to
01C610: 62 65 20 74 6F 20 6F 63 63 75 70 79 20 73 70 61 be to occupy spa
01C620: 63 65 73 20 6F 6E 20 74 68 65 20 62 6F 61 72 64 ces on the board
01C630: 20 69 6E 20 73 75 63 68 20 61 20 77 61 79 20 74 in such a way t
01C640: 68 61 74 20 74 68 65 20 6F 70 70 6F 6E 65 6E 74 hat the opponent
01C650: 20 63 61 6E 6E 6F 74 0D 0A 20 67 61 69 6E 20 61 cannot.. gain a
01C660: 6E 20 61 64 76 61 6E 74 61 67 65 2E 20 50 6F 73 n advantage. Pos
01C670: 69 74 69 6F 6E 73 20 6F 6E 20 74 68 65 20 62 6F itions on the bo
01C680: 61 72 64 20 67 72 69 64 20 61 72 65 20 73 65 6C ard grid are sel
01C690: 65 63 74 65 64 20 62 79 20 6E 75 6D 62 65 72 73 ected by numbers
01C6A0: 2C 20 77 69 74 68 0D 0A 20 74 68 65 20 76 65 72 , with.. the ver
01C6B0: 74 69 63 61 6C 20 28 74 6F 70 20 74 6F 20 62 6F tical (top to bo
01C6C0: 74 74 6F 6D 20 72 6F 77 29 20 66 69 72 73 74 20 ttom row) first
01C6D0: 61 6E 64 20 74 68 65 20 68 6F 72 69 7A 6F 6E 74 and the horizont
01C6E0: 61 6C 20 28 61 63 72 6F 73 73 29 20 73 65 63 6F al (across) seco
01C6F0: 6E 64 2E 0D 0A 20 54 68 61 74 20 69 73 2C 20 74 nd... That is, t
01C700: 3A 20 77 65 66 66 65 63 74 20 20 62 6C 61 63 6B : weffect black
01C710: 20 75 6E 6D 61 72 6B 73 20 20 73 71 20 31 2D 20 unmarks sq 1-
01C720: 62 65 73 74 2D 6C 69 62 65 72 74 69 65 73 20 21 best-liberties !
01C730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C740: 20 20 20 6C 69 6D 69 74 73 20 64 6F 20 69 20 3F limits do i ?
01C750: 73 74 6F 6E 65 20 62 6C 61 63 6B 20 3D 20 69 66 stone black = if
01C760: 20 69 20 65 78 61 6D 69 6E 65 20 20 20 20 20 20 i examine
01C770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C780: 20 20 20 30 3D 20 69 66 20 69 20 72 65 6D 6F 76 0= if i remov
01C790: 65 20 65 6C 73 65 20 6C 69 62 65 72 74 79 20 40 e else liberty @
01C7A0: 20 33 20 3C 20 20 20 20 20 20 20 20 20 20 20 20 3 <
01C7B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C7C0: 20 20 20 69 66 20 3F 63 68 6F 20 69 66 20 77 63 if ?cho if wc
01C7D0: 68 6F 20 63 68 6F 20 74 68 65 6E 20 74 68 65 6E ho cho then then
01C7E0: 20 74 68 65 6E 20 74 68 65 6E 20 20 6C 6F 6F 70 then then loop
01C7F0: 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01C800: 3A 20 62 65 66 66 65 63 74 20 20 77 68 69 74 65 : beffect white
01C810: 20 75 6E 6D 61 72 6B 73 20 20 6C 69 6D 69 74 73 unmarks limits
01C820: 20 64 6F 20 69 20 3F 73 74 6F 6E 65 20 77 68 69 do i ?stone whi
01C830: 74 65 20 3D 20 20 20 20 20 20 20 20 20 20 20 20 te =
01C840: 20 20 20 69 66 20 69 20 65 78 61 6D 69 6E 65 20 if i examine
01C850: 31 20 3D 20 20 69 66 20 64 65 73 69 67 6E 61 74 1 = if designat
01C860: 65 20 69 20 72 65 6D 6F 76 65 20 6C 65 61 76 65 e i remove leave
01C870: 20 73 74 6F 70 20 20 20 20 20 20 20 20 20 20 20 stop
01C880: 20 20 20 65 6C 73 65 20 3F 63 68 6F 20 69 66 20 else ?cho if
01C890: 62 63 68 6F 20 63 68 6F 20 74 68 65 6E 20 74 68 bcho cho then th
01C8A0: 65 6E 20 74 68 65 6E 20 20 20 6C 6F 6F 70 20 3B en then loop ;
01C8B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C8C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01C8D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C8E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C8F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01C900: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01C910: 18 00 01 00 02 09 4E E5 18 00 C1 02 00 00 00 02 ......N.........
01C920: 18 00 C6 02 00 00 00 02 18 00 C2 02 00 00 00 02 ................
01C930: 18 00 C7 02 00 00 00 02 18 00 C3 02 00 00 00 02 ................
01C940: 18 00 C8 02 00 00 00 02 18 00 C4 02 00 00 00 02 ................
01C950: 18 00 C9 02 00 00 00 02 18 00 C5 02 00 00 00 02 ................
01C960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01CA00: 6F 20 70 6C 61 63 65 20 6D 79 20 62 75 74 74 6F o place my butto
01CA10: 6E 20 6F 6E 20 74 68 65 20 66 6F 75 72 74 68 20 n on the fourth
01CA20: 72 6F 77 20 64 6F 77 6E 20 61 6E 64 20 74 68 65 row down and the
01CA30: 20 73 69 78 74 68 20 61 63 72 6F 73 73 2C 20 49 sixth across, I
01CA40: 0D 0A 20 77 6F 75 6C 64 20 74 79 70 65 20 34 36 .. would type 46
01CA50: 20 5B 65 6E 74 65 72 5D 2E 20 57 68 65 6E 20 74 [enter]. When t
01CA60: 68 65 20 67 61 6D 65 20 62 65 67 69 6E 73 2C 20 he game begins,
01CA70: 6C 6F 63 61 74 65 20 61 20 62 75 74 74 6F 6E 20 locate a button
01CA80: 6E 65 61 72 20 74 68 65 0D 0A 20 63 6F 6D 70 75 near the.. compu
01CA90: 74 65 72 27 73 20 62 6C 61 63 6B 20 70 69 65 63 ter's black piec
01CAA0: 65 2E 20 49 74 73 20 6E 65 78 74 20 70 69 65 63 e. Its next piec
01CAB0: 65 20 77 69 6C 6C 20 61 74 74 65 6D 70 74 20 74 e will attempt t
01CAC0: 6F 20 62 6C 6F 63 6B 20 6D 65 20 66 72 6F 6D 0D o block me from.
01CAD0: 0A 20 73 75 72 72 6F 75 6E 64 69 6E 67 20 69 74 . surrounding it
01CAE0: 2E 20 49 20 68 61 76 65 20 6E 6F 74 20 77 6F 72 . I have not wor
01CAF0: 6B 65 64 20 6F 75 74 20 74 68 65 20 73 63 6F 72 ked out the scor
01CB00: 69 6E 67 20 79 65 74 20 61 6E 64 20 61 74 20 73 ing yet and at s
01CB10: 74 61 67 65 73 20 69 6E 20 74 68 65 0D 0A 20 67 tages in the.. g
01CB20: 61 6D 65 20 73 6F 6D 65 20 6F 66 20 6D 79 20 62 ame some of my b
01CB30: 75 74 74 6F 6E 73 20 6F 72 20 73 6F 6D 65 20 6F uttons or some o
01CB40: 66 20 74 68 65 20 63 6F 6D 70 75 74 65 72 27 73 f the computer's
01CB50: 20 73 75 64 64 65 6E 6C 79 20 64 69 73 61 70 70 suddenly disapp
01CB60: 65 61 72 2E 20 57 68 65 6E 20 74 68 65 0D 0A 20 ear. When the..
01CB70: 67 72 69 64 20 69 73 20 6E 65 61 72 6C 79 20 66 grid is nearly f
01CB80: 75 6C 6C 20 6F 66 20 62 75 74 74 6F 6E 73 2C 20 ull of buttons,
01CB90: 6F 6E 65 20 70 6C 61 79 65 72 27 73 20 61 72 65 one player's are
01CBA0: 20 63 6C 65 61 72 65 64 20 61 6E 64 20 69 74 20 cleared and it
01CBB0: 73 65 65 6D 73 20 74 6F 20 62 65 0D 0A 20 72 65 seems to be.. re
01CBC0: 61 64 79 20 66 6F 72 20 61 6E 6F 74 68 65 72 20 ady for another
01CBD0: 67 61 6D 65 2E 0D 0A 0D 0A 20 20 20 54 68 61 74 game..... That
01CBE0: 20 69 73 20 61 62 6F 75 74 20 61 6C 6C 20 49 20 is about all I
01CBF0: 68 61 76 65 20 64 69 73 63 6F 76 65 72 65 64 20 have discovered
01CC00: 61 72 65 20 69 6E 74 65 72 65 73 74 65 64 20 69 are interested i
01CC10: 6E 20 61 20 66 65 77 20 72 65 6D 61 72 6B 73 20 n a few remarks
01CC20: 61 62 6F 75 74 20 69 74 73 20 77 6F 72 6B 69 6E about its workin
01CC30: 67 73 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 gs.
01CC40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01CC50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01CC60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01CC70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01CC80: 54 68 65 20 70 72 6F 62 6C 65 6D 20 69 73 20 62 The problem is b
01CC90: 65 73 74 20 73 6F 6C 76 65 64 20 62 79 20 72 65 est solved by re
01CCA0: 63 75 72 73 69 6F 6E 20 77 69 74 68 20 6C 6F 63 cursion with loc
01CCB0: 61 6C 20 76 61 72 69 61 62 6C 65 73 2C 20 20 20 al variables,
01CCC0: 69 6E 20 61 20 6C 61 6E 67 75 61 67 65 20 77 68 in a language wh
01CCD0: 69 63 68 20 73 75 70 70 6F 72 74 73 20 74 68 69 ich supports thi
01CCE0: 73 20 63 6F 6E 73 74 72 75 63 74 2C 20 73 75 63 s construct, suc
01CCF0: 68 20 61 73 20 50 41 53 43 41 4C 20 61 6E 64 20 h as PASCAL and
01CD00: 4C 4F 47 4F 2E 20 20 52 65 63 75 72 73 69 6F 6E LOGO. Recursion
01CD10: 20 6D 65 61 6E 73 20 74 68 61 74 20 61 20 72 6F means that a ro
01CD20: 75 74 69 6E 65 20 63 61 6C 6C 73 20 69 74 73 65 utine calls itse
01CD30: 6C 66 20 61 6E 64 20 65 61 63 68 20 74 69 6D 65 lf and each time
01CD40: 65 73 74 61 62 6C 69 73 68 65 73 20 69 74 73 20 establishes its
01CD50: 6F 77 6E 20 73 65 74 20 6F 66 20 6C 6F 63 61 6C own set of local
01CD60: 20 76 61 72 69 61 62 6C 65 73 20 77 68 69 63 68 variables which
01CD70: 20 65 78 69 73 74 20 75 6E 74 69 6C 20 20 20 20 exist until
01CD80: 74 68 65 20 70 61 72 74 69 63 75 6C 61 72 20 63 the particular c
01CD90: 61 6C 6C 20 74 65 72 6D 69 6E 61 74 65 73 2E 20 all terminates.
01CDA0: 20 49 74 20 69 73 20 61 20 76 65 72 79 20 64 69 It is a very di
01CDB0: 66 66 69 63 75 6C 74 20 63 6F 6E 63 65 70 74 20 fficult concept
01CDC0: 74 6F 20 65 78 70 6C 61 69 6E 2C 20 62 75 74 20 to explain, but
01CDD0: 73 6F 6D 65 20 69 64 65 61 20 6D 61 79 20 62 65 some idea may be
01CDE0: 20 67 61 69 6E 65 64 20 62 79 20 61 63 74 69 76 gained by activ
01CDF0: 61 74 69 6E 67 20 74 68 65 20 20 20 20 20 20 00 ating the .
01CE00: 61 62 6F 75 74 20 69 74 20 73 6F 20 66 61 72 2E about it so far.
01CE10: 20 41 73 20 66 6F 72 20 74 68 65 20 70 72 6F 67 As for the prog
01CE20: 72 61 6D 20 2D 2D 0D 0A 20 69 74 20 77 6F 72 6B ram --.. it work
01CE30: 73 20 71 75 69 74 65 20 77 65 6C 6C 20 61 6E 64 s quite well and
01CE40: 20 73 70 65 65 64 73 20 74 68 72 6F 75 67 68 20 speeds through
01CE50: 63 6F 6D 70 6C 65 78 20 6D 6F 76 65 73 20 71 75 complex moves qu
01CE60: 69 74 65 20 72 61 70 69 64 6C 79 2E 20 41 20 66 ite rapidly. A f
01CE70: 65 77 0D 0A 20 74 69 6D 65 73 20 74 68 65 20 63 ew.. times the c
01CE80: 6F 6D 70 75 74 65 72 20 73 65 65 6D 65 64 20 74 omputer seemed t
01CE90: 6F 20 70 61 75 73 65 20 66 6F 72 20 61 20 74 68 o pause for a th
01CEA0: 69 6E 6B 69 6E 67 20 73 65 73 73 69 6F 6E 2C 20 inking session,
01CEB0: 62 75 74 20 67 65 6E 65 72 61 6C 6C 79 0D 0A 20 but generally..
01CEC0: 73 65 6C 65 63 74 65 64 20 69 74 73 20 6D 6F 76 selected its mov
01CED0: 65 73 20 71 75 69 74 65 20 72 61 70 69 64 6C 79 es quite rapidly
01CEE0: 2E 0D 0A 0D 0A 20 20 20 54 68 65 20 75 73 75 61 ..... The usua
01CEF0: 6C 20 70 72 6F 63 65 64 75 72 65 20 69 73 20 75 l procedure is u
01CF00: 73 65 64 20 74 6F 20 6C 6F 61 64 20 61 6E 64 20 sed to load and
01CF10: 72 75 6E 20 61 20 46 6F 72 74 68 20 66 69 6C 65 run a Forth file
01CF20: 2E 20 4F 66 20 63 6F 75 72 73 65 2C 20 74 68 65 . Of course, the
01CF30: 0D 0A 20 66 69 72 73 74 20 65 73 73 65 6E 74 69 .. first essenti
01CF40: 61 6C 20 69 73 20 74 6F 20 72 75 6E 20 74 68 65 al is to run the
01CF50: 20 46 6F 72 74 68 20 6B 65 72 6E 65 6C 2E 20 49 Forth kernel. I
01CF60: 66 20 69 74 20 69 73 20 6E 65 63 65 73 73 61 72 f it is necessar
01CF70: 79 20 74 6F 20 73 77 61 70 20 64 69 73 6B 20 74 y to swap disk t
01CF80: 6F 0D 0A 20 74 61 70 65 2C 20 68 69 74 20 74 68 o.. tape, hit th
01CF90: 65 20 62 61 72 20 22 7C 22 20 73 79 6D 62 6F 6C e bar "|" symbol
01CFA0: 2C 20 74 68 65 6E 20 22 74 61 70 65 22 2E 20 57 , then "tape". W
01CFB0: 68 65 6E 20 72 65 61 64 79 2C 20 74 79 70 65 20 hen ready, type
01CFC0: 73 63 72 2D 6C 6F 61 64 2C 20 67 69 76 65 20 69 scr-load, give i
01CFD0: 74 0D 0A 20 74 68 65 20 66 69 6C 65 6E 61 6D 65 t.. the filename
01CFE0: 20 22 67 6F 2E 66 74 68 22 20 77 68 65 6E 20 70 "go.fth" when p
01CFF0: 72 6F 6D 70 74 65 64 2E 20 41 66 74 65 72 20 74 rompted. After t
01D000: 28 20 2E 73 20 20 32 30 20 65 6D 69 74 20 20 6B ( .s 20 emit k
01D010: 65 79 20 64 72 6F 70 20 29 20 69 6E 20 74 68 65 ey drop ) in the
01D020: 20 4D 4F 56 45 44 49 53 43 20 77 6F 72 64 2C 20 MOVEDISC word,
01D030: 77 68 69 63 68 20 77 69 6C 6C 20 20 20 20 20 20 which will
01D040: 64 69 73 70 6C 61 79 20 74 68 65 20 73 74 61 63 display the stac
01D050: 6B 20 61 66 74 65 72 20 65 61 63 68 20 6D 6F 76 k after each mov
01D060: 65 20 61 6E 64 20 72 65 71 75 69 72 65 20 61 20 e and require a
01D070: 6B 65 79 20 70 72 65 73 73 20 74 6F 20 20 20 20 key press to
01D080: 63 6F 6E 74 69 6E 75 65 2E 20 20 20 20 20 20 20 continue.
01D090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D0A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D0B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D0C0: 41 20 50 41 53 43 41 4C 20 76 65 72 73 69 6F 6E A PASCAL version
01D0D0: 2C 20 74 61 6B 65 6E 20 66 72 6F 6D 20 74 68 65 , taken from the
01D0E0: 20 48 49 53 4F 46 54 20 6D 61 6E 75 61 6C 3A 20 HISOFT manual:
01D0F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D100: 20 70 72 6F 67 72 61 6D 20 68 61 6E 6F 69 3B 20 program hanoi;
01D110: 20 76 61 72 20 6E 3A 69 6E 74 65 67 65 72 3B 20 var n:integer;
01D120: 20 20 20 7B 20 67 6C 6F 62 61 6C 20 76 61 72 69 { global vari
01D130: 61 62 6C 65 20 7D 20 20 20 20 20 20 20 20 20 20 able }
01D140: 20 70 72 6F 63 65 64 75 72 65 20 6D 6F 76 65 64 procedure moved
01D150: 69 73 6B 28 73 72 63 65 2C 64 65 73 74 20 3A 20 isk(srce,dest :
01D160: 69 6E 74 65 67 65 72 29 3B 20 7B 20 6C 6F 63 61 integer); { loca
01D170: 6C 73 20 7D 20 20 20 20 20 20 20 20 20 20 20 20 ls }
01D180: 20 20 62 65 67 69 6E 20 20 20 77 72 69 74 65 28 begin write(
01D190: 73 72 63 65 3A 31 2C 27 20 74 6F 20 27 2C 64 65 srce:1,' to ',de
01D1A0: 73 74 3A 31 2C 27 2E 27 29 20 20 20 65 6E 64 3B st:1,'.') end;
01D1B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D1C0: 20 70 72 6F 63 65 64 75 72 65 20 6D 6F 76 65 28 procedure move(
01D1D0: 6E 2C 73 63 65 2C 61 75 78 2C 64 65 73 74 20 3A n,sce,aux,dest :
01D1E0: 20 69 6E 74 65 67 65 72 29 3B 20 20 7B 20 6C 6F integer); { lo
01D1F0: 63 61 6C 73 20 7D 20 20 20 20 20 20 20 20 20 20 cals }
01D200: 68 65 20 66 69 6C 65 20 68 61 73 20 6C 6F 61 64 he file has load
01D210: 65 64 2C 20 74 79 70 65 20 31 5F 6C 6F 61 64 20 ed, type 1_load
01D220: 74 6F 0D 0A 20 63 6F 6D 70 69 6C 65 20 61 6E 64 to.. compile and
01D230: 2C 20 61 66 74 65 72 20 74 68 65 20 75 73 75 61 , after the usua
01D240: 6C 20 77 61 69 74 20 77 68 69 6C 65 20 74 68 65 l wait while the
01D250: 20 73 63 72 65 65 6E 73 20 61 72 65 20 63 6F 6D screens are com
01D260: 70 69 6C 65 64 2C 20 74 79 70 65 20 22 67 6F 22 piled, type "go"
01D270: 2E 0D 0A 20 28 52 65 6D 65 6D 62 65 72 20 74 68 ... (Remember th
01D280: 65 20 75 6E 64 65 72 6C 69 6E 65 20 73 79 6D 62 e underline symb
01D290: 6F 6C 20 62 65 74 77 65 65 6E 20 31 20 61 6E 64 ol between 1 and
01D2A0: 20 6C 6F 61 64 20 69 73 20 61 20 73 70 61 63 65 load is a space
01D2B0: 2E 29 20 41 73 20 74 68 65 72 65 0D 0A 20 61 6C .) As there.. al
01D2C0: 72 65 61 64 79 20 69 73 20 61 20 22 67 6F 22 20 ready is a "go"
01D2D0: 69 6E 20 74 68 65 20 6B 65 72 6E 65 6C 27 73 20 in the kernel's
01D2E0: 64 69 63 74 69 6F 6E 61 72 79 2C 20 74 68 65 20 dictionary, the
01D2F0: 6B 65 72 6E 65 6C 20 77 69 6C 6C 6F 72 65 70 6F kernel willorepo
01D300: 72 74 20 22 67 6F 0D 0A 20 64 75 70 6C 69 63 61 rt "go.. duplica
01D310: 74 65 22 2E 20 4E 6F 20 70 72 6F 62 6C 65 6D 20 te". No problem
01D320: 2D 2D 20 74 79 70 65 20 22 67 6F 22 20 61 67 61 -- type "go" aga
01D330: 69 6E 20 61 6E 64 20 74 68 65 20 67 61 6D 65 20 in and the game
01D340: 73 68 6F 75 6C 64 20 61 70 70 65 61 72 2C 20 72 should appear, r
01D350: 65 61 64 79 20 74 6F 0D 0A 20 70 6C 61 79 2E 0D eady to.. play..
01D360: 0A 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ...
01D370: 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A ****
01D380: 2A 2A 2A 2A 0D 0A 1A 20 20 20 24 24 24 FF 00 FF ****... $$$...
01D390: 23 56 21 F9 FF 79 B7 C9 21 0A 01 7E 23 CD 5A BB #V!..y..!..~#.Z.
01D3A0: FE 0A 20 F7 1A DE 79 54 AF 42 20 BB 1B 3F D0 AA .. ...yT.B ..?..
01D3B0: 92 68 7C 80 2E 72 71 04 8A 23 04 B3 10 D8 60 93 .h|..rq..#....`.
01D3C0: 91 20 D9 B7 42 B2 DA 41 C1 BB E6 88 72 E0 8E 88 . ..B..A....r...
01D3D0: 11 33 5D 68 FE B5 A2 2D F8 F4 BC D9 8B F5 1F 71 .3]h...-.......q
01D3E0: 39 28 04 F2 BC 85 7E B6 CC 6A 46 FB 61 C4 71 28 9(....~..jF.a.q(
01D3F0: 2A 61 53 01 A4 CA 8D 30 47 E6 CA 38 FF A7 DF 97 *aS....0G..8....
01D400: 20 20 62 65 67 69 6E 20 20 69 66 20 6E 3D 31 20 begin if n=1
01D410: 74 68 65 6E 20 6D 6F 76 65 64 69 73 6B 28 73 63 then movedisk(sc
01D420: 65 2C 64 65 73 74 29 20 20 20 20 20 20 20 20 20 e,dest)
01D430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D440: 20 20 20 20 20 20 20 20 20 65 6C 73 65 20 62 65 else be
01D450: 67 69 6E 20 20 6D 6F 76 65 28 6E 2D 31 2C 73 72 gin move(n-1,sr
01D460: 63 65 2C 64 65 73 74 2C 61 75 78 29 3B 20 20 20 ce,dest,aux);
01D470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D490: 20 20 20 20 20 6D 6F 76 65 64 69 73 6B 28 73 72 movedisk(sr
01D4A0: 63 65 2C 64 65 73 74 29 3B 20 20 20 20 20 20 20 ce,dest);
01D4B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D4C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D4D0: 20 20 20 20 20 6D 6F 76 65 28 6E 2D 31 2C 61 75 move(n-1,au
01D4E0: 78 2C 73 72 63 65 2C 64 65 73 74 29 20 20 20 20 x,srce,dest)
01D4F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E en
01D510: 64 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d;
01D520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D540: 20 20 65 6E 64 3B 20 20 20 20 20 20 20 20 20 20 end;
01D550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D580: 7B 20 6D 61 69 6E 20 7D 20 20 20 20 20 20 20 20 { main }
01D590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D5A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D5B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D5C0: 20 62 65 67 69 6E 20 20 77 72 69 74 65 28 27 4E begin write('N
01D5D0: 75 6D 62 65 72 20 6F 66 20 64 69 73 63 73 3F 20 umber of discs?
01D5E0: 27 29 3B 20 72 65 61 64 28 6E 29 3B 20 77 72 69 '); read(n); wri
01D5F0: 74 65 6C 6E 3B 20 20 20 20 20 20 20 20 20 20 20 teln;
01D600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D6A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D6B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D6C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D6D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D6E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D6F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D7A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D7B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D7C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D7D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D7E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D7F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
01D800: 20 20 20 20 20 20 20 20 6D 6F 76 65 28 6E 2C 31 move(n,1
01D810: 2C 32 2C 33 29 20 20 20 20 20 20 20 20 20 20 20 ,2,3)
01D820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D840: 20 65 6E 64 2E 20 20 20 20 20 20 20 20 20 20 20 end.
01D850: 20 20 7B 20 45 4E 44 20 6F 66 20 50 41 53 43 41 { END of PASCA
01D860: 4C 20 7D 20 20 20 20 20 20 20 20 20 20 20 20 20 L }
01D870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01D880: 41 6E 20 61 73 69 64 65 20 61 62 6F 75 74 20 50 An aside about P
01D890: 41 53 43 41 4C 3A 20 44 6F 6E 61 6C 64 20 4B 6E ASCAL: Donald Kn
01D8A0: 75 74 68 2C 20 74 68 65 20 61 75 74 68 6F 72 20 uth, the author
01D8B0: 6F 66 20 22 54 68 65 20 41 72 74 20 6F 66 20 20 of "The Art of
01D8C0: 43 6F 6D 70 75 74 65 72 20 50 72 6F 67 72 61 6D Computer Program
01D8D0: 6D 69 6E 67 22 2C 20 77 72 6F 74 65 20 61 20 64 ming", wrote a d
01D8E0: 65 66 69 6E 69 74 69 76 65 20 74 79 70 65 2D 73 efinitive type-s
01D8F0: 65 74 74 69 6E 67 20 70 61 63 6B 61 67 65 20 20 etting package
01D900: 66 6F 72 20 50 43 73 2E 20 20 54 68 65 20 6C 69 for PCs. The li
01D910: 73 74 69 6E 67 73 20 61 72 65 20 70 75 62 6C 69 stings are publi
01D920: 73 68 65 64 20 69 6E 20 66 69 76 65 20 76 6F 6C shed in five vol
01D930: 75 6D 65 73 2C 20 75 73 69 6E 67 20 20 20 20 20 umes, using
01D940: 50 41 53 43 41 4C 2C 20 72 65 70 6F 72 74 65 64 PASCAL, reported
01D950: 6C 79 20 62 65 63 61 75 73 65 20 74 68 65 72 65 ly because there
01D960: 20 77 61 73 20 6E 6F 20 61 67 72 65 65 6D 65 6E was no agreemen
01D970: 74 20 6F 6E 20 74 68 65 20 63 68 6F 69 63 65 20 t on the choice
01D980: 74 68 65 20 6D 6F 73 74 20 70 6F 70 75 6C 61 72 the most popular
01D990: 20 6C 61 6E 67 75 61 67 65 2C 20 77 68 69 6C 65 language, while
01D9A0: 20 50 41 53 43 41 4C 20 77 61 73 20 63 6C 65 61 PASCAL was clea
01D9B0: 72 6C 79 20 65 76 65 72 79 62 6F 64 79 27 73 20 rly everybody's
01D9C0: 63 68 6F 69 63 65 20 6F 66 20 74 68 65 20 73 65 choice of the se
01D9D0: 63 6F 6E 64 2D 66 61 76 6F 75 72 69 74 65 20 6C cond-favourite l
01D9E0: 61 6E 67 75 61 67 65 2E 20 20 20 20 20 20 20 20 anguage.
01D9F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DA00: 28 20 54 4F 57 45 52 20 4F 46 20 48 41 4E 4F 49 ( TOWER OF HANOI
01DA10: 20 2D 20 61 6E 20 65 78 65 72 63 69 73 65 20 69 - an exercise i
01DA20: 6E 20 72 65 63 75 72 73 69 6F 6E 2E 48 41 4E 4F n recursion.HANO
01DA30: 49 46 54 58 20 4C 4B 53 20 38 37 30 37 31 32 29 IFTX LKS 870712)
01DA40: 20 20 35 20 6C 6F 61 64 20 20 65 78 69 74 20 28 5 load exit (
01DA50: 20 6A 75 6D 70 73 20 6F 76 65 72 20 74 65 78 74 jumps over text
01DA60: 2C 20 73 6F 75 72 63 65 20 73 74 61 72 74 73 20 , source starts
01DA70: 6F 6E 20 73 63 72 65 65 6E 20 35 29 20 20 20 20 on screen 5)
01DA80: 54 68 65 20 54 6F 77 65 72 20 6F 66 20 48 61 6E The Tower of Han
01DA90: 6F 69 20 69 73 20 62 75 69 6C 74 20 6F 66 20 64 oi is built of d
01DAA0: 69 73 63 73 20 6F 66 20 64 65 63 72 65 61 73 69 iscs of decreasi
01DAB0: 6E 67 20 64 69 61 6D 65 74 65 72 20 20 20 20 20 ng diameter
01DAC0: 6F 6E 20 6F 6E 65 20 6F 66 20 74 68 72 65 65 20 on one of three
01DAD0: 70 65 67 73 2E 20 20 54 68 65 20 6F 62 6A 65 63 pegs. The objec
01DAE0: 74 20 6F 66 20 74 68 65 20 67 61 6D 65 20 69 73 t of the game is
01DAF0: 20 74 6F 20 74 72 61 6E 73 66 65 72 20 20 20 20 to transfer
01DB00: 74 68 65 20 74 6F 77 65 72 20 74 6F 20 61 6E 6F the tower to ano
01DB10: 74 68 65 72 20 70 65 67 20 64 69 73 63 20 62 79 ther peg disc by
01DB20: 20 64 69 73 63 2C 20 75 73 69 6E 67 20 61 6E 79 disc, using any
01DB30: 20 6F 6E 65 20 6F 66 20 74 68 65 20 20 20 20 20 one of the
01DB40: 70 65 67 73 20 66 6F 72 20 74 65 6D 70 6F 72 61 pegs for tempora
01DB50: 72 79 20 73 74 6F 72 61 67 65 2C 20 77 69 74 68 ry storage, with
01DB60: 6F 75 74 20 73 74 61 63 6B 69 6E 67 20 61 20 6C out stacking a l
01DB70: 61 72 67 65 72 20 64 69 73 63 20 6F 6E 20 61 20 arger disc on a
01DB80: 73 6D 61 6C 6C 65 72 20 6F 6E 65 2E 20 20 49 20 smaller one. I
01DB90: 73 75 67 67 65 73 74 20 74 68 61 74 20 79 6F 75 suggest that you
01DBA0: 20 6C 6F 61 64 20 74 68 65 20 67 61 6D 65 20 61 load the game a
01DBB0: 6E 64 20 6C 65 74 20 74 68 65 20 20 20 20 20 20 nd let the
01DBC0: 63 6F 6D 70 75 74 65 72 20 70 6C 61 79 20 69 74 computer play it
01DBD0: 20 61 20 66 65 77 20 74 69 6D 65 73 2C 20 74 68 a few times, th
01DBE0: 65 6E 20 63 6F 6D 65 20 62 61 63 6B 20 74 6F 20 en come back to
01DBF0: 74 68 69 73 20 74 65 78 74 20 69 66 20 79 6F 75 this text if you
01DC00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01DC10: 19 00 01 00 02 09 4E E5 19 00 C1 02 00 00 00 02 ......N.........
01DC20: 19 00 C6 02 00 00 00 02 19 00 C2 02 00 00 00 02 ................
01DC30: 19 00 C7 02 00 00 00 02 19 00 C3 02 00 00 00 02 ................
01DC40: 19 00 C8 02 00 00 00 02 19 00 C4 02 00 00 00 02 ................
01DC50: 19 00 C9 02 00 00 00 02 19 00 C5 02 00 00 00 02 ................
01DC60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DC70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DC80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DC90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DD00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DD10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DD20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DD30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DD40: 42 79 74 65 20 49 6E 66 6F 72 6D 61 74 69 6F 6E Byte Information
01DD50: 20 65 58 63 68 61 6E 67 65 20 28 42 49 58 29 20 eXchange (BIX)
01DD60: 69 6E 20 4D 61 79 20 38 37 20 68 61 64 20 61 6E in May 87 had an
01DD70: 20 69 6E 74 65 72 65 73 74 69 6E 67 20 20 20 20 interesting
01DD80: 69 74 65 6D 20 66 72 6F 6D 20 61 6E 20 61 75 74 item from an aut
01DD90: 68 6F 72 20 6F 66 20 61 20 70 72 6F 67 72 61 6D hor of a program
01DDA0: 6D 69 6E 67 20 70 61 63 6B 61 67 65 20 66 6F 72 ming package for
01DDB0: 20 74 68 65 20 4D 61 63 69 6E 74 6F 73 68 2C 20 the Macintosh,
01DDC0: 4C 65 65 20 52 69 63 68 61 72 64 73 6F 6E 3A 20 Lee Richardson:
01DDD0: 22 49 66 20 73 6F 6D 65 62 6F 64 79 20 68 65 6C "If somebody hel
01DDE0: 64 20 79 6F 75 72 20 66 65 65 74 20 74 6F 20 61 d your feet to a
01DDF0: 20 66 69 72 65 2C 20 63 6F 75 6C 64 20 79 6F 75 fire, could you
01DE00: 63 6F 64 65 20 61 20 72 65 63 75 72 73 69 76 65 code a recursive
01DE10: 20 61 6C 67 6F 72 69 74 68 6D 20 69 6E 20 46 4F algorithm in FO
01DE20: 52 54 52 41 4E 3F 20 20 53 75 72 65 20 79 6F 75 RTRAN? Sure you
01DE30: 20 63 6F 75 6C 64 2E 20 49 74 20 77 6F 75 6C 64 could. It would
01DE40: 62 65 20 6D 65 73 73 79 2C 20 6D 61 69 6E 74 61 be messy, mainta
01DE50: 69 6E 69 6E 67 20 79 6F 75 72 20 73 74 61 63 6B ining your stack
01DE60: 73 2C 20 2E 2E 2E 22 2E 20 20 4E 6F 62 6F 64 79 s, ...". Nobody
01DE70: 20 68 65 6C 64 20 6D 79 20 66 65 65 74 20 69 6E held my feet in
01DE80: 74 68 65 20 66 69 72 65 2C 20 62 75 74 20 49 20 the fire, but I
01DE90: 68 61 64 20 64 6F 6E 65 20 69 74 20 69 6E 20 42 had done it in B
01DEA0: 41 53 49 43 20 28 6A 75 73 74 20 61 73 20 6D 65 ASIC (just as me
01DEB0: 73 73 79 20 61 73 20 46 4F 52 54 52 41 4E 29 2C ssy as FORTRAN),
01DEC0: 61 6E 64 20 6E 6F 77 20 69 6E 20 46 4F 52 54 48 and now in FORTH
01DED0: 2E 20 20 46 4F 52 54 48 20 77 61 73 20 6E 6F 74 . FORTH was not
01DEE0: 20 62 75 69 6C 74 20 66 6F 72 20 72 65 63 75 72 built for recur
01DEF0: 73 69 6F 6E 2C 20 62 75 74 20 69 74 20 63 61 6E sion, but it can
01DF00: 20 20 20 64 6F 65 73 3E 20 64 75 70 20 40 20 72 does> dup @ r
01DF10: 6F 74 20 2A 20 2B 20 2B 20 32 2B 20 20 20 20 20 ot * + + 2+
01DF20: 28 20 72 75 6E 2D 74 69 6D 65 3A 20 72 6F 77 20 ( run-time: row
01DF30: 63 6F 6C 20 2D 2D 20 61 64 64 72 20 29 20 20 20 col -- addr )
01DF40: 20 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01DF50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DF60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DF70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DF80: 20 31 33 20 33 20 20 32 61 72 72 61 79 20 70 65 13 3 2array pe
01DF90: 67 20 20 28 20 31 33 20 64 69 73 63 73 20 6F 6E g ( 13 discs on
01DFA0: 20 70 65 67 73 20 30 20 74 6F 20 32 29 20 20 20 pegs 0 to 2)
01DFB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01DFC0: 3A 20 70 79 72 61 6D 69 64 20 28 20 66 6C 20 2D : pyramid ( fl -
01DFD0: 2D 20 29 20 28 20 64 65 66 69 6E 69 6E 67 20 77 - ) ( defining w
01DFE0: 6F 72 64 20 66 6F 72 20 31 33 20 64 69 73 63 73 ord for 13 discs
01DFF0: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
01E000: 20 20 20 73 72 63 65 20 21 20 28 20 66 6C 61 67 srce ! ( flag
01E010: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
01E020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E040: 20 20 20 63 72 65 61 74 65 20 20 6C 61 74 65 73 create lates
01E050: 74 20 70 66 61 20 64 65 73 74 20 21 20 20 28 20 t pfa dest ! (
01E060: 6E 61 6D 65 2C 20 50 46 41 20 6F 66 20 64 65 66 name, PFA of def
01E070: 69 6E 65 64 20 77 6F 72 64 29 20 20 20 20 20 20 ined word)
01E080: 20 20 20 31 33 20 20 33 20 2B 20 20 20 31 33 20 13 3 + 13
01E090: 31 2B 20 20 2A 20 20 64 75 70 20 20 61 6C 6C 6F 1+ * dup allo
01E0A0: 74 20 20 28 20 72 65 73 65 72 76 65 20 7B 6E 2B t ( reserve {n+
01E0B0: 33 7D 2A 7B 6E 2B 31 7D 20 62 79 74 65 73 29 20 3}*{n+1} bytes)
01E0C0: 20 20 20 64 65 73 74 20 40 20 73 77 61 70 20 62 dest @ swap b
01E0D0: 6C 20 66 69 6C 6C 20 20 20 20 20 28 20 66 69 6C l fill ( fil
01E0E0: 6C 20 77 69 74 68 20 62 6C 61 6E 6B 73 29 20 20 l with blanks)
01E0F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E100: 62 65 20 74 61 75 67 68 74 20 74 6F 20 61 6C 6C be taught to all
01E110: 6F 77 20 69 74 2E 20 20 49 74 20 68 61 73 20 6E ow it. It has n
01E120: 6F 20 70 72 6F 76 69 73 69 6F 6E 20 66 6F 72 20 o provision for
01E130: 6C 6F 63 61 6C 20 76 61 72 69 61 62 6C 65 73 2C local variables,
01E140: 62 75 74 20 74 68 65 20 48 41 4E 4F 49 20 61 6C but the HANOI al
01E150: 67 6F 72 69 74 68 6D 20 68 61 73 20 6F 6E 6C 79 gorithm has only
01E160: 20 6F 6E 65 20 72 65 63 75 72 73 69 76 65 20 72 one recursive r
01E170: 6F 75 74 69 6E 65 20 61 6E 64 20 69 74 20 69 73 outine and it is
01E180: 6E 6F 74 20 64 69 66 66 69 63 75 6C 74 20 74 6F not difficult to
01E190: 20 6B 65 65 70 20 74 68 65 20 6C 6F 63 61 6C 73 keep the locals
01E1A0: 20 6F 6E 20 74 68 65 20 70 61 72 61 6D 65 74 65 on the paramete
01E1B0: 72 20 73 74 61 63 6B 20 61 6E 64 20 20 20 20 20 r stack and
01E1C0: 63 6C 65 61 72 20 74 68 65 6D 20 6F 66 66 20 61 clear them off a
01E1D0: 73 20 65 61 63 68 20 72 65 63 75 72 73 69 6F 6E s each recursion
01E1E0: 20 74 65 72 6D 69 6E 61 74 65 73 2C 20 6D 61 6B terminates, mak
01E1F0: 69 6E 67 20 74 68 65 20 63 6F 64 69 6E 67 20 20 ing the coding
01E200: 6F 66 20 74 68 65 20 72 65 63 75 72 73 69 76 65 of the recursive
01E210: 20 4D 4F 56 45 53 20 71 75 69 74 65 20 73 74 72 MOVES quite str
01E220: 61 69 67 68 74 66 6F 72 77 61 72 64 2E 20 20 20 aightforward.
01E230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E280: 54 68 65 20 63 6F 6D 70 6C 69 63 61 74 65 64 20 The complicated
01E290: 70 61 72 74 20 69 73 20 74 68 65 20 64 69 73 70 part is the disp
01E2A0: 6C 61 79 20 6F 66 20 74 68 65 20 6D 6F 76 69 6E lay of the movin
01E2B0: 67 20 64 69 73 63 73 2E 20 20 46 4F 52 54 48 20 g discs. FORTH
01E2C0: 68 61 73 20 6E 6F 20 69 6E 62 75 69 6C 74 20 70 has no inbuilt p
01E2D0: 72 6F 76 69 73 69 6F 6E 20 66 6F 72 20 61 72 72 rovision for arr
01E2E0: 61 79 73 2C 20 62 75 74 20 74 68 65 79 20 63 61 ays, but they ca
01E2F0: 6E 20 62 65 20 69 6D 70 6C 65 6D 65 6E 74 65 64 n be implemented
01E300: 20 20 20 31 33 20 20 30 20 20 64 6F 20 20 20 20 13 0 do
01E310: 20 20 20 20 20 20 20 20 20 20 20 28 20 69 6E 69 ( ini
01E320: 74 69 61 6C 69 73 65 29 20 20 20 20 20 20 20 20 tialise)
01E330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E340: 20 20 20 20 20 69 20 64 75 70 20 32 2B 20 2A 20 i dup 2+ *
01E350: 64 65 73 74 20 40 20 2B 20 20 20 28 20 2D 2D 20 dest @ + ( --
01E360: 61 64 64 72 29 20 20 20 20 20 20 20 20 20 20 20 addr)
01E370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E380: 20 20 20 20 20 69 20 32 2A 20 33 20 2B 20 20 20 i 2* 3 +
01E390: 20 20 20 20 20 20 20 20 20 20 20 28 20 2D 2D 20 ( --
01E3A0: 61 64 64 72 20 6C 67 74 68 29 20 28 20 6C 67 74 addr lgth) ( lgt
01E3B0: 68 3D 6E 2A 32 2B 33 29 20 20 20 20 20 20 20 20 h=n*2+3)
01E3C0: 20 20 20 20 20 73 72 63 65 20 40 20 69 66 20 20 srce @ if
01E3D0: 20 20 20 20 20 20 20 20 20 20 20 28 20 66 69 6C ( fil
01E3E0: 6C 20 77 69 74 68 20 6C 65 74 74 65 72 73 20 69 l with letters i
01E3F0: 66 20 74 72 75 65 20 66 6C 61 67 29 20 20 20 20 f true flag)
01E400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 64 dd
01E410: 75 70 20 20 20 20 20 20 20 20 20 20 20 28 20 2D up ( -
01E420: 2D 20 61 64 64 72 20 6C 67 74 68 20 61 64 64 72 - addr lgth addr
01E430: 20 6C 67 74 68 29 20 20 20 20 20 20 20 20 20 20 lgth)
01E440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 20 i
01E450: 36 35 20 2B 20 20 20 20 20 20 20 20 20 28 20 2D 65 + ( -
01E460: 2D 20 61 64 64 72 20 6C 67 74 68 20 61 64 64 72 - addr lgth addr
01E470: 20 6C 67 74 68 20 63 68 61 72 29 20 20 20 20 20 lgth char)
01E480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 fi
01E490: 6C 6C 20 20 20 20 20 20 20 20 20 20 20 28 20 2D ll ( -
01E4A0: 2D 20 61 64 64 72 20 6C 67 74 68 29 20 20 20 20 - addr lgth)
01E4B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E4C0: 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 6E then
01E4D0: 20 20 20 20 20 20 20 20 20 20 20 2D 2D 3E 20 20 -->
01E4E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E4F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
01E500: 62 79 20 74 68 65 20 75 73 65 20 6F 66 20 74 68 by the use of th
01E510: 65 20 64 65 66 69 6E 69 6E 67 20 77 6F 72 64 73 e defining words
01E520: 20 43 52 45 41 54 45 2E 2E 2E 44 4F 45 53 3E 20 CREATE...DOES>
01E530: 3A 20 74 68 65 20 43 52 45 41 54 45 20 20 20 20 : the CREATE
01E540: 70 61 72 74 20 65 6E 74 65 72 73 20 74 68 65 20 part enters the
01E550: 6E 61 6D 65 20 61 6E 64 20 72 65 73 65 72 76 65 name and reserve
01E560: 73 20 6D 65 6D 6F 72 79 20 66 6F 72 20 74 68 65 s memory for the
01E570: 20 73 74 72 75 63 74 75 72 65 2C 20 74 68 65 20 structure, the
01E580: 44 4F 45 53 3E 20 70 61 72 74 20 74 65 6C 6C 73 DOES> part tells
01E590: 20 74 68 65 20 73 74 72 75 63 74 75 72 65 20 77 the structure w
01E5A0: 68 61 74 20 74 6F 20 64 6F 20 77 68 65 6E 20 69 hat to do when i
01E5B0: 74 20 69 73 20 63 61 6C 6C 65 64 20 28 69 6E 20 t is called (in
01E5C0: 6F 75 72 20 63 61 73 65 20 69 74 20 6C 65 61 76 our case it leav
01E5D0: 65 73 20 61 6E 20 61 64 64 72 65 73 73 20 6F 6E es an address on
01E5E0: 20 74 68 65 20 73 74 61 63 6B 29 2E 20 20 45 78 the stack). Ex
01E5F0: 61 6D 69 6E 69 6E 67 20 74 68 65 20 20 20 20 20 amining the
01E600: 64 65 66 69 6E 69 6E 67 20 61 6E 64 20 64 65 66 defining and def
01E610: 69 6E 65 64 20 77 6F 72 64 73 20 77 69 74 68 20 ined words with
01E620: 74 68 65 20 44 45 43 4F 4D 50 49 4C 45 52 20 73 the DECOMPILER s
01E630: 68 6F 75 6C 64 20 68 65 6C 70 20 74 6F 20 20 20 hould help to
01E640: 63 6C 61 72 69 66 79 20 74 68 69 73 20 64 69 66 clarify this dif
01E650: 66 69 63 75 6C 74 20 63 6F 6E 63 65 70 74 2E 20 ficult concept.
01E660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E680: 48 6F 77 65 76 65 72 2C 20 69 74 20 6E 6F 74 20 However, it not
01E690: 6E 65 63 65 73 73 61 72 79 20 74 6F 20 75 6E 64 necessary to und
01E6A0: 65 72 73 74 61 6E 64 20 61 6C 6C 20 74 68 65 20 erstand all the
01E6B0: 74 65 63 68 6E 69 63 61 6C 69 74 69 65 73 20 20 technicalities
01E6C0: 74 6F 20 65 6E 6A 6F 79 20 74 68 65 20 67 61 6D to enjoy the gam
01E6D0: 65 2C 20 77 68 69 63 68 20 72 65 71 75 69 72 65 e, which require
01E6E0: 73 20 61 20 66 61 69 72 20 62 69 74 20 6F 66 20 s a fair bit of
01E6F0: 63 6F 6E 63 65 6E 74 72 61 74 69 6F 6E 2E 20 20 concentration.
01E700: 20 20 20 20 20 32 2F 20 2B 20 39 20 73 77 61 70 2/ + 9 swap
01E710: 20 63 21 20 20 20 20 20 20 20 20 28 20 2D 2D 20 c! ( --
01E720: 29 20 28 20 54 41 42 20 74 6F 6B 65 6E 20 69 6E ) ( TAB token in
01E730: 20 6D 69 64 64 6C 65 29 20 20 20 20 20 20 20 20 middle)
01E740: 20 20 20 6C 6F 6F 70 20 20 20 20 20 20 20 20 20 loop
01E750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E780: 20 20 20 64 6F 65 73 3E 20 20 20 28 20 6E 20 2D does> ( n -
01E790: 2D 20 61 64 64 72 20 6C 67 74 68 29 20 28 20 6F - addr lgth) ( o
01E7A0: 66 20 6E 74 68 20 64 69 73 63 29 20 20 20 20 20 f nth disc)
01E7B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E7C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 20 (
01E7D0: 2D 2D 20 6E 20 61 64 64 72 30 29 20 20 28 20 4E -- n addr0) ( N
01E7E0: 41 4D 45 20 6C 65 61 76 65 73 20 61 64 64 72 20 AME leaves addr
01E7F0: 6F 66 20 30 74 68 20 65 6C 65 6D 65 6E 74 29 20 of 0th element)
01E800: 20 20 20 20 6F 76 65 72 20 64 75 70 20 20 28 20 over dup (
01E810: 2D 2D 20 6E 20 61 64 64 72 30 20 6E 20 6E 20 29 -- n addr0 n n )
01E820: 20 20 28 20 6F 66 66 73 65 74 20 3D 20 7B 6E 2B ( offset = {n+
01E830: 32 7D 2A 6E 29 20 20 20 20 20 20 20 20 20 20 20 2}*n)
01E840: 20 20 20 20 32 2B 20 2A 20 20 2B 20 20 20 28 20 2+ * + (
01E850: 2D 2D 20 6E 20 61 64 64 72 6E 20 29 20 20 28 20 -- n addrn ) (
01E860: 61 64 64 72 6E 20 3D 20 61 64 64 72 30 20 2B 20 addrn = addr0 +
01E870: 6F 66 66 73 65 74 29 20 20 20 20 20 20 20 20 20 offset)
01E880: 20 20 20 20 73 77 61 70 20 20 20 20 20 20 28 20 swap (
01E890: 2D 2D 20 61 64 64 72 6E 20 6E 29 20 20 20 20 20 -- addrn n)
01E8A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E8B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E8C0: 20 20 20 20 32 2A 20 33 20 2B 20 20 20 20 28 20 2* 3 + (
01E8D0: 2D 2D 20 61 64 64 72 6E 20 6C 67 74 68 6E 29 20 -- addrn lgthn)
01E8E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E8F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E900: 28 20 48 41 4E 4F 49 46 54 48 20 20 38 37 30 37 ( HANOIFTH 8707
01E910: 31 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 12)
01E920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E940: 76 61 72 69 61 62 6C 65 20 64 69 73 63 73 20 20 variable discs
01E950: 20 76 61 72 69 61 62 6C 65 20 73 72 63 65 20 20 variable srce
01E960: 20 20 76 61 72 69 61 62 6C 65 20 64 65 73 74 20 variable dest
01E970: 20 20 76 61 72 69 61 62 6C 65 20 61 75 78 20 20 variable aux
01E980: 76 61 72 69 61 62 6C 65 20 62 6C 69 6E 65 20 20 variable bline
01E990: 20 31 38 20 62 6C 69 6E 65 20 21 20 20 20 20 20 18 bline !
01E9A0: 20 20 76 61 72 69 61 62 6C 65 20 6D 6F 76 20 20 variable mov
01E9B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01E9C0: 76 61 72 69 61 62 6C 65 20 68 30 20 20 20 20 20 variable h0
01E9D0: 20 76 61 72 69 61 62 6C 65 20 68 31 20 20 20 20 variable h1
01E9E0: 20 20 76 61 72 69 61 62 6C 65 20 68 32 20 20 28 variable h2 (
01E9F0: 20 74 65 6D 70 73 29 20 20 20 20 20 20 20 20 20 temps)
01EA00: 3A 20 6C 6F 63 61 74 65 20 20 20 28 20 72 6F 77 : locate ( row
01EA10: 20 63 6F 6C 20 2D 2D 20 29 20 20 20 20 20 33 31 col -- ) 31
01EA20: 20 65 6D 69 74 20 20 65 6D 69 74 20 65 6D 69 74 emit emit emit
01EA30: 20 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01EA40: 3A 20 31 61 72 72 61 79 20 20 20 28 20 65 6C 65 : 1array ( ele
01EA50: 6D 65 6E 74 73 20 2D 2D 20 29 20 20 20 20 20 20 ments -- )
01EA60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EA70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EA80: 20 20 28 20 61 20 64 65 66 69 6E 69 6E 67 20 77 ( a defining w
01EA90: 6F 72 64 20 66 6F 72 20 31 2D 64 69 6D 65 6E 73 ord for 1-dimens
01EAA0: 69 6F 6E 61 6C 20 62 79 74 65 20 61 72 72 61 79 ional byte array
01EAB0: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
01EAC0: 20 20 20 63 72 65 61 74 65 20 20 61 6C 6C 6F 74 create allot
01EAD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EAE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EAF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EB00: 20 20 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 ;
01EB10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EB20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EB30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EB40: 20 31 20 70 79 72 61 6D 69 64 20 64 72 61 77 64 1 pyramid drawd
01EB50: 69 73 63 20 20 20 20 20 30 20 70 79 72 61 6D 69 isc 0 pyrami
01EB60: 64 20 62 6C 6E 6B 64 69 73 63 20 20 20 20 20 20 d blnkdisc
01EB70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EB80: 3A 20 6D 6F 76 65 64 69 73 63 20 20 28 20 64 65 : movedisc ( de
01EB90: 73 74 20 73 72 63 65 20 2D 2D 20 64 65 73 74 20 st srce -- dest
01EBA0: 73 72 63 65 29 20 20 20 20 20 20 20 20 20 20 20 srce)
01EBB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EBC0: 20 20 20 64 64 75 70 20 20 64 64 75 70 20 20 20 ddup ddup
01EBD0: 20 20 20 20 68 31 20 21 20 68 32 20 21 20 20 20 h1 ! h2 !
01EBE0: 28 20 74 65 6D 70 6F 72 61 72 79 20 73 74 6F 72 ( temporary stor
01EBF0: 65 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 e)
01EC00: 20 20 20 31 20 6D 6F 76 20 2B 21 20 20 62 6C 69 1 mov +! bli
01EC10: 6E 65 20 40 20 31 2B 20 31 20 6C 6F 63 61 74 65 ne @ 1+ 1 locate
01EC20: 20 2E 22 20 4D 6F 76 65 20 22 20 6D 6F 76 20 40 ." Move " mov @
01EC30: 20 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
01EC40: 20 20 20 20 2E 22 20 3A 20 66 72 6F 6D 20 22 20 ." : from "
01EC50: 31 2B 20 2E 20 20 2E 22 20 74 6F 20 22 20 31 2B 1+ . ." to " 1+
01EC60: 20 2E 20 28 20 2E 73 20 20 32 30 20 65 6D 69 74 . ( .s 20 emit
01EC70: 20 6B 65 79 20 64 72 6F 70 20 29 20 20 20 20 20 key drop )
01EC80: 20 20 20 68 31 20 20 20 40 20 6F 6E 70 65 67 20 h1 @ onpeg
01EC90: 64 75 70 20 63 40 20 31 2D 20 64 75 70 20 20 20 dup c@ 1- dup
01ECA0: 20 28 20 2D 2D 20 61 64 64 72 20 62 31 2D 31 20 ( -- addr b1-1
01ECB0: 62 31 2D 31 29 20 20 20 20 20 20 20 20 20 20 20 b1-1)
01ECC0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01ECD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01ECE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01ECF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
01ED00: 20 20 20 64 6F 65 73 3E 20 2B 20 3B 20 20 20 20 does> + ;
01ED10: 28 20 72 75 6E 2D 74 69 6D 65 3A 20 65 6C 65 6D ( run-time: elem
01ED20: 65 6E 74 20 2D 2D 20 61 64 64 72 20 29 20 20 20 ent -- addr )
01ED30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01ED40: 20 33 20 31 61 72 72 61 79 20 6F 6E 70 65 67 20 3 1array onpeg
01ED50: 20 28 20 6E 75 6D 62 65 72 20 6F 66 20 64 69 73 ( number of dis
01ED60: 63 73 20 6F 6E 20 70 65 67 20 30 20 74 6F 20 32 cs on peg 0 to 2
01ED70: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
01ED80: 20 33 20 31 61 72 72 61 79 20 78 70 65 67 20 20 3 1array xpeg
01ED90: 20 28 20 78 2D 63 6F 6F 72 64 69 6E 61 74 65 20 ( x-coordinate
01EDA0: 6F 66 20 70 65 67 73 20 30 20 74 6F 20 32 29 20 of pegs 0 to 2)
01EDB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EDC0: 20 31 34 20 30 20 78 70 65 67 20 63 21 20 20 34 14 0 xpeg c! 4
01EDD0: 31 20 31 20 78 70 65 67 20 63 21 20 20 36 37 20 1 1 xpeg c! 67
01EDE0: 32 20 78 70 65 67 20 63 21 20 20 20 20 20 20 20 2 xpeg c!
01EDF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EE00: 3A 20 32 61 72 72 61 79 20 20 20 28 20 72 6F 77 : 2array ( row
01EE10: 73 20 63 6F 6C 73 20 2D 2D 20 29 20 20 20 20 20 s cols -- )
01EE20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EE30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EE40: 20 20 28 20 61 20 64 65 66 69 6E 69 6E 67 20 77 ( a defining w
01EE50: 6F 72 64 20 66 6F 72 20 32 2D 64 69 6D 65 6E 73 ord for 2-dimens
01EE60: 69 6F 6E 61 6C 20 62 79 74 65 20 61 72 72 61 79 ional byte array
01EE70: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
01EE80: 20 20 20 63 72 65 61 74 65 20 6F 76 65 72 20 2C create over ,
01EE90: 20 2A 20 61 6C 6C 6F 74 20 20 28 20 6E 61 6D 65 * allot ( name
01EEA0: 2C 20 72 6F 77 73 2C 20 73 69 7A 65 29 20 20 20 , rows, size)
01EEB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EEC0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01EED0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EEE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01EEF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
01EF00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01EF10: 1A 00 01 00 02 09 4E E5 1A 00 C1 02 00 00 00 02 ......N.........
01EF20: 1A 00 C6 02 00 00 00 02 1A 00 C2 02 00 00 00 02 ................
01EF30: 1A 00 C7 02 00 00 00 02 1A 00 C3 02 00 00 00 02 ................
01EF40: 1A 00 C8 02 00 00 00 02 1A 00 C4 02 00 00 00 02 ................
01EF50: 1A 00 C9 02 00 00 00 02 1A 00 C5 02 00 00 00 02 ................
01EF60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EF70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EF80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EF90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01F000: 20 20 20 72 6F 74 20 20 20 28 20 2D 2D 20 62 31 rot ( -- b1
01F010: 2D 31 20 62 31 2D 31 20 61 64 64 72 29 20 20 20 -1 b1-1 addr)
01F020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F040: 20 20 20 63 21 20 20 20 20 28 20 2D 2D 20 62 31 c! ( -- b1
01F050: 2D 31 29 20 28 20 64 65 63 72 65 6D 65 6E 74 20 -1) ( decrement
01F060: 6E 6F 20 6F 66 20 64 69 73 63 73 20 6F 6E 20 73 no of discs on s
01F070: 6F 75 72 63 65 20 70 65 67 29 20 20 20 20 20 20 ource peg)
01F080: 20 20 20 64 75 70 20 20 20 28 20 2D 2D 20 62 31 dup ( -- b1
01F090: 2D 31 20 62 2D 31 29 20 20 20 20 20 20 20 20 20 -1 b-1)
01F0A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F0B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F0C0: 20 20 20 68 31 20 20 20 40 20 70 65 67 20 63 40 h1 @ peg c@
01F0D0: 20 68 30 20 21 20 28 20 2D 2D 20 62 2D 31 29 20 h0 ! ( -- b-1)
01F0E0: 28 20 74 6F 70 20 64 69 73 63 29 20 20 20 20 20 ( top disc)
01F0F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F100: 20 20 20 62 6C 69 6E 65 20 40 20 73 77 61 70 20 bline @ swap
01F110: 20 2D 20 31 2D 20 28 20 72 6F 77 29 20 20 20 20 - 1- ( row)
01F120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F140: 20 20 20 68 30 20 20 20 40 20 62 6C 6E 6B 64 69 h0 @ blnkdi
01F150: 73 63 20 73 77 61 70 20 64 72 6F 70 20 32 2F 20 sc swap drop 2/
01F160: 68 31 20 20 20 40 20 78 70 65 67 20 63 40 20 73 h1 @ xpeg c@ s
01F170: 77 61 70 20 2D 20 28 20 63 6F 6C 29 20 20 20 20 wap - ( col)
01F180: 20 20 20 6C 6F 63 61 74 65 20 20 68 30 20 20 20 locate h0
01F190: 40 20 62 6C 6E 6B 64 69 73 63 20 74 79 70 65 20 @ blnkdisc type
01F1A0: 20 28 20 65 72 61 73 65 20 64 69 73 63 20 6F 6E ( erase disc on
01F1B0: 20 73 6F 75 72 63 65 20 70 65 67 29 20 20 20 20 source peg)
01F1C0: 20 20 20 68 32 20 20 20 40 20 6F 6E 70 65 67 20 h2 @ onpeg
01F1D0: 64 75 70 20 63 40 20 64 75 70 20 31 2B 20 20 28 dup c@ dup 1+ (
01F1E0: 20 2D 2D 20 61 64 64 72 20 62 32 20 62 32 2B 31 -- addr b2 b2+1
01F1F0: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
01F200: 20 20 20 20 68 31 20 40 20 6F 6E 70 65 67 20 63 h1 @ onpeg c
01F210: 40 20 31 20 3C 20 6F 72 20 20 28 20 61 20 64 69 @ 1 < or ( a di
01F220: 73 63 20 6F 6E 20 73 6F 75 72 63 65 20 70 65 67 sc on source peg
01F230: 3F 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ?)
01F240: 20 20 20 20 68 32 20 40 20 6F 6E 70 65 67 20 63 h2 @ onpeg c
01F250: 40 20 30 20 3E 20 69 66 20 20 28 20 61 20 64 69 @ 0 > if ( a di
01F260: 73 63 20 6F 6E 20 64 65 73 74 20 70 65 67 3F 29 sc on dest peg?)
01F270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F280: 20 20 20 20 20 68 31 20 40 20 64 75 70 20 6F 6E h1 @ dup on
01F290: 70 65 67 20 63 40 20 31 2D 20 73 77 61 70 20 70 peg c@ 1- swap p
01F2A0: 65 67 20 63 40 20 20 20 20 28 20 64 69 73 63 20 eg c@ ( disc
01F2B0: 6F 6E 20 73 6F 75 72 63 65 20 70 65 67 29 20 20 on source peg)
01F2C0: 20 20 20 20 20 68 32 20 40 20 64 75 70 20 6F 6E h2 @ dup on
01F2D0: 70 65 67 20 63 40 20 31 2D 20 73 77 61 70 20 70 peg c@ 1- swap p
01F2E0: 65 67 20 63 40 20 20 20 20 28 20 64 69 73 63 20 eg c@ ( disc
01F2F0: 6F 6E 20 64 65 73 74 20 70 65 67 29 20 20 20 20 on dest peg)
01F300: 20 20 20 20 20 3E 20 6F 72 20 20 74 68 65 6E 20 > or then
01F310: 28 20 69 73 20 73 72 63 65 20 64 69 73 63 20 6C ( is srce disc l
01F320: 61 72 67 65 72 20 74 68 61 6E 20 64 65 73 74 20 arger than dest
01F330: 64 69 73 63 20 3F 29 20 20 20 20 20 20 20 20 20 disc ?)
01F340: 20 28 20 4F 52 69 6E 67 20 61 6C 6C 20 66 6C 61 ( ORing all fla
01F350: 67 73 20 70 72 6F 64 75 63 65 73 20 61 20 73 69 gs produces a si
01F360: 6E 67 6C 65 20 66 6C 61 67 20 77 68 69 63 68 20 ngle flag which
01F370: 77 69 6C 6C 20 62 65 20 20 20 20 20 20 20 20 20 will be
01F380: 20 20 20 54 52 55 45 20 69 66 20 61 6E 79 20 6F TRUE if any o
01F390: 6E 65 20 6F 66 20 74 68 65 20 69 6C 6C 65 67 61 ne of the illega
01F3A0: 6C 20 63 6F 6E 64 69 74 69 6F 6E 20 69 73 20 74 l condition is t
01F3B0: 72 75 65 29 20 20 20 20 20 20 20 20 20 20 20 20 rue)
01F3C0: 20 20 20 20 69 66 20 63 72 20 2E 22 20 49 6C 6C if cr ." Ill
01F3D0: 65 67 61 6C 20 6D 6F 76 65 20 21 20 50 65 6E 61 egal move ! Pena
01F3E0: 6C 74 79 22 20 20 31 20 6D 6F 76 20 2B 21 20 20 lty" 1 mov +!
01F3F0: 20 20 20 20 20 2D 2D 3E 20 20 20 20 20 20 20 00 --> .
01F400: 20 20 20 72 6F 74 20 20 20 28 20 2D 2D 20 62 32 rot ( -- b2
01F410: 20 62 32 2B 31 20 61 64 64 72 29 20 20 20 20 20 b2+1 addr)
01F420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F440: 20 20 20 63 21 20 20 20 20 28 20 2D 2D 20 62 32 c! ( -- b2
01F450: 29 20 28 20 69 6E 63 72 65 6D 65 6E 74 20 6E 6F ) ( increment no
01F460: 20 6F 66 20 64 69 73 63 73 20 6F 6E 20 64 65 73 of discs on des
01F470: 74 20 70 65 67 29 20 20 20 20 20 20 20 20 20 20 t peg)
01F480: 20 20 20 64 75 70 20 20 20 28 20 2D 2D 20 62 32 dup ( -- b2
01F490: 20 62 32 29 20 20 20 20 20 20 20 20 20 20 20 20 b2)
01F4A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F4B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F4C0: 20 20 20 68 30 20 20 20 40 20 20 73 77 61 70 20 h0 @ swap
01F4D0: 68 32 20 20 20 40 20 20 20 70 65 67 20 63 21 20 h2 @ peg c!
01F4E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F4F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F500: 20 20 20 62 6C 69 6E 65 20 40 20 73 77 61 70 20 bline @ swap
01F510: 20 2D 20 31 2D 20 28 20 72 6F 77 29 20 20 20 20 - 1- ( row)
01F520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F540: 20 20 20 68 30 20 20 20 40 20 64 72 61 77 64 69 h0 @ drawdi
01F550: 73 63 20 73 77 61 70 20 64 72 6F 70 20 32 2F 20 sc swap drop 2/
01F560: 68 32 20 20 20 40 20 78 70 65 67 20 63 40 20 73 h2 @ xpeg c@ s
01F570: 77 61 70 20 2D 20 28 20 63 6F 6C 29 20 20 20 20 wap - ( col)
01F580: 20 20 20 6C 6F 63 61 74 65 20 20 68 30 20 20 20 locate h0
01F590: 40 20 64 72 61 77 64 69 73 63 20 74 79 70 65 20 @ drawdisc type
01F5A0: 20 28 20 64 72 61 77 20 20 64 69 73 63 20 6F 6E ( draw disc on
01F5B0: 20 64 65 73 74 20 70 65 67 29 20 20 20 20 20 20 dest peg)
01F5C0: 20 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 2D ; -
01F5D0: 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ->
01F5E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F5F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
01F600: 20 20 20 20 20 20 20 20 36 34 20 30 20 64 6F 20 64 0 do
01F610: 20 37 20 65 6D 69 74 20 20 6C 6F 6F 70 20 20 28 7 emit loop (
01F620: 20 64 65 6C 61 79 20 61 6E 64 20 62 75 7A 7A 29 delay and buzz)
01F630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F640: 20 20 20 20 65 6C 73 65 20 20 6D 6F 76 65 64 69 else movedi
01F650: 73 63 20 20 74 68 65 6E 20 20 20 20 20 20 20 20 sc then
01F660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F680: 20 20 64 65 73 74 20 40 20 6F 6E 70 65 67 20 63 dest @ onpeg c
01F690: 40 20 64 69 73 63 73 20 40 20 3D 20 75 6E 74 69 @ discs @ = unti
01F6A0: 6C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l
01F6B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F6C0: 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
01F6D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F6E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F6F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F700: 3A 20 68 61 6E 6F 69 20 20 28 20 2D 2D 20 29 20 : hanoi ( -- )
01F710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 70 sp
01F720: 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 !
01F730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F740: 20 20 20 63 72 20 2E 22 20 4E 75 6D 62 65 72 20 cr ." Number
01F750: 6F 66 20 64 69 73 6B 73 20 28 32 20 74 6F 20 31 of disks (2 to 1
01F760: 33 29 20 3F 20 22 20 71 75 65 72 79 20 62 6C 20 3) ? " query bl
01F770: 77 6F 72 64 20 6E 75 6D 62 65 72 20 20 20 20 20 word number
01F780: 20 20 20 64 72 6F 70 20 63 72 20 2E 22 20 41 75 drop cr ." Au
01F790: 74 6F 6D 61 74 69 63 20 6F 72 20 4D 61 6E 75 61 tomatic or Manua
01F7A0: 6C 20 28 61 2F 6D 29 20 3F 20 22 20 6B 65 79 20 l (a/m) ? " key
01F7B0: 20 68 30 20 21 20 20 20 20 20 20 20 20 20 20 20 h0 !
01F7C0: 20 20 20 31 32 20 65 6D 69 74 20 32 20 6D 61 78 12 emit 2 max
01F7D0: 20 31 33 20 6D 69 6E 20 20 64 75 70 20 20 20 20 13 min dup
01F7E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F7F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F800: 3A 20 6D 6F 76 65 73 20 28 20 6E 20 61 75 78 20 : moves ( n aux
01F810: 64 65 73 74 20 73 6F 75 72 63 65 20 2D 2D 20 6E dest source -- n
01F820: 2D 31 20 61 75 78 27 20 64 65 73 74 27 20 73 6F -1 aux' dest' so
01F830: 75 72 63 65 27 29 20 20 20 20 20 20 20 20 20 20 urce')
01F840: 20 20 20 28 20 62 75 69 6C 64 73 20 61 20 6E 65 ( builds a ne
01F850: 77 20 73 74 61 63 6B 20 66 72 61 6D 65 20 77 68 w stack frame wh
01F860: 65 6E 20 63 61 6C 6C 65 64 2C 20 65 72 61 73 65 en called, erase
01F870: 73 20 69 74 20 6F 6E 20 65 78 69 74 29 20 20 20 s it on exit)
01F880: 20 20 20 5B 20 73 6D 75 64 67 65 20 5D 20 20 28 [ smudge ] (
01F890: 20 6D 61 6B 65 20 4D 4F 56 45 53 20 76 69 73 69 make MOVES visi
01F8A0: 62 6C 65 20 66 6F 72 20 72 65 63 75 72 73 69 6F ble for recursio
01F8B0: 6E 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n)
01F8C0: 20 20 20 34 20 70 69 63 6B 20 32 20 3C 20 28 20 4 pick 2 < (
01F8D0: 6E 20 50 49 43 4B 20 63 6F 70 69 65 73 20 6E 74 n PICK copies nt
01F8E0: 68 20 73 74 61 63 6B 20 69 74 65 6D 20 74 6F 20 h stack item to
01F8F0: 74 6F 70 29 20 20 20 20 20 20 20 20 20 20 20 20 top)
01F900: 20 20 20 69 66 20 20 6D 6F 76 65 64 69 73 63 20 if movedisc
01F910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F940: 20 20 20 65 6C 73 65 20 20 20 20 20 20 20 20 20 else
01F950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01F980: 20 20 20 20 20 34 20 70 69 63 6B 20 31 2D 20 20 4 pick 1-
01F990: 33 20 70 69 63 6B 20 20 35 20 70 69 63 6B 20 20 3 pick 5 pick
01F9A0: 34 20 70 69 63 6B 20 28 20 6E 65 77 20 73 74 61 4 pick ( new sta
01F9B0: 63 6B 20 66 72 61 6D 65 3A 29 20 20 20 20 20 20 ck frame:)
01F9C0: 20 20 20 20 20 20 20 28 20 64 65 63 72 65 6D 65 ( decreme
01F9D0: 6E 74 20 63 6F 75 6E 74 2C 20 65 78 63 68 61 6E nt count, exchan
01F9E0: 67 65 20 20 61 75 78 20 61 6E 64 20 64 65 73 74 ge aux and dest
01F9F0: 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
01FA00: 20 20 20 2E 22 20 20 20 20 54 20 4F 20 57 20 45 ." T O W E
01FA10: 20 52 20 20 20 4F 20 46 20 20 20 48 20 41 20 4E R O F H A N
01FA20: 20 4F 20 49 20 20 22 20 2E 20 2E 22 20 64 69 73 O I " . ." dis
01FA30: 63 73 2E 20 22 20 20 20 20 20 20 20 20 20 20 20 cs. "
01FA40: 20 20 20 64 69 73 63 73 20 21 20 20 31 20 61 75 discs ! 1 au
01FA50: 78 20 21 20 20 32 20 64 65 73 74 20 21 20 20 30 x ! 2 dest ! 0
01FA60: 20 73 72 63 65 20 21 20 20 30 20 6D 6F 76 20 21 srce ! 0 mov !
01FA70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FA80: 20 20 20 2E 22 20 20 44 65 73 74 69 6E 61 74 69 ." Destinati
01FA90: 6F 6E 20 70 65 67 20 22 20 64 65 73 74 20 40 20 on peg " dest @
01FAA0: 31 2B 20 2E 20 63 72 20 20 20 20 20 20 20 20 20 1+ . cr
01FAB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FAC0: 20 20 20 31 20 68 31 20 21 20 64 69 73 63 73 20 1 h1 ! discs
01FAD0: 40 20 30 20 64 6F 20 20 68 31 20 40 20 32 2A 20 @ 0 do h1 @ 2*
01FAE0: 20 68 31 20 21 20 20 6C 6F 6F 70 20 20 20 20 20 h1 ! loop
01FAF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FB00: 20 20 20 2E 22 20 4D 69 6E 69 6D 75 6D 20 6D 6F ." Minimum mo
01FB10: 76 65 73 20 28 20 32 20 5E 20 64 69 73 63 73 20 ves ( 2 ^ discs
01FB20: 2D 20 31 20 29 20 3A 20 22 20 68 31 20 40 20 31 - 1 ) : " h1 @ 1
01FB30: 2D 20 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 - .
01FB40: 20 20 20 62 6C 69 6E 65 20 40 20 31 20 6C 6F 63 bline @ 1 loc
01FB50: 61 74 65 20 20 38 30 20 30 20 64 6F 20 20 35 38 ate 80 0 do 58
01FB60: 20 65 6D 69 74 20 6C 6F 6F 70 20 20 28 20 62 61 emit loop ( ba
01FB70: 73 65 6C 69 6E 65 29 20 20 20 20 20 20 20 20 20 seline)
01FB80: 20 20 20 64 69 73 63 73 20 40 20 32 2B 20 30 20 discs @ 2+ 0
01FB90: 64 6F 20 28 20 6E 65 73 74 65 64 20 6C 6F 6F 70 do ( nested loop
01FBA0: 73 3A 20 6A 3D 6F 75 74 65 72 2C 20 69 3D 69 6E s: j=outer, i=in
01FBB0: 6E 65 72 20 69 6E 64 65 78 29 20 20 20 20 20 20 ner index)
01FBC0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
01FBD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FBE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FBF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
01FC00: 20 20 20 20 20 6D 6F 76 65 73 20 20 20 20 20 20 moves
01FC10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FC20: 20 20 20 28 20 72 65 63 75 72 73 65 29 20 20 20 ( recurse)
01FC30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FC40: 20 20 20 20 20 6D 6F 76 65 64 69 73 63 20 20 20 movedisc
01FC50: 28 20 4F 56 45 52 20 3D 20 32 20 50 49 43 4B 29 ( OVER = 2 PICK)
01FC60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FC70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FC80: 20 20 20 20 20 34 20 70 69 63 6B 20 31 2D 20 20 4 pick 1-
01FC90: 6F 76 65 72 20 20 20 20 34 20 70 69 63 6B 20 20 over 4 pick
01FCA0: 36 20 70 69 63 6B 20 28 20 6E 65 77 20 73 74 61 6 pick ( new sta
01FCB0: 63 6B 20 66 72 61 6D 65 3A 29 20 20 20 20 20 20 ck frame:)
01FCC0: 20 20 20 20 20 20 20 28 20 64 65 63 72 65 6D 65 ( decreme
01FCD0: 6E 74 20 63 6F 75 6E 74 2C 20 65 78 63 68 61 6E nt count, exchan
01FCE0: 67 65 20 20 61 75 78 20 61 6E 64 20 73 6F 75 72 ge aux and sour
01FCF0: 63 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 ce )
01FD00: 20 20 20 20 20 6D 6F 76 65 73 20 20 20 20 20 20 moves
01FD10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FD20: 20 20 20 28 20 72 65 63 75 72 73 65 29 20 20 20 ( recurse)
01FD30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FD40: 20 20 20 74 68 65 6E 20 20 20 20 20 20 20 20 20 then
01FD50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FD60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FD70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FD80: 20 20 20 64 64 72 6F 70 20 64 64 72 6F 70 20 28 ddrop ddrop (
01FD90: 20 63 61 6E 63 65 6C 20 66 72 61 6D 65 29 20 20 cancel frame)
01FDA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FDB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FDC0: 20 20 3B 20 20 20 73 6D 75 64 67 65 20 28 20 72 ; smudge ( r
01FDD0: 65 76 65 72 73 65 20 73 6D 75 64 67 69 6E 67 20 everse smudging
01FDE0: 62 79 20 3B 29 20 20 20 2D 2D 3E 20 20 20 20 20 by ;) -->
01FDF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 .
01FE00: 20 20 20 20 20 20 33 20 30 20 64 6F 20 20 62 6C 3 0 do bl
01FE10: 69 6E 65 20 40 20 6A 20 2D 20 20 69 20 78 70 65 ine @ j - i xpe
01FE20: 67 20 63 40 20 6C 6F 63 61 74 65 20 69 20 34 39 g c@ locate i 49
01FE30: 20 2B 20 65 6D 69 74 20 20 6C 6F 6F 70 20 20 20 + emit loop
01FE40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FE50: 6C 6F 6F 70 20 20 20 20 28 20 64 72 61 77 20 70 loop ( draw p
01FE60: 65 67 73 29 20 20 20 20 20 20 20 20 20 20 20 20 egs)
01FE70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FE80: 20 20 20 64 69 73 63 73 20 40 20 31 2B 20 31 20 discs @ 1+ 1
01FE90: 64 6F 20 62 6C 69 6E 65 20 40 20 69 20 2D 20 20 do bline @ i -
01FEA0: 28 20 72 6F 77 29 20 20 20 20 20 20 20 20 20 20 ( row)
01FEB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FEC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FED0: 20 20 20 73 72 63 65 20 40 20 78 70 65 67 20 40 srce @ xpeg @
01FEE0: 20 64 69 73 63 73 20 40 20 69 20 2D 20 32 2A 20 discs @ i - 2*
01FEF0: 33 20 2B 20 32 2F 20 2D 20 28 20 63 6F 6C 29 20 3 + 2/ - ( col)
01FF00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FF10: 20 20 20 6C 6F 63 61 74 65 20 20 20 20 64 69 73 locate dis
01FF20: 63 73 20 40 20 69 20 2D 20 64 72 61 77 64 69 73 cs @ i - drawdis
01FF30: 63 20 74 79 70 65 20 20 20 20 20 20 20 20 20 20 c type
01FF40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FF50: 6C 6F 6F 70 20 20 28 20 64 72 61 77 20 64 69 73 loop ( draw dis
01FF60: 63 73 29 20 20 20 20 20 20 20 20 20 20 20 20 20 cs)
01FF70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01FF80: 20 20 20 30 20 61 75 78 20 40 20 6F 6E 70 65 67 0 aux @ onpeg
01FF90: 20 63 21 20 20 30 20 64 65 73 74 20 40 20 6F 6E c! 0 dest @ on
01FFA0: 70 65 67 20 63 21 20 28 20 6E 6F 20 64 69 73 63 peg c! ( no disc
01FFB0: 73 20 6F 6E 20 61 75 78 2C 20 64 65 73 74 29 20 s on aux, dest)
01FFC0: 20 20 20 64 69 73 63 73 20 40 20 30 20 64 6F 20 discs @ 0 do
01FFD0: 20 64 69 73 63 73 20 40 20 31 2D 20 69 20 2D 20 discs @ 1- i -
01FFE0: 69 20 73 72 63 65 20 40 20 70 65 67 20 63 21 20 i srce @ peg c!
01FFF0: 20 6C 6F 6F 70 20 20 20 20 20 20 20 20 20 20 20 loop
020000: 3A 20 6D 61 6E 75 61 6C 20 20 28 20 2D 2D 20 29 : manual ( -- )
020010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020040: 20 20 20 62 65 67 69 6E 20 20 20 73 70 21 20 20 begin sp!
020050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020080: 20 20 20 20 62 6C 69 6E 65 20 40 20 32 2B 20 31 bline @ 2+ 1
020090: 20 6C 6F 63 61 74 65 20 32 30 20 65 6D 69 74 20 locate 20 emit
0200A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0200B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0200C0: 20 20 20 20 2E 22 20 46 72 6F 6D 20 70 65 67 20 ." From peg
0200D0: 3F 20 22 20 6B 65 79 20 64 75 70 20 65 6D 69 74 ? " key dup emit
0200E0: 20 34 39 20 2D 20 20 28 20 2D 2D 20 73 72 63 65 49 - ( -- srce
0200F0: 29 20 20 20 63 72 20 20 20 20 20 20 20 20 20 20 ) cr
020100: 20 20 20 20 2E 22 20 54 6F 20 70 65 67 20 20 20 ." To peg
020110: 3F 20 22 20 6B 65 79 20 64 75 70 20 65 6D 69 74 ? " key dup emit
020120: 20 34 39 20 2D 20 20 28 20 2D 2D 20 73 72 63 65 49 - ( -- srce
020130: 20 64 65 73 74 29 20 20 20 20 20 20 20 20 20 20 dest)
020140: 20 20 20 20 73 77 61 70 20 64 64 75 70 20 20 28 swap ddup (
020150: 20 2D 2D 20 64 65 73 74 20 73 72 63 65 20 64 65 -- dest srce de
020160: 73 74 20 73 72 63 65 29 20 20 20 20 20 20 20 20 st srce)
020170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020180: 20 20 20 20 68 31 20 21 20 20 68 32 20 21 20 28 h1 ! h2 ! (
020190: 20 2D 2D 20 64 65 73 74 20 73 72 63 65 29 20 28 -- dest srce) (
0201A0: 20 74 65 6D 70 20 73 74 6F 72 65 20 66 6F 72 20 temp store for
0201B0: 65 61 73 79 20 63 68 65 63 6B 69 6E 67 29 20 20 easy checking)
0201C0: 20 20 20 20 68 31 20 40 20 64 75 70 20 30 3C 20 h1 @ dup 0<
0201D0: 73 77 61 70 20 32 20 3E 20 6F 72 20 68 32 20 40 swap 2 > or h2 @
0201E0: 20 64 75 70 20 30 3C 20 73 77 61 70 20 32 20 3E dup 0< swap 2 >
0201F0: 20 6F 72 20 6F 72 20 28 20 70 65 67 73 29 20 20 or or ( pegs)
020200: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
020210: 1B 00 01 00 02 09 4E E5 1B 00 C1 02 00 00 00 02 ......N.........
020220: 1B 00 C6 02 00 00 00 02 1B 00 C2 02 00 00 00 02 ................
020230: 1B 00 C7 02 00 00 00 02 1B 00 C3 02 00 00 00 02 ................
020240: 1B 00 C8 02 00 00 00 02 1B 00 C4 02 00 00 00 02 ................
020250: 1B 00 C9 02 00 00 00 02 1B 00 C5 02 00 00 00 02 ................
020260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020300: 20 20 20 64 69 73 63 73 20 40 20 20 73 72 63 65 discs @ srce
020310: 20 40 20 6F 6E 70 65 67 20 63 21 20 20 20 28 20 @ onpeg c! (
020320: 61 6C 6C 20 64 69 73 63 73 20 6F 6E 20 73 6F 75 all discs on sou
020330: 72 63 65 20 70 65 67 29 20 20 20 20 20 20 20 20 rce peg)
020340: 20 20 20 64 69 73 63 73 20 40 20 20 61 75 78 20 discs @ aux
020350: 40 20 20 64 65 73 74 20 40 20 20 73 72 63 65 20 @ dest @ srce
020360: 40 20 20 28 20 69 6E 69 74 69 61 6C 20 73 74 61 @ ( initial sta
020370: 63 6B 20 66 72 61 6D 65 29 20 20 20 20 20 20 20 ck frame)
020380: 20 20 20 68 30 20 40 20 31 30 39 20 3D 20 69 66 h0 @ 109 = if
020390: 20 62 6C 69 6E 65 20 40 20 31 2B 20 31 20 6C 6F bline @ 1+ 1 lo
0203A0: 63 61 74 65 20 2E 22 20 45 6E 74 65 72 20 6D 6F cate ." Enter mo
0203B0: 76 65 20 31 73 74 20 6D 6F 76 65 22 20 20 20 20 ve 1st move"
0203C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0203D0: 20 37 20 65 6D 69 74 20 63 72 20 6D 61 6E 75 61 7 emit cr manua
0203E0: 6C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l
0203F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C el
020410: 73 65 20 6D 6F 76 65 73 20 74 68 65 6E 20 20 20 se moves then
020420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020440: 20 20 20 33 30 20 65 6D 69 74 20 37 20 65 6D 69 30 emit 7 emi
020450: 74 20 63 72 20 63 72 20 73 70 21 20 20 20 20 20 t cr cr sp!
020460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020480: 20 3B 1A 41 4E 4F 49 20 20 20 24 24 24 FF 00 FF ;.ANOI $$$...
020490: FF FF FF FF 00 00 00 00 FF FF FF FF FF FF FF FF ................
0204A0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
0204B0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
0204C0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
0204D0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
0204E0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
0204F0: 00 00 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
020500: 20 20 20 61 24 20 63 40 20 65 20 21 20 20 20 6B a$ c@ e ! k
020510: 24 20 65 20 40 20 31 2B 20 30 20 66 69 6C 6C 20 $ e @ 1+ 0 fill
020520: 20 28 20 6C 65 6E 67 74 68 20 6F 66 20 73 74 72 ( length of str
020530: 69 6E 67 2C 20 7A 65 72 6F 20 63 6F 75 6E 74 29 ing, zero count)
020540: 20 20 20 2E 22 20 4E 75 6D 62 65 72 20 6F 66 20 ." Number of
020550: 70 65 72 6D 75 74 61 74 69 6F 6E 73 20 3A 20 22 permutations : "
020560: 20 31 20 65 20 40 20 31 2B 20 32 20 64 6F 20 69 1 e @ 1+ 2 do i
020570: 20 2A 20 6C 6F 6F 70 20 75 2E 20 63 72 20 20 20 * loop u. cr
020580: 20 20 20 65 20 40 20 38 20 3E 20 69 66 20 2E 22 e @ 8 > if ."
020590: 20 4E 6F 74 65 20 74 68 61 74 20 74 68 65 20 6E Note that the n
0205A0: 75 6D 62 65 72 20 6F 66 20 70 65 72 6D 75 74 61 umber of permuta
0205B0: 74 69 6F 6E 73 20 69 73 20 6D 65 61 6E 69 6E 67 tions is meaning
0205C0: 6C 65 73 73 20 62 65 63 61 75 73 65 22 20 63 72 less because" cr
0205D0: 20 2E 22 20 69 74 20 65 78 63 65 65 64 73 20 73 ." it exceeds s
0205E0: 69 6E 67 6C 65 20 69 6E 74 65 67 65 72 20 6C 69 ingle integer li
0205F0: 6D 69 74 22 20 63 72 20 20 74 68 65 6E 20 20 20 mit" cr then
020600: 20 20 20 2E 22 20 50 65 72 6D 20 23 20 20 20 20 ." Perm #
020610: 20 4F 72 64 65 72 22 20 65 20 40 20 32 2A 20 35 Order" e @ 2* 5
020620: 20 2D 20 31 20 6D 61 78 20 73 70 61 63 65 73 20 - 1 max spaces
020630: 2E 22 20 43 6F 75 6E 74 65 72 73 22 20 63 72 20 ." Counters" cr
020640: 20 20 20 31 20 6E 6F 20 21 20 20 64 69 73 70 6C 1 no ! displ
020650: 61 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ay
020660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020680: 20 20 20 62 65 67 69 6E 20 20 20 70 65 72 6D 75 begin permu
020690: 74 61 74 65 20 31 20 6E 6F 20 2B 21 20 6E 20 40 tate 1 no +! n @
0206A0: 20 20 20 20 77 68 69 6C 65 20 64 69 73 70 6C 61 while displa
0206B0: 79 20 20 72 65 70 65 61 74 20 20 20 20 20 20 20 y repeat
0206C0: 20 20 20 2E 22 20 4E 6F 20 6D 6F 72 65 2C 20 62 ." No more, b
0206D0: 61 63 6B 20 74 6F 20 6F 72 69 67 69 6E 61 6C 20 ack to original
0206E0: 6F 72 64 65 72 3A 22 20 63 72 20 20 64 69 73 70 order:" cr disp
0206F0: 6C 61 79 20 20 63 72 20 3B 20 20 20 20 20 20 20 lay cr ;
020700: 28 20 50 65 72 6D 73 66 74 68 20 4C 4B 53 20 38 ( Permsfth LKS 8
020710: 37 30 35 32 34 20 29 20 20 20 20 20 20 20 20 20 70524 )
020720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020730: 20 20 20 20 20 20 64 65 63 69 6D 61 6C 20 20 20 decimal
020740: 76 61 72 69 61 62 6C 65 20 61 24 20 20 32 35 33 variable a$ 253
020750: 20 61 6C 6C 6F 74 20 20 20 20 76 61 72 69 61 62 allot variab
020760: 6C 65 20 6B 24 20 20 32 35 33 20 61 6C 6C 6F 74 le k$ 253 allot
020770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020780: 76 61 72 69 61 62 6C 65 20 6E 6F 20 20 76 61 72 variable no var
020790: 69 61 62 6C 65 20 65 20 20 76 61 72 69 61 62 6C iable e variabl
0207A0: 65 20 6E 20 20 76 61 72 69 61 62 6C 65 20 68 24 e n variable h$
0207B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0207C0: 28 20 72 65 73 65 72 76 65 20 73 74 6F 72 61 67 ( reserve storag
0207D0: 65 20 6D 65 6D 6F 72 79 29 20 20 20 20 20 20 20 e memory)
0207E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0207F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020800: 3A 20 64 69 73 70 6C 61 79 20 20 20 28 20 2D 2D : display ( --
020810: 20 29 20 28 20 6E 75 6D 62 65 72 20 6F 66 20 70 ) ( number of p
020820: 65 72 6D 2C 20 70 65 72 6D 75 74 61 74 65 64 20 erm, permutated
020830: 73 74 72 69 6E 67 2C 20 63 6F 75 6E 74 65 72 29 string, counter)
020840: 20 20 20 6E 6F 20 40 20 30 20 35 20 64 2E 72 20 no @ 0 5 d.r
020850: 20 36 20 73 70 61 63 65 73 20 20 61 24 20 63 6F 6 spaces a$ co
020860: 75 6E 74 20 20 74 79 70 65 20 20 65 20 40 20 36 unt type e @ 6
020870: 20 6D 61 78 20 73 70 61 63 65 73 20 20 20 20 20 max spaces
020880: 20 20 20 65 20 40 20 20 31 2B 20 31 20 64 6F 20 e @ 1+ 1 do
020890: 20 69 20 6B 24 20 2B 20 63 40 20 2E 20 6C 6F 6F i k$ + c@ . loo
0208A0: 70 20 20 20 20 20 63 72 20 3B 20 20 20 20 20 20 p cr ;
0208B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0208C0: 3A 20 70 65 72 6D 75 74 61 74 65 20 20 28 20 2D : permutate ( -
0208D0: 2D 20 29 20 20 28 20 72 6F 74 61 74 65 20 61 24 - ) ( rotate a$
0208E0: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
0208F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020940: 28 20 57 4F 52 44 20 73 74 6F 72 65 73 20 74 68 ( WORD stores th
020950: 65 20 69 6E 70 75 74 20 73 74 72 69 6E 67 20 61 e input string a
020960: 74 20 48 45 52 45 20 77 69 74 68 20 74 68 65 20 t HERE with the
020970: 66 69 72 73 74 20 62 79 74 65 20 20 20 20 20 20 first byte
020980: 20 20 67 69 76 69 6E 67 20 69 74 73 20 6C 65 6E giving its len
020990: 67 74 68 2C 20 6C 65 61 76 69 6E 67 20 74 68 65 gth, leaving the
0209A0: 20 61 64 64 72 65 73 73 20 6F 66 20 48 45 52 45 address of HERE
0209B0: 20 6F 6E 20 74 68 65 20 73 74 61 63 6B 2E 20 20 on the stack.
0209C0: 20 20 43 4D 4F 56 45 20 6D 6F 76 65 73 20 74 68 CMOVE moves th
0209D0: 65 20 73 74 72 69 6E 67 2C 20 69 6E 63 6C 75 64 e string, includ
0209E0: 69 6E 67 20 74 68 65 20 6C 65 6E 67 74 68 20 62 ing the length b
0209F0: 79 74 65 2C 20 74 6F 20 41 24 2E 20 29 20 20 20 yte, to A$. )
020A00: 28 20 3C 43 4D 4F 56 45 20 69 73 20 73 69 6D 69 ( <CMOVE is simi
020A10: 6C 61 72 20 74 6F 20 43 4D 4F 56 45 2C 20 62 75 lar to CMOVE, bu
020A20: 74 20 6D 6F 76 65 73 20 66 72 6F 6D 20 68 69 67 t moves from hig
020A30: 68 20 74 6F 20 6C 6F 77 20 6D 65 6D 6F 72 79 20 h to low memory
020A40: 20 20 74 6F 20 61 76 6F 69 64 20 6F 76 65 72 2D to avoid over-
020A50: 77 72 69 74 69 6E 67 2E 20 20 54 68 69 73 20 69 writing. This i
020A60: 73 20 61 20 61 6E 20 61 6C 6D 6F 73 74 20 6C 69 s a an almost li
020A70: 74 65 72 61 6C 20 20 20 20 20 20 20 20 20 20 20 teral
020A80: 20 20 74 72 61 6E 73 6C 61 74 69 6F 6E 20 6F 66 translation of
020A90: 20 74 68 65 20 20 20 42 41 53 49 43 20 76 65 72 the BASIC ver
020AA0: 73 69 6F 6E 2C 20 61 6E 64 20 75 73 65 73 20 61 sion, and uses a
020AB0: 20 63 6F 75 70 6C 65 20 6F 66 20 20 20 20 20 20 couple of
020AC0: 20 20 75 6E 6E 65 63 65 73 73 61 72 79 20 76 61 unnecessary va
020AD0: 72 69 61 62 6C 65 73 2E 29 1A 65 20 77 68 69 63 riables.).e whic
020AE0: 68 20 75 74 69 6C 69 7A 65 73 20 47 4F 54 4F 73 h utilizes GOTOs
020AF0: 2E 1A 00 00 FF FF FF FF 00 00 00 00 FF FF FF FF ................
020B00: 20 20 20 31 20 6E 20 21 20 20 20 20 20 20 20 20 1 n !
020B10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020B20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020B40: 20 20 20 62 65 67 69 6E 20 20 20 20 20 20 20 31 begin 1
020B50: 20 6E 20 2B 21 20 20 20 20 20 20 20 20 20 20 20 n +!
020B60: 20 20 20 28 20 69 6E 63 72 65 6D 65 6E 74 20 6E ( increment n
020B70: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
020B80: 20 20 20 20 61 24 20 6E 20 40 20 2B 20 63 40 20 a$ n @ + c@
020B90: 68 24 20 21 20 20 20 20 20 20 20 20 20 20 20 20 h$ !
020BA0: 20 20 20 28 20 68 6F 6C 64 20 6E 74 68 20 65 6C ( hold nth el
020BB0: 65 6D 65 6E 74 29 20 20 20 20 20 20 20 20 20 20 ement)
020BC0: 20 20 20 20 61 24 20 31 2B 20 64 75 70 20 31 2B a$ 1+ dup 1+
020BD0: 20 6E 20 40 20 31 2D 20 3C 63 6D 6F 76 65 20 20 n @ 1- <cmove
020BE0: 20 20 20 28 20 73 68 69 66 74 20 65 6C 65 6D 65 ( shift eleme
020BF0: 6E 74 73 20 72 69 67 68 74 29 20 20 20 20 20 20 nts right)
020C00: 20 20 20 20 68 24 20 20 40 20 61 24 20 31 2B 20 h$ @ a$ 1+
020C10: 63 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c!
020C20: 20 20 20 28 20 6E 74 68 20 65 6C 65 6D 65 6E 74 ( nth element
020C30: 20 74 6F 20 66 69 72 73 74 29 20 20 20 20 20 20 to first)
020C40: 20 20 20 20 6B 24 20 6E 20 40 20 2B 20 64 75 70 k$ n @ + dup
020C50: 20 63 40 20 31 2B 20 73 77 61 70 20 63 21 20 20 c@ 1+ swap c!
020C60: 20 20 20 28 20 69 6E 63 72 65 6D 65 6E 74 20 63 ( increment c
020C70: 6F 75 6E 74 65 72 29 20 20 20 20 20 20 20 20 20 ounter)
020C80: 20 20 20 6B 24 20 6E 20 40 20 2B 20 20 63 40 20 k$ n @ + c@
020C90: 6E 20 40 20 20 3C 20 20 6E 6F 74 20 20 20 20 20 n @ < not
020CA0: 20 20 20 28 20 74 65 73 74 20 6C 69 6D 69 74 20 ( test limit
020CB0: 6F 66 20 70 65 72 6D 73 29 20 20 20 20 20 20 20 of perms)
020CC0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
020CD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020CE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020CF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020D00: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
020D10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020D20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020D30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020D40: 28 20 53 43 52 45 44 32 20 29 20 20 28 20 4C 4B ( SCRED2 ) ( LK
020D50: 53 20 38 36 30 35 32 31 2C 20 73 63 72 65 64 32 S 860521, scred2
020D60: 20 66 6F 72 20 63 70 63 46 54 48 32 20 38 37 30 for cpcFTH2 870
020D70: 33 31 32 29 20 20 20 20 20 20 20 20 20 20 20 20 312)
020D80: 41 20 66 75 6C 6C 2D 73 63 72 65 65 6E 20 52 41 A full-screen RA
020D90: 4D 2D 64 69 73 63 20 65 64 69 74 6F 72 20 66 6F M-disc editor fo
020DA0: 72 20 63 70 63 46 54 48 32 2E 20 20 20 20 20 20 r cpcFTH2.
020DB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020DC0: 54 68 65 20 65 64 69 74 6F 72 20 69 73 20 69 6E The editor is in
020DD0: 20 6F 76 65 72 73 74 72 69 6B 65 20 6D 6F 64 65 overstrike mode
020DE0: 20 61 74 20 61 6C 6C 20 74 69 6D 65 73 2C 20 61 at all times, a
020DF0: 6E 64 20 61 6C 6C 6F 77 73 20 20 20 20 20 20 20 nd allows
020E00: 69 6E 73 65 72 74 69 6F 6E 2F 64 65 6C 65 74 69 insertion/deleti
020E10: 6F 6E 20 6F 66 20 63 68 61 72 61 63 74 65 72 73 on of characters
020E20: 3A 20 74 68 69 73 20 61 66 66 65 63 74 73 20 61 : this affects a
020E30: 6C 6C 20 74 65 78 74 20 66 72 6F 6D 20 74 68 65 ll text from the
020E40: 63 75 72 73 6F 72 20 70 6F 73 69 74 69 6F 6E 20 cursor position
020E50: 74 6F 20 74 68 65 20 65 6E 64 20 6F 66 20 74 68 to the end of th
020E60: 65 20 6C 61 73 74 20 73 63 72 65 65 6E 2E 20 20 e last screen.
020E70: 54 68 65 20 74 65 78 74 20 6D 75 73 74 20 62 65 The text must be
020E80: 66 6F 72 6D 61 74 74 65 64 20 69 6E 74 6F 20 73 formatted into s
020E90: 63 72 65 65 6E 73 20 62 65 66 6F 72 65 20 4C 4F creens before LO
020EA0: 41 44 20 69 73 20 69 6E 76 6F 6B 65 64 2E 20 20 AD is invoked.
020EB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020EC0: 43 4F 50 59 20 61 6C 6C 6F 77 73 20 63 6F 70 79 COPY allows copy
020ED0: 69 6E 67 20 6F 66 20 61 6E 79 20 6F 6E 65 20 6C ing of any one l
020EE0: 69 6E 65 20 77 69 74 68 69 6E 20 74 68 65 20 73 ine within the s
020EF0: 63 72 65 65 6E 73 20 61 72 65 61 20 74 6F 20 20 creens area to
020F00: 28 20 78 29 20 64 75 70 20 69 66 20 20 20 20 20 ( x) dup if
020F10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020F20: 20 20 20 28 20 69 66 20 6F 6E 20 6C 69 6D 69 74 ( if on limit
020F30: 2C 20 74 65 73 74 20 66 6F 72 20 65 6E 64 29 20 , test for end)
020F40: 20 20 20 20 20 6E 20 40 20 65 20 40 20 3D 20 64 n @ e @ = d
020F50: 75 70 20 69 66 20 2E 22 20 46 69 6E 22 20 63 72 up if ." Fin" cr
020F60: 20 30 20 6E 20 21 20 74 68 65 6E 20 6E 6F 74 20 0 n ! then not
020F70: 61 6E 64 20 74 68 65 6E 20 20 28 20 78 29 20 20 and then ( x)
020F80: 20 20 20 77 68 69 6C 65 20 20 20 20 20 20 20 20 while
020F90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
020FA0: 20 20 20 28 20 6F 6E 20 6C 69 6D 69 74 20 62 75 ( on limit bu
020FB0: 74 20 6E 6F 74 20 61 74 20 65 6E 64 29 20 20 20 t not at end)
020FC0: 20 20 20 20 32 34 20 65 6D 69 74 20 2E 22 20 53 24 emit ." S
020FD0: 75 70 70 72 65 73 73 65 64 3A 6C 69 6D 69 74 20 uppressed:limit
020FE0: 6F 6E 20 63 6F 75 6E 74 65 72 20 22 20 6E 20 40 on counter " n @
020FF0: 20 2E 20 63 72 20 20 20 20 20 20 20 20 20 20 20 . cr
021000: 20 20 20 20 20 20 20 64 69 73 70 6C 61 79 20 20 display
021010: 20 20 20 20 32 34 20 65 6D 69 74 20 20 20 20 20 24 emit
021020: 20 20 20 28 20 72 65 70 6F 72 74 20 69 6E 20 69 ( report in i
021030: 6E 76 65 72 73 65 29 20 20 20 20 20 20 20 20 20 nverse)
021040: 20 20 20 20 6B 24 20 31 2B 20 6E 20 40 20 20 30 k$ 1+ n @ 0
021050: 20 20 66 69 6C 6C 20 20 20 20 20 20 20 20 20 20 fill
021060: 20 20 20 28 20 7A 65 72 6F 20 66 69 72 73 74 20 ( zero first
021070: 6E 20 63 6F 75 6E 74 65 72 73 29 20 20 20 20 20 n counters)
021080: 20 20 28 20 20 20 20 6E 20 40 20 65 20 40 20 3D ( n @ e @ =
021090: 20 69 66 20 2E 22 20 46 69 6E 69 73 68 65 64 22 if ." Finished"
0210A0: 20 63 72 20 30 20 6E 20 21 20 65 78 69 74 20 74 cr 0 n ! exit t
0210B0: 68 65 6E 20 29 20 20 20 20 20 20 20 20 20 20 20 hen )
0210C0: 20 28 20 61 20 70 6F 73 73 69 62 6C 65 20 6E 6F ( a possible no
0210D0: 74 2D 71 75 69 74 65 2D 73 74 72 75 63 74 75 72 t-quite-structur
0210E0: 65 64 20 74 65 72 6D 69 6E 61 74 69 6F 6E 20 69 ed termination i
0210F0: 6E 73 74 65 61 64 20 6F 66 20 78 2D 78 29 20 20 nstead of x-x)
021100: 74 68 65 20 6C 69 6E 65 20 61 74 20 74 68 65 20 the line at the
021110: 63 75 72 73 6F 72 2E 20 20 49 74 20 77 69 6C 6C cursor. It will
021120: 20 6F 76 65 72 77 72 69 74 65 20 74 68 65 20 65 overwrite the e
021130: 78 69 73 74 69 6E 67 20 74 65 78 74 20 62 75 74 xisting text but
021140: 64 6F 65 73 20 6E 6F 74 20 64 65 6C 65 74 65 20 does not delete
021150: 74 68 65 20 6F 72 69 67 69 6E 61 6C 20 6C 69 6E the original lin
021160: 65 2E 20 20 43 4F 50 59 20 61 6E 64 20 47 4F 54 e. COPY and GOT
021170: 4F 20 72 65 71 75 69 72 65 20 74 68 65 20 20 20 O require the
021180: 61 62 73 6F 6C 75 74 65 20 6C 69 6E 65 20 6E 75 absolute line nu
021190: 6D 62 65 72 20 28 75 6E 73 69 67 6E 65 64 29 3B mber (unsigned);
0211A0: 20 69 6E 76 61 6C 69 64 20 65 6E 74 72 69 65 73 invalid entries
0211B0: 20 61 72 65 20 69 67 6E 6F 72 65 64 2E 20 20 20 are ignored.
0211C0: 53 45 41 52 43 48 20 74 72 69 65 73 20 74 6F 20 SEARCH tries to
0211D0: 6D 61 74 63 68 20 74 68 65 20 69 6E 70 75 74 20 match the input
0211E0: 73 74 72 69 6E 67 20 74 68 72 6F 75 67 68 20 74 string through t
0211F0: 68 65 20 77 68 6F 6C 65 20 73 63 72 65 65 6E 73 he whole screens
021200: 61 72 65 61 2E 20 20 43 6F 72 72 65 63 74 69 6F area. Correctio
021210: 6E 73 20 6D 61 79 20 62 65 20 6D 61 64 65 20 69 ns may be made i
021220: 66 20 61 20 6D 61 74 63 68 20 69 73 20 66 6F 75 f a match is fou
021230: 6E 64 2C 20 62 75 74 20 65 61 63 68 20 20 20 20 nd, but each
021240: 73 65 61 72 63 68 20 6D 75 73 74 20 62 65 20 63 search must be c
021250: 6F 6D 70 6C 65 74 65 64 20 74 6F 20 61 76 6F 69 ompleted to avoi
021260: 64 20 73 74 61 63 6B 20 62 75 69 6C 64 2D 75 70 d stack build-up
021270: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
021280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0212A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0212B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0212C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0212D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0212E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0212F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021300: 20 20 20 72 65 70 65 61 74 20 20 20 20 20 20 20 repeat
021310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021340: 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
021350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021380: 3A 20 70 65 72 6D 73 20 20 28 20 2D 2D 20 29 20 : perms ( -- )
021390: 20 28 20 70 72 6F 64 75 63 65 20 61 6C 6C 20 70 ( produce all p
0213A0: 65 72 6D 75 74 61 74 69 6F 6E 73 20 6F 66 20 61 ermutations of a
0213B0: 20 73 74 72 69 6E 67 29 20 20 20 20 20 20 20 20 string)
0213C0: 20 20 20 63 72 20 20 30 20 68 65 72 65 20 63 21 cr 0 here c!
0213D0: 20 73 70 21 20 20 32 35 20 31 20 33 31 20 65 6D sp! 25 1 31 em
0213E0: 69 74 20 65 6D 69 74 20 65 6D 69 74 20 28 20 6C it emit emit ( l
0213F0: 6F 63 61 74 65 20 31 2C 32 35 29 20 20 20 20 20 ocate 1,25)
021400: 20 20 20 62 65 67 69 6E 20 20 68 65 72 65 20 63 begin here c
021410: 40 20 32 20 3C 20 77 68 69 6C 65 20 20 2E 22 20 @ 2 < while ."
021420: 20 45 6E 74 65 72 20 73 74 72 69 6E 67 20 6F 66 Enter string of
021430: 20 65 6C 65 6D 65 6E 74 73 22 20 63 72 20 20 20 elements" cr
021440: 20 20 20 20 2E 22 20 3F 20 22 20 71 75 65 72 79 ." ? " query
021450: 20 31 33 20 77 6F 72 64 20 20 64 72 6F 70 20 72 13 word drop r
021460: 65 70 65 61 74 20 20 20 20 20 20 20 28 20 69 6E epeat ( in
021470: 70 75 74 20 73 74 72 69 6E 67 29 20 20 20 20 20 put string)
021480: 20 20 20 68 65 72 65 20 64 75 70 20 63 40 20 31 here dup c@ 1
021490: 2B 20 61 24 20 73 77 61 70 20 63 6D 6F 76 65 20 + a$ swap cmove
0214A0: 63 72 20 20 20 20 20 20 20 20 20 20 28 20 6D 6F cr ( mo
0214B0: 76 65 20 73 74 72 69 6E 67 20 74 6F 20 61 24 29 ve string to a$)
0214C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
0214D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0214E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0214F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021500: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
021510: 1C 00 01 00 02 09 4E E5 1C 00 C1 02 00 00 00 02 ......N.........
021520: 1C 00 C6 02 00 00 00 02 1C 00 C2 02 00 00 00 02 ................
021530: 1C 00 C7 02 00 00 00 02 1C 00 C3 02 00 00 00 02 ................
021540: 1C 00 C8 02 00 00 00 02 1C 00 C4 02 00 00 00 02 ................
021550: 1C 00 C9 02 00 00 00 02 1C 00 C5 02 00 00 00 02 ................
021560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021600: 28 20 53 43 52 45 44 32 20 29 20 20 20 20 20 66 ( SCRED2 ) f
021610: 6F 72 74 68 20 73 70 21 20 20 64 65 63 69 6D 61 orth sp! decima
021620: 6C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l
021630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021650: 20 20 20 20 36 34 20 63 6F 6E 73 74 61 6E 74 20 64 constant
021660: 63 68 20 28 20 63 68 61 72 73 2F 6C 69 6E 65 29 ch ( chars/line)
021670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021680: 6C 69 6D 69 74 20 66 69 72 73 74 20 2D 20 63 68 limit first - ch
021690: 20 2F 20 31 20 2D 20 63 6F 6E 73 74 61 6E 74 20 / 1 - constant
0216A0: 6D 6C 20 28 20 6D 61 78 20 6C 69 6E 65 73 29 20 ml ( max lines)
0216B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0216C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0216D0: 20 20 20 20 32 33 20 63 6F 6E 73 74 61 6E 74 20 23 constant
0216E0: 64 6C 20 28 20 6E 6F 20 6F 66 20 64 69 73 70 6C dl ( no of displ
0216F0: 61 79 20 6C 69 6E 65 73 29 20 20 20 20 20 20 20 ay lines)
021700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021710: 20 20 20 20 20 20 20 76 61 72 69 61 62 6C 65 20 variable
021720: 74 6C 20 28 20 74 6F 70 20 6C 69 6E 65 20 6F 6E tl ( top line on
021730: 20 73 63 72 65 65 6E 29 20 20 20 20 20 20 20 20 screen)
021740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021750: 20 20 20 20 20 20 20 76 61 72 69 61 62 6C 65 20 variable
021760: 63 63 20 28 20 63 75 72 73 6F 72 20 63 6F 6C 29 cc ( cursor col)
021770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021790: 20 20 20 20 20 20 20 76 61 72 69 61 62 6C 65 20 variable
0217A0: 63 6C 20 28 20 63 75 72 73 6F 72 20 6C 69 6E 65 cl ( cursor line
0217B0: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
0217C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0217D0: 20 20 20 20 20 20 20 76 61 72 69 61 62 6C 65 20 variable
0217E0: 6D 61 20 28 20 6D 65 6D 6F 72 79 20 61 64 64 72 ma ( memory addr
0217F0: 65 73 73 29 20 20 20 20 20 20 20 20 20 20 20 20 ess)
021800: 20 65 64 20 63 2C 20 34 32 20 63 2C 20 33 38 20 ed c, 42 c, 38
021810: 63 2C 20 31 36 20 63 2C 20 28 20 73 62 63 20 68 c, 16 c, ( sbc h
021820: 6C 2C 62 63 20 20 6A 72 20 63 2C 20 65 78 69 74 l,bc jr c, exit
021830: 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
021840: 20 36 32 36 62 20 2C 20 20 39 20 63 2C 20 65 62 626b , 9 c, eb
021850: 20 63 2C 20 20 28 20 6C 64 20 6C 2C 65 20 20 6C c, ( ld l,e l
021860: 64 20 68 2C 64 20 20 61 64 64 20 68 6C 2C 62 63 d h,d add hl,bc
021870: 20 20 65 78 20 64 65 2C 68 6C 29 20 20 20 20 20 ex de,hl)
021880: 20 65 64 20 63 2C 20 34 62 20 63 2C 20 6D 61 20 ed c, 4b c, ma
021890: 2C 20 20 28 20 6C 64 20 62 63 2C 5B 6D 65 6D 6F , ( ld bc,[memo
0218A0: 72 79 20 61 64 64 72 65 73 73 5D 29 20 20 20 20 ry address])
0218B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0218C0: 20 62 37 20 63 2C 20 65 64 20 63 2C 20 34 32 20 b7 c, ed c, 42
0218D0: 63 2C 20 28 20 6C 6F 6F 70 32 3A 20 6F 72 20 61 c, ( loop2: or a
0218E0: 20 20 73 62 63 20 68 6C 2C 62 63 29 20 20 20 20 sbc hl,bc)
0218F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021900: 20 33 38 20 63 2C 20 20 39 20 63 2C 20 20 28 20 38 c, 9 c, (
021910: 6A 72 20 63 2C 20 65 78 69 74 29 20 20 20 20 20 jr c, exit)
021920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021940: 20 20 39 20 63 2C 20 37 65 20 63 2C 20 20 28 20 9 c, 7e c, (
021950: 61 64 64 20 68 6C 2C 62 63 20 20 20 6C 64 20 61 add hl,bc ld a
021960: 2C 5B 68 6C 5D 29 20 20 20 20 20 20 20 20 20 20 ,[hl])
021970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021980: 20 33 36 20 63 2C 20 32 30 20 63 2C 20 31 32 20 36 c, 20 c, 12
021990: 63 2C 20 28 20 6C 64 20 5B 68 6C 5D 2C 73 70 61 c, ( ld [hl],spa
0219A0: 63 65 20 20 6C 64 20 5B 64 65 5D 2C 61 29 20 20 ce ld [de],a)
0219B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0219C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
0219D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0219E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0219F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021A10: 20 20 20 20 20 20 20 76 61 72 69 61 62 6C 65 20 variable
021A20: 74 31 20 28 20 74 65 6D 70 6F 72 61 72 79 20 73 t1 ( temporary s
021A30: 74 6F 72 65 29 20 20 20 20 20 20 20 20 20 20 20 tore)
021A40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021A50: 20 20 20 20 20 20 20 76 61 72 69 61 62 6C 65 20 variable
021A60: 74 32 20 28 20 74 65 6D 70 6F 72 61 72 79 20 73 t2 ( temporary s
021A70: 74 6F 72 65 29 20 20 20 20 20 20 20 20 20 20 20 tore)
021A80: 68 78 63 6F 64 65 20 20 20 20 20 63 75 67 20 20 hxcode cug
021A90: 28 20 67 65 74 20 63 75 72 73 20 70 6F 73 20 69 ( get curs pos i
021AA0: 6E 74 6F 20 63 63 2C 20 63 6C 29 20 20 20 20 20 nto cc, cl)
021AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021AC0: 20 63 64 20 63 2C 20 62 62 37 38 20 2C 20 31 36 cd c, bb78 , 16
021AD0: 20 63 2C 20 20 30 20 63 2C 20 28 20 63 61 6C 6C c, 0 c, ( call
021AE0: 20 74 78 74 20 67 65 74 20 63 75 72 73 20 20 6C txt get curs l
021AF0: 64 20 64 2C 30 29 20 20 20 20 20 20 20 20 20 20 d d,0)
021B00: 20 35 63 20 63 2C 20 65 64 20 63 2C 20 35 33 20 5c c, ed c, 53
021B10: 63 2C 20 63 63 20 2C 20 28 20 6C 64 20 65 2C 68 c, cc , ( ld e,h
021B20: 20 20 6C 64 20 5B 63 63 5D 2C 64 65 29 20 20 20 ld [cc],de)
021B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021B40: 20 35 64 20 63 2C 20 65 64 20 63 2C 20 35 33 20 5d c, ed c, 53
021B50: 63 2C 20 63 6C 20 2C 20 28 20 6C 64 20 65 2C 6C c, cl , ( ld e,l
021B60: 20 20 6C 64 20 5B 63 6C 5D 2C 64 65 29 20 20 20 ld [cl],de)
021B70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021B80: 20 63 33 20 63 2C 20 6E 65 78 74 20 2C 20 73 6D c3 c, next , sm
021B90: 75 64 67 65 20 20 20 20 20 20 20 20 20 20 20 20 udge
021BA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021BC0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
021BD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021BE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021BF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021C00: 20 32 62 31 62 20 2C 20 31 38 20 63 2C 20 66 32 2b1b , 18 c, f2
021C10: 20 63 2C 20 28 20 64 65 63 20 64 65 20 20 64 65 c, ( dec de de
021C20: 63 20 68 6C 20 20 6A 72 20 6C 6F 6F 70 32 29 20 c hl jr loop2)
021C30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021C40: 20 63 31 20 63 2C 20 63 33 20 63 2C 20 6E 65 78 c1 c, c3 c, nex
021C50: 74 20 2C 20 73 6D 75 64 67 65 20 20 20 28 20 65 t , smudge ( e
021C60: 78 69 74 29 20 20 20 20 20 20 20 20 20 20 20 20 xit)
021C70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021C80: 68 78 63 6F 64 65 20 64 65 6C 20 20 28 20 64 65 hxcode del ( de
021C90: 6C 65 74 65 20 74 31 20 63 68 61 72 73 20 61 74 lete t1 chars at
021CA0: 20 63 75 72 73 6F 72 29 20 20 63 35 20 63 2C 20 cursor) c5 c,
021CB0: 28 20 70 75 73 68 20 62 63 29 20 20 20 20 20 20 ( push bc)
021CC0: 20 32 61 20 63 2C 20 6D 61 20 2C 20 65 64 20 63 2a c, ma , ed c
021CD0: 2C 20 34 62 20 63 2C 20 74 31 20 2C 20 28 20 6C , 4b c, t1 , ( l
021CE0: 64 20 68 6C 2C 5B 6D 61 5D 20 20 6C 64 20 62 63 d hl,[ma] ld bc
021CF0: 2C 5B 73 68 69 66 74 5D 29 20 20 20 20 20 20 20 ,[shift])
021D00: 20 35 64 35 34 20 2C 20 20 39 20 63 2C 20 20 28 5d54 , 9 c, (
021D10: 20 6C 64 20 64 2C 68 20 20 6C 64 20 65 2C 6C 20 ld d,h ld e,l
021D20: 20 20 61 64 64 20 68 6C 2C 62 63 29 20 20 20 20 add hl,bc)
021D30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021D40: 20 30 31 20 63 2C 20 6C 69 6D 69 74 20 2C 20 20 01 c, limit ,
021D50: 20 20 20 28 20 6C 64 20 62 63 2C 20 6D 65 6D 6F ( ld bc, memo
021D60: 72 79 20 74 6F 70 20 29 20 20 20 20 20 20 20 20 ry top )
021D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021D80: 20 62 37 20 63 2C 20 65 64 20 63 2C 20 34 32 20 b7 c, ed c, 42
021D90: 63 2C 20 28 20 6C 6F 6F 70 3A 20 6F 72 20 61 20 c, ( loop: or a
021DA0: 20 73 62 63 20 68 6C 2C 62 63 29 20 20 20 20 20 sbc hl,bc)
021DB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021DC0: 20 33 30 20 63 2C 20 20 39 20 63 2C 20 20 39 20 30 c, 9 c, 9
021DD0: 63 2C 20 28 20 6A 72 20 6E 63 2C 20 65 78 69 74 c, ( jr nc, exit
021DE0: 20 20 20 61 64 64 20 68 6C 2C 62 63 29 20 20 20 add hl,bc)
021DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021E00: 68 78 63 6F 64 65 20 63 75 73 20 28 20 73 65 74 hxcode cus ( set
021E10: 20 63 75 72 73 20 70 6F 73 20 66 72 6F 6D 20 63 curs pos from c
021E20: 63 2C 20 63 6C 29 20 20 20 20 20 20 20 20 20 20 c, cl)
021E30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021E40: 20 65 64 20 63 2C 20 35 62 20 63 2C 20 63 63 20 ed c, 5b c, cc
021E50: 2C 20 36 33 20 63 2C 20 28 20 6C 64 20 64 65 2C , 63 c, ( ld de,
021E60: 5B 63 63 5D 20 20 6C 64 20 68 2C 65 29 20 20 20 [cc] ld h,e)
021E70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021E80: 20 65 64 20 63 2C 20 35 62 20 63 2C 20 63 6C 20 ed c, 5b c, cl
021E90: 2C 20 36 62 20 63 2C 20 28 20 6C 64 20 64 65 2C , 6b c, ( ld de,
021EA0: 5B 63 6C 5D 20 20 6C 64 20 6C 2C 65 29 20 20 20 [cl] ld l,e)
021EB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021EC0: 20 63 64 20 63 2C 20 62 62 37 35 20 2C 20 63 33 cd c, bb75 , c3
021ED0: 20 63 2C 20 6E 65 78 74 20 2C 20 73 6D 75 64 67 c, next , smudg
021EE0: 65 20 20 28 20 63 61 6C 6C 20 74 78 74 20 73 65 e ( call txt se
021EF0: 74 20 63 75 72 20 20 65 78 69 74 29 20 20 20 20 t cur exit)
021F00: 68 78 63 6F 64 65 20 6B 65 79 64 65 66 20 20 63 hxcode keydef c
021F10: 35 20 63 2C 20 28 20 70 75 73 68 20 62 63 29 20 5 c, ( push bc)
021F20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021F40: 20 33 65 20 63 2C 20 20 30 20 63 2C 20 36 20 63 3e c, 0 c, 6 c
021F50: 2C 20 20 62 20 63 2C 20 63 64 20 63 2C 20 62 62 , b c, cd c, bb
021F60: 32 37 20 2C 20 28 20 6E 75 2F 61 3D 77 75 70 29 27 , ( nu/a=wup)
021F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021F80: 20 33 65 20 63 2C 20 20 30 20 63 2C 20 36 20 63 3e c, 0 c, 6 c
021F90: 2C 20 20 35 20 63 2C 20 63 64 20 63 2C 20 62 62 , 5 c, cd c, bb
021FA0: 32 64 20 2C 20 28 20 73 75 2F 61 3D 35 29 20 20 2d , ( su/a=5)
021FB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
021FC0: 20 33 65 20 63 2C 20 20 31 20 63 2C 20 36 20 63 3e c, 1 c, 6 c
021FD0: 2C 20 20 39 20 63 2C 20 63 64 20 63 2C 20 62 62 , 9 c, cd c, bb
021FE0: 32 37 20 2C 20 28 20 6E 72 2F 61 3D 77 72 74 29 27 , ( nr/a=wrt)
021FF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022000: 20 37 65 20 63 2C 20 33 36 20 63 2C 20 32 30 20 7e c, 36 c, 20
022010: 63 2C 20 31 32 20 63 2C 20 28 20 6C 64 20 61 2C c, 12 c, ( ld a,
022020: 5B 68 6C 5D 20 6C 64 20 5B 68 6C 5D 2C 73 70 61 [hl] ld [hl],spa
022030: 63 65 20 6C 64 20 5B 64 65 5D 2C 61 29 20 20 20 ce ld [de],a)
022040: 20 32 33 31 33 20 2C 20 31 38 20 63 2C 20 66 32 2313 , 18 c, f2
022050: 20 63 2C 20 28 20 69 6E 63 20 64 65 20 20 69 6E c, ( inc de in
022060: 63 20 68 6C 20 20 6A 72 20 6C 6F 6F 70 29 20 20 c hl jr loop)
022070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022080: 20 63 31 20 63 2C 20 63 33 20 63 2C 20 6E 65 78 c1 c, c3 c, nex
022090: 74 20 2C 20 73 6D 75 64 67 65 20 20 20 28 20 65 t , smudge ( e
0220A0: 78 69 74 29 20 20 20 20 20 20 20 20 20 20 20 20 xit)
0220B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0220C0: 68 78 63 6F 64 65 20 61 6D 69 74 20 28 20 63 20 hxcode amit ( c
0220D0: 2D 2D 2D 20 29 20 28 20 70 72 69 6E 74 73 20 61 --- ) ( prints a
0220E0: 6C 6C 20 63 6F 64 65 73 20 76 69 61 20 74 78 74 ll codes via txt
0220F0: 20 77 72 20 63 68 72 29 20 20 20 20 20 20 20 20 wr chr)
022100: 20 65 31 20 63 2C 20 63 35 20 63 2C 20 37 64 20 e1 c, c5 c, 7d
022110: 63 2C 20 63 64 20 63 2C 20 62 62 35 64 20 2C 20 c, cd c, bb5d ,
022120: 63 31 20 63 2C 20 63 33 20 63 2C 20 6E 65 78 74 c1 c, c3 c, next
022130: 20 2C 20 73 6D 75 64 67 65 20 20 20 20 20 20 20 , smudge
022140: 64 65 63 69 6D 61 6C 20 20 20 20 20 20 20 20 20 decimal
022150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022180: 3A 20 64 69 73 70 20 28 20 66 72 6F 6D 20 6D 61 : disp ( from ma
022190: 20 74 6F 20 65 6E 64 20 6F 66 20 63 75 72 72 65 to end of curre
0221A0: 6E 74 20 64 69 73 70 6C 61 79 2C 20 72 65 73 65 nt display, rese
0221B0: 74 20 63 75 72 73 6F 72 29 20 20 20 20 20 20 20 t cursor)
0221C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
0221D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0221E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0221F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022200: 20 33 65 20 63 2C 20 20 32 20 63 2C 20 36 20 63 3e c, 2 c, 6 c
022210: 2C 20 20 61 20 63 2C 20 63 64 20 63 2C 20 62 62 , a c, cd c, bb
022220: 32 37 20 2C 20 28 20 6E 64 2F 61 3D 77 64 6E 29 27 , ( nd/a=wdn)
022230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022240: 20 33 65 20 63 2C 20 20 32 20 63 2C 20 36 20 63 3e c, 2 c, 6 c
022250: 2C 20 20 36 20 63 2C 20 63 64 20 63 2C 20 62 62 , 6 c, cd c, bb
022260: 32 64 20 2C 20 28 20 73 64 2F 61 3D 36 29 20 20 2d , ( sd/a=6)
022270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022280: 20 33 65 20 63 2C 20 20 38 20 63 2C 20 36 20 63 3e c, 8 c, 6 c
022290: 2C 20 20 38 20 63 2C 20 63 64 20 63 2C 20 62 62 , 8 c, cd c, bb
0222A0: 32 37 20 2C 20 28 20 6E 6C 2F 61 3D 77 6C 74 29 27 , ( nl/a=wlt)
0222B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0222C0: 20 33 65 20 63 2C 20 20 39 20 63 2C 20 36 20 63 3e c, 9 c, 6 c
0222D0: 2C 20 20 66 20 63 2C 20 63 64 20 63 2C 20 62 62 , f c, cd c, bb
0222E0: 32 37 20 2C 20 28 20 6E 63 6F 70 79 3D 31 35 29 27 , ( ncopy=15)
0222F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022300: 20 33 65 20 63 2C 20 34 34 20 63 2C 20 36 20 63 3e c, 44 c, 6 c
022310: 2C 20 20 31 20 63 2C 20 63 64 20 63 2C 20 62 62 , 1 c, cd c, bb
022320: 32 37 20 2C 20 28 20 6E 74 61 62 3D 31 29 20 20 27 , ( ntab=1)
022330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022340: 20 33 65 20 63 2C 20 34 34 20 63 2C 20 36 20 63 3e c, 44 c, 6 c
022350: 2C 20 20 32 20 63 2C 20 63 64 20 63 2C 20 62 62 , 2 c, cd c, bb
022360: 32 64 20 2C 20 28 20 73 74 61 62 3D 32 29 20 20 2d , ( stab=2)
022370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022380: 20 33 65 20 63 2C 20 34 66 20 63 2C 20 36 20 63 3e c, 4f c, 6 c
022390: 2C 20 20 33 20 63 2C 20 63 64 20 63 2C 20 62 62 , 3 c, cd c, bb
0223A0: 32 37 20 2C 20 28 20 6E 64 65 6C 3D 33 29 20 20 27 , ( ndel=3)
0223B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0223C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
0223D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0223E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0223F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022400: 20 74 6C 20 40 20 64 6C 20 2B 20 63 68 20 2A 20 tl @ dl + ch *
022410: 66 69 72 73 74 20 2B 20 31 20 2D 20 6D 61 20 40 first + 1 - ma @
022420: 20 64 6F 20 69 20 40 20 61 6D 69 74 20 31 20 2F do i @ amit 1 /
022430: 6C 6F 6F 70 20 63 75 73 20 3B 20 20 20 20 20 20 loop cus ;
022440: 3A 20 6E 6F 3F 20 28 20 61 63 63 65 70 74 20 61 : no? ( accept a
022450: 20 76 61 6C 69 64 20 6C 69 6E 65 20 6E 75 6D 62 valid line numb
022460: 65 72 29 20 20 20 20 20 37 20 65 6D 69 74 20 20 er) 7 emit
022470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022480: 20 31 20 71 75 65 72 79 20 31 33 20 77 6F 72 64 1 query 13 word
022490: 20 20 20 20 20 20 64 75 70 20 64 75 70 20 63 40 dup dup c@
0224A0: 20 31 2B 20 2B 20 73 77 61 70 20 31 2B 20 64 6F 1+ + swap 1+ do
0224B0: 20 69 20 63 40 20 62 61 73 65 20 40 20 20 20 20 i c@ base @
0224C0: 20 64 69 67 69 74 20 69 66 20 64 72 6F 70 20 65 digit if drop e
0224D0: 6C 73 65 20 30 3D 20 6C 65 61 76 65 20 74 68 65 lse 0= leave the
0224E0: 6E 20 31 20 2F 6C 6F 6F 70 20 64 75 70 20 68 65 n 1 /loop dup he
0224F0: 72 65 20 73 77 61 70 20 20 20 20 20 20 20 20 20 re swap
022500: 20 69 66 20 6E 75 6D 62 65 72 20 64 72 6F 70 20 if number drop
022510: 73 77 61 70 20 65 6C 73 65 20 38 30 20 30 20 66 swap else 80 0 f
022520: 69 6C 6C 20 74 68 65 6E 20 64 75 70 20 69 66 20 ill then dup if
022530: 73 77 61 70 20 64 75 70 20 64 75 70 20 20 20 20 swap dup dup
022540: 20 30 3C 20 73 77 61 70 20 6D 6C 20 3E 20 6F 72 0< swap ml > or
022550: 20 69 66 20 64 72 6F 70 20 30 3D 20 65 6C 73 65 if drop 0= else
022560: 20 73 77 61 70 20 74 68 65 6E 20 74 68 65 6E 20 swap then then
022570: 63 75 73 20 3B 20 20 20 20 20 20 20 20 20 20 20 cus ;
022580: 3A 20 24 3D 20 28 20 73 74 72 69 6E 67 20 6D 61 : $= ( string ma
022590: 74 63 68 29 20 73 77 61 70 20 3F 64 75 70 20 69 tch) swap ?dup i
0225A0: 66 20 6F 76 65 72 20 2B 20 73 77 61 70 20 64 6F f over + swap do
0225B0: 20 64 75 70 20 63 40 20 20 20 20 20 20 20 20 20 dup c@
0225C0: 20 69 20 63 40 20 2D 20 69 66 20 30 3D 20 6C 65 i c@ - if 0= le
0225D0: 61 76 65 20 65 6C 73 65 20 31 2B 20 74 68 65 6E ave else 1+ then
0225E0: 20 31 20 2F 6C 6F 6F 70 20 65 6C 73 65 20 64 72 1 /loop else dr
0225F0: 6F 70 20 30 3D 20 74 68 65 6E 20 3B 20 20 20 20 op 0= then ;
022600: 20 33 65 20 63 2C 20 34 66 20 63 2C 20 36 20 63 3e c, 4f c, 6 c
022610: 2C 20 20 34 20 63 2C 20 63 64 20 63 2C 20 62 62 , 4 c, cd c, bb
022620: 32 64 20 2C 20 28 20 73 64 65 6C 3D 34 29 20 20 2d , ( sdel=4)
022630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022640: 20 63 31 20 63 2C 20 63 33 20 63 2C 20 6E 65 78 c1 c, c3 c, nex
022650: 74 20 2C 20 73 6D 75 64 67 65 20 20 20 28 20 70 t , smudge ( p
022660: 6F 70 20 62 63 20 20 20 65 78 69 74 29 20 20 20 op bc exit)
022670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022680: 68 78 63 6F 64 65 20 69 6E 73 20 28 20 69 6E 73 hxcode ins ( ins
022690: 65 72 74 20 74 31 2B 31 20 73 70 61 63 65 73 20 ert t1+1 spaces
0226A0: 61 74 20 63 75 72 73 6F 72 29 20 20 63 35 20 63 at cursor) c5 c
0226B0: 2C 20 28 20 70 75 73 68 20 62 63 29 20 20 20 20 , ( push bc)
0226C0: 20 32 31 20 63 2C 20 6C 69 6D 69 74 20 2C 20 32 21 c, limit , 2
0226D0: 62 20 63 2C 20 20 28 20 6C 64 20 68 6C 2C 20 6D b c, ( ld hl, m
0226E0: 65 6D 6F 72 79 20 74 6F 70 20 20 20 64 65 63 20 emory top dec
0226F0: 68 6C 29 20 20 20 20 20 20 20 20 20 20 20 20 20 hl)
022700: 20 65 64 20 63 2C 20 34 62 20 63 2C 20 74 31 20 ed c, 4b c, t1
022710: 2C 20 35 64 35 34 20 2C 20 28 20 6C 64 20 62 63 , 5d54 , ( ld bc
022720: 2C 5B 73 68 69 66 74 5D 20 20 6C 64 20 64 2C 68 ,[shift] ld d,h
022730: 20 20 6C 64 20 65 2C 6C 29 20 20 20 20 20 20 20 ld e,l)
022740: 20 20 33 20 63 2C 20 31 61 20 63 2C 20 31 62 20 3 c, 1a c, 1b
022750: 63 2C 20 20 20 20 20 20 20 28 20 69 6E 63 20 62 c, ( inc b
022760: 63 20 20 6C 6F 6F 70 31 3A 20 6C 64 20 61 2C 5B c loop1: ld a,[
022770: 64 65 5D 20 20 64 65 63 20 64 65 29 20 20 20 20 de] dec de)
022780: 20 66 65 20 63 2C 20 32 31 20 63 2C 20 33 38 20 fe c, 21 c, 38
022790: 63 2C 20 66 61 20 63 2C 20 28 20 63 70 20 22 21 c, fa c, ( cp "!
0227A0: 22 20 20 6A 72 20 63 2C 20 6C 6F 6F 70 31 29 20 " jr c, loop1)
0227B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0227C0: 20 31 33 20 63 2C 20 65 64 20 63 2C 20 35 32 20 13 c, ed c, 52
0227D0: 63 2C 20 28 20 69 6E 63 20 64 65 20 20 73 62 63 c, ( inc de sbc
0227E0: 20 68 6C 2C 64 65 29 20 20 20 20 20 20 20 20 20 hl,de)
0227F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022800: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
022810: 1D 00 01 00 02 09 4E E5 1D 00 C1 02 00 00 00 02 ......N.........
022820: 1D 00 C6 02 00 00 00 02 1D 00 C2 02 00 00 00 02 ................
022830: 1D 00 C7 02 00 00 00 02 1D 00 C3 02 00 00 00 02 ................
022840: 1D 00 C8 02 00 00 00 02 1D 00 C4 02 00 00 00 02 ................
022850: 1D 00 C9 02 00 00 00 02 1D 00 C5 02 00 00 00 02 ................
022860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022900: 3A 20 72 6F 75 6E 64 20 5B 20 73 6D 75 64 67 65 : round [ smudge
022910: 20 5D 20 28 20 63 61 6C 6C 65 64 20 72 65 63 75 ] ( called recu
022920: 72 73 69 76 65 6C 79 20 62 79 20 73 65 61 72 63 rsively by searc
022930: 68 29 20 62 65 67 69 6E 20 20 20 20 20 20 20 20 h) begin
022940: 20 20 20 62 65 67 69 6E 20 62 65 67 69 6E 20 20 begin begin
022950: 63 75 67 20 74 6C 20 40 20 63 6C 20 40 20 32 20 cug tl @ cl @ 2
022960: 2D 20 2B 20 64 75 70 20 64 75 70 20 64 64 75 70 - + dup dup ddup
022970: 20 74 31 20 21 20 20 20 20 20 20 20 20 20 20 20 t1 !
022980: 20 20 20 20 20 20 20 20 20 20 32 20 65 6D 69 74 2 emit
022990: 20 33 30 20 65 6D 69 74 20 20 34 20 2E 72 20 35 30 emit 4 .r 5
0229A0: 20 73 70 61 63 65 73 20 31 36 20 2F 6D 6F 64 20 spaces 16 /mod
0229B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0229C0: 20 20 20 20 20 20 20 20 20 20 31 2B 20 32 20 2E 1+ 2 .
0229D0: 72 20 35 38 20 65 6D 69 74 20 32 20 2E 72 20 63 r 58 emit 2 .r c
0229E0: 75 73 20 33 20 65 6D 69 74 20 20 20 20 20 20 20 us 3 emit
0229F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022A00: 20 20 20 20 20 20 20 20 20 20 30 3C 20 73 77 61 0< swa
022A10: 70 20 6D 6C 20 3E 20 6F 72 20 77 68 69 6C 65 20 p ml > or while
022A20: 31 31 20 74 31 20 40 20 30 3C 20 69 66 20 31 20 11 t1 @ 0< if 1
022A30: 2D 20 74 68 65 6E 20 65 6D 69 74 20 20 20 20 20 - then emit
022A40: 20 20 20 20 20 20 20 20 20 20 37 20 65 6D 69 74 7 emit
022A50: 20 72 65 70 65 61 74 20 2E 73 20 20 20 20 20 20 repeat .s
022A60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022A70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022A80: 20 20 20 20 63 6C 20 40 20 64 75 70 20 33 20 3C cl @ dup 3 <
022A90: 20 73 77 61 70 20 64 6C 20 3E 20 6F 72 20 77 68 swap dl > or wh
022AA0: 69 6C 65 20 64 6C 20 32 20 2F 20 63 6C 20 40 20 ile dl 2 / cl @
022AB0: 64 75 70 20 33 20 3C 20 20 20 20 20 20 20 20 20 dup 3 <
022AC0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
022AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022AE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022AF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022B00: 20 2E 22 20 6E 6F 72 6D 61 6C 20 63 75 72 73 6F ." normal curso
022B10: 72 20 6B 65 79 73 2C 20 20 73 68 69 66 74 65 64 r keys, shifted
022B20: 20 22 20 32 34 31 20 32 34 30 20 65 6D 69 74 20 " 241 240 emit
022B30: 73 70 61 63 65 20 65 6D 69 74 20 20 20 20 20 20 space emit
022B40: 20 2E 22 20 20 3A 20 70 61 67 65 20 74 6F 67 67 ." : page togg
022B50: 6C 65 22 20 63 72 20 2E 22 20 53 70 65 63 69 61 le" cr ." Specia
022B60: 6C 20 66 75 6E 63 74 69 6F 6E 20 6B 65 79 73 20 l function keys
022B70: 3A 22 20 63 72 20 20 20 20 20 20 20 20 20 20 20 :" cr
022B80: 20 2E 22 20 43 4C 52 20 65 78 69 74 22 20 63 72 ." CLR exit" cr
022B90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022BA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022BC0: 20 2E 22 20 6E 6F 72 6D 61 6C 2F 73 68 69 66 74 ." normal/shift
022BD0: 20 3A 20 54 41 42 20 69 6E 73 65 72 74 20 73 70 : TAB insert sp
022BE0: 61 63 65 2F 73 2C 20 44 45 4C 20 64 65 6C 65 74 ace/s, DEL delet
022BF0: 65 20 63 68 61 72 2F 73 22 20 63 72 20 20 20 20 e char/s" cr
022C00: 20 2E 22 20 20 20 28 69 6E 73 65 72 74 69 6F 6E ." (insertion
022C10: 20 6F 6E 6C 79 20 69 66 20 74 68 65 72 65 20 69 only if there i
022C20: 73 20 66 72 65 65 20 73 70 61 63 65 20 61 74 20 s free space at
022C30: 65 6E 64 29 22 20 63 72 20 20 20 20 20 20 20 20 end)" cr
022C40: 20 2E 22 20 20 20 28 63 6F 6E 66 69 72 6D 20 6D ." (confirm m
022C50: 75 6C 74 69 70 6C 65 20 64 65 6C 65 74 65 20 62 ultiple delete b
022C60: 79 20 53 48 49 46 54 2B 44 45 4C 29 22 20 63 72 y SHIFT+DEL)" cr
022C70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022C80: 20 2E 22 20 43 54 52 4C 2B 4E 20 73 65 61 72 63 ." CTRL+N searc
022C90: 68 20 3A 22 20 63 72 20 20 20 20 20 20 20 20 20 h :" cr
022CA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022CC0: 20 2E 22 20 20 65 6E 74 65 72 20 73 74 72 69 6E ." enter strin
022CD0: 67 3B 20 63 6F 6E 74 20 62 79 20 43 4C 52 20 75 g; cont by CLR u
022CE0: 6E 74 69 6C 20 70 61 70 65 72 20 63 68 61 6E 67 ntil paper chang
022CF0: 65 73 21 22 20 63 72 20 20 20 20 20 20 20 20 20 es!" cr
022D00: 20 20 20 20 69 66 20 73 77 61 70 20 6E 65 67 61 if swap nega
022D10: 74 65 20 31 2B 20 20 2B 20 65 6C 73 65 20 73 77 te 1+ + else sw
022D20: 61 70 20 2D 20 74 68 65 6E 20 20 20 20 20 20 20 ap - then
022D30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022D40: 20 20 20 20 74 6C 20 40 20 2B 20 64 6C 20 6E 65 tl @ + dl ne
022D50: 67 61 74 65 20 6D 61 78 20 6D 6C 20 6D 69 6E 20 gate max ml min
022D60: 64 75 70 20 74 6C 20 21 20 20 20 20 20 20 20 20 dup tl !
022D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022D80: 20 20 20 20 63 68 20 2A 20 66 69 72 73 74 20 2B ch * first +
022D90: 20 6D 61 20 21 20 20 33 30 20 65 6D 69 74 20 31 ma ! 30 emit 1
022DA0: 35 20 73 70 61 63 65 73 20 63 72 20 64 6C 20 32 5 spaces cr dl 2
022DB0: 20 2F 20 63 6C 20 21 20 64 69 73 70 20 20 20 20 / cl ! disp
022DC0: 20 20 20 72 65 70 65 61 74 20 20 20 20 20 20 20 repeat
022DD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022DE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022E00: 20 74 31 20 40 20 63 68 20 2A 20 66 69 72 73 74 t1 @ ch * first
022E10: 20 2B 20 63 63 20 40 20 31 20 2D 20 2B 20 6D 61 + cc @ 1 - + ma
022E20: 20 21 20 6B 65 79 20 31 32 37 20 61 6E 64 20 20 ! key 127 and
022E30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022E40: 20 64 75 70 20 20 31 20 3D 20 69 66 20 64 72 6F dup 1 = if dro
022E50: 70 20 30 20 30 20 74 31 20 21 20 69 6E 73 20 74 p 0 0 t1 ! ins t
022E60: 68 65 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 hen
022E70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022E80: 20 64 75 70 20 20 32 20 3D 20 69 66 20 64 72 6F dup 2 = if dro
022E90: 70 20 30 20 63 68 20 63 63 20 40 20 2D 20 74 31 p 0 ch cc @ - t1
022EA0: 20 21 20 69 6E 73 20 74 68 65 6E 20 20 20 20 20 ! ins then
022EB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022EC0: 20 64 75 70 20 20 33 20 3D 20 69 66 20 64 72 6F dup 3 = if dro
022ED0: 70 20 30 20 31 20 74 31 20 21 20 64 65 6C 20 74 p 0 1 t1 ! del t
022EE0: 68 65 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 hen
022EF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022F00: 20 2E 22 20 43 54 52 4C 2B 4C 20 67 6F 74 6F 20 ." CTRL+L goto
022F10: 3A 20 65 6E 74 65 72 20 61 62 73 20 6C 69 6E 65 : enter abs line
022F20: 20 6E 6F 22 20 63 72 20 20 20 20 20 20 20 20 20 no" cr
022F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022F40: 20 2E 22 20 43 4F 50 59 20 63 6F 70 79 20 6C 69 ." COPY copy li
022F50: 6E 65 20 3A 20 65 6E 74 65 72 20 61 62 73 20 6C ne : enter abs l
022F60: 69 6E 65 20 6E 6F 3B 20 63 6F 6E 66 69 72 6D 20 ine no; confirm
022F70: 62 79 20 43 4F 50 59 22 20 63 72 20 63 72 20 20 by COPY" cr cr
022F80: 20 2E 22 20 44 6F 20 6E 6F 74 20 75 73 65 20 74 ." Do not use t
022F90: 68 65 20 6C 61 73 74 20 63 68 61 72 61 63 74 65 he last characte
022FA0: 72 20 6F 6E 20 61 6E 79 20 73 63 72 65 65 6E 2E r on any screen.
022FB0: 22 20 63 72 20 63 72 20 20 20 20 20 20 20 20 20 " cr cr
022FC0: 20 2E 22 20 45 72 61 73 65 20 61 6C 6C 20 73 63 ." Erase all sc
022FD0: 72 65 65 6E 73 20 28 6E 2F 59 29 20 3F 22 20 37 reens (n/Y) ?" 7
022FE0: 20 65 6D 69 74 20 6B 65 79 64 65 66 20 20 63 72 emit keydef cr
022FF0: 20 20 6B 65 79 20 38 39 20 3D 20 20 20 20 20 20 key 89 =
023000: 20 69 66 20 65 6D 70 74 79 2D 62 75 66 66 65 72 if empty-buffer
023010: 73 20 2E 22 20 65 72 61 73 65 64 22 20 65 6C 73 s ." erased" els
023020: 65 20 2E 22 20 63 6F 6E 76 65 72 74 69 6E 67 20 e ." converting
023030: 6E 6F 6E 2D 70 72 69 6E 74 69 6E 67 20 63 6F 64 non-printing cod
023040: 65 73 20 74 6F 20 62 6C 61 6E 6B 73 22 20 6C 69 es to blanks" li
023050: 6D 69 74 20 66 69 72 73 74 20 64 6F 20 69 20 63 mit first do i c
023060: 40 20 62 6C 20 6D 61 78 20 20 69 20 63 21 20 31 @ bl max i c! 1
023070: 20 2F 6C 6F 6F 70 20 74 68 65 6E 20 63 72 20 20 /loop then cr
023080: 20 2E 22 20 70 72 65 73 73 20 61 20 6B 65 79 20 ." press a key
023090: 22 20 37 20 65 6D 69 74 20 6B 65 79 20 73 70 21 " 7 emit key sp!
0230A0: 20 32 34 20 30 20 63 68 20 31 2D 20 20 30 20 77 24 0 ch 1- 0 w
0230B0: 69 6E 64 6F 77 20 20 20 20 20 20 20 20 20 20 20 indow
0230C0: 20 33 30 20 65 6D 69 74 20 20 38 20 74 6C 20 21 30 emit 8 tl !
0230D0: 20 72 6F 75 6E 64 20 20 65 73 63 65 6E 20 20 20 round escen
0230E0: 77 61 72 6D 20 3B 20 20 20 37 20 65 6D 69 74 20 warm ; 7 emit
0230F0: 20 20 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 -->
023100: 20 64 75 70 20 20 34 20 3D 20 69 66 20 64 72 6F dup 4 = if dro
023110: 70 20 30 20 32 34 20 65 6D 69 74 20 63 68 20 63 p 0 24 emit ch c
023120: 63 20 40 20 2D 20 31 2B 20 64 75 70 20 74 31 20 c @ - 1+ dup t1
023130: 21 20 6D 61 20 40 20 73 77 61 70 20 20 20 20 20 ! ma @ swap
023140: 20 20 74 79 70 65 20 2E 22 20 63 6F 6E 66 69 72 type ." confir
023150: 6D 22 20 63 75 73 20 32 34 20 65 6D 69 74 20 6B m" cus 24 emit k
023160: 65 79 20 34 20 3D 20 69 66 20 64 65 6C 20 74 68 ey 4 = if del th
023170: 65 6E 20 74 68 65 6E 20 20 20 20 20 20 20 20 20 en then
023180: 20 64 75 70 20 31 32 20 3D 20 69 66 20 64 72 6F dup 12 = if dro
023190: 70 20 30 20 32 34 20 65 6D 69 74 20 31 38 20 65 p 0 24 emit 18 e
0231A0: 6D 69 74 20 2E 22 20 67 6F 74 6F 20 6C 69 6E 65 mit ." goto line
0231B0: 20 3A 22 20 6E 6F 3F 20 20 20 20 20 20 20 20 20 :" no?
0231C0: 20 20 69 66 20 74 6C 20 21 20 64 72 6F 70 20 35 if tl ! drop 5
0231D0: 20 74 68 65 6E 20 32 34 20 65 6D 69 74 20 74 68 then 24 emit th
0231E0: 65 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 en
0231F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023200: 20 64 75 70 20 31 33 20 3D 20 69 66 20 63 72 20 dup 13 = if cr
023210: 74 68 65 6E 20 20 20 20 20 20 20 20 20 20 20 20 then
023220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023240: 20 64 75 70 20 31 34 20 3D 20 69 66 20 64 72 6F dup 14 = if dro
023250: 70 20 74 31 20 40 20 74 32 20 21 20 32 36 20 32 p t1 @ t2 ! 26 2
023260: 36 20 31 20 69 6E 6B 20 2E 22 20 73 65 61 72 63 6 1 ink ." searc
023270: 68 20 3A 22 20 71 75 65 72 79 20 20 20 20 20 20 h :" query
023280: 20 31 33 20 77 6F 72 64 20 64 72 6F 70 20 6C 69 13 word drop li
023290: 6D 69 74 20 66 69 72 73 74 20 64 6F 20 32 20 33 mit first do 2 3
0232A0: 20 65 6D 69 74 20 65 6D 69 74 20 69 20 68 65 72 emit emit i her
0232B0: 65 20 63 40 20 68 65 72 65 20 31 2B 20 24 3D 20 e c@ here 1+ $=
0232C0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
0232D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0232E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0232F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023300: 28 20 44 65 6D 6F 6E 73 74 72 61 74 69 6F 6E 20 ( Demonstration
023310: 6F 66 20 63 6F 6D 6D 61 6E 64 73 20 74 6F 20 64 of commands to d
023320: 69 73 61 62 6C 65 20 2F 20 65 6E 61 62 6C 65 20 isable / enable
023330: 74 68 65 20 45 53 43 20 74 72 61 70 29 20 20 20 the ESC trap)
023340: 28 20 65 73 63 64 69 73 20 64 69 73 61 62 6C 65 ( escdis disable
023350: 73 2C 20 65 73 63 65 6E 20 65 6E 61 62 6C 65 73 s, escen enables
023360: 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
023370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023380: 28 20 55 73 65 20 45 53 43 44 49 53 20 6F 6E 6C ( Use ESCDIS onl
023390: 79 20 77 68 65 6E 20 70 72 6F 67 72 61 6D 6D 65 y when programme
0233A0: 20 69 73 20 66 75 6C 6C 79 20 64 65 2D 62 75 67 is fully de-bug
0233B0: 67 65 64 2C 20 61 6E 64 20 20 20 20 20 20 20 20 ged, and
0233C0: 20 20 72 65 6D 65 6D 62 65 72 20 74 6F 20 72 65 remember to re
0233D0: 2D 65 6E 61 62 6C 65 20 62 79 20 45 53 43 45 4E -enable by ESCEN
0233E0: 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 )
0233F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023400: 28 20 54 68 65 72 65 20 69 73 20 6E 6F 20 77 61 ( There is no wa
023410: 79 20 6F 66 20 73 74 6F 70 70 69 6E 67 20 61 20 y of stopping a
023420: 72 75 6E 2D 61 77 61 79 20 70 72 6F 67 72 61 6D run-away program
023430: 6D 65 20 77 68 65 6E 20 74 68 65 20 20 20 20 20 me when the
023440: 20 20 45 53 43 20 6B 65 79 20 69 73 20 64 69 73 ESC key is dis
023450: 61 62 6C 65 64 2C 20 73 68 6F 72 74 20 6F 66 20 abled, short of
023460: 63 6F 6D 70 6C 65 74 65 20 52 45 53 45 54 20 29 complete RESET )
023470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023480: 28 20 44 65 6D 6F 6E 73 74 72 61 74 69 6F 6E 20 ( Demonstration
023490: 6F 66 20 73 70 65 65 64 20 64 69 66 66 65 72 65 of speed differe
0234A0: 6E 63 65 2C 20 64 6F 20 6E 6F 74 20 69 6E 63 6C nce, do not incl
0234B0: 75 64 65 20 69 6E 20 73 79 73 74 65 6D 29 20 20 ude in system)
0234C0: 3A 20 6C 6F 6F 70 30 2D 39 39 20 20 20 31 30 30 : loop0-99 100
0234D0: 20 30 20 64 6F 20 69 20 2E 20 6C 6F 6F 70 20 3B 0 do i . loop ;
0234E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0234F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023500: 20 20 69 66 20 69 20 66 69 72 73 74 20 2D 20 63 if i first - c
023510: 68 20 2F 20 74 6C 20 21 20 33 30 20 37 20 65 6D h / tl ! 30 7 em
023520: 69 74 20 65 6D 69 74 20 72 6F 75 6E 64 20 31 33 it emit round 13
023530: 20 65 6D 69 74 20 68 65 72 65 20 31 2B 20 20 20 emit here 1+
023540: 20 20 68 65 72 65 20 63 40 20 74 79 70 65 20 74 here c@ type t
023550: 68 65 6E 20 31 20 2F 6C 6F 6F 70 20 20 32 34 20 hen 1 /loop 24
023560: 32 34 20 31 20 69 6E 6B 20 74 32 20 40 20 74 6C 24 1 ink t2 @ tl
023570: 20 21 20 37 20 65 6D 69 74 20 35 20 74 68 65 6E ! 7 emit 5 then
023580: 20 20 64 75 70 20 31 35 20 3D 20 69 66 20 64 72 dup 15 = if dr
023590: 6F 70 20 30 20 32 34 20 65 6D 69 74 20 31 38 20 op 0 24 emit 18
0235A0: 65 6D 69 74 20 2E 22 20 63 6F 70 79 20 6C 69 6E emit ." copy lin
0235B0: 65 20 3A 22 20 6E 6F 3F 20 20 20 20 20 20 20 20 e :" no?
0235C0: 20 20 20 20 20 69 66 20 63 68 20 2A 20 66 69 72 if ch * fir
0235D0: 73 74 20 2B 20 64 75 70 20 74 31 20 21 20 63 68 st + dup t1 ! ch
0235E0: 20 74 79 70 65 20 2E 22 20 63 6F 6E 66 69 72 6D type ." confirm
0235F0: 22 20 63 75 73 20 6B 65 79 20 20 20 20 20 20 20 " cus key
023600: 20 20 20 20 20 31 35 20 3D 20 69 66 20 74 31 20 15 = if t1
023610: 40 20 6D 61 20 40 20 63 68 20 63 6D 6F 76 65 20 @ ma @ ch cmove
023620: 74 68 65 6E 20 74 68 65 6E 20 32 34 20 65 6D 69 then then 24 emi
023630: 74 20 74 68 65 6E 20 20 20 20 20 20 20 20 20 20 t then
023640: 20 20 64 75 70 20 20 30 3D 20 20 69 66 20 64 69 dup 0= if di
023650: 73 70 20 62 65 67 69 6E 20 3F 74 65 72 6D 69 6E sp begin ?termin
023660: 61 6C 20 30 3D 20 75 6E 74 69 6C 20 74 68 65 6E al 0= until then
023670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023680: 20 20 64 75 70 20 20 35 20 3D 20 69 66 20 33 30 dup 5 = if 30
023690: 20 65 6D 69 74 20 74 68 65 6E 20 20 20 20 20 20 emit then
0236A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0236B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0236C0: 20 20 64 75 70 20 20 36 20 3D 20 69 66 20 32 34 dup 6 = if 24
0236D0: 20 63 6C 20 21 20 63 75 73 20 74 68 65 6E 20 20 cl ! cus then
0236E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0236F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023700: 3A 20 65 73 63 64 65 6D 6F 20 28 20 2D 2D 20 29 : escdemo ( -- )
023710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023740: 20 20 62 65 67 69 6E 20 20 63 72 20 37 20 65 6D begin cr 7 em
023750: 69 74 20 63 72 20 2E 22 20 65 73 63 64 65 6D 6F it cr ." escdemo
023760: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "
023770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023780: 20 20 20 63 72 20 2E 22 20 45 6E 64 6C 65 73 73 cr ." Endless
023790: 20 6C 6F 6F 70 2C 20 63 61 6E 20 62 65 20 73 74 loop, can be st
0237A0: 6F 70 70 65 64 20 6F 6E 6C 79 20 77 68 65 6E 20 opped only when
0237B0: 45 53 43 20 74 72 61 70 20 69 73 20 6F 6E 2C 20 ESC trap is on,
0237C0: 62 79 20 70 72 65 73 73 69 6E 67 20 45 53 43 20 by pressing ESC
0237D0: 74 77 69 63 65 22 20 20 20 20 20 20 20 20 20 20 twice"
0237E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0237F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023800: 20 20 20 63 72 20 65 73 63 64 69 73 20 2E 22 20 cr escdis ."
023810: 45 53 43 20 74 72 61 70 20 6F 66 66 20 3A 20 22 ESC trap off : "
023820: 20 6C 6F 6F 70 30 2D 39 39 20 20 20 20 20 20 20 loop0-99
023830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023840: 20 20 20 63 72 20 65 73 63 65 6E 20 20 2E 22 20 cr escen ."
023850: 45 53 43 20 74 72 61 70 20 6F 6E 20 20 3A 20 22 ESC trap on : "
023860: 20 6C 6F 6F 70 30 2D 39 39 20 20 20 20 20 20 20 loop0-99
023870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023880: 20 20 61 67 61 69 6E 20 3B 20 20 20 20 20 20 20 again ;
023890: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0238A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0238B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0238C0: 20 65 73 63 64 65 6D 6F 20 20 20 20 20 20 20 20 escdemo
0238D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0238E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0238F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023900: 20 20 64 75 70 20 64 75 70 20 62 6C 20 3C 20 73 dup dup bl < s
023910: 77 61 70 20 31 36 20 3E 20 61 6E 64 20 69 66 20 wap 16 > and if
023920: 64 72 6F 70 20 37 20 74 68 65 6E 20 20 20 20 20 drop 7 then
023930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023940: 20 20 64 75 70 20 64 64 75 70 20 65 6D 69 74 20 dup ddup emit
023950: 62 6C 20 3C 20 30 3D 20 69 66 20 6D 61 20 40 20 bl < 0= if ma @
023960: 63 21 20 65 6C 73 65 20 64 72 6F 70 20 74 68 65 c! else drop the
023970: 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n
023980: 20 31 36 20 3D 20 75 6E 74 69 6C 20 3B 20 20 73 16 = until ; s
023990: 6D 75 64 67 65 20 20 20 20 20 20 20 20 20 20 20 mudge
0239A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0239B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0239C0: 20 3A 20 73 63 72 65 64 20 64 65 63 69 6D 61 6C : scred decimal
0239D0: 20 65 73 63 64 69 73 20 32 20 6D 6F 64 65 20 32 escdis 2 mode 2
0239E0: 34 20 32 34 20 31 20 69 6E 6B 20 30 20 70 65 6E 4 24 1 ink 0 pen
0239F0: 20 31 20 70 61 70 65 72 20 63 72 20 63 72 20 20 1 paper cr cr
023A00: 20 2E 22 20 53 63 72 65 65 6E 20 45 64 69 74 6F ." Screen Edito
023A10: 72 20 66 6F 72 20 63 70 63 46 54 48 32 20 20 38 r for cpcFTH2 8
023A20: 37 30 33 31 32 22 20 20 20 20 20 20 20 63 72 20 70312" cr
023A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023A40: 20 2E 22 20 50 2E 20 4C 75 6B 65 73 2C 20 32 36 ." P. Lukes, 26
023A50: 20 4E 6F 6C 6C 20 53 74 2E 2C 20 54 6F 6F 77 6F Noll St., Toowo
023A60: 6F 6D 62 61 2C 20 34 33 35 30 22 20 63 72 20 20 omba, 4350" cr
023A70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023A80: 20 20 6D 6C 20 31 2B 20 2E 20 2E 22 20 6C 69 6E ml 1+ . ." lin
023A90: 65 73 2C 20 73 68 6F 77 6E 20 61 73 3A 20 20 61 es, shown as: a
023AA0: 62 73 20 6C 69 6E 65 20 20 20 73 63 72 3A 6C 69 bs line scr:li
023AB0: 6E 65 20 69 6E 20 73 63 72 22 20 63 72 20 20 20 ne in scr" cr
023AC0: 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 20 20 20 -->
023AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023AE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023AF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
023B00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
023B10: 1E 00 01 00 02 09 4E E5 1E 00 C1 02 00 00 00 02 ......N.........
023B20: 1E 00 C6 02 00 00 00 02 1E 00 C2 02 00 00 00 02 ................
023B30: 1E 00 C7 02 00 00 00 02 1E 00 C3 02 00 00 00 02 ................
023B40: 1E 00 C8 02 00 00 00 02 1E 00 C4 02 00 00 00 02 ................
023B50: 1E 00 C9 02 00 00 00 02 1E 00 C5 02 00 00 00 02 ................
023B60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023B70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023B80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023B90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0240A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0240B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0240C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0240D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0240E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0240F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0241A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0241B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0241C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0241D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0241E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0241F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0242A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0242B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0242C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0242D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0242E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0242F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0243A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0243B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0243C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0243D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0243E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0243F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0244A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0244B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0244C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0244D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0244E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0244F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0245A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0245B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0245C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0245D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0245E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0245F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0246A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0246B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0246C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0246D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0246E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0246F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0247A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0247B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0247C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0247D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0247E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0247F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0248A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0248B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0248C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0248D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0248E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0248F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0249A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0249B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0249C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0249D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0249E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0249F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024E00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
024E10: 1F 00 01 00 02 09 4E E5 1F 00 C1 02 00 00 00 02 ......N.........
024E20: 1F 00 C6 02 00 00 00 02 1F 00 C2 02 00 00 00 02 ................
024E30: 1F 00 C7 02 00 00 00 02 1F 00 C3 02 00 00 00 02 ................
024E40: 1F 00 C8 02 00 00 00 02 1F 00 C4 02 00 00 00 02 ................
024E50: 1F 00 C9 02 00 00 00 02 1F 00 C5 02 00 00 00 02 ................
024E60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024E70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024E80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024E90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
024FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0250A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0250B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0250C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0250D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0250E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0250F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0251A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0251B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0251C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0251D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0251E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0251F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0252A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0252B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0252C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0252D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0252E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0252F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0253A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0253B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0253C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0253D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0253E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0253F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0254A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0254B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0254C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0254D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0254E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0254F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0255A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0255B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0255C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0255D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0255E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0255F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0256A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0256B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0256C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0256D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0256E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0256F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0257A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0257B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0257C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0257D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0257E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0257F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0258A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0258B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0258C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0258D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0258E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0258F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0259A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0259B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0259C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0259D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0259E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0259F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
025FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0260A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0260B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0260C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0260D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0260E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0260F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026100: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
026110: 20 00 01 00 02 09 4E E5 20 00 C1 02 00 00 00 02 .....N. .......
026120: 20 00 C6 02 00 00 00 02 20 00 C2 02 00 00 00 02 ....... .......
026130: 20 00 C7 02 00 00 00 02 20 00 C3 02 00 00 00 02 ....... .......
026140: 20 00 C8 02 00 00 00 02 20 00 C4 02 00 00 00 02 ....... .......
026150: 20 00 C9 02 00 00 00 02 20 00 C5 02 00 00 00 02 ....... .......
026160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
026170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
026180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
026190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
026200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0262A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0262B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0262C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0262D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0262E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0262F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0263A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0263B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0263C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0263D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0263E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0263F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0266A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0266B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0266C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0266D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0266E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0266F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0267A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0267B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0267C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0267D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0267E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0267F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0268A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0268B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0268C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0268D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0268E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0268F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0269A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0269B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0269C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0269D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0269E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0269F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0270A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0270B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0270C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0270D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0270E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0270F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0271A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0271B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0271C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0271D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0271E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0271F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0272A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0272B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0272C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0272D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0272E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0272F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0273A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0273B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0273C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0273D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0273E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0273F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027400: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
027410: 21 00 01 00 02 09 4E E5 21 00 C1 02 00 00 00 02 !.....N.!.......
027420: 21 00 C6 02 00 00 00 02 21 00 C2 02 00 00 00 02 !.......!.......
027430: 21 00 C7 02 00 00 00 02 21 00 C3 02 00 00 00 02 !.......!.......
027440: 21 00 C8 02 00 00 00 02 21 00 C4 02 00 00 00 02 !.......!.......
027450: 21 00 C9 02 00 00 00 02 21 00 C5 02 00 00 00 02 !.......!.......
027460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
027470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
027480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
027490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
027500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0275A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0275B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0275C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0275D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0275E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0275F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0276A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0276B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0276C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0276D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0276E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0276F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0277A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0277B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0277C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0277D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0277E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0277F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0278A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0278B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0278C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0278D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0278E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0278F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0279A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0279B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0279C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0279D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0279E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0279F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0280A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0280B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0280C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0280D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0280E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0280F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0281A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0281B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0281C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0281D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0281E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0281F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0282A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0282B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0282C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0282D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0282E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0282F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0283A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0283B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0283C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0283D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0283E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0283F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0284A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0284B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0284C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0284D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0284E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0284F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0285A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0285B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0285C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0285D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0285E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0285F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0286A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0286B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0286C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0286D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0286E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0286F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028700: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
028710: 22 00 01 00 02 09 4E E5 22 00 C1 02 00 00 00 02 ".....N.".......
028720: 22 00 C6 02 00 00 00 02 22 00 C2 02 00 00 00 02 ".......".......
028730: 22 00 C7 02 00 00 00 02 22 00 C3 02 00 00 00 02 ".......".......
028740: 22 00 C8 02 00 00 00 02 22 00 C4 02 00 00 00 02 ".......".......
028750: 22 00 C9 02 00 00 00 02 22 00 C5 02 00 00 00 02 ".......".......
028760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0288A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0288B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0288C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0288D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0288E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0288F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0289A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0289B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0289C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0289D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0289E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0289F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0290A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0290B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0290C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0290D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0290E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0290F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0291A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0291B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0291C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0291D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0291E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0291F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0292A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0292B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0292C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0292D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0292E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0292F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0293A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0293B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0293C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0293D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0293E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0293F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0294A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0294B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0294C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0294D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0294E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0294F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0295A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0295B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0295C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0295D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0295E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0295F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0296A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0296B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0296C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0296D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0296E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0296F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0297A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0297B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0297C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0297D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0297E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0297F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0298A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0298B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0298C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0298D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0298E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0298F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0299A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0299B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0299C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0299D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0299E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0299F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
029A10: 23 00 01 00 02 09 4E E5 23 00 C1 02 00 00 00 02 #.....N.#.......
029A20: 23 00 C6 02 00 00 00 02 23 00 C2 02 00 00 00 02 #.......#.......
029A30: 23 00 C7 02 00 00 00 02 23 00 C3 02 00 00 00 02 #.......#.......
029A40: 23 00 C8 02 00 00 00 02 23 00 C4 02 00 00 00 02 #.......#.......
029A50: 23 00 C9 02 00 00 00 02 23 00 C5 02 00 00 00 02 #.......#.......
029A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
029FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A0A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A0B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A0C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A0D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A0E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A0F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A1A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A1B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A1C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A1D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A1E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A1F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A2A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A2B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A2C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A2D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A2E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A2F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A3A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A3B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A3C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A3D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A3E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A3F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A4A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A4B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A4C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A4D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A4E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A4F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A5A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A5B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A5C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A5D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A5E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A5F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A6A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A6B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A6C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A6D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A6E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A6F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A7A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A7B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A7C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A7D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A7E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A7F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A8A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A8B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A8C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A8D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A8E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A8F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A9A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A9B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A9C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A9D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A9E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02A9F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AA90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AAA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AAB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AAC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AAD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AAE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AAF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AB90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ABA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ABB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ABC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ABD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ABE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ABF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AC90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ACA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ACB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ACC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ACD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ACE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ACF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AD00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02AD10: 24 00 01 00 02 09 4E E5 24 00 C1 02 00 00 00 02 $.....N.$.......
02AD20: 24 00 C6 02 00 00 00 02 24 00 C2 02 00 00 00 02 $.......$.......
02AD30: 24 00 C7 02 00 00 00 02 24 00 C3 02 00 00 00 02 $.......$.......
02AD40: 24 00 C8 02 00 00 00 02 24 00 C4 02 00 00 00 02 $.......$.......
02AD50: 24 00 C9 02 00 00 00 02 24 00 C5 02 00 00 00 02 $.......$.......
02AD60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AD70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AD80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AD90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AE00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AE90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AEA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AEB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AEC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AEE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AEF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AF90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AFA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AFB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AFC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AFD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AFE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02AFF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B0A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B0B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B0C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B0D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B0E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B0F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B1A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B1B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B1C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B1D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B1E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B1F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B2A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B2B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B2C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B2D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B2E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B2F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B3A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B3B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B3C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B3D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B3E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B3F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B4A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B4B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B4C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B4D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B4E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B4F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B5A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B5B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B5C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B5D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B5E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B5F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B6A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B6B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B6C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B6D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B6E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B6F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B7A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B7B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B7C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B7D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B7E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B7F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B8A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B8B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B8C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B8D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B8E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B8F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B9A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B9B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B9C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B9D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B9E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02B9F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BCA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BCB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BCC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BCD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BCE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BCF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BD90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BDA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BDB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BDC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BDD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BDE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BDF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BE90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BEA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BEB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BEC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BEE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BEF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BF90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BFA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BFB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BFC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BFD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BFE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BFF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02C010: 25 00 01 00 02 09 4E E5 25 00 C1 02 00 00 00 02 %.....N.%.......
02C020: 25 00 C6 02 00 00 00 02 25 00 C2 02 00 00 00 02 %.......%.......
02C030: 25 00 C7 02 00 00 00 02 25 00 C3 02 00 00 00 02 %.......%.......
02C040: 25 00 C8 02 00 00 00 02 25 00 C4 02 00 00 00 02 %.......%.......
02C050: 25 00 C9 02 00 00 00 02 25 00 C5 02 00 00 00 02 %.......%.......
02C060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C1A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C1B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C1C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C1D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C1E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C1F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C2A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C2B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C2C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C2D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C2E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C2F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C3A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C3B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C3C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C3D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C3E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C3F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C4A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C4B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C4C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C4D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C4E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C4F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C5A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C5B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C5C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C5D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C5E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C5F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C6A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C6B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C6C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C6D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C6E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C6F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C7A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C7B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C7C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C7D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C7E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C7F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C8A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C8B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C8C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C8D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C8E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C8F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CBA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CBB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CBC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CBD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CBE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CBF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CC90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CCA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CCB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CCC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CCD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CCE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CCF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CD90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CDA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CDB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CDC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CDD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CDE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CDF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CE90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CEA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CEB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CEC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CEE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CEF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CF90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CFA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CFB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CFC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CFD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CFE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CFF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D0A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D0B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D0C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D0D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D0E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D0F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D1A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D1B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D1C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D1D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D1E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D1F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D2A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D2B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D2C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D2D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D2E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D2F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02D310: 26 00 01 00 02 09 4E E5 26 00 C1 02 00 00 00 02 &.....N.&.......
02D320: 26 00 C6 02 00 00 00 02 26 00 C2 02 00 00 00 02 &.......&.......
02D330: 26 00 C7 02 00 00 00 02 26 00 C3 02 00 00 00 02 &.......&.......
02D340: 26 00 C8 02 00 00 00 02 26 00 C4 02 00 00 00 02 &.......&.......
02D350: 26 00 C9 02 00 00 00 02 26 00 C5 02 00 00 00 02 &.......&.......
02D360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D4A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D4B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D4C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D4D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D4E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D4F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D5A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D5B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D5C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D5D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D5E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D5F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D6A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D6B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D6C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D6D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D6E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D6F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D7A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D7B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D7C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D7D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D7E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D7F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D8A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D8B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D8C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D8D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D8E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D8F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D9A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D9B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D9C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D9D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D9E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02D9F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DA90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DAA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DAB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DAC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DAD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DAE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DAF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DB90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DBA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DBB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DBC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DBD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DBE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DBF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DC90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DCA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DCB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DCC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DCD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DCE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DCF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DD90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DDA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DDB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DDC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DDD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DDE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DDF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DE90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DEA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DEB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DEC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DEE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DEF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DF90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DFA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DFB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DFC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DFD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DFE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02DFF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E2A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E2B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E2C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E2D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E2E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E2F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E3A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E3B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E3C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E3D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E3E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E3F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E4A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E4B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E4C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E4D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E4E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E4F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E5A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E5B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E5C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E5D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E5E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E5F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02E610: 27 00 01 00 02 09 4E E5 27 00 C1 02 00 00 00 02 '.....N.'.......
02E620: 27 00 C6 02 00 00 00 02 27 00 C2 02 00 00 00 02 '.......'.......
02E630: 27 00 C7 02 00 00 00 02 27 00 C3 02 00 00 00 02 '.......'.......
02E640: 27 00 C8 02 00 00 00 02 27 00 C4 02 00 00 00 02 '.......'.......
02E650: 27 00 C9 02 00 00 00 02 27 00 C5 02 00 00 00 02 '.......'.......
02E660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E7A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E7B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E7C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E7D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E7E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E7F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E8A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E8B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E8C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E8D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E8E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E8F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E9A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E9B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E9C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E9D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E9E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E9F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EA90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EAA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EAB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EAC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EAD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EAE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EAF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EB90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EBA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EBB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EBC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EBD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EBE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EBF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EC90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ECA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ECB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ECC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ECD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ECE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ECF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02ED90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EDA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EDB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EDC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EDD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EDE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EDF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EE90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EEA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EEB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EEC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EEE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EEF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EF90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EFA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EFB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EFC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EFD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EFE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02EFF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F0A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F0B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F0C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F0D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F0E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F0F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F1A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F1B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F1C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F1D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F1E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F1F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F2A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F2B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F2C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F2D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F2E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F2F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F3A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F3B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F3C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F3D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F3E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F3F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F4A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F4B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F4C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F4D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F4E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F4F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F5A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F5B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F5C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F5D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F5E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F5F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F6A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F6B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F6C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F6D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F6E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F6F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F7A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F7B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F7C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F7D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F7E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F7F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F8A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F8B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F8C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F8D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F8E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F8F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02F900: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02F910: 28 00 01 00 02 09 4E E5 28 00 C1 02 00 00 00 02 (.....N.(.......
02F920: 28 00 C6 02 00 00 00 02 28 00 C2 02 00 00 00 02 (.......(.......
02F930: 28 00 C7 02 00 00 00 02 28 00 C3 02 00 00 00 02 (.......(.......
02F940: 28 00 C8 02 00 00 00 02 28 00 C4 02 00 00 00 02 (.......(.......
02F950: 28 00 C9 02 00 00 00 02 28 00 C5 02 00 00 00 02 (.......(.......
02F960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F9A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F9B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F9C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F9D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F9E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F9F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02FA00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FA90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FAA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FAB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FAC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FAD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FAE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FAF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FB90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FBA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FBB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FBC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FBD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FBE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FBF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FC90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FCA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FCB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FCC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FCD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FCE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FCF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FD90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FDA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FDB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FDC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FDD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FDE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FDF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FE90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FEA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FEB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FEC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FEE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FEF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FF90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FFA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FFB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FFC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FFD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FFE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02FFF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0300A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0300B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0300C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0300D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0300E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0300F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0301A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0301B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0301C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0301D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0301E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0301F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0302A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0302B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0302C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0302D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0302E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0302F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0303A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0303B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0303C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0303D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0303E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0303F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0304A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0304B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0304C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0304D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0304E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0304F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0305A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0305B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0305C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0305D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0305E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0305F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0306A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0306B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0306C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0306D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0306E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0306F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0307A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0307B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0307C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0307D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0307E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0307F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0308A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0308B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0308C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0308D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0308E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0308F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0309A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0309B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0309C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0309D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0309E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0309F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030C00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
030C10: 29 00 01 00 02 09 4E E5 29 00 C1 02 00 00 00 02 ).....N.).......
030C20: 29 00 C6 02 00 00 00 02 29 00 C2 02 00 00 00 02 ).......).......
030C30: 29 00 C7 02 00 00 00 02 29 00 C3 02 00 00 00 02 ).......).......
030C40: 29 00 C8 02 00 00 00 02 29 00 C4 02 00 00 00 02 ).......).......
030C50: 29 00 C9 02 00 00 00 02 29 00 C5 02 00 00 00 02 ).......).......
030C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030CE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
030D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
030FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0310A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0310B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0310C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0310D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0310E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0310F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0311A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0311B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0311C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0311D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0311E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0311F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0312A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0312B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0312C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0312D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0312E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0312F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0313A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0313B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0313C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0313D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0313E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0313F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0314A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0314B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0314C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0314D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0314E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0314F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0315A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0315B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0315C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0315D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0315E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0315F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0316A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0316B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0316C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0316D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0316E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0316F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0317A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0317B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0317C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0317D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0317E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0317F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0318A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0318B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0318C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0318D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0318E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0318F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0319A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0319B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0319C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0319D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0319E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0319F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
031EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
RESULT OF SEARCH :
PRO=112 CHEA=0 COD=45 MUSI=0 COP=28 GRA=52 WRIT=17 198=12 199=0 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
PRO=112 CHEA=0 COD=45 MUSI=0 COP=28 GRA=52 WRIT=17 198=12 199=0 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
EXTENDED CPC DSK File SAMdisk160220* NAMEND1 FTH0BENCH FTH8 CPCFTH2 BINA
DEBUG FTH0DECOMP FTH FORTH BINU!"#$%&'()*+FORTH TXT8,-./012FORTH3A TXT(34
567FORTH3B TXT889FORTH4A TXT ABFORTH4B TXTCDEFGHIJKLMNFORTH5A TXTOFORTH5B TXTPQR
FORTH6 TXT(STUVWGLOSS1 FTHXXYZabGO FTHcdefghijCPCFTH2 BINA FORTH TXT6 R
EADER BASSCRED2 FTHPDEBUG FTH0 !"#$FORTH6 TXT%%&'()FORTH5A TXT*FORTH5B TXT+
,-HANOI FTH./0123456789DECOMP FTHFORTH3A TXT$AFORTH3B TXT5BCDEFGHGLOSS1 FTHU
IJKLMNOPQRSAMEND1 $$$GOFORTH TXTklmHANOI FTHnopqrstuvwxyPERMS FTHzSCRED2 F
THPCPCFTH2 BINA FORTH TXT6 READER BASSCRED2 FTHPPPfPPPN((N((v(NNN((N((P((N((
N((v(NNN((N((P((PPNSPPNPPNSPP((8((8((PNSPPNv(v(NPLLLLDDDDDLLDPPPIIIIx(((DPIXX,((
(TTDPPPII(TDPIIIi((((T(9(99'9 Down At Dollis Brook(Y(Ii!iCPCFTH2 BINA FORTH TX
T6 READER BASSCRED2 FTHPDEBUG FTH0 !"#$FORTH6 TXT%%&'()FORTH5A TXT*FORTH5B
TXT+,-HANOI FTH./0123456789DECOMP FTHFORTH3A TXT$AFORTH3B TXT5BCDEFGHGLOSS1
FTHUIJKLMNOPQRSAMEND1 $$$ N y#'# 7GW # # The Roman Fort # # wwwww% w
# wwwww #w#Ww Njorl's Dragonboat (IIg gggGgg g g!g!g!g#gGW wwW"w0 wwiwwnb2#gj2
# 8zsza8zszHP''HOggPO00a00a002202200220c33c'E 'E iiiiiiI((IIPUUAUPIP2U1Ii(((((Ii
(&w G G G G G # # $# ##&w Seen My Ballista W # #!!%''(" Jenny Goes Spinning #'
#w#$ # w w # wWWWWWW # Missile Silo #47 '# #W # ##ww !#%w!Gw ##ww%w w# w !#
w #!G%ww#w(After The Holocaust # &## " # # g CPCFTH2 BINA FORTH TXT6
READER BASSCRED2 FTHPDEBUG FTH0 !"#$FORTH6 TXT%%&'()FORTH5A TXT*FORTH5B TX
T+,-HANOI FTH./0123456789DECOMP FTHFORTH3A TXT$AFORTH3B TXT5BCDEFGHGLOSS1 FT
HUIJKLMNOPQRSAMEND1 FTH,TUVWXYBENCH $$$ +,Heli-Hunter Station ggWggWWWgggg W
wg gg WwWgg#'# # # # # $ # #01 West of Dome 9 W 7GGWGGGGGG(i777777777 77
7 777CPCFTH2 BINA FORTH TXT6 READER BASSCRED2 FTHPDEBUG FTH0 !"#$FORTH6 T
XT%%&'()FORTH5A TXT*FORTH5B TXT+,-HANOI FTH./0123456789DECOMP FTHFORTH3A TXT$
AFORTH3B TXT5BCDEFGHGLOSS1 FTHUIJKLMNOPQRSAMEND1 FTH,TUVWXYBENCH $$$77$w%W G
# G G % # # The End Of Time % $#G79x'(97lG79 RB2g#wSwwX# 29 Nnx0 x..Zw(S
SG$KKR SSF#wwSSHXPX NCPCFTH2 BINA FORTH TXT6 READER BASSCRED2 FTHP(96(96)6)
,69&69,69,9)96)96(((()69)96,,9669))(((()),,,,))(((()69)96,,9669))(((((,,(0000000
000000000((((3333333333333333333333333333"3"333333333333333333333333333"333"3"""
""""""333"""""""""333"""""""""333"""""""""3"3""""""H,H(,,H,b(,H,( 00 0$t t 033"b
3w333"TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTUTTTT3333333333IQI
Q t TTTTTTTTTTTTTTTTTTTTTTTTTTO 00000000000000000 O O((0000vvT (ATDTE E3gO333333
"333333"3"&s"*"3"*3s3g O333"3"6666"(3U333U""((#")(")#i(((ii(((ii(((i((i(((ii(((i
i(((ii(((ii(((ii((i(((ii(((ii(((i((((((U(U(U(TTDDDAIAA(x(9(x(9(x(9((UU(A,9336OOw
3333www8u3333333c33c33'51,99,51,51 U(U(U(U(U(U(U(U(U(U(U(U(U(U(U(U(U(U(U(LLLLLL
0 0Q0 T0T0P0P0T0 DU00000 llllLLHHRITDEMO BINHj,,RITDEMO $$$ 228!pMn+
.(2jp "%qn! H!uZ! !#'m!q"8l"l!r"l"l4lmk!"ql!'qMn! q'mKk!00"q"q 2ql!r"8l"l!v"l"l
4l !pX2qn#F GIm!ml!#k###!#NFlOOkO0GdkG0qplk###LLE Q s" E/E"*OU *E "sEQ 3*/ Q OE
EE*"Q " "E7E7"'g EQEQ*E " 3OQEEg Eg" g"EUg"" " QE *E"O TTTTT6)))3333333333333333
vTvv"vvTv"333333333333333"3"3 N(D//F/ D//F/Ml*wtl*wGNllw&i))&h)!r"q!v"q!fl!!£q2
£q((*q !r"q.!.0/"q&*q !v"q.!.0"q%qlK%qlKR0+"%qg.U)0qz*q0Pjp(!kpF#N+8F#N#2z!!&nTu
t +DwDwFN qp FNqpwNwNw&oTutV&njRwJ+w#wK++loo pGJ-fin/-trailinegePd .7"Pu" FqY"
YGy.linC y.j/loo d/mojR0)!#J0 0g0branc(AK51L#J1Tg+J2l)J, lu))))))wwutQm#(gnLp( g
n#LpnfVLp(n fV LpCmCCmZ#n#f#"qqn# &o)))))Hq*q####"q!w!#'mn!q(G !"q!q(G( #"qqG!(s
zLp####!qWn###Wn*q!"qdn#(!soo!"q*q!oq!"q0''!pbn"ql#mq Sqwww&nTV2t##J2++J2p 8Y*G+
p+q"GKBKYz$%!J!J£+loop!-findq ."%Yjy/loopf*Gw#w#Wz###"GKcodeZjcmovei++x+Ktermin
al!,Jabort")yk$jYabortk6 $blockgPrangeecmov5P LpVNFnf ( y!p'''&oT##A4p##Po0P A
re you using a Green Screen Press Y or N - Q*q.yY5 ((((((((/'OGwoLGHogg'48WAmsof
t PresentsROLAND cmovegi#xKcr*t*E6#6 Y YKdo*G++++"Gs#r#s#rKemitMY*t*E#Vr+sKexpe
ctg2j ( YPdpfillixKfind # !!I #Vz!Jinterpret qT Y%6 key t !eCPCFTH2 BINPr P
r U )rV*77!6+6S+6I+6D!3KFx o o g#VyZeo.y+Bw2eK$escdi!"K"LKesce2K!o"LKnooruca*E
#VKiniNeKwarpFcpcFORTH v. 1.1.0 / 870316F!Adapted from MVP-FORTH v. 1.01.03F(P.
LUKES, 26 Nowk&Jlinej load e unloadable u ujujloop *GwO#G'+###"GKpy##xxQCzzxHCnu
mber Y-g(.gjAvocabulary79Y8 word'g.uYjg255Y'Wicfoll St., TOOWOOMBA, Q 4350FPubli
c Domain, pay-if-you-likemodlKcasinopew!oJcasincha w#zzKcasoutope7!FoMJcasoutdir
ec(c!oJRs#rK£i '0!# #buf#notfound'strea 4 u u)qY) 2**/moh N*G++"Gs#rKy com com
pileonlycs unfinishedduloadin loadingonlypairunpairedstac '*A*stackbounds*Fbyte
sleft strea- noinputtermina #VKabor 'abort £"Pu""qY" Gab agaiP allo%anWozgJbas
Ofbegib£P)liE o gJlitera loa loo mjm*jjmmjjm/moMjjmavmigmomovy!) negat/o/g#JnexK
nextTnfVno !H#Jnumbe6doKaozgJouZf&ovelbm blanblfblocbranci#V+MDKcsKcPGc/cn&Jcfcl
eacmovP col7E 'c5 ! compil£j constan8#VKcontexfconverYi ,i i YPjjcounYccreat$q
Ynull yF duplicatedf YGIpavpapfPVpicP1y pUoffPY5 'quer4 Puqui)a Fokr£f(rSfrl*
G#V#"GKre*G#VKrepeaz-jjrolP1Yy *roIrp*GJrpGs-!z+Is sc"f*sig/-!smudg9 AspPm**E#VK
spAeApG Kcs/fcurrenfds#r#s#rKd!9q#VpogId+Add.emptyjydA dabLddroyKdduIdecima idef
inition dept'digi0 ' !IlJdlitera dnegatCWogId7doesWefsp!9Jspacspacestatf,ogswaJt
exYqYY'the£p tif toggl.CwKtravers8typK-PdurDgxDJUlgJu u/mo!9q#Vp!))ogogKuQunti%P
u6EuseP*EJvariablY8*G+p+q"GKdjfdpf dpusIdroKduJelsp ppemiempty-bufferAenclos)+#
145DK#T45DKKeprin£executZsTexig*GN#F#"GKexpecwfencffil-fin firsjflf"forgeq "not
current& *protected * * * / pGvoc-linrfvocabularwher 5))Fscr# u Fline# ))yu gu
)Y ejwhilwidtNfworj jxowozgJcompile£notfoundnameu)FName YgU APd)y)save-fort5
Fnotopen * "jfortx freezE 7' 5gher heihlf$hol hpusJhxcod38Y*G#VKiZq*G#VKijpimmed
iatAinit-fort5init-use7interpre( *G#VKker lates leav*G#V#s#rKlflimi)lis9)5Fscr
#)5 NaFerrorscr-loaOFnotopen ) scr-sav£FlengthAeFbytes5Fnotopen'aFerrorinpapeL
pehwindo--u Y.F ' eA6 8 0ZKid UeyeUvlisP to suit the human habit of counting fro
m one, but they are identified as 0 1 2 on the stack, to suit the computer.
To make it easier to follow the steps, decompile MOVES and keep a hard co
py. Words such as IF and ELSE are compiled as 0BRANCH and BRANCH 0, 1, and 2
are words (constants) which put their value on the stack, while other numbers
compile as LIT "value", where "value" appears on the stack only after LIT execut
es. DECOMP and DEBUG are powerful utilities which can show how the Pr Pr U
)rV p system works, and assist with debugging. Using MOV
ES in HANOI as an example load HANOI and exercise it to see that it works, then
load DEBUG. Enter tracemoves, thenrun HANOI choosing 3 discs and automatic mode
. Each step in MOVES will be displayed and wait for a key-press before
continuing. It will require some patience to interpret the display, but
it should be rewarding if you are interested in therecursive process.
( DEBUG LKS 870722) hex
label variable -2 allot ( header for m/c subroutines)
variable ipl variable iph variable cnt variable stepve
c ( vector) ' noop cfa stepvec ! escen next 1+ constant esc ( a
ddr of ESC routine) escdis label range ( HL-BC, sets CY if in range)
( ld hl,ipl ) 2a c, ipl , (
or a sbc hl,bc) b7 c, ed c, 42 c, ( DEBUGtx 870722)
3 load exit This is an adaptation of the DEBUG
routines in the Laxen & PerryF83. Any high level word may be executed by single
-stepping through its component words the component word is executed, the
parameter stack is displayed, and the name of the next component word is sh
own, repeated until the traced word terminates via EXIT. This is achiev
ed by vectoring the inner interpreter at NEXT alternately to the stepping word
and to ( ret nc) d0 c, ( l
d hl,iph) 2a c, iph , ( or a sbc hl,bc)
b7 c, ed c, 42 c, ( ccf ret) 3f c,
c9 c, label stpnext ( NEXT with branch to stepping word)
( call range) cd c, range , ( jr nc
,L1 33D) 30 c, 21 c, --
normal execution, where the stepping word do
es the actual display designed to provide the most relevant information.
The stepping word STEPH in this implementation is designed for the MOVES wo
rd in HANOI, so as not to interfere with the main display. It shows the recur
sive process of storing the local variables on the stack, then consuming them
as MOVES returns to two different places within the word. There is a slight pro
blemwith the peg numbering on the screen they are shown as 1 2 3, N ( ld a,cnt
inc a ld cnt,a) 3a c, cnt , 3c c, 32 c, cnt , ( cp 2 jr nz,L1 22D)
fe c, 02 c, 20 c, 16 c, ( xor a ld cnt,a) af c, 32 c, cnt ,
( ld a,cd ld next,a) 3e c, cd c, 32 c, next , ( ld
hl,esc ld next+1,hl) 21 c, esc , 22 c, next 1+ , ( restores normal cal
l to ESC) ( push bc ld hl,stepvec) c5 c, 2a
c, stepvec , ( jp next1) ( execute ) c3 c, next1 ,
stepping word must use it up and patch itself into NEXT again.) 20 1
31 emit emit emit ( locate 1,20) r .sh r ( save IP,
show stack, recover IP) ." ... " 2+ nfa id. ( show word to be
executed) 241 emit 20 emit key drop ( clear, wait for key press)
pnext ( patch NEXT to the stepping word) ' steph cfa
stepvec ! ( store CFA of STEPH in vector) This is an adaptation of the D
EBUG routines in the Laxen & Perry ( L1 jp next+3) c3 c, next 3 +
, hxcode pnext ( patch NEXT to jump to STPNEXT)
( ld a,c3 ld next,a) 3e c, c3 c, 32 c, next , ( ld hl,stpnext
ld next+1,hl) 21 c, stpnext , 22 c, next 1+ , ( jp next) c3
c, next , smudge --
( DECOMP LKS 870422
Decompiler for cpcFTH2) hex typr ( addr lgth -- ) ( prints code
s 32D to 127D only) dup 0 if over + swap do i c 7f and bl max emit
1 /loop else ddrop then id. (
addr -- ) count 1f and typr space ( safer) #. ( u -- ) 0 5 d.r spac
e ( print number in 5-char field) variable "pfa 2 allot 22 text "pfa " pad coun
t "pfa swap cmove notcolon ( pfa cfa -- )
decimal trace ( -- ) (
usage trace NAME) compile ' dup ( pfa of
NAME) cr 24 emit nfa id. 8 emit 24 emit ." " ( sho
w NAME) cfa dup dup ( cfa of NAME) o
ver 2+ ( does cfa point to pfa ) if ." Cannot trace a
machine code word." ddrop else ( a high level word)
dup ' constant 06 + literal if ." docon" else
dup ' create 69 + literal if ." dovar" else dup ' user
04 + literal if ." douse" else dup ' does 10 + literal
if ." dodoes" else ." code" then then then then cr drop dup ." pfa " #. #.
( pat is a fixed buffer from 9aH to ffH, tail-end of TIB) -- ( r# and
fld are USER variables not used by the system) ( Hotpatch) ( ' typr cfa
' type ! ' exit cfa ' type 2+ ! ) begin 2+ dup ' exit cfa literal
until ( its exit) iph ! ipl ! ( start in IPL, end in IPH)
1 cnt ! pnext ( initialize stepping) ." now s
et up for tracing ESCEN or ESCDIS disables." then cr
--
The following words display each step through the chosen word.
They may be modified to suit. These suit MOVES in HANOI. notcompile ( --
fl) ( look-behind for compile) fld ' compile cfa literal n
ot in-line ( ad1 ad2 -- ad1ad3) ( test for discontinuit
y) dup ' lit dup r# ! over ' branch or over ' 0bra
nch or over ' loop or over ' +loop or ov
er ' /loop or ( 1) if drop notcompile
( 2) if cr 2+ dup dup 4 spaces #. dup dup #. .sh ( --
) ( Display stack in frames of four) ." -- " depth if depth 2* 2+ 2
do s0 i - u. i 8 mod 0 if ." " then ( fram
e division) 2 +loop then
steph ( ip -- ) ( executed every other pass through NEXT) ( IP is the Int
erpreter Pointer, contents of reg BC pushed by STPNEXT. It points to the n
ext PF of the traced word, which contains the CFA of the word to be execut
ed. The N r# ( 3) if ddrop ( 3) else + ." to " #. ( 3) then
( 2) then ( numbers indicate matching if...else...then) ( 1) else dup
' ." swap ' abort" or ( 4) if notcompile
( 5) if 2+ dup ddup cr 4 spaces #. c + 1- swap
dup c . 18 emit count typr 18 emit ( 5)
then ( 4) then
-- jRwJ+w#wK++loo pGJ-fin/-trailinegePd .7"Pu"
FqY" YGy.linC y.j/loo d/mojR0)!#J0 0g0branc(AK51L#J1Tg+J2l)J( 1) then dup fld
! ( decompile to examine conditionals) colonex ( addr -- addr fl) ( exits
from colon definitions) dup ' exit over ' code or
colondef ( pfa cfa -- ) ( colon definitions only) ." docol"
fld ! "pfa pat 4 cmove ( - pfa) begin cr dup dup pat 4 ty
pr #. ( ad1 -- ad1 ad1) dup #. 2+ dup nfa id. (
- ad1 ad2) colonex not while pat 4 blank in-line 2
t##J2++J2p 8Y*G+p+q"GKBKYz$%!J!J£+loop!-findq ."%Yjy/loopf*Gw#w#Wz###"GKcodeZjc
movei++x+Kterminal!,Jabort")yk$jYabortk6 $blockgPrangeecmov5P 2+ repeat ddr
op decomp ( -- ) ( decompile followi
ng word) sp! escen cr compile '
( - pfa) dup nfa dup ." nfa " #. dup c . id. cr ( - pfa) dup
lfa dup ." lfa " #. dup #. id. cr ( - pfa) dup cfa dup ." cfa "
#. dup #. ( - pfa cfa) dup ' 16 + literal
if colondef else notcolon then .s cr D to 127D only) c
movegi#xKcr*t*E6#6 Y YKdo*G++++"Gs#r#s#rKemitMY*t*E#Vr+sKexpectg2j ( YPdpfillix
Kfind # !!I #Vz!Jinterpret qT Y%6 key t !eFORTH BIN))n ESC trap is on, by p
ressing ESC twice)FESC trap off *77!6+6S+6I+6D!3KF6***o o g#VyZeo.y+Bw2eK$escdi!
"K"LKesce2K!o"LKnooruca*E#VKiniNeKwarpFcpcFORTH v. 1.1.0 / 870316F!Adapted from
MVP-FORTH v. 1.01.03F(P. LUKES, 26 Nowk&Jlinej load e unloadable u ujujloop *GwO
#G'+###"GKpy##xxQCzzxHCnumber Y-g(.gjAvocabulary79Y8 word'g.uYjg255Y'Wicfoll St.
, TOOWOOMBA, Q 4350FPublic Domain, pay-if-you-likemodlKcasinopew!oJcasincha w#zz
Kcasoutope7!FoMJcasoutdirec(c!oJRs#rK£i '0!# #buf#notfound'strea 4 u u)qY) 2**/
moh N*G++"Gs#rKy com compileonlycs unfinishedduloadin loadingonlypairunpaireds
tac '*A*stackbounds*Fbytesleft strea- noinputtermina #VKabor 'abort £"Pu""qY"
Gab agaiP allo%anWozgJbasOfbegib£P)liE o gJlitera loa loo mjm*jjmmjjm/moMjjmavmi
gmomovy!) negat/o/g#JnexKnextTnfVno !H#Jnumbe6doKaozgJouZf&ovelbm blanblfblocbra
nci#V+MDKcsKcPGc/cn&JcfcleacmovP col7E 'c5 ! compil£j constan8#VKcontexfconverY
i ,i i YPjjcounYccreat$qYnull yF duplicatedf YGIpavpapfPVpicP1y pUoffPY5 'que
r4 Puqui)a Fokr£f(rSfrl*G#V#"GKre*G#VKrepeaz-jjrolP1Yy *roIrp*GJrpGs-!z+Is sc"f
*sig/-!smudg9 AspPm**E#VKspAeApG Kcs/fcurrenfds#r#s#rKd!9q#VpogId+Add.emptyjydA
dabLddroyKdduIdecima idefinition dept'digi0 ' !IlJdlitera dnegatCWogId7doesWefsp
!9Jspacspacestatf,ogswaJtexYqYY'the£p tif toggl.CwKtravers8typK-PdurDgxDJUlgJu u
/mo!9q#Vp!))ogogKuQunti%P u6EuseP*EJvariablY8*G+p+q"GKdjfdpf dpusIdroKduJelsp pp
emiempty-bufferAenclos)+#145DK#T45DKKeprin£executZsTexig*GN#F#"GKexpecwfencffil-
fin firsjflf"forgeq "notcurrent& *protected * * * / pGvoc-linrfvocabularwher 5
))Fscr# u Fline# ))yu gu )Y ejwhilwidtNfworj jxowozgJcompile£notfoundnameu)FNa
me YgU APd)y)save-fort5Fnotopen * "jfort6*freezE 7' 5gher heihlf$hol hpusJhxco
d38Y*G#VKiZq*G#VKijpimmediatAinit-fort5init-use7interpre( *G#VKker lates leav*G
#V#s#rKlflimi)lis9)5Fscr #)5 NaFerrorscr-loaOFnotopen ) scr-sav£FlengthAeFbyte
s5Fnotopen'aFerrorinpapeLpehwindo--u Y.F ' eA6 8 0ZKid UeyeUvlisP TRL+N search )
F/ enter string cont by CLR until paper changes!)FCTRL+L goto enter abs line no
)F3COPY copy line enter abs line no confirm by COPY))F,Do not use the last char
acter on any screen.))FErase all screens (n/Y) b!)Y FerasedDF'converting non-pri
nting codes to blanksAPd)Fpress a key k e 0#!loop0-9&descdem*))Fescdemo)FLEndles
s loop, can be stopped only whePr Pr U )rV p cx m d t £c £c £m!£lt!£t!£lecu!/!x
S!S !Kcu'!I!!c !kuKkeydeA!d!'-' '-''D'D-O'O-KinY!!!+K!T!8RB8kbK!B86 +Kde!!*!K!TB
06 #Kami!""Kdis" P! "PdG!no,"P qYn ESC trap is on, by pressing ESC twice)FE
SC trap off "*)FESC trap on "*iYi "PdT P g "G!$", "YPd"roun"-! ! p!pYppG! g
! P! gh p! Y !) p!3"! P!UP!!p !! ****** ****** FORTH, PART 1,
by PETR LUKES, 26 Noll St, Toowoomba 4350. ******
telephone (076) 35-5822 (The files in this journal associated with thi
s text on Forth are the kernel, CPCFTH2.BIN, and the screen editor, SCRE
D.FTH) This is the Public Domain MVP-FORTH specially adapted for the CPCs,
tape or disk (without CP/M). The available FORTHs cost about $60 with docum
entation and tutorials, while Strategy Software is selling the early ams-P!!D
Y!! yFconfirmG!!6Fgoto line e" )! #!PRFsearch qApY". 0# YyPdPR#! bFcopy l
ine e"8 ! yFconfirmG!! ! '"3" "!GFORTH, with minimal documentation for $25.
They are the Public Domain fig-FORTHs with only the extensions and tutori
als qualifying for copyright. My adaptation could be copyrighted, but ther
e is not much point in it. The FORTH itself is the binary program CPCF
TH2.BIN, 9k, with 10k of "screens", which, when compiled, take up about 3
k. In the following, each command is enclosed with back-slashes. Compul
sory spaces are indicated by underlines. "Input" means to "type!gU"! qscre(#p
PRPp))F!Screen Editor for cpcFTH2 870312)F&P. Lukes, 26 Noll St., Toowoomba, 43
50) YF,lines, shown as abs line scrline in scr)Fnormal cursor keys, shifted
F page toggle)FSpecial function keys )FCLR exit)F4normal/shift TAB insert spac
e/s, DEL delete char/s)F0 (insertion only if there is free space at end))F( (c
onfirm multiple delete by SHIFT+DEL))FC N in the command, not in
cluding the back-slashes, replacing the underlines where indicated with spa
ces, then press ENTER or RETURN." Do not confuse underlines with hyphens, w
hich are required in some routines. The sequence for trying it, assuming a
reset machine set up for tape (by tape), and the tape in position ready t
o read Input run"cpcfth2 and the tape will load, the sign-on message appea
rs. Leave the tape in position at this stage. The system will automatiFT plu
s cursor keys toggles the screens. Special function keys The TAB key will i
nsert a space, SHIFT plus TAB will insert spaces. DEL will delete a charac
ter, SHIFT plus DEL will delete characters. The insertion of spaces will o
ccur only when there is free space at the end of the screen. Confirm a mult
iple delete by SHIFT plus DEL. CTRL plus N is the search mode. Ente
r a string and, when operating, continue with CLR until the paper changes
. CTRL plus L will cause cally initialise the disc ROM 7, IF IT IS PRESENT.
Input vlist. The names of the "words" (routines) will be displayed on the
screen. Programs can be paused by pressing ESC and restarted by pressing any
other key, or stopped by pressing ESC ESC and (chr$(0)), a rectangle, will
appear on the screen. If stopped with ESC ESC, press another key to clear
the buffer. Important the ESC ESC sequence does not clear the stack it
should be cleared with sp!. To load the scrthe editor to goto a line
enter the absolute line number (not the screen line number). COPY will copy a
line, enter absolute line number and confirm by hitting COPY again.
When using the editor, do not use the last character on a screen. When m
oving from the menu into Scred you receive a message asking if you want to e
rase all screens. The SHIFT plus Y will erase all screens, although the c
ompiled program still is in memory. The small n will allow entry into the s
creen editor, which follows on the tape On a disk system input , then in
put tape when the "Name " prompt appears. The machine will beep if the rout
ine is found, else a will appear. Input scr-load and input scred2. The ta
pe will begin loading. The screen memory is used as a buffer -- the lines d
o not signify a crash. When the file has been loaded, input 1list and th
e first "screen" will be displayed. "Screen" is a term for a 1k block of
memory. A programeen editor without erasing screens, although it will tidy it
self before moving to the first screen. Before going much further, I s
uggest a back-up to another tape or disk. To reactivate the disk, input , th
en input disc. Input forgetloop099. That will erase the compiled word from
the dictionary. The source will remain on screen 10 and can be recompile
d should it be needed again. Now input save-forth and input a filename. T
he kernel and the editor will be sa is usually put together on the sc
reens, where it can be edited (source code) before being compiled into the
system (object code). Now compile the screens. Input 1load. The compila
tion will continue until screen 10, then the last word (escdemo) will
self-start. After stopping it, input scred to get into the editor to
see what FORTH programming looks like. Do not forget that exit is by p
ressing CLR. The escdemo probably will not be needed again, soved under tha
t name as a new system and the editor will not have to be compiled again
when the system is reloaded. Or the editor can be removed by forgetch (ch is
the first word of the editor) and the kernel alone saved. In this copy, the
protection must be removed first from ch before the command forgetch w
ill work. scr-save will make a copy of the screens. The printer may be tog
gled with CTRL plus Y (not P, for various reasons). scr-load will read any
ASCII file remove the --- on the last line of screen 9 simply by overs
triking it with spaces. That stops compilation at that point. In s
creen edit mode, the information at the top of the screen shows the progr
am will hold 256 lines, then it shows the "absolute" line (the one the curso
r is on), also the screen number and the line number on that screen. The m
enu title page indicates that the normal cursor keys are used to move from li
ne to line and across the lines. The SHI Nto the capacity of the screens (16k
at the moment). SCRED can be used as an ASCII processor or reader, but does
not use carriage returns or line feeds. The UK User published a tutori
al on FORTH from March '85 to August '85. There are some differences betwe
en that one and this. The best starting book is Leo Brodie's STARTING FO
RTH. It may be in the local library or it can be obtained from ETI Book Sa
les. I have not tested the system on the 6128, but I believe it a gra
nd time DECPOMPing the words that interest you. The syntax is decompvlist, e
tc. Here are Petr's comments on DECOMP *** LKS 870422 The best
way to look inside Forth is to read an assembly listing. However, this would
involve a printout of about 3500 lines. An .ASM (source code) file is ab
out 42 k long, a .PRN file about twice as long. The next best way is to us
e a decompiler, which shows how the high-level words are constructed. The
decompiler will not dis should be compatible. Only the official routines are
used. I would be very grateful for any comments about improving it. FORTH
normally works in integers, but there is a floating point package which I
have, along with an assembler and other utilities, all in the Public Domain.
Scred appeared in the Aust. User, but this version has enough differenc
es in it to make it a different program. The tape routines (not disk)
turn off the cursor for some reason. scred will tassemble machine language
routines, but will indicate where they are. Each named word has two fields
of header, whose addresses are called NFA and LFA. Name field (NFA) con
sists of a length byte whose bit 7 is set (bit 6 may also be set to indica
te an immediate word), then the name (up to 31 decimal or 1F hexadecimal cha
racters long) with the bit 7 of the last character set. Link field (LFA) s
tores the NFA of the preceding word. The body of the word consists of the Cod
e Fieurn it back on. warm will also do it. Keep your FORTH files in a saf
e place and in the next segment we will look at putting someting on the scree
n. -- Petr Lukes. ******
telephoneld, which holds the address of a machine language routin
e which initiates the processing of the one or more Parameter Fields which
follow (PFA is the address of the first PF). A brief example (in hex)
decompstream would result in the following printout nfa d81 87 str
eam length byte may be 80H to 9fH lfa d89 d2d stack or c0H to d
fH for immediate words cfa d8b 6c3,docol pfa d8d 7f7 abort" d
8f 8 noinput (with noinput in r ****** ****** FORTH, Part 3, compil
ed from files supplied by Petr Lukes, ****** Toowoomba.
July 1987 Petr has provided two files this month. The first is a text fil
e, but it can be read properly only in the F rth kernel, CPCFTH2.FTH. If fe
d to a word processor or our READER.BAS, the lines will not be formatted cor
rectly and the text will be difficult to read. It is part of of our Forth gl
ossary and the file is named GLOSS1.FTH. The second is DECOMeverse vid
eo) d98 137e exit From the CPCFTH2.PRN file 873F737472qstream
db 87h,'strea','m'+80h 7stream 0D89 2D0D dw qstackn 0D8B C306 qstream
dw docol 0D8D F707 dw aabortq 0D8F 086E6F5F69db 8,'noinput' 0D98 7E13
dw exit The compiler may be used to find out addresses within the k
ernel and possibly patch them. The replacement of the last d in duplicat
ed at 1074H with a space is one example (in create). The hotpatch fo
r type (P.FTH, which allows us to examine the construction of each word
in the kernel's vocabulary. Load the file into CPCFTH2.FTH (or your versi
on of the kernel), then look through the screens first with 1view etc. Then c
ompile the screens with 1load. You then are ready to look at each word in
the dictionary, including the new words loaded by DECOMP, such as "decomp"
itself. The word "vlist" makes interesting reading. If you have a print-out
of the dictionary, then you are set for Nin parentheses -- activate when
ready to experiment) will vector the word to typr so that any routines whic
h used type will now use typr. Note that typr must be in the system. If yo
u forget it and overwrite it with another routine, the system will almost
certainly crash when type is invoked. It is not possible to change type
without reassembly, because typr is longer (r is a higher number than e).
A mistake may not show up for a long time preserve thhich appeared in the U
K Amstrad User beginning in March 1985. More recently a short series has been
published by Your Computer, based on articles in Byte magazine c. 1980-8
1. Some of the "words" mentioned in this series may not match the words in
CPCFTH2 (you have been warned, so no more phone calls at 5 a.m.). Although th
ere are some different versions of Forth around, they are closely related --
not like the variants of Basic. In the CP/M Library files there is a versio
n of Fore original version and keep a record of all patches for recover
y in case of a crash. The word (known as "bar" to RSX users) calls a head
erless machine language routine just before its exit. This will produce a
nonsensical name. It is not worth extra programing to deal with exceptions
of this kind. Any new words which would define new exits and in-line para
meters would require additions to the two routines. *** GLOSS1.TXT
This is the first part of the glossarth, with a larger vocabulary and (p
ay attention to this) all input is in CAPITAL letters. Try vlist and all you
get is a row of question marks, but VLIST works nicely. The secret in
learning is to experiment. Don't be frightened to "mess around". Keep y
our original files safe on another disk or tape , use a copy and "go for it"
. So what if you make a hash of it Better luck next time. (However, there
are a few exceptions to that rule Please don't muck around wiy for our versi
on of Forth. Load it into the Forth kernel and read it by using 1list, 2li
st, etc. It fills 11 screens. A printer copy may be made by pressing the CTR
L and Y keys before typing 1list. Remember that CTRL P does not toggle the
printer with our Forth. The introduction to the glossary outlines t
he differences between this version of Forth and the version known as Fig
Forth. ***** 4 Tasman Software Ltd. This Am
sword th nuclear devices -- there may not be a next time.) Now, put your g
lasses on and pay attention. The UK article says the length of a new word (c
reated with and as we discovered last month) may contain up to 127 characte
rs. The first 31 characters are significant as is the total number of ch
aracters in the word. So if we created a new word, thus, Please.display.a.li
st.of.the.Forth.words vlist we would be entering something which woul
d be recognised as our original vlist. Type in the dots between the words
, because we are not allowed spaces. Count the characters, including
the dots, and you will find 40, but the actual significant characters
go up to 31, which is the 'o' in Forth. (Did you begin counting at 0 ze
ro or 1, eh) So what We shall see. This is a great piece of magic. Let
's create a second word by extending the first with .to.the.printer and see
if our pride and joy can recognise the difference. If it ****** ******
So on and so Forth (July 1987) ****** If you have been following this
series on Forth with rapt attention, by now you should be close to "expert" s
tatus. All you need do now is study the vocabuluary, then go Forth and mu
ltiply (I coulnd't resist that -- I have been waiting a whole month to say
it.) As we said before, the routines mentioned in this series, which is
running parallel with Petr Lukes' files on Forth, are based on the Forth a
rticles w N only "sees" the characters up to 31, then how will
it distinguish between the two Because it also keeps a character count, th
at's how. We saw that we had to put dots between the sections of the word
because we were not allowed spaces, but we could just as easily have used al
l the ASCII characters, including +(),-12345, AND capital and lower case lett
ers. Again I hear you muttering, "So what" Well, it indicates the pote
ntial strength of the language. We can define litera. When you sort tha
t out, type Amstrad or vlist to see how many times Amstrad is listed in t
he vocabulary. It should be there twice. Once when we made an error and the
second time when we tried again. The top one is the correct one. Even thou
gh the lower one was incorrect, it was popped into the vocabulary list -- up
to the point where the error was made in v list. A "smudge" bit is set at t
he beginning of that word, which means it will be ignored during a search
olly thousands of words and not one would duplicate another. Certainly I see
little use for words of 127 characters, but even if we stick to words of
12 characters, the potential begins with 12 x 127, then multiply that agai
n by 127 -- and that is only the beginning. Goodness, we have more word
s at our disposal than the Maquarie dictionary. Yes, there is a ca
tch. There is little use just having words, we must put something meaningfu
l into each one, then learn to stf the dictionary. It is not a nuisance, but it
is taking up memory space. Are you paying attention You cannot delete
a smudged word with FORGET because it will never find it. Remember, smud
ged words are ignored by a dictionary search. The word "smudge" will he
lp us toggle the smudge bit so we can extract the unnecessary words and "for
get" them. But for this routine to be successful, we must go through it
immediately after making the error. Type smudgeforing them togeth
er so they will produce the desired result. If, in the midst off all t
he characters at our disposal, we happen to duplicate a word, some versi
ons of Forth will issue a warning, like ISN'T UNIQUE. You should be able t
o work that one out. If we want to get rid of a word we have
created, forget Please.displayetc and hit RETURN to exterminate it. The
word "forget" is easy to remember and can come in handy at times. Befo
re endingrgetAmstrad and the unwanted words are sent sailing off into obl
ivion. Another use for smudge is to toggle redundant words already
in the dictionary. We cannot extract them with smudge, but we can smudge
them so they will be ignored during a search of the vocabulary. However, we
should be able to delete them with forget if we want to get rid of them.
That is it for this session, next time we shall sail Forth into
programming. Happy smudging. our intense discussion today, we will l
ook at "smudge". I must admit I greet that word with some merriment. I rea
lly don't know why, except that it seems out of place in a computing langua
ge -- somehow related to fudge and smooch. It is there to help us erase
our errors in the vocabulary. So let's make a deliberate error. Am
stradclsvlist (those underline marks indicate a space) We have tried to
make a new word to combine cls and vlist, but made a mi
****** so Forth (June 1987) ****** With its limited and fixed vo
cabularly, Basic is easy forstake by putting a space between v and list. W
e should get an error message if the kernel cannot find the word "v" in h
isher vocabulary. So we try again, type the same thing again, but omit the s
pace between v and list. So when we type Amstrad at command level, the ke
rnel should clear the screen and present us with a list of words in the vo
cabulary. It will clear the screen if it recognises cls -- consult with your
kernel and see what word is used to clear the screen N ****** +++
+++ Forth, August 1987, with Petr Lukes ****** ((Three "permutation" p
rograms are included in the journal this month. The first, PERMS.BAS is in tw
o parts. To see the result of structured Basic, run PERMS.BAS in the normal m
anner. When you have given it some letters and seen how many combinations it
can arrange them in, hit ESC ESC and type GOTO 390. That will run the second
part of the Basic file, the unstructured PERMS. The third is PERMS.FTH, whi
ch must be lOTOs by setting flags and using other strategems (even jumping
out of unfinished loops, using multiple exits and similar abomina
tions) and in the process almost totally obscures the flow of the program
. The traditional Basic languages lack the necessary control structu
res which would make GOTO redundant (such as long If, which could span more t
han one line, and flexible loop constructs). The use of GOTO is the o
nly sensible way of implementing them. oaded into the Forth kernel,
CPCFTH2.BIN. It is the structured Forth version of "permutations".)) P
ERMS is a program which produces all possible permutations (orderings) of a s
tring of elements. It is coded in Basic and Forth. Both versions have vir
tually identical structures. Scrabble players and solvers of word puzzles mig
ht find it useful for finding words in a jumble of letters. The original
program by Jones is in the second half of PERMS.BAS (from line 390 onwar
Naturally, the GOTO must aima at a statement within its own module ju
mping into other modules is definitely unstructured. Incidentally, every
iteration contains an unconditional jump disguised within the structure.
Users of Forth can decompile a word with a loop construct and fin
d "branch", which is simply a "GOTO an address". This homily ("tedio
us moralising discourse" -- The Concise Oxford Dictionary) is to fores
tall any abuse for applying thd) and is highly unstructured. My adaptation forms
the first half and I have structured it so it could be translated into F
orth, which will not accept unstructured programming. Structured prog
ramming is a method of writing programs which are easy to debug and to main
tain. It involves dividing the task into its components (initialise, inpu
t, process, output, close) and designing a hierarchy of modules, each wit
h its own well-defined task, one entry and one exit point, e term "structured
" to a program which utilises GOTOs. After loading PERMS.FTH into the
kernel, begin the routine by typing /perms/. It can be studied from
the command mode by typing /1list/, /2list/, etc.
****** ****** p),( )4 Tasman Software Ltd
. This Amsword only receiving and returning processed data to its controll
ing module. Such design produces Structure Charts, which show t
he over-all organisation of the program. Some modules may need more detail
ing on Flow Charts or in Pseudocode. At a lower level, the modules should b
e coded using only the three structures which are necessary to express progra
mming logic, regardless of its complexity (proven by Bohm and Jacopini in
1964). They are SEQUENCE (executing one s ****** ++++++ Introducti
on to the Forth language, Part 3, August 1987 ****** In the previous s
egment we looked at creating words in Forth and some of the (smudge, smudge
, wink, wink) common words and word-symbols. Now we move along to the all im
portant stacks. Forth has two stacks, both using the last-in first-out
(or LIFO) principle. The Parameter stack is where calculations and op
erations are performed. The Return stack is where Forth stores addresses an
d ltatement after another), SELECTION (if-then-else) and ITERATION (do-
loops). In 1968 a letter by Professor Dijkstra, "GO TO Statement C
onsidered Harmful", advocated the abolition of GOTO from all languages. Si
nce then many people have equated GOTO-less programming with structured pro
gramming, which, of course, implies much more. Every now and then a magazine
publishes a Basic GOTO-less program in which the author has engaged in extr
aordinary contortions to avoid G Ninkage information. In most langagu
es, except machine code programming, the operating systems look after the st
acks. In Forth, like machine code, the programer has those worries. On the c
redit side is faster code when the program is run. Before going into the
stack, let's add the word /peek/ to the kernel's vocabulary peek cr
cr 1+ swap do i c . loop cr cr (Remember that spaces are important in For
th and that character next to the c is to the right of the "went well (why
did Mr Sugar rename the ENTER key), we should get 12 25 ok when we enter /.
s/. It seems that in the UK article, the top of stack (TOS) is on the
left side. Forgive me if I'm mistaken, but the TOS on my machine is on the r
ight. I thought at first it may be due to the Pommy idea of driving on the
left side of the road, until I remembered that Aussie's do that, too. Ahh
, to spend five minutes in a world with at least 1 degree of conformity!
You probablyP" on the keyboard. Watch "dot" after the .) The UK Amstr
ad User gives us a "print stack" word, known as /.s/, but we have it alread
y. Incidentally, if you have that article, April '85 UK mag, don't type in
the .s listing. It contains words not in our vocabulary. In fact, most of
the article is littered with errors as well as a different vocabulary.
The new word we created, peek, is similar to PEEK in Basic and is used in
the same way, to look at what is in a memory will soon tire (tyre) of enterin
g numbers, then typing /.s/, so let's march on. We can look at /dup/, /drop/
, /swap/ (no, it is not swop), /over/ and /rot/, entering numbers, then
using /.s/ to prove they really work. We could also prove that TOS is on
the right (or is it left), so keep your minds open. DUP will duplica
te the number currently TOS. Begin with an empty stack /sp!/ and enter 1
012. Enter /dup.s/ and read the result (I'm too embarrassed to lo loc
ation. All we need do is state the start and end addresses. For example, /1
100peek/ will give us the contents of the first 100 memory locations.
Remember the underline symbol is used to indicate a "space" -- don't type i
n the underline. If you have a jumble of numbers on the screen, that's good,
but don't ask me what to do with them. Just admire them with that smug loo
k of success. So that is all there is to it. Now on to /.s/ which is more
entertaining. As we sok). DUP crops up frequently in Forth, so remem
ber that it duplicates. Perhaps we should change it to RABBIT. When a number
on the TOS is printed out or a test is done on it, that number is removed f
rom the TOS. If you want to keep it there, you must DUP it to keep a copy. An
other word, /ddup/, copies a 32 bit number that is TOS. It you want to
create DDUP, you would type ddupover over but you shouldn't have to, bec
ause it already is there. But try it anyway (be aid before, it means print-s
tack, and does not change the stack. When programming in Forth, we want to (q
uite frequently, in fact) see what's in the stack and most importantly wha
t is on top. After all, it is our responsibility to keep the stack in
order. So /.s/ is a welcome friend. The "dot", you may remember, means "pri
nt" and s is a convenient abbreviation for stack -- resulting in .s.
To clear the stack before we begin our experiments (and remember to clear
it la little devil), just to see what happens. Clear the stack again, /sp
!/ and type in some new numbers, your age and the last two numbers of the
year. Now type /drop.s/ to prove on which political side the TOS stands
. DROP discards the TOS, so whatever you have left is NOW the TOS. Pardon m
e for crying, but that didn't prove anything, except you now have one numbe
r, when you typed in two (if you were not lazy and typed in only one).
Enough foolishness. Down to businater to get fresh "paper"), use /sp!/. If
you get a curt "ok" in response, then the stack should be clear. Now typ
e in a couple of numbers. You can type them individually, hitting ENTER (or
RETURN) after each, or type them on one line with a space between, then
hit ENTER when finished. Let's try something like 1225 cr. (No, don't type
cr, that means hit ENTER or RETURN -- or whatever the damn thing is
called on your rig. Confusing, isn't it) If all Ness. Now, this c
ould be the proof. Clear the stack and type two numbers again. Type /.s/ to
get a listing on the screen so you can see what order they are in. Now t
ype /swap.s/ and read the numbers again. Whatever was on TOS before, has b
een demoted to No. 2. Enter another number, prove you have three numbers w
ith /.s/, then go into the SWAP routine. Now, who is on top This sho
uld confuse you. Clear the stack, put in two numbers, then type /over.s/ t
o duplicate tre, to the right of the "P" on the keyboard.) You probably n
oticed we said /4pick/ instead of "pick 4", which leads us neatly into rever
se Polish notation. Most people are familiar with it, but won't admit it. I
n fact, it is the computer's method of dealing with numbers. In Basic
we enter 2 * 5 when we want the result of five multiplied twice. The Basic
interpreter changes that to 2 5 *. Forth was written for speed, so the obv
ious course was to enter data in the way thehe second value on the stack. It see
ms that when NO. 2 is duplicated, the duplicate is put on the TOS. Whi
ch brings us to ROT, or rotate. Its purpose is to move the third item on th
e stack to the TOS. In the game of one-upmanship, it makes a bigger jump
than OVER. Enter some numbers, type /rot.s/ and observe the result. So it
is that simple. All you have to do now is use the right words at the right t
ime and you can say programming in Forth is a breeze -- at least when us comp
uter likes to process it. It is not "backwards", but a quicker way of
crunching numbers. Look at the problem from the Z80's point of view. It work
s with a stack the same as Forth. Actually, that is the other way around
-- Forth deals with stacks the same way as the Z80. So, the big chief is
given a number, such as 2. He/she sets puts it at the TOS and asks for
the next number. The second number comes shooting down the line and onto t
he stack, displacing thing the common words for manipulating numbers near t
he TOS. Fortunately for us, most of the action takes place at the TOS or tw
o or three numbers down. Otherwise we would go nutty trying to remember wh
ere they are -- or better still, get a computer to help us. If, hor
rors, you want a number deeper than No. 3 on the stack, use PICK. To spur t
he pick into action, work out (somehow) what position the number should be
at. For example, if we think it is No. 4, we type /4pie first arrival. We wi
ll say it is five (any higher and I may not be able to find the answer. The
n, swoosh, an operator comes swooping in at close to the speed of light. It
is a multiplier, which means the Z80 swings into action, sees that it mu
st add the five two times (2*5 5+5, or if it were 5*5, Z80 would add five f
ive times, thus 5+5+5+5+5) to produce a result of 25. Wanting to keep a clea
n house, it throws out the two, ejects the five, smudges the operator and c
arefully ck/ and read the result. If that is not the number we wanted, try,
try again. If you used /1pick/ (one down from the TOS), you could have used D
UP and the same with /2pick/, which replaces OVER. If PICK is not in
your vocabulary, this is how to include it pick dup 1 if ." PICK value to
o SMALL " cr drop else 2 * sp + then (Watch the less-than arrow an
d space between the print-quote /."/ is a word and must be separated from
adjoining words by spaces.places 10 on the top of the stack. (Actuall
y, Z80 would use its registers for such a simple operation, but the process
is similar. If the arithmetic was for a long equation, neither Z80 nor
Forth would get excited. It would handle each segment as it arrived and kee
p using the result of the previous operation to work with the next. It
may be only a matter of nanoseconds, but if you used a computer day in and
day out for number crunching, those little bits of ti Hitting the
carriage return in the middle of a word definition is all right, the kernel
does not take action until it sees the "", although if an error was made in t
he printing of the first line, or the new word exists already, the kernel w
ill inform you. Errors usually are flagged with an underline of arrows. In t
he second line watch the multiplication symbol, the *, and the funny c
haracter (whatever is the name for it) sp + . It is that one we ment
ioned befo Nme become meaningful. If you programmed in Basic, you would sen
d long equations, with some segments in brackets, even multiple brackets. Do
n't try it in Forth. Each problem is acted on in sequence, so obviously ea
ch problem must arrive in sequence. In Basic you could enter PRINT 3+4*5+6 a
nd it would produce an answer of 29. The multiplier has priority over additi
on. If you wanted the answer to come out differently, enclose the two
addition problems in brackets, thus PRI ****** ****** Forth, with Pe
tr Lukes, September 1987 ****** The text for Petr's program this week
is contained in "screens" to be read into the Forth kernel, CPCFTH2.BIN, and
is a discussion of the source file hanoi which follows. There are no proble
ms with this method. When you are ready to compile Hanoi, type the usual com
piler instruction, 1load, and it will skip over the text until it gets to t
he source code. Remember, to load the file HANOI.FTH into the kerNT (3+4)
* (5+6) would produce 77. Think about it. In the first problem, Basic would
multiply 4*5, then add 3, then add 6. In the second example, the problems
enclosed in brackets are dealt with first. So, 3+4 produces 7, 5+6 produce
s 11, then 7*11 gives the result. How often have we heard that you only get o
ut of a computer what you put into it To cut short this discussion
(I can hear you yawning), Basic accepts such problems and sends them in tha
t form to the interpretnel, type scr-load. If you want to read the text, typ
e 1list, 2list, etc. Use the 1load instruction to compile. When compiling
is complete, the kernel says "ok". Then type hanoi. Select the number of d
isks (best to begin with three) and "m" for manual. All other keys select aut
omatic. May be best to let it run automatically the first time. Next
month we have a Forth debugger. ******* )4 Tasman Soft
ware Ltd. This Amsword er, which must sort out what it thinks you want d
one. The Z80 chip then goes to work in similar fashion to the way we mus
t enter the problem into Forth, thus 3 4 + 5 6 + * and the action is 3 4 + eq
uals 7 (top of stack) 5 (top) 7 (first below top) then six arrives and s
its on the TOS, with 5 one under and seven two under. The addition takes pl
ace between the top two, 5 6 + equals 11 so 11 is on the TOS and seven is one
under. The next operator arrives, multiply, so ll ****** ++++++ Int
roduction to Forth, Part 4, September 1987 ****** Working through the
stacks in Forth last month, we ran out of space before looking at a little pr
ogram which prints out the number on the top of stack (TOS) neatly in binary
, decimal and hexidecimal. An interesting aspect of Forth is that we can
work in any number base, from two to 255. The word BASE in Forth is known
as a user variable. When we type /base/, the address of the variable B
ASE is is added to itself the number of times indicated by the number one
under the TOS, which is seven (whirr, grind) 11+11+11+11+11+11+11, producing
the result, 77, which is neatly wrapped and put on the TOS waiting for the
next instruction, which may be a move, execute, do or whatever -- it may
even be another number as the first part of some more arithmetic. It ma
y seem peculiar at first, but really it is quite logical. Now you can experim
ent with the different operators, + * - left on the stack. By setting BASE
to a value (nominated by us), then we can work in that number base.
Hex is a standard Forth word which sets BASE to 16. If we type HEX, then
all numbers input or output will be treated as hexadecimal. There is no need
to use the prefix "&" as in Basic. Binary (base 2) and Octal (base 8) can be
set by the following words if binary and octal are not in our dictionary
already. binary 2 base c! octal 8 base c! Th/, using /.s
/ to see what is happening on the stack. *****
* Software Ltd. This Amsword Ne value to set BASE is put on the stack fi
rst. The word BASE then places the address of BASE onto the stack. C! is a F
orth word to store the byte that is second on the stack to the address tha
t is on the TOS. In effect it is the same as the Basic POKE. Try binary and
octal to see what happens. A word of warning If we are working in BINARY,
then all values entered must be in BINARY, that is 1 or 0. To return to t
he usual base of 10, type /decimal/ -- which is a standard word uction at a
time. Read the text in the kernel with the commands /1list/, /2list/ etc.
I asked Petr if there existed a compiler which could be used in conju
nction with the kernel to create binary files of Forth programs, such as HANO
I.FTH. The hope was that such a binary file could then be run while in Basic,
without the need to load the kernel first. Petr's reply "There is a pro
gram which will take a Forth system (kernel with compiled application) and cr
eate another systein most Forth vocabularies. Now to our new word (routin
e). Make sure BINARY is in the dictionary. Decimal and hexadecimal shoul
d be there already. Our word will be known as /.n/ and will take the number
off the top of the stack and print it out in binary, decimal and hex regar
dless of the current BASE. .n base c r binary dup cr cr ." BIN "
u. cr decimal dup ." DEC " u. cr hex dup ." HEX " u. cr cr
r base c! Next month we begin lookm which includes only the words act
ually used, but it is a very lengthy procedure and definitely requires CP/M,
preferably with two drives. But there is no reason why a compiled application
could not be saved together with the kernel as a new system. Assuming that y
ou wanted to play HANOI often, compile it, then /save-forth/ under another na
me, say HANOIRUN. Then, RUN"HANOIRUN after switch-on would load and start For
th once loaded, /hanoi/ would start the game as normal. "There ising at
loops and other routines in Forth. Keep the flag flying.
****** Ltd. This Amsword a way to make it self-starting. Before
typing /save-forth/, enter /'hanoicfa'run!/. This will store the Code Field
Address of /hanoi/ in the Parameter Field Address of the word /run/, which i
s included in the start-up word /cold/. However, I think it is not worth the
trouble -- and care is required (particularly since I did not try it). I rem
ember thinking about it when I put /run/ into /cold/. I have come across a ut
ility which allows saving a compiled application as a binary image and sub
sequently reloading it and threading it into the kernel, but it would need so
me adaptation." Incidentally, other users with programs written in Forth
are invited to send them in for possible inclusion in the journal. I know Pet
r is keen to see work from other people as there is not much available in Aus
tralia. People interested in further studies of Forth may like to join th
e Forth Interst Group (Fig), whose address is PO Box 8231, San Jose, Californ
ia 95155. Member ****** ****** Forth, segment 6 (October 1987) *****
* May the Forth be with you! (Words on a T-shirt sold by the Fig Forth u
ser group -- with "Fig" meaning Forth Interest Group.) The program fro
m Petr Lukes this month is DEBUG.FTH, which contains the text as well as the
debugger. It must be loaded into the Forth kernel, CPCFTH2.BIN (May87 journ
al) or the expanded version and works with words in HANOI.FTH (Sep87 journal)
. DEBUG steps through a chosen word, one instr Nship for residents of the
North American continent is $30 a year, while for overseas people (how dare t
hey call us foreigners) the cost is $42 a year in Yankie greenbacks. F
ig has available many publications, including back copies of its journal, For
th Dimensions (six issues to a volume for $US18 airmail overseas each, with e
ight volumes already published). Members receive six issues of Forth Dimensio
ns a year. The "bible" of Forth programers, "Starting Forth", has been revi
sed anFGLOS1tx LKS 870508 This is a
partial glossary of words used in cpcFTH2, which is adapted from MVP-FORTH by
Dr. Glen Haydon. MVP-FORTH conforms to 79-STANDARD, except that Dr. Haydon has
chosen to prefix all double number operators by "D" rather than "2" (thus D
DUP instead of 2DUP). The main differences between fig-STANDARD and 79-STANDAR
D are in CREATE and WORD. The fig CREATE will crash this system - use HXCODE i
nstead. The fig WORD does not leave d is available through Fig at $US30 airmai
l overseas ($21 sea mail). "In this new edition (of Leo Brodie's) popular and
complete introduction to Forth, syntax has been expanded to include the new
Forth '83 standard," the brochure says. It also explains the differences betw
een Fig Forth, '79 Forth, Poly Forth and the already mentioned 1983 version.
People wanting more details of Fig can discuss the group with Petr Lukes,
26 Noll St, Toowoomba Qld 4350. I am certain Petr would be pleasedthe HERE a
ddress on the stack. The current 83-STANDARD has again redefined some words
and added a number of new ones some conversions may be simple, some virtually i
mpossible. The keywords in this glossary are shown in upper case, alth
ough the dictionary is in lower case. The dictionary can be converted t
o upper case, but CASEFLIP published in TAU, Oct 86,needs adapting for the cpcF
TH2 (it was written in ams-FORTH). MOUNTAIN VIEW PRESS, PO Box 4656, Mountain
View, CA 94040, USA, to hear from Forth programers, budding or experienced.
In looking through the Fig catalogue, I am certain that most, if not all,
books and many reprints of American magazine articles discussing Forth are
included, even the historic publications on using Forth in astronomy. F
inally in the Forth corner this month, Petr gives us some additional informat
ion on the word BASE. "Some systems use just one byte, but ours is a full
two-byte number so that it can be in the range -3published ALL ABOUT FORTH b
y G. Haydon. It is a very detailed glossary of the MVP-FORTH, but it is not a
teaching text. It is released without restriction, which means that it can be
duplicated freely (seemingly somebody reprinted for profit). It and othe
r publications may be available from FIG - Melbourne Chapter, contact Lance Coll
ins, 65 Martin Rd., GLEN IRIS, 3146 (tel. (03) 29 2600).
The MVP-FORTH uses disc blocks as external memory, under CP
/M. 2768 to +32767 (use /!/ //, NOT /c!/ /c/ -- in other words, leave out th
e "c"). The command /base./ will always print "10". The practical limits are
2 to 36, if we want to use only the numerals 0 to 9 and letters a to z as dig
its. Enter /decimal3536base!.decimal/ to get the answer "z" and reset to deci
mal. "Incidentally, there is the word /dbh/ in AMEND1.FTH that will print
a number in decimal, binary and hexadecimal. By convention it should have be
en called /.dbh/ to indThe main modification is the removal of dependence on
CP/M and the use of named files for external storage. The traditional divisi
on into blocks or screens is retained, but only as a subdivision of the fil
e which is in memory. The FORTH system consists of two parts
the kernel and extensions. The extensions can be readily modified by
FORGETting them and compiling new definitions. A working example
is in AMEND1. The kernel ends with the word and icate that it prints a n
umber." ****** )4 Tasman Software Ltd. Thi
s Amsword Ncan only be modified by hotpatching, short of changing and rea
ssembling the original .ASM file. The choice of extensions included in the sys
tem is up to you. Main differences between fig- and 7
9-STANDARD CREATE xxx ( -- ) renamed fig BUILDS
Creates a dictionary entry with no parameter space reserved. Exe
cution of xxx leaves the address of parameter field. WORD (
char -- addr) fflag if open not successful.
CASOUTDIRECT ( from-addr length entry type -
- n ) Writes file directly from store. n error number. ESCDIS
and ESCEN ( -- ) Disables/enables the
ESC routine called on each pass through the inner interpreter (at the addres
s NEXT). When enabled, pressing the ESC key once pauses the programme press
ing ESC again will turn printer off and stop the programme by Reads
next word from input stream using char as delimiter, or until null. Leave
s address of character count (HERE in this implementation, text starts at H
ERE+1). CPC specific words in kernel
HXCODE xxx ( -- ) similar to fig CREATE Sets B
ASE to hex, creates a smudged dictionary header with the code field po
inting to the parameter field. No parameter space is allotted. Use f
or m/l definitions. executing QUIT, any other key will restart. There is
no way to stop a run-away programme when disabled. ESC ESC does not clear
the parameter stack (QUIT clears the return stack) and leaves the return addr
ess (NEXT+3) on top of parameter stack. CPC specific words in extension
NAMEUP ( -- name-addr name-length )
Accepts a word from the terminal, converts it to upper case. name-ad
dr PAD + 1. INIT ( -- )
Initializes firmware sound, km, txt, gra
, cas, txt inverse. MODE ( n -- )
Selects display mode, turns on cursor. NOOP
( -- ) Does nothing - could be u
sed for changing the action of words.RUN ( -- )
Compiled as RUN EXIT Included in COLD.
( -- ) (beeps if successful, prints if not) External comm
and processor. Uses NAMEUP to get name and convert it to upper case, set
s bit 7 of last character, calls KLFINDCOMMAND, executes command if foun
d. There is no provision for parameter passing, therefore can execute
TAPE but not ERA,z$. SCR-LOAD (
-- ) (AMEND1) Loads a file into screens. Optiona
lly clears the screens or Could be used to self-start a programme by replaci
ng the address of EXIT with the address of the start-up word. WARM
( -- ) Uses INIT, sets up
mode 2, displays sign-on message. CAT ( -- )
Catalogues tape/disc, using buffer at HERE. May o
ver-write first two screens if (FIRST - HERE) is less than 2k. CASI
NOPEN ( name-addr buff-addr -- flag ) appends to existin
g file in memory. Uses NAMEUP to get file name CASIN
OPEN to open the named file CASINCHAR to read the file to the screen
s. buff-addr c000H (display memory) max-l
ength from next clear line to end of screens store-addr FIRST ( st
art of screens ) or next clear line. SCR-SAVE ( -- ) (AMEND1)
Optionally writes all or part of the screens to tape/di
sc. Opens tape/disc input stream. Accepts name to 12 chars. fflag i
f open not successful ( e.g. illegal name ). CASINCHAR ( max-
length store-addr -- ) Reads file character-by-character into
buff-addr until eof or max-length is reached, storing characters starting a
t store-addr. CASOUTOPE
N ( name-addr buff-addr -- flag ) Opens tape/disc output
stream . Accepts name to 12 chars. N Uses NAMEUP to get file name CASOUTO
PEN to open the named file CASOUTDIRECT to write the contents of scre
ens. from-addr FIRST or selected line length
as determined by -TRAIL (a code version of -TRAILING) entry 0000 type
16H ( an ASCII file ) SAVE-FORTH ( -- )
Uses FREEZE to include all current definitions NAMEUP to
get file name CASOUTOPEN to open the named file CASOUTDIRECT to ( in l,c rea
d port) ed c, 68 c, ( ld h,0 pop bc)
26 c, 00 c, c1 c, ( jump to hpush ) c3 c, h
push , smudge hxcode p! ( b portaddr -- ) ( output byte to port) (
pop hl pop de address, byte ) e1 c, d1 c, ( push bc save)
c5 c, ( ld b,h ld c,l address to bc)
44 c, 4d c, ( out c,e write to port) ed c,
59 c, write a binary image of cpcFORTH. from-a
ddr org 100H length HERE - org entry org
type 02H ( a binary file ) SCR-LIST ( -- ) (AMEND1 onl
y) Lists all screens or selected lines to terminal/printer.
The terminal input routine EXPECT (vectored from EXPECT) uses KEY (vecto
red from KEY) to accept characters from the keyboard. Codes less than 32D, w
ith the exception of 8 (BS) are ( pop bc jump to next) c1 c, c3 c,
next , smudge cr ." Test for p and p! - clicks tape relay on/off" cr h
ex f600 p 10 or f600 p! f600 p 10 xor f600 p! printer-busy4 ( --
fl) ( tests bit 6 of channel B of 8255 PPI) f500 p 40 and 0 ( not sure if it
works on 6128) hxcode printer-busy6 ( -- fl) ( uses jump block, tf not
busy) ( call mcbusyprinter) cd c, bd2e , --
deemed to be input terminator
s (equivalent to pressing ENTER), codes greater than 126D are treated as DEL co
de. The key combination CTRL+Y toggles the printer flag EPRINT wh
en the key board is scanned. If the printer is toggled on but not connected, th
e programme will freeze when it tries to send a character to the printer - cl
ear by ESC ESC (this works even when ESC is disabled). A better solution for
toggling the printer is suggested on following screens.
( ld hl,0000 jr c,1 inc l) 21 c, 00 , 38 c, 01 c, 2c c, ( jump to hp
ush to leave flag) c3 c, hpush , smudge printer-off ( -- ) ( deactiv
ate printer) 0 eprint ! printer-on ( -- ) ( activate output to printe
r) printer-off printer-busy4 ( test BUSY line of printer port )
if 1 eprint ! else fff 0 d
o loop ( wait) printer-busy4 ( try again) if 1 eprint ! else ." Print
er off-line" abort then ( Printer on/off switch LKS 870507) hex
printer-toggle-nobble ( -- ) ( disable CTRL+Y)
' key 06 + dup ( address of conditional JUMP) c c2
( make sure it is the correct one) if c3 swap c! ( replace with
unconditional JUMP) else drop 7 emit then ( else beep)
printer-toggle-unnobble ( -- ) ( restore CTRL+Y) ' ke
y 06 + dup ( address of unconditional JUMP) then ( replace printe
r-busy4 by printer-busy6 if necessary)decimal exitial glossary of words used in
cpcFTH2, which is c c3 ( make sure it is the correct one)
if c2 swap c! ( replace with conditional JUMP) else dr
op 7 emit then ( else beep) ( General routines to access
ports) hxcode p ( portaddr -- b) ( input byte from po
rt) ( pop hl push bc get address, save bc ) e1 c, c5 c,
( ld b,h ld c,l address to bc) 44 c, 4d c, --
N( GO LKS 871203) decimal
19 constant size ( size of board, 19 max, 9 min)
0 constant sq 233 constant bks 202 constant whs 144 constant frs
bk space bks emit wh space whs emit fr space frs emit
( display) intro 2 mode ." GO in FORTH, after D
r. C.H. Ting," ." in Dr. Dobb's Toolbook of Forth." cr
." Computer uses" bk cr ." Player uses" wh cr put sw
ap do colour map i + c! loop kmark map + dup c 64 or s
wap c! unmark ( pattern -- ) map sq over + swap do
i c over if i c 3 and i c! then loop drop de
signate limits do i stone 128 if black i place l
eave then loop --
." Free position" fr cr ." T
he board is surrounded by computer's stones." cr ." Enter each move a
s row column (e.g. 12)" cr ." An illegal move entry (e.g. xx) w
ill stop the game," ." restart by cont" cr cr
." Enter board size (9 to 19) " decimal query bl word number
drop 9 max 19 min ' size ! size dup * ' sq ! --
remove ( n -- ) out if drop exit then
dup stone 67 and colour if
dup kmark dup north recur dup east recur dup south re
cur dup west recur kstone else drop then variable best-move variable best
-liberties variable best-count variable !colour
lookahead ( move -- liberty)
black over place colour !colour ! black colour ! variable colour var
iable liberty variable map 360 allot 1 constant black 2 constant white
out dup 0 over sq 1- or
stone ( n -- code) map + c north ( n1
-- n2) size - south size + east dup size mod size 1- if
drop 1000 else 1+ then west dup size mod if 1- else drop 1000 then
mark map + dup c 128 or swap c! 0 lib
erty ! 128 unmark 129 unmark dup counts kstone !c
olour colour ! liberty eval ( move liberty -- )
over lookahead r i best-count 1 max
over best-liberties 0 and if best-liberti
es ! best-move ! r best-count ! else ddrop r drop then
--
recur latest pfa cfa , immediate counts
out if drop exit then dup stone colour if dup mark dup north
recur dup east recur dup south recur west recur else
dup stone 0 if mark 1 liberty +! else
drop then then limits sq 0
--
hex variable pattern 14 , 44 , 1400 , 4400 , 1001 ,
0110 , 404 , 401 , 101 , 104 , 1010 , 1010 pattern ! decimal ra
nge ( n -- code) out if drop black else stone 3 and t
hen n north range e east range
s south range w west range +4* 0
8 0 do dup + dup + + loop pnorth ( move -- pattern)
dup n if drop 0 exit then ind cr space size 0 do i 2 .r loop
board 30 emit ind limits do
i size /mod swap 0 if cr 1 .r else drop then i stone
3 and dup 0 if fr drop else black if bk else wh the
n then loop place ( code n -- ) map + c!
clrmap map 362 0 fill kstone
( n -- ) map + 0 swap c! N r i north e i e i
north east dup e swap n i north w i w r north west dup
w swap n +4* p
east dup e if drop 0 exit then r i east s i s
i east south s i east south e i east n i n
i east north n r east north e +4*
-- .best space
best-move best-count best-liberties move begin cr ." Your move "
query bl word number drop 20 emit
dup stone 3 and 0 if white swap place 1 else .
" occupied." drop 0 then until gobase size base !
cont escdis 1 mode ." GO" gobase
begin board move 1 stop ! 0 best-count !
psouth dup s if drop 0 exit then r i south e i
e i south east e i south east s i south w i w i south west w r sout
h west s +4* pwest dup w if drop 0 exit then
r i west s i s i west south s i west south w i west n i n i
west north n r west north w +4* fix dup rot and
match ( pattern -- fl) dup if 0 12 0 do over pattern i 2*
weffect .best beffect .best stop if pats black best-m
ove .best place then again handicap 19 base ! 33 39 3f
93 99 9f f3 f9 ff 9 0 do black swap place loop decimal
go sp! 0 in ! intro clrmap gobase base 19 if ha
ndicap else black sq 2/ place then 0 best-move ! cont
+ fix if 1+ leave then loop swap drop then evpat 1 best-count
! 2 eval pats limits do i stone white and if i
pnorth match if i north evpat leave else i peast match
if i east evpat leave else i psouth match if i s
outh evpat leave else i pwest match if i west evpat leave
then then then then then loop --
****** Forth (from PETR LUKES), January 1988 (File
s referred to are the Forth kernel in May87 and GO.FTH.) We have a request
for games written in Forth. Unfortunately, the group does not have a library
of Forth programs, apart from the ones Petr Lukes already has sent, and Petr s
ays he has not much interest in games. The only one he has is a Forth version
of a strategy game, Go. However, neither we nor Petr knows the rules to the ga
me. "It seems to be doing something so I hope ivariable stop stop 0 sto
p ! unmarks ( colour -- ) 129 unmark 130 unmark c
olour ! examine 128 unmark 0 liberty ! counts liberty wch
o 0 sq size - 1- size do i size mod dup if size 1- - if i stone 128 if
i then then then loop cho begin dup while liberty eval repe
at cho best-liberties liberty 0 bch
o 0 limits do i stone 128 if i then loop t is right," Petr says.
"Perhaps a Go expert could pass an opinion on it and explain how to play it. T
he program is copyright, but Dr Ting has released it for non-commercial use."
Do we have a Go expert I have tinkered with it and one of the objects seem
s to be to occupy spaces on the board in such a way that the opponent cannot
gain an advantage. Positions on the board grid are selected by numbers, with
the vertical (top to bottom row) first and the horizontal (across) second. Tha
t is, t weffect black unmarks sq 1- best-liberties ! limits
do i stone black if i examine 0 if i remove else libert
y 3 if cho if wcho cho then then then then loop
beffect white unmarks limits do i stone white i
f i examine 1 if designate i remove leave stop else cho if bcho c
ho then then then loop --
No place my button on the fourth row down and the sixt
h across, I would type 46 enter. When the game begins, locate a button near th
e computer's black piece. Its next piece will attempt to block me from surro
unding it. I have not worked out the scoring yet and at stages in the game som
e of my buttons or some of the computer's suddenly disappear. When the grid is
nearly full of buttons, one player's are cleared and it seems to be ready for
another game. That is about all I have discovered are interested in a few
remarks about its workings.
The problem is best solved by recursion with local vari
ables, in a language which supports this construct, such as PASCAL and LOGO.
Recursion means that a routine calls itself and each timeestablishes its own set
of local variables which exist until the particular call terminates. It is
a very difficult concept to explain, but some idea may be gained by activating t
he about it so far. As for the program -- it works quite well and speeds
through complex moves quite rapidly. A few times the computer seemed to pause
for a thinking session, but generally selected its moves quite rapidly.
The usual procedure is used to load and run a Forth file. Of course, the first
essential is to run the Forth kernel. If it is necessary to swap disk to tape
, hit the bar "" symbol, then "tape". When ready, type scr-load, give it the f
ilename "go.fth" when prompted. After t( .s 20 emit key drop ) in the MOVEDISC
word, which will display the stack after each move and require a key press
to continue. A PASCAL
version, taken from the HISOFT manual program hanoi var ninteg
er global variable procedure movedisk(srce,dest integer) locals
begin write(srce1,' to ',dest1,'.') end proce
dure move(n,sce,aux,dest integer) locals he file has loaded, type 1
load to compile and, after the usual wait while the screens are compiled, type
"go". (Remember the underline symbol between 1 and load is a space.) As there
already is a "go" in the kernel's dictionary, the kernel willoreport "go du
plicate". No problem -- type "go" again and the game should appear, ready to p
lay. ******** $$$#V!y! #Z yTB h.rq# BAr3h-q9(jF
aq(*aS0G8 begin if n1 then movedisk(sce,dest)
else begin move(n-1,srce,dest,aux) move
disk(srce,dest) move(n-1,aux,srce,des
t) end
end main
begin write('Number of discs
') read(n) writeln move(n,1,2,3)
end. END of PASCAL An a
side about PASCAL Donald Knuth, the author of "The Art of Computer Programming"
, wrote a definitive type-setting package for PCs. The listings are published
in five volumes, using PASCAL, reportedly because there was no agreement on
the choice the most popular language, while PASCAL was clearly everybody's choic
e of the second-favourite language. ( TOWER OF HANOI - an
exercise in recursion.HANOIFTX LKS 870712) 5 load exit ( jumps over text, sou
rce starts on screen 5) The Tower of Hanoi is built of discs of decreasing di
ameter on one of three pegs. The object of the game is to transfer the t
ower to another peg disc by disc, using any one of the pegs for temporary st
orage, without stacking a larger disc on a smaller one. I suggest that you load
the game and let the computer play it a few times, then come back to this
text if you N By
te Information eXchange (BIX) in May 87 had an interesting item from an autho
r of a programming package for the Macintosh, Lee Richardson "If somebody held y
our feet to a fire, could youcode a recursive algorithm in FORTRAN Sure you cou
ld. It wouldbe messy, maintaining your stacks, ...". Nobody held my feet inthe
fire, but I had done it in BASIC (just as messy as FORTRAN),and now in FORTH. F
ORTH was not built for recursion, but it can does dup rot * + + 2+ ( run-
time row col -- addr )
13 3 2array peg ( 13 discs on pegs 0 to 2) pyramid
( fl -- ) ( defining word for 13 discs) srce ! ( flag)
create latest pfa dest ! ( name, PFA
of defined word) 13 3 + 13 1+ * dup allot ( reserve n+3*n+1 byte
s) dest swap bl fill ( fill with blanks) be taught to a
llow it. It has no provision for local variables,but the HANOI algorithm has on
ly one recursive routine and it isnot difficult to keep the locals on the parame
ter stack and clear them off as each recursion terminates, making the coding
of the recursive MOVES quite straightforward.
The complicated part is the di
splay of the moving discs. FORTH has no inbuilt provision for arrays, but they
can be implemented 13 0 do ( initialise)
i dup 2+ * dest + ( -- addr) i 2* 3 +
( -- addr lgth) ( lgthn*2+3) srce if ( fill
with letters if true flag) ddup ( -- addr lgth addr
lgth) i 65 + ( -- addr lgth addr lgth char)
fill ( -- addr lgth) then
-- by the use of the defining words CR
EATE...DOES the CREATE part enters the name and reserves memory for the stru
cture, the DOES part tells the structure what to do when it is called (in our ca
se it leaves an address on the stack). Examining the defining and defined w
ords with the DECOMPILER should help to clarify this difficult concept.
However, it not necessary to understand all the techni
calities to enjoy the game, which requires a fair bit of concentration. 2
/ + 9 swap c! ( -- ) ( TAB token in middle) loop
does ( n -- addr lgth) ( of nth d
isc) ( -- n addr0) ( NAME leaves addr of 0th
element) over dup ( -- n addr0 n n ) ( offset n+2*n) 2+ *
+ ( -- n addrn ) ( addrn addr0 + offset) swap ( -- addrn n)
2* 3 + ( -- addrn lgthn)
( HANOIFTH 870712)
variable discs variable srce variable dest variable aux variable bl
ine 18 bline ! variable mov variable h0 variable h
1 variable h2 ( temps) locate ( row col -- ) 31 emit emit
emit 1array ( elements -- )
( a defining word for 1-dimensional byte array) create all
ot
1 pyramid drawdisc 0 pyramid blnkdisc
movedisc ( dest srce -- dest srce)
ddup ddup h1 ! h2 ! ( temporary store) 1 mov +! bli
ne 1+ 1 locate ." Move " mov . ." from " 1+ . ." to " 1+ .
( .s 20 emit key drop ) h1 onpeg dup c 1- dup ( -- addr b1-1 b1-1)
-- does
+ ( run-time element -- addr ) 3 1array onpeg ( number
of discs on peg 0 to 2) 3 1array xpeg ( x-coordinate of pegs 0
to 2) 14 0 xpeg c! 41 1 xpeg c! 67 2 xpeg c!
2array ( rows cols -- ) ( a defin
ing word for 2-dimensional byte array) create over , * allot (
name, rows, size) --
N rot ( -- b1-1 b1-1 addr)
c! ( -- b1-1) ( decrement no of discs on source peg) dup (
-- b1-1 b-1) h1 peg c h0 ! ( -- b
-1) ( top disc) bline swap - 1- ( row)
h0 blnkdisc swap drop 2/ h1 xpeg c swap - ( col)
locate h0 blnkdisc type ( erase disc on source peg) h2 onpeg du
p c dup 1+ ( -- addr b2 b2+1) h1 onpeg c 1 or ( a disc on
source peg) h2 onpeg c 0 if ( a disc on dest peg)
h1 dup onpeg c 1- swap peg c ( disc on source peg) h2 dup o
npeg c 1- swap peg c ( disc on dest peg) or then ( is srce disc lar
ger than dest disc ) ( ORing all flags produces a single flag which wil
l be TRUE if any one of the illegal condition is true)
if cr ." Illegal move ! Penalty" 1 mov +! -- rot ( -- b2 b2+1
addr) c! ( -- b2) ( increment no of d
iscs on dest peg) dup ( -- b2 b2)
h0 swap h2 peg c! blin
e swap - 1- ( row) h0 drawdisc swap d
rop 2/ h2 xpeg c swap - ( col) locate h0 drawdisc type ( draw dis
c on dest peg) --
64 0 do 7 emit loop ( delay and buzz) else moved
isc then dest onpeg c discs until
hanoi ( -- ) sp! cr
." Number of disks (2 to 13) " query bl word number drop cr ." Automati
c or Manual (a/m) " key h0 ! 12 emit 2 max 13 min dup
moves ( n aux dest source -- n-1 aux' dest' source')
( builds a new stack frame when called, erases it on exit) smud
ge ( make MOVES visible for recursion) 4 pick 2 ( n PICK copi
es nth stack item to top) if movedisc
else
4 pick 1- 3 pick 5 pick 4 pick ( new stack frame) ( dec
rement count, exchange aux and dest ) ." T O W E R O F H
A N O I " . ." discs. " discs ! 1 aux ! 2 dest ! 0 srce ! 0 m
ov ! ." Destination peg " dest 1+ . cr
1 h1 ! discs 0 do h1 2* h1 ! loop ." Minimum m
oves ( 2 discs - 1 ) " h1 1- . bline 1 locate 80 0 do 58 em
it loop ( baseline) discs 2+ 0 do ( nested loops jouter, iinner ind
ex) -- move
s ( recurse) movedisc ( OVER 2
PICK) 4 pick 1- over 4 pick 6 pick ( n
ew stack frame) ( decrement count, exchange aux and source )
moves ( recurse) then
ddrop ddrop ( cancel fra
me) smudge ( reverse smudging by ) --
3 0 do bline j - i xpeg c locate i 49 + emit loop
loop ( draw pegs) discs 1+ 1 do
bline i - ( row) srce xpeg disc
s i - 2* 3 + 2/ - ( col) locate discs i - drawdisc type
loop ( draw discs) 0 au
x onpeg c! 0 dest onpeg c! ( no discs on aux, dest) discs 0 do discs 1-
i - i srce peg c! loop manual ( -- )
begin sp!
bline 2+ 1 locate 20 emit ." From pe
g " key dup emit 49 - ( -- srce) cr ." To peg " key dup emit
49 - ( -- srce dest) swap ddup ( -- dest srce dest srce)
h1 ! h2 ! ( -- dest srce) ( temp store for easy checking)
h1 dup 0 swap 2 or h2 dup 0 swap 2 or or ( pegs) N discs srce on
peg c! ( all discs on source peg) discs aux dest srce ( init
ial stack frame) h0 109 if bline 1+ 1 locate ." Enter move 1st move"
7 emit cr manual
else moves then 30 emit 7 emit cr cr sp!
ANOI $$$ a$ c e ! k$ e 1+ 0 fill (
length of string, zero count) ." Number of permutations " 1 e 1+ 2 do i * lo
op u. cr e 8 if ." Note that the number of permutations is meaningless be
cause" cr ." it exceeds single integer limit" cr then ." Perm # Order"
e 2* 5 - 1 max spaces ." Counters" cr 1 no ! display
begin permutate 1 no +! n while display repeat
." No more, back to original order" cr display cr ( Permsfth
LKS 870524 ) decimal variable a$ 253 allot v
ariable k$ 253 allot variable no variable e variable n variab
le h$ ( reserve storage memory)
display ( -- ) ( number of perm, permutated string, counter) no 0 5 d
.r 6 spaces a$ count type e 6 max spaces e 1+ 1 do i k$ + c . loo
p cr permutate ( -- ) ( rotate a$)
(
WORD stores the input string at HERE with the first byte giving its lengt
h, leaving the address of HERE on the stack. CMOVE moves the string, includin
g the length byte, to A$. ) ( CMOVE is similar to CMOVE, but moves from high t
o low memory to avoid over-writing. This is a an almost literal t
ranslation of the BASIC version, and uses a couple of unnecessary varia
bles.)e which utilizes GOTOs. 1 n !
begin 1 n +! ( increment n)
a$ n + c h$ ! ( hold nth element) a$ 1+ dup 1+ n 1
- cmove ( shift elements right) h$ a$ 1+ c! ( nth
element to first) k$ n + dup c 1+ swap c! ( increment counter)
k$ n + c n not ( test limit of perms) --
--
( SCRED2 ) ( LKS 860521, scred2 for cpcFTH2 870
312) A full-screen RAM-disc editor for cpcFTH2.
The editor is in overstrike mode at all times, and allows insertion/deleti
on of characters this affects all text from thecursor position to the end of the
last screen. The text must beformatted into screens before LOAD is invoked.
COPY allows copying of any one line within the screens area to (
x) dup if ( if on limit, test for end) n e dup i
f ." Fin" cr 0 n ! then not and then ( x) while (
on limit but not at end) 24 emit ." Suppressedlimit on counter " n . cr
display 24 emit ( report in inverse) k$
1+ n 0 fill ( zero first n counters) ( n e if ." Fin
ished" cr 0 n ! exit then ) ( a possible not-quite-structured termina
tion instead of x-x) the line at the cursor. It will overwrite the existing te
xt butdoes not delete the original line. COPY and GOTO require the absolute l
ine number (unsigned) invalid entries are ignored. SEARCH tries to match the i
nput string through the whole screensarea. Corrections may be made if a match i
s found, but each search must be completed to avoid stack build-up.
repeat
perms ( -- ) ( produce all permutations of a string)
cr 0 here c! sp! 25 1 31 emit emit emit ( locate 1,25) begin her
e c 2 while ." Enter string of elements" cr ." " query 13 word drop r
epeat ( input string) here dup c 1+ a$ swap cmove cr ( mov
e string to a$)--
N( SCRED2 ) forth sp! decimal
64 constant ch ( chars/line) limit first - ch / 1 - constant
ml ( max lines) 23 constant dl ( no of disp
lay lines) variable tl ( top line on screen)
variable cc ( cursor col)
variable cl ( cursor line) variable
ma ( memory address) ed c, 42 c, 38 c, 16 c, ( sbc hl,bc jr c, exi
t) 626b , 9 c, eb c, ( ld l,e ld h,d add hl,bc ex de,hl)
ed c, 4b c, ma , ( ld bc,memory address) b7 c, ed c, 42 c
, ( loop2 or a sbc hl,bc) 38 c, 9 c, ( jr c, exit)
9 c, 7e c, ( add hl,bc ld a,hl)
36 c, 20 c, 12 c, ( ld hl,space ld de,a) --
va
riable t1 ( temporary store) variable t2 ( temp
orary store) hxcode cug ( get curs pos into cc, cl)
cd c, bb78 , 16 c, 0 c, ( call txt get curs ld d,0) 5c c, ed
c, 53 c, cc , ( ld e,h ld cc,de) 5d c, ed c, 53 c, cl , ( l
d e,l ld cl,de) c3 c, next , smudge
--
2b1b , 18 c, f2 c, ( dec de dec hl jr loop2) c1 c, c3 c, n
ext , smudge ( exit) hxcode del ( delete t1 chars
at cursor) c5 c, ( push bc) 2a c, ma , ed c, 4b c, t1 , ( ld hl,ma ld bc
,shift) 5d54 , 9 c, ( ld d,h ld e,l add hl,bc) 0
1 c, limit , ( ld bc, memory top ) b7 c, ed c, 42 c,
( loop or a sbc hl,bc) 30 c, 9 c, 9 c, ( jr nc, exit
add hl,bc) hxcode cus ( set curs pos from cc, cl)
ed c, 5b c, cc , 63 c, ( ld de,cc ld h,e) ed c
, 5b c, cl , 6b c, ( ld de,cl ld l,e) cd c, bb75 , c3 c, nex
t , smudge ( call txt set cur exit) hxcode keydef c5 c, ( push bc)
3e c, 0 c, 6 c, b c, cd c, bb27 , ( nu/awup)
3e c, 0 c, 6 c, 5 c, cd c, bb2d , ( su/a5) 3e c, 1
c, 6 c, 9 c, cd c, bb27 , ( nr/awrt) 7e c, 36 c, 20 c, 12 c, (
ld a,hl ld hl,space ld de,a) 2313 , 18 c, f2 c, ( inc de inc hl jr loop)
c1 c, c3 c, next , smudge ( exit)
hxcode amit ( c --- ) ( prints all codes via txt wr chr) e1 c, c5 c, 7d
c, cd c, bb5d , c1 c, c3 c, next , smudge decimal
disp ( from ma to end of current display, reset
cursor) -- 3
e c, 2 c, 6 c, a c, cd c, bb27 , ( nd/awdn) 3e c, 2 c, 6 c,
6 c, cd c, bb2d , ( sd/a6) 3e c, 8 c, 6 c, 8 c, cd c, bb27 ,
( nl/awlt) 3e c, 9 c, 6 c, f c, cd c, bb27 , ( ncopy15)
3e c, 44 c, 6 c, 1 c, cd c, bb27 , ( ntab1) 3e c,
44 c, 6 c, 2 c, cd c, bb2d , ( stab2) 3e c, 4f c, 6 c, 3 c,
cd c, bb27 , ( ndel3) --
tl dl + ch * first + 1 - ma do i amit 1 /loop cus
no ( accept a valid line number) 7 emit 1 query 13 word
dup dup c 1+ + swap 1+ do i c base digit if drop else 0 leave then 1
/loop dup here swap if number drop swap else 80 0 fill then dup if swap
dup dup 0 swap ml or if drop 0 else swap then then cus $ ( str
ing match) swap dup if over + swap do dup c i c - if 0 leave else 1+ th
en 1 /loop else drop 0 then 3e c, 4f c, 6 c, 4 c, cd c, bb2d , ( sdel4)
c1 c, c3 c, next , smudge ( pop bc exit) h
xcode ins ( insert t1+1 spaces at cursor) c5 c, ( push bc) 21 c, limit , 2b
c, ( ld hl, memory top dec hl) ed c, 4b c, t1 , 5d54 , ( ld bc,
shift ld d,h ld e,l) 3 c, 1a c, 1b c, ( inc bc loop1 ld a,de d
ec de) fe c, 21 c, 38 c, fa c, ( cp "!" jr c, loop1) 13 c,
ed c, 52 c, ( inc de sbc hl,de) N round smudge ( c
alled recursively by search) begin begin begin cug tl cl 2 - + dup
dup ddup t1 ! 2 emit 30 emit 4 .r 5 spaces 16 /mod
1+ 2 .r 58 emit 2 .r cus 3 emit
0 swap ml or while 11 t1 0 if 1 - then emit 7 emit repeat .s
cl dup 3 swap dl or while dl 2 / cl
dup 3 -- .
" normal cursor keys, shifted " 241 240 emit space emit ." page toggle"
cr ." Special function keys " cr ." CLR exit" cr
." normal/shift TAB insert space/s, DEL delete cha
r/s" cr ." (insertion only if there is free space at end)" cr ."
(confirm multiple delete by SHIFT+DEL)" cr ." CTRL+N search " c
r ." enter string cont by CLR until pa
per changes!" cr if swap negate 1+ + else swap - then
tl + dl negate max ml min dup tl ! ch *
first + ma ! 30 emit 15 spaces cr dl 2 / cl ! disp repeat
t1 ch * first + cc 1 - + ma ! key 127
and dup 1 if drop 0 0 t1 ! ins then
dup 2 if drop 0 ch cc - t1 ! ins then dup 3 if d
rop 0 1 t1 ! del then ." CTRL+L goto enter abs lin
e no" cr ." COPY copy line enter abs line no confirm b
y COPY" cr cr ." Do not use the last character on any screen." cr cr
." Erase all screens (n/Y) " 7 emit keydef cr key 89 if empty-buffers .
" erased" else ." converting non-printing codes to blanks" limit first do i c bl
max i c! 1 /loop then cr ." press a key " 7 emit key sp! 24 0 ch 1- 0 windo
w 30 emit 8 tl ! round escen warm 7 emit -- dup
4 if drop 0 24 emit ch cc - 1+ dup t1 ! ma swap type ." confirm" cus 24
emit key 4 if del then then dup 12 if drop 0 24 emit 18 emit ." goto
line " no if tl ! drop 5 then 24 emit then
dup 13 if cr then dup 14 if dr
op t1 t2 ! 26 26 1 ink ." search " query 13 word drop limit first do 2 3
emit emit i here c here 1+ $ --
( Demonstration of commands to disable / enable the ESC trap) ( es
cdis disables, escen enables ) ( Use ESCDIS only wh
en programme is fully de-bugged, and remember to re-enable by ESCEN )
( There is no way of stopping a run-away programme w
hen the ESC key is disabled, short of complete RESET ) ( De
monstration of speed difference, do not include in system) loop0-99 100 0 do
i . loop if i first - ch / tl ! 30 7 emit emi
t round 13 emit here 1+ here c type then 1 /loop 24 24 1 ink t2 tl ! 7 emi
t 5 then dup 15 if drop 0 24 emit 18 emit ." copy line " no if ch
* first + dup t1 ! ch type ." confirm" cus key 15 if t1 ma ch cmov
e then then 24 emit then dup 0 if disp begin terminal 0 until then
dup 5 if 30 emit then
dup 6 if 24 cl ! cus then escdemo ( -- )
begin cr 7 emit cr ." escdemo"
cr ." Endless loop, can be stopped only when ESC
trap is on, by pressing ESC twice" c
r escdis ." ESC trap off " loop0-99 cr escen ." ESC t
rap on " loop0-99 again
escdemo
dup dup bl swap 16 and if drop 7 then dup ddu
p emit bl 0 if ma c! else drop then 16 until smudge
scred decimal escdis 2 mode 24 24 1 ink 0 pe
n 1 paper cr cr ." Screen Editor for cpcFTH2 870312" cr
." P. Lukes, 26 Noll St., Toowoomba, 4350" cr ml 1+ . ." li
nes, shown as abs line scrline in scr" cr --
N N N !N!!!!!!!!! "N""""""""" #N#
######## $N$$$$$$$$$ %N%%%%%%%%% &N&&&&&&&&& 'N''''''''' (N((((((((( )N)))
))))))Tous droits réservés. Reproduction sans autorisation interdite. © Kukulcan