DFM LABELS
FILE INFORMATION
FILENAME(S): DFM LABELS
FILE TYPE(S): PRG
FILE SIZE: 17.1K
FIRST SEEN: 2025-11-30 17:31:23
APPEARS ON: 1 disk(s)
FILE HASH
31d2b8eefc422ef9b9051c3c9e1e5db27b4e030ea51ea9f77d7b3bfefbbaf77b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RONS FOLLY | DFM LABELS | PRG | UK CD | 26 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 9E 32 30 36 31 00 00 00 78 A9 |.......2061...x.|
00000010: 7F 8D 0D DD A9 34 85 01 A2 0C A0 AC B9 AA 4B 99 |.....4........K.|
00000020: 53 FF 88 C0 FF D0 F5 CE 20 08 CE 1D 08 EC 1D 08 |S....... .......|
00000030: D0 EA E6 01 A2 F2 9A C8 B9 00 0A 99 00 01 B9 00 |................|
00000040: 0B 99 00 D8 4A 4A 4A 4A 99 00 DA C8 D0 EA EE 3F |....JJJJ.......?|
00000050: 08 EE 42 08 EE 49 08 CE 39 08 CE 3C 08 10 D9 A2 |..B..I..9..<....|
00000060: 0E A9 80 9D 02 D4 9D 03 D4 A9 21 9D 04 D4 A9 08 |..........!.....|
00000070: 9D 05 D4 A9 80 9D 06 D4 8A 38 E9 07 AA 10 E2 A0 |.........8......|
00000080: 0F A9 00 0A 90 17 A2 FF 8E 0E D4 8E 0F D4 8D 13 |................|
00000090: D4 A2 F0 8E 14 D4 A2 81 8E 12 D4 A0 8F 8C 18 D4 |................|
000000A0: A0 02 A9 FF 99 01 DC 99 01 DD 88 D0 F7 C0 10 B0 |................|
000000B0: 0C B9 30 0D 99 00 DC B9 40 0D 99 00 DD B9 00 0D |..0.....@.......|
000000C0: 99 00 D0 C8 C0 2F D0 E5 20 50 0D AD 30 03 85 C3 |...../.. P..0...|
000000D0: AD 31 03 85 C8 A9 20 A2 06 8D 00 DE 8D FE DF 8E |.1.... .........|
000000E0: 00 DE C6 01 A0 00 4C 8E 00 20 B1 9A 4C 04 86 20 |......L.. ..L.. |
000000F0: 49 9A 8D 83 08 48 20 2C 90 68 20 CA 8E 24 80 A9 |I....H ,.h ..$..|
00000100: 0A 2F 35 A7 02 C7 02 4B 03 6B 03 8B 03 00 00 20 |./5....K.k..... |
00000110: 20 20 A0 1F 86 18 86 20 B1 0A C6 1C 85 00 A5 10 | ..... ........|
00000120: 91 0A 88 10 F3 C6 1E CA CA D0 E7 4C 03 02 7F 08 |...........L....|
00000130: 08 81 01 08 FF FF FF FF 25 40 FF FF 00 00 65 0A |........%@....e.|
00000140: 00 00 00 08 00 02 4B 80 CB 29 CB 29 FF 0A FF 00 |......K..).)....|
00000150: 00 19 00 00 03 4C EC 00 00 F3 28 EC 28 00 00 00 |.....L....(.(...|
00000160: 1D AD 53 C1 E6 61 D0 02 E6 62 60 20 60 00 AA 20 |..S..a...b` `.. |
00000170: 60 00 91 DC C8 F0 2C CA D0 F8 F0 05 20 60 00 85 |`.....,..... `..|
00000180: 84 20 60 00 C9 FF F0 E3 91 DC C8 D0 F4 F0 14 06 |. `.............|
00000190: DF 90 04 26 DF C6 97 46 FF 90 E1 20 60 00 91 DC |...&...F... `...|
000001A0: C8 D0 F8 E6 DD D0 E8 E6 01 AD 12 D0 C9 80 D0 F9 |................|
000001B0: AD 08 DC AD 08 DC AD 08 DD AD 08 DD EA EA EA EA |................|
000001C0: EA C6 01 A9 FF 8D 60 00 A9 FF 8D 60 00 A2 0A 4C |......`....`...L|
000001D0: 11 00 A9 7B 8D 11 D0 E6 01 84 90 84 84 00 02 84 |...{............|
000001E0: 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000001F0: 00 00 00 00 00 00 00 00 00 E1 F9 E1 92 27 57 1E |.............'W.|
00000200: 00 A2 1A A4 1A A5 1A A6 1A A7 1A A8 1A A9 1A AA |................|
00000210: 1A AB 1A AC 1A AD 1A AE 1A AF 1A B0 1A B1 1A B2 |................|
00000220: 1A B3 1A B4 1A B5 1A B6 1A B7 1A B8 1A B9 1A BA |................|
00000230: 1A BB 1A BC 1A BD 1A BE 1A BF 1A C0 1A C1 1A 00 |................|
00000240: 08 B5 00 9D 00 09 E0 5A B0 06 BD 73 85 9D 50 0D |.......Z...s..P.|
00000250: E8 D0 E8 A9 97 A0 0B 20 A9 88 A9 81 A0 0A 20 A6 |....... ...... .|
00000260: 88 A2 7A BD 47 8A 9D 60 09 CA 10 F7 A5 90 8D 61 |..z.G..`.......a|
00000270: 09 A5 91 8D 62 09 A9 BA A0 89 20 4F 88 A6 8E 2C |....b..... O...,|
00000280: FA FF 03 25 25 2A F9 2C FA FF 03 25 25 2A F9 2C |...%%*.,...%%*.,|
00000290: FA FF 03 25 25 2A F9 2C FA FF 03 25 25 2A F9 2C |...%%*.,...%%*.,|
000002A0: FA FF 03 25 25 2A F9 2C FA FF 03 25 25 2A F9 2C |...%%*.,...%%*.,|
000002B0: FA FF 03 25 25 2A F9 2C FA FF 03 25 25 2A F9 2C |...%%*.,...%%*.,|
000002C0: FA 45 FB FF 03 25 21 2D FA FF 03 25 25 2A F9 2C |.E...%!-...%%*.,|
000002D0: FA FF 03 25 25 2A F9 2C FA FF 03 7E 7D EA 1F 7D |...%%*.,...~}..}|
000002E0: 99 03 02 88 10 FA 8C 19 D0 EA 86 01 A2 0A A0 00 |................|
000002F0: 68 40 08 08 52 21 3E A6 C2 A8 E9 A7 A7 79 A6 9C |h@..R!>......y..|
00000300: E3 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |.wwwwwwwwwwwwwww|
00000310: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000320: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000330: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000340: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000350: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000360: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000370: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000380: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000390: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000003A0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000003B0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000003C0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000003D0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000003E0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000003F0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000400: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000410: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000420: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000430: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000440: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000450: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000460: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000470: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000480: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
00000490: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000004A0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000004B0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000004C0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000004D0: 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 |wwwwwwwwwwwwwwww|
000004E0: 77 77 77 77 77 77 77 77 77 37 C7 37 C7 B7 C7 27 |wwwwwwwww7.7...'|
000004F0: C7 C7 37 C7 37 C7 37 C7 37 37 C7 37 A7 37 C7 67 |..7.7.7.77.7.7.g|
00000500: C7 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000510: 00 00 1B 37 D1 00 00 C8 00 15 71 F0 00 00 00 00 |...7......q.....|
00000520: 00 F2 F2 F1 F2 F3 F4 F0 F1 F2 F3 F4 F5 F6 F7 FC |................|
00000530: 00 7F 00 FF 00 03 2B 07 00 00 00 00 01 00 7F 10 |......+.........|
00000540: 10 97 00 3F 00 07 00 07 00 00 00 00 01 00 7F 10 |...?............|
00000550: 10 2C 11 D0 10 FB A2 00 A0 01 A5 33 8D 04 DD A5 |.,.........3....|
00000560: 34 8C 0E DD 8D 05 DD 8E 0E DD A5 35 8D 06 DD A5 |4..........5....|
00000570: 36 8C 0F DD 8D 07 DD 8E 0F DD A5 37 8D 04 DC A5 |6..........7....|
00000580: 38 8C 0E DC 8D 05 DC 8E 0E DC A5 39 8D 06 DC A5 |8..........9....|
00000590: 3A 8C 0F DC 8D 07 DC 8E 0F DC AD 0D DC AD 0D DD |:...............|
000005A0: A5 2D 8D 0D DD A5 30 8D 0D DC 60 05 00 00 4E A2 |.-....0...`...N.|
000005B0: 38 BD 41 02 95 02 A9 00 9D 41 02 CA 10 F3 E6 01 |8.A......A......|
000005C0: A9 5E 2C 11 D0 30 FB CD 12 D0 D0 F6 A9 08 A2 08 |.^,..0..........|
000005D0: 8D 0E DD 8E 0F DD A0 3D 48 68 A5 00 A9 01 A2 08 |.......=Hh......|
000005E0: 8D 0E DC 8E 0F DC A9 00 A2 37 4C DF 01 00 AA B1 |.........7L.....|
000005F0: 91 B3 00 00 0F 05 07 00 40 02 00 C8 00 19 16 00 |........@.......|
00000600: 00 6B 0A 05 07 00 9F F2 01 00 00 03 00 00 01 08 |.k..............|
00000610: A6 29 F3 29 67 2B FF 9F FF 9F 00 A0 C8 05 09 00 |.).)g+..........|
00000620: 08 00 A0 00 07 0E 04 0A 00 04 10 00 00 48 EB 05 |.............H..|
00000630: 0E 00 31 00 00 11 90 11 00 01 0A 81 80 00 00 00 |..1.............|
00000640: FF 00 00 00 FF 9F FF 9F FF 00 00 6C 0A E6 7A D0 |...........l..z.|
00000650: 02 E6 7B AD 70 0A C9 3A B0 0A C9 20 F0 EF 38 E9 |..{.p..:... ..8.|
00000660: 30 38 E9 D0 60 80 4F C7 52 58 00 FF 05 08 00 03 |08..`.O.RX......|
00000670: 05 1E 00 04 8B E3 83 A4 7C A5 1A A7 E4 A7 86 AE |........|.......|
00000680: 04 04 00 4C 48 B2 00 31 EA 66 FE 47 FE 4A F3 91 |...LH..1.f.G.J..|
00000690: F2 0E F2 50 F2 33 F3 57 F1 CA F1 ED F6 3E F1 2F |...P.3.W.....>./|
000006A0: F3 66 FE A5 F4 ED F5 04 08 00 01 01 08 A6 29 44 |.f............)D|
000006B0: 46 4D 20 4C 41 42 45 4C 53 00 10 86 08 04 06 00 |FM LABELS.......|
000006C0: 80 F8 A6 29 A6 29 FE 40 3C 03 81 04 05 00 01 05 |...).).@<.......|
000006D0: 26 F8 00 F8 00 01 08 01 08 40 00 00 03 00 03 40 |&........@.....@|
000006E0: 01 02 20 00 00 70 07 00 00 27 16 0D 00 04 07 84 |.. ..p...'......|
000006F0: 04 06 85 04 07 86 04 06 87 70 DB 81 EB 04 08 00 |.........p......|
00000700: 04 52 20 04 04 00 01 01 55 20 01 1D 2A 01 0B 20 |.R .....U ..*.. |
00000710: 2A 2A 2A 20 A0 84 86 8D A0 20 A0 8D 81 89 8C A0 |*** ..... ......|
00000720: 20 A0 8C 81 82 85 8C 93 A0 20 2A 2A 2A 01 0B 20 | ........ ***.. |
00000730: 01 1D 2A 01 3E 20 03 20 20 02 19 03 44 20 A0 84 |..*.> . ...D ..|
00000740: A0 20 A0 89 A0 20 A0 81 A0 20 A0 8C A0 20 A0 8F |. ... ... ... ..|
00000750: A0 20 A0 87 A0 03 3D 20 13 20 0F 20 06 20 14 20 |. ....= . . . . |
00000760: 17 20 01 20 12 20 05 03 55 20 07 07 66 20 0B 05 |. . . ..U ..f ..|
00000770: 19 20 0F 10 14 09 0F 0E 07 10 20 07 27 63 20 84 |. ........ .'c .|
00000780: 01 14 01 06 09 0C 05 20 0C 0F 01 04 07 0E 20 8C |....... ...... .|
00000790: 01 02 05 0C 13 07 07 20 96 09 05 17 20 12 05 03 |....... .... ...|
000007A0: 0F 12 04 13 07 0F 20 95 14 09 0C 09 14 09 05 13 |...... .........|
000007B0: 07 04 20 93 0F 12 14 2F 16 09 05 02 17 20 09 0E |.. ..../..... ..|
000007C0: 04 05 18 02 0C 20 85 18 09 14 20 10 12 0F 07 12 |..... .... .....|
000007D0: 01 0D 02 29 20 02 27 63 02 79 20 02 18 99 01 00 |...) .'c.y .....|
000007E0: 48 08 0A 00 8F 20 2A 20 44 46 4D 20 4C 41 42 45 |H.... * DFM LABE|
000007F0: 4C 53 20 42 59 20 43 48 52 49 53 20 45 4C 59 20 |LS BY CHRIS ELY |
00000800: 2A 20 44 49 41 4C 4F 47 20 53 4F 46 54 57 41 52 |* DIALOG SOFTWAR|
00000810: 45 28 43 29 20 31 35 2F 30 33 2F 38 33 20 2A 20 |E(C) 15/03/83 * |
00000820: 4A 41 33 30 30 34 00 63 08 0F 00 97 35 33 32 38 |JA3004.c....5328|
00000830: 30 2C 32 3A 97 35 33 32 38 31 2C 32 3A 99 22 9E |0,2:.53281,2:.".|
00000840: 22 00 91 08 14 00 58 B2 30 3A 59 B2 30 3A 52 B2 |".....X.0:Y.0:R.|
00000850: 30 3A 43 B2 30 3A 49 50 24 B2 22 22 3A 4B 24 B2 |0:C.0:IP$."":K$.|
00000860: 22 22 3A 45 4D 24 B2 22 22 3A 4E 24 B2 22 22 00 |"":EM$."":N$."".|
00000870: A8 08 28 00 41 24 28 52 2C 43 29 B2 22 22 3A 46 |..(.A$(R,C)."":F|
00000880: B2 30 3A 53 B2 30 00 B4 08 32 00 99 C7 28 31 34 |.0:S.0...2...(14|
00000890: 37 29 00 CA 08 3C 00 8D 31 36 38 30 3A 81 49 B2 |7)...<..1680:.I.|
000008A0: 31 A4 31 30 3A 99 3A 82 00 F7 08 46 00 99 22 01 |1.10:.:....F..".|
000008B0: 06 20 53 45 4C 45 43 54 3A 20 12 55 92 50 50 45 |. SELECT: .U.PPE|
000008C0: 52 20 4F 52 20 12 4C 92 4F 57 45 52 20 43 41 53 |R OR .L.OWER CAS|
000008D0: 45 22 00 0B 09 50 00 A1 20 4B 24 3A 8B 20 4B 24 |E"...P.. K$:. K$|
000008E0: B2 22 22 A7 38 30 00 25 09 5A 00 8B 4B 24 B2 22 |."".80.%.Z..K$."|
000008F0: 55 22 A7 99 C7 28 31 34 32 29 20 3A 89 31 32 30 |U"...(142) :.120|
00000900: 00 3D 09 64 00 8B 4B 24 B2 22 4C 22 A7 99 C7 28 |.=.d..K$."L"...(|
00000910: 31 34 29 3A 89 31 32 30 00 45 09 6E 00 89 38 30 |14):.120.E.n..80|
00000920: 00 57 09 78 00 99 C7 28 31 34 37 29 3A 8D 31 36 |.W.x...(147):.16|
00000930: 38 30 00 6B 09 82 00 99 3A 8B 4E 24 B2 22 22 A7 |80.k....:.N$."".|
00000940: 99 3A 89 31 35 30 00 87 09 87 00 8B C3 28 4E 24 |.:.150.......(N$|
00000950: 29 B3 39 A7 4E 24 B2 4E 24 AA 22 20 22 3A 89 31 |).9.N$.N$." ":.1|
00000960: 33 35 00 B4 09 8C 00 99 3A 99 3A 99 3A 99 A3 38 |35......:.:.:..8|
00000970: 29 22 12 20 46 49 4C 45 20 49 4E 20 55 53 45 3A |)". FILE IN USE:|
00000980: 20 22 3B 4E 24 3B 22 92 22 3A 99 3A 99 3A 99 00 | ";N$;".":.:.:..|
00000990: D2 09 96 00 99 3A 99 A3 31 34 29 22 4B 45 59 20 |.....:..14)"KEY |
000009A0: 4F 50 54 49 4F 4E 22 3A 8D 31 32 36 30 00 F6 09 |OPTION":.1260...|
000009B0: A0 00 99 22 12 44 92 41 54 41 46 49 4C 45 20 4C |...".D.ATAFILE L|
000009C0: 4F 41 44 22 A3 32 37 29 22 12 4C 92 41 42 45 4C |OAD".27)".L.ABEL|
000009D0: 53 00 1D 0A AA 00 99 22 12 56 92 49 45 57 20 52 |S......".V.IEW R|
000009E0: 45 43 4F 52 44 53 22 A3 32 37 29 22 12 55 92 54 |ECORDS".27)".U.T|
000009F0: 49 4C 49 54 49 45 53 22 00 52 0A B4 00 99 22 12 |ILITIES".R....".|
00000A00: 53 92 4F 52 54 2F 56 49 45 57 20 49 4E 44 45 58 |S.ORT/VIEW INDEX|
00000A10: 22 A3 32 37 29 22 12 45 92 58 49 54 20 50 52 4F |".27)".E.XIT PRO|
00000A20: 47 52 41 4D 22 3A 99 3A 8D 31 32 36 30 00 5E 0A |GRAM":.:.1260.^.|
00000A30: BE 00 97 20 31 35 38 2C 30 00 71 0A C8 00 A1 4B |... 158,0.q....K|
00000A40: 24 3A 8B 4B 24 B2 22 22 A7 32 30 30 00 9C 0A D2 |$:.K$."".200....|
00000A50: 00 4B 4B 24 B2 22 44 4C 56 55 53 45 22 3A 81 4B |.KK$."DLVUSE":.K|
00000A60: B2 31 A4 36 3A 8B 4B 24 B2 CA 28 4B 4B 24 2C 4B |.1.6:.K$..(KK$,K|
00000A70: 2C 31 29 A7 32 32 30 00 A8 0A D7 00 82 4B 3A 89 |,1).220......K:.|
00000A80: 32 30 30 00 CC 0A DC 00 91 4B 89 31 33 30 30 2C |200......K.1300,|
00000A90: 32 34 33 30 2C 32 34 30 2C 31 37 32 30 2C 32 31 |2430,240,1720,21|
00000AA0: 30 30 2C 31 36 36 30 00 D2 0A E6 00 3A 00 14 0B |00,1660.....:...|
00000AB0: F0 00 52 4E B2 30 3A 99 22 45 4E 54 45 52 20 52 |..RN.0:."ENTER R|
00000AC0: 45 43 4F 52 44 20 12 4E 4F 3A 92 20 4F 52 20 12 |ECORD .NO:. OR .|
00000AD0: 53 92 43 52 4F 4C 4C 3A 20 20 22 3B 3A 8D 31 31 |S.CROLL: ";:.11|
00000AE0: 33 30 3A 8B 49 50 24 B2 22 53 22 A7 32 37 30 00 |30:.IP$."S".270.|
00000AF0: 3F 0B FA 00 52 4E B2 B5 28 C5 28 49 50 24 29 29 |?...RN..(.(IP$))|
00000B00: 3A 8B 28 52 4E B3 31 B0 52 4E B1 59 29 A7 99 3A |:.(RN.1.RN.Y)..:|
00000B10: 8D 32 30 35 30 3A 89 32 34 30 00 72 0B 04 01 52 |.2050:.240.r...R|
00000B20: B2 52 4E 3A 99 C7 28 31 34 37 29 3A 99 A3 31 32 |.RN:..(147):..12|
00000B30: 29 22 12 20 52 45 43 4F 52 44 20 56 49 45 57 20 |)". RECORD VIEW |
00000B40: 92 22 3A 8D 31 32 36 30 3A 89 33 30 30 00 94 0B |.":.1260:.300...|
00000B50: 0E 01 99 C7 28 31 34 37 29 3B 3A 81 52 B2 31 A4 |....(147);:.R.1.|
00000B60: 59 3A 99 C7 28 31 39 29 3B 3A 8D 31 32 36 30 00 |Y:..(19);:.1260.|
00000B70: C7 0B 18 01 99 22 12 20 52 45 43 4F 52 44 53 20 |.....". RECORDS |
00000B80: 57 49 4C 4C 20 44 49 53 50 4C 41 59 20 49 4E 20 |WILL DISPLAY IN |
00000B90: 4C 4F 47 49 43 41 4C 20 4F 52 44 45 52 20 92 22 |LOGICAL ORDER ."|
00000BA0: 3A 99 00 04 0C 22 01 99 22 12 43 92 4F 4E 54 49 |:...."..".C.ONTI|
00000BB0: 4E 55 4F 55 53 20 53 43 52 4F 4C 4C 3A 20 20 12 |NUOUS SCROLL: .|
00000BC0: 53 92 54 4F 50 20 53 43 52 4F 4C 4C 3A 20 20 12 |S.TOP SCROLL: .|
00000BD0: 45 92 58 49 54 3A 22 3A 99 3A 8D 31 32 36 30 00 |E.XIT:":.:.1260.|
00000BE0: 22 0C 2C 01 99 3A 99 22 52 45 43 4F 52 44 20 4E |".,..:."RECORD N|
00000BF0: 4F 3A 20 22 3B 52 3A 81 43 B2 31 A4 58 00 3E 0C |O: ";R:.C.1.X.>.|
00000C00: 36 01 51 B2 C3 28 41 24 28 52 2C 43 29 29 3A 8B |6.Q..(A$(R,C)):.|
00000C10: 51 B1 32 36 A7 51 B2 32 36 00 7A 0C 54 01 99 22 |Q.26.Q.26.z.T.."|
00000C20: 12 22 41 24 28 30 2C 43 29 C8 28 42 4C 24 2C 39 |."A$(0,C).(BL$,9|
00000C30: AB C3 28 41 24 28 30 2C 43 29 29 29 22 92 22 A3 |..(A$(0,C)))".".|
00000C40: 31 32 29 41 24 28 52 2C 43 29 C8 28 42 4C 24 2C |12)A$(R,C).(BL$,|
00000C50: 32 36 AB 51 29 00 85 0C 55 01 8B 43 B2 31 A7 99 |26.Q)...U..C.1..|
00000C60: 00 95 0C 59 01 8B 52 4E B3 B1 30 A7 33 32 37 30 |...Y..RN..0.3270|
00000C70: 00 A5 0C 5E 01 82 43 3A 8B 52 B2 31 A7 33 39 30 |...^..C:.R.1.390|
00000C80: 00 BF 0C 68 01 4B 24 B2 22 22 3A A1 4B 24 3A 8B |...h.K$."":.K$:.|
00000C90: 4B 24 B2 22 53 22 A7 33 39 30 00 DB 0C 72 01 8B |K$."S".390...r..|
00000CA0: 4B 24 B3 B1 22 45 22 A7 81 49 B2 31 A4 35 30 30 |K$.."E"..I.1.500|
00000CB0: 3A 82 49 3A 82 52 00 E8 0C 7C 01 52 B2 59 3A 89 |:.I:.R...|.R.Y:.|
00000CC0: 31 32 30 00 0B 0D 86 01 4B 24 B2 22 22 3A A1 4B |120.....K$."":.K|
00000CD0: 24 3A 8B 4B 24 B3 B1 22 43 22 AF 4B 02 24 B3 B1 |$:.K$.."C".K.$..|
00000CE0: 22 45 22 A7 33 39 30 00 14 0D 90 01 89 33 37 30 |"E".390......370|
00000CF0: 00 1A 0D 9A 01 3A 00 26 0D A4 01 99 C7 28 31 34 |.....:.&.....(14|
00000D00: 37 29 00 53 0D A9 01 99 A3 38 29 22 12 20 53 45 |7).S.....8)". SE|
00000D10: 4C 45 43 54 49 4F 4E 20 46 4F 52 20 50 52 49 4E |LECTION FOR PRIN|
00000D20: 54 49 4E 47 20 92 22 3A 8D 31 32 36 30 3A 99 00 |TING .":.1260:..|
00000D30: 5E 0D AE 01 81 52 B2 31 A4 59 00 95 0D B8 01 99 |^....R.1.Y......|
00000D40: 22 45 4E 54 45 52 20 46 49 45 4C 44 20 54 49 54 |"ENTER FIELD TIT|
00000D50: 4C 45 20 5B 02 09 20 5D 02 0A 9D 22 3B 3A 8D 31 |LE [.. ]...";:.1|
00000D60: 31 33 30 3B 00 A1 0D C2 01 44 50 24 B2 49 50 24 |130;.....DP$.IP$|
00000D70: 00 C0 0D CC 01 8B C3 28 44 50 24 29 B3 39 A7 44 |.......(DP$).9.D|
00000D80: 50 24 B2 44 50 24 AA 22 20 22 3A 89 34 36 30 00 |P$.DP$." ":.460.|
00000D90: CA 0D D6 01 99 3A 43 B2 31 00 DF 0D E0 01 8B 41 |.....:C.1......A|
00000DA0: 24 28 30 2C 43 29 B2 44 50 24 A7 35 31 30 00 F4 |$(0,C).DP$.510..|
00000DB0: 0D EA 01 43 B2 43 AA 31 3A 8B 43 B3 58 AA 31 A7 |...C.C.1:.C.X.1.|
00000DC0: 34 38 30 00 1B 0E F4 01 45 4D 24 B2 22 12 20 4E |480.....EM$.". N|
00000DD0: 03 4F 20 53 55 43 48 20 46 49 45 4C 44 20 92 22 |.O SUCH FIELD ."|
00000DE0: 3A 8D 31 32 32 30 3A 89 31 32 30 00 3B 0E FE 01 |:.1220:.120.;...|
00000DF0: 99 22 45 4E 54 45 52 20 43 52 49 54 45 52 49 41 |."ENTER CRITERIA|
00000E00: 20 46 4F 52 20 22 44 50 24 3A 99 00 58 0E 08 02 | FOR "DP$:..X...|
00000E10: 99 22 5B 22 3B 3A 8D 32 30 37 30 3A 99 C8 28 53 |."[";:.2070:..(S|
00000E20: 24 2C 41 28 43 29 29 3B 00 75 0E 12 02 99 22 5D |$,A(C));.u...."]|
00000E30: 22 3B 3A 99 C8 28 54 24 2C 41 28 43 29 29 3B 3A |";:..(T$,A(C));:|
00000E40: 99 22 9D 22 3B 00 89 0E 1C 02 8D 31 31 33 30 3A |.".";......1130:|
00000E50: 43 50 24 B2 49 50 24 3A 99 00 96 0E 26 02 46 B2 |CP$.IP$:....&.F.|
00000E60: C3 28 43 50 24 29 00 AF 0E 3A 02 8B 41 41 24 28 |.(CP$)...:..AA$(|
00000E70: 43 29 B2 22 43 22 A7 49 B2 31 3A 89 36 36 30 00 |C)."C".I.1:.660.|
00000E80: CD 0E 44 02 99 22 53 48 4F 55 4C 44 20 12 20 22 |..D.."SHOULD . "|
00000E90: 44 50 24 22 20 92 20 42 45 3A 22 3A 99 00 EF 0E |DP$" . BE:":....|
00000EA0: 4E 02 99 A3 37 29 22 12 45 92 51 55 41 4C 20 54 |N...7)".E.QUAL T|
00000EB0: 4F 03 06 20 3A 20 22 43 50 24 3A 99 00 11 0F 58 |O.. : "CP$:....X|
00000EC0: 02 99 A3 37 29 22 12 4C 92 45 53 53 20 54 01 48 |...7)".L.ESS T.H|
00000ED0: 41 4E 01 05 20 3A 20 22 43 50 24 3A 99 00 33 0F |AN.. : "CP$:..3.|
00000EE0: 62 02 99 A3 37 29 22 12 47 92 52 45 41 54 45 52 |b...7)".G.REATER|
00000EF0: 20 54 48 41 4E 20 20 3A 20 22 43 50 24 3A 99 00 | THAN : "CP$:..|
00000F00: 3E 0F 6C 02 97 31 35 38 2C 30 00 51 0F 76 02 A1 |>.l..158,0.Q.v..|
00000F10: 4B 24 3A 8B 4B 24 B2 22 22 A7 36 33 30 00 79 0F |K$:.K$."".630.y.|
00000F20: 80 02 4B 4B 24 B2 22 45 4C 47 22 3A 81 49 B2 31 |..KK$."ELG":.I.1|
00000F30: A4 33 3A 8B 4B 24 B2 CA 28 4B 4B 24 2C 49 2C 31 |.3:.K$..(KK$,I,1|
00000F40: 29 A7 36 36 30 00 85 0F 8A 02 82 49 3A 89 36 33 |).660......I:.63|
00000F50: 30 00 B2 0F 94 02 99 C7 28 31 34 37 29 3A 99 A3 |0.......(147):..|
00000F60: 31 32 29 22 12 20 4C 41 42 45 4C 53 20 50 52 49 |12)". LABELS PRI|
00000F70: 4E 54 49 4E 47 20 92 22 3A 8D 31 32 36 30 00 CC |NTING .":.1260..|
00000F80: 0F 9E 02 99 22 46 49 4C 45 20 4E 41 4D 45 20 3A |...."FILE NAME :|
00000F90: 20 12 20 22 4E 24 3A 99 00 E7 0F A8 02 99 22 53 | . "N$:......."S|
00000FA0: 45 4C 45 43 54 49 4F 4E 20 3A 20 12 20 22 44 50 |ELECTION : . "DP|
00000FB0: 24 3A 99 00 FA 0F B2 02 91 49 89 39 37 30 2C 37 |$:.......I.970,7|
00000FC0: 31 30 2C 38 33 30 00 1F 10 C6 02 99 22 43 52 49 |10,830......"CRI|
00000FD0: 54 45 52 49 41 20 20 3C 20 12 20 22 43 50 24 22 |TERIA < . "CP$"|
00000FE0: 20 92 22 3A 99 3A 8D 31 32 36 30 00 42 10 D0 02 | .":.:.1260.B...|
00000FF0: 9F 34 2C 34 3A 81 52 B2 31 A4 59 3A 81 4E 4C B2 |.4,4:.R.1.Y:.NL.|
00001000: 31 A4 4E 50 3A 81 42 B2 31 A4 42 42 AB 31 00 71 |1.NP:.B.1.BB.1.q|
00001010: 10 E4 02 8B C5 28 41 24 28 52 2C 43 29 29 B3 C5 |.....(A$(R,C))..|
00001020: 28 43 50 24 29 A7 98 34 2C A3 4C 4E 29 C8 28 41 |(CP$)..4,.LN).(A|
00001030: 24 28 52 2C 42 28 42 29 29 2C 4C 57 29 00 99 10 |$(R,B(B)),LW)...|
00001040: F8 02 82 42 3A 8B C5 28 41 24 28 52 2C 43 29 29 |...B:..(A$(R,C))|
00001050: B3 C5 28 43 50 24 29 A7 81 49 B2 31 A4 42 4C 3A |..(CP$)..I.1.BL:|
00001060: 98 34 3A 82 49 00 AD 10 02 03 82 4E 4C 3A 82 52 |.4:.I......NL:.R|
00001070: 3A A0 34 3A 89 31 30 38 30 00 D2 10 3E 03 99 22 |:.4:.1080...>.."|
00001080: 43 52 49 54 45 52 49 41 20 20 3E 20 12 20 22 43 |CRITERIA > . "C|
00001090: 50 24 22 20 92 22 3A 99 3A 8D 31 32 36 30 00 F5 |P$" .":.:.1260..|
000010A0: 10 48 03 9F 34 2C 34 3A 81 52 B2 31 A4 59 3A 81 |.H..4,4:.R.1.Y:.|
000010B0: 4E 4C B2 31 A4 4E 50 3A 81 42 B2 31 A4 42 42 AB |NL.1.NP:.B.1.BB.|
000010C0: 31 00 24 11 5C 03 8B C5 28 41 24 28 52 2C 43 29 |1.$.\...(A$(R,C)|
000010D0: 29 B1 C5 28 43 50 24 29 A7 98 34 2C A3 4C 4E 29 |)..(CP$)..4,.LN)|
000010E0: C8 28 41 24 28 52 2C 42 28 42 29 29 2C 4C 57 29 |.(A$(R,B(B)),LW)|
000010F0: 00 4C 11 7A 03 82 42 3A 8B C5 28 41 24 28 52 2C |.L.z..B:..(A$(R,|
00001100: 43 29 29 B1 C5 28 43 50 24 29 A7 81 49 B2 31 A4 |C))..(CP$)..I.1.|
00001110: 42 4C 3A 98 34 3A 82 49 00 60 11 84 03 82 4E 4C |BL:.4:.I.`....NL|
00001120: 3A 82 52 3A A0 34 3A 89 31 30 38 30 00 85 11 CA |:.R:.4:.1080....|
00001130: 03 99 22 43 52 49 54 45 52 49 41 20 20 3D 20 12 |.."CRITERIA = .|
00001140: 20 22 43 50 24 22 20 92 22 3A 99 3A 8D 31 32 36 | "CP$" .":.:.126|
00001150: 30 00 A8 11 D4 03 9F 34 2C 34 3A 81 52 B2 31 A4 |0......4,4:.R.1.|
00001160: 59 3A 81 4E 4C B2 31 A4 4E 50 3A 81 42 B2 31 A4 |Y:.NL.1.NP:.B.1.|
00001170: 42 42 AB 31 00 D6 11 E8 03 8B C8 28 41 24 28 52 |BB.1.......(A$(R|
00001180: 2C 43 29 2C 46 29 B2 43 50 24 A7 98 34 2C A3 4C |,C),F).CP$..4,.L|
00001190: 4E 29 C8 28 41 24 28 52 2C 42 28 42 29 29 2C 4C |N).(A$(R,B(B)),L|
000011A0: 57 29 00 FD 11 06 04 82 42 3A 8B C8 28 41 24 28 |W)......B:..(A$(|
000011B0: 52 2C 43 29 2C 46 29 B2 43 50 24 A7 81 49 B2 31 |R,C),F).CP$..I.1|
000011C0: A4 42 4C 3A 98 34 3A 82 49 00 0C 12 10 04 82 4E |.BL:.4:.I......N|
000011D0: 4C 3A 20 82 52 3A A0 34 00 34 12 38 04 99 3A 97 |L: .R:.4.4.8..:.|
000011E0: 31 35 38 2C 30 3A 99 A3 31 32 29 22 12 52 92 45 |158,0:..12)".R.E|
000011F0: 50 52 49 4E 54 20 4F 52 20 12 4D 92 45 4E 55 22 |PRINT OR .M.ENU"|
00001200: 00 48 12 42 04 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 |.H.B..K$:.K$."".|
00001210: 31 30 39 30 00 5F 12 4C 04 8B 4B 24 B2 22 4D 22 |1090._.L..K$."M"|
00001220: A7 52 B2 52 AB 31 3A 89 31 32 30 00 6F 12 56 04 |.R.R.1:.120.o.V.|
00001230: 8B 4B 24 B2 22 52 22 A7 36 36 30 00 79 12 60 04 |.K$."R".660.y.`.|
00001240: 89 31 30 39 30 00 89 12 6A 04 42 24 B2 22 20 22 |.1090...j.B$." "|
00001250: 3A 99 22 22 3B 00 A0 12 74 04 A1 49 50 24 3A 8B |:."";...t..IP$:.|
00001260: 49 50 24 B2 22 22 A7 89 31 31 34 30 00 BC 12 7E |IP$.""..1140...~|
00001270: 04 8B 42 24 B2 22 20 22 AF C6 28 49 50 24 29 B2 |..B$." "..(IP$).|
00001280: 32 30 A7 89 31 31 34 30 00 EA 12 88 04 8B C6 28 |20..1140.......(|
00001290: 49 50 24 29 B2 32 30 A7 42 24 B2 C8 28 42 24 2C |IP$).20.B$..(B$,|
000012A0: C3 28 42 24 29 AB 31 29 3A 99 22 9D 20 9D 22 3B |.(B$).1):.". .";|
000012B0: 3A 89 31 31 34 30 00 09 13 92 04 8B 49 50 24 B2 |:.1140......IP$.|
000012C0: C7 28 31 33 29 A7 49 50 24 B2 CA 28 42 01 24 2C |.(13).IP$..(B.$,|
000012D0: 32 29 3A 99 3A 8E 00 22 13 9C 04 41 B2 C6 28 49 |2):.:.."...A..(I|
000012E0: 50 24 29 3A 8B 41 B3 31 31 A7 89 31 31 34 30 00 |P$):.A.11..1140.|
000012F0: 44 13 A6 04 42 24 B2 42 24 AA 49 50 24 3A 99 22 |D...B$.B$.IP$:."|
00001300: 12 22 3B 49 50 24 3B 22 92 22 3B 3A 89 31 31 34 |.";IP$;".";:.114|
00001310: 30 00 4A 13 B0 04 3A 00 50 13 BA 04 3A 00 5A 13 |0.J...:.P...:.Z.|
00001320: C4 04 99 20 45 4D 24 00 6D 13 CE 04 81 20 54 38 |... EM$.m.... T8|
00001330: B2 31 20 A4 31 30 30 30 3A 82 00 73 13 D8 04 8E |.1 .1000:..s....|
00001340: 00 79 13 E2 04 3A 00 AA 13 EC 04 99 22 01 27 A3 |.y...:......".'.|
00001350: 22 3A 8E 00 DB 13 F6 04 99 22 01 27 2D 22 3A 8E |":.......".'-":.|
00001360: 00 E1 13 0A 05 3A 00 E7 13 14 05 9C 00 05 14 1E |.....:..........|
00001370: 05 99 22 41 52 45 20 59 4F 55 20 4C 4F 41 44 49 |.."ARE YOU LOADI|
00001380: 4E 47 20 46 52 4F 4D 3A 2D 22 00 24 14 28 05 99 |NG FROM:-".$.(..|
00001390: 22 12 44 92 49 53 4B 20 4F 52 20 12 54 92 41 50 |".D.ISK OR .T.AP|
000013A0: 45 22 3A 97 31 35 38 2C 30 00 3A 14 32 05 A1 20 |E":.158,0.:.2.. |
000013B0: 4B 24 3A 8B 20 4B 24 B2 22 22 A7 31 33 33 30 00 |K$:. K$."".1330.|
000013C0: 4B 14 3C 05 8B 4B 24 B2 22 54 22 A7 31 33 38 30 |K.<..K$."T".1380|
000013D0: 00 5C 14 46 05 8B 4B 24 B2 22 44 22 A7 31 34 34 |.\.F..K$."D".144|
000013E0: 30 00 66 14 50 05 89 31 33 33 30 00 6C 14 5A 05 |0.f.P..1330.l.Z.|
000013F0: 3A 00 7F 14 64 05 54 B2 31 3A 55 B2 30 3A 4E 4E |:...d.T.1:U.0:NN|
00001400: 24 B2 4E 24 00 A9 14 6E 05 8D 32 30 35 30 3A 99 |$.N$...n..2050:.|
00001410: 22 49 46 20 44 41 54 41 20 43 41 53 53 45 54 54 |"IF DATA CASSETT|
00001420: 45 20 49 53 20 49 4E 20 50 4C 41 43 45 22 00 CC |E IS IN PLACE"..|
00001430: 14 78 05 99 22 50 52 45 53 53 20 12 43 92 4F 4E |.x.."PRESS .C.ON|
00001440: 54 49 4E 55 45 20 4F 52 20 12 41 92 42 4F 52 54 |TINUE OR .A.BORT|
00001450: 22 00 E6 14 82 05 4B 24 B2 22 22 3A A1 4B 24 3A |".....K$."":.K$:|
00001460: 8B 4B 24 B2 22 22 A7 31 34 31 30 00 F7 14 8C 05 |.K$."".1410.....|
00001470: 8B 4B 24 B3 B1 22 43 22 A7 31 32 30 00 01 15 96 |.K$.."C".120....|
00001480: 05 89 31 34 39 30 01 00 36 15 A0 05 54 B2 38 3A |..1490..6...T.8:|
00001490: 55 B2 34 3A 4E 31 24 B2 22 30 3A 22 3A 4E 32 24 |U.4:N1$."0:":N2$|
000014A0: B2 22 2C 53 45 51 2C 52 45 41 44 22 3A 4E 4E 24 |.",SEQ,READ":NN$|
000014B0: B2 4E 31 24 AA 4E 4E 24 AA 4E 32 24 00 40 15 AA |.N1$.NN$.N2$.@..|
000014C0: 05 89 31 34 39 30 00 46 15 C8 05 3A 00 7F 15 D2 |..1490.F...:....|
000014D0: 05 8D 32 30 35 30 3A 99 22 45 4E 54 45 52 20 46 |..2050:."ENTER F|
000014E0: 49 4C 45 20 4E 41 4D 45 20 5B 01 08 20 5D 01 09 |ILE NAME [.. ]..|
000014F0: 9D 22 3B 3A 8D 20 31 31 33 30 00 98 15 DC 05 4E |.";:. 1130.....N|
00001500: 24 B2 C8 28 49 50 24 2C 38 29 3A 4E 4E 24 B2 4E |$..(IP$,8):NN$.N|
00001510: 24 3A 99 00 A8 15 E6 05 8B 54 B2 31 A7 99 22 91 |$:.......T.1..".|
00001520: 91 91 22 00 B7 15 F0 05 9F 31 2C 54 2C 55 2C 4E |.."......1,T,U,N|
00001530: 4E 24 00 CB 15 FA 05 84 31 2C 59 3A 84 31 2C 58 |N$......1,Y:.1,X|
00001540: 3A 8D 33 30 30 30 00 E3 15 04 06 81 20 43 B2 31 |:.3000...... C.1|
00001550: 20 A4 20 58 3A 84 31 2C 41 28 43 29 3A 82 00 FD | . X:.1,A(C):...|
00001560: 15 0E 06 81 20 43 B2 31 20 A4 20 58 3A 84 31 2C |.... C.1 . X:.1,|
00001570: 41 41 24 28 43 29 3A 82 00 0B 16 18 06 81 20 52 |AA$(C):....... R|
00001580: B2 31 20 A4 20 59 00 19 16 22 06 81 20 43 B2 31 |.1 . Y...".. C.1|
00001590: 20 A4 20 58 00 28 16 2C 06 84 31 2C 41 24 28 52 | . X.(.,..1,A$(R|
000015A0: 2C 43 29 00 30 16 36 06 82 3A 82 00 3E 16 40 06 |,C).0.6..:..>.@.|
000015B0: 81 20 43 B2 31 20 A4 20 58 00 4D 16 4A 06 84 31 |. C.1 . X.M.J..1|
000015C0: 2C 41 24 28 30 2C 43 29 00 53 16 54 06 82 00 5A |,A$(0,C).S.T...Z|
000015D0: 16 5E 06 A0 31 00 63 16 68 06 89 31 32 30 00 69 |.^..1.c.h..120.i|
000015E0: 16 72 06 3A 00 93 16 7C 06 99 22 12 20 45 58 49 |.r.:...|..". EXI|
000015F0: 54 20 92 20 3A 20 41 52 45 20 59 4F 55 20 53 55 |T . : ARE YOU SU|
00001600: 52 45 3F 20 5B 12 59 92 2F 12 4E 92 5D 22 00 AD |RE? [.Y./.N.]"..|
00001610: 16 7F 06 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 |...K$."":.K$:.K$|
00001620: B2 22 22 A7 31 36 36 33 00 BE 16 81 06 8B 4B 24 |."".1663......K$|
00001630: B3 B1 22 59 22 A7 31 32 30 00 E0 16 86 06 4E 24 |.."Y".120.....N$|
00001640: B2 22 22 3A 99 C7 28 31 34 37 29 3A 8D 31 36 38 |."":..(147):.168|
00001650: 30 3A 99 3A 99 3A 99 3A 99 3A 99 00 F6 16 8B 06 |0:.:.:.:.:......|
00001660: 99 3A 99 3A 99 3A 99 3A 97 31 34 34 2C 38 35 3A |.:.:.:.:.144,85:|
00001670: 80 00 22 17 90 06 99 3A 99 22 20 20 01 20 20 20 |.."....:." . |
00001680: 01 1D 2A 22 00 52 17 9A 06 99 22 01 05 20 2A 2A |..*".R....".. **|
00001690: 2A 20 12 20 44 46 4D 20 92 20 12 20 4D 41 49 4C |* . DFM . . MAIL|
000016A0: 20 92 20 12 20 4C 41 42 45 4C 53 20 92 20 2A 2A | . . LABELS . **|
000016B0: 2A 22 00 7E 17 A4 06 99 22 01 05 20 01 1D 2A 22 |*".~....".. ..*"|
000016C0: 3A 99 00 8C 17 A7 06 8B 4E 24 B3 B1 22 22 A7 8E |:.......N$..""..|
000016D0: 00 AA 17 A9 06 99 22 01 12 20 42 59 22 3A 99 00 |......".. BY":..|
000016E0: E0 17 AE 06 99 22 01 08 20 12 20 44 20 92 20 12 |.....".. . D . .|
000016F0: 20 49 20 92 20 12 20 41 20 92 20 12 20 4C 20 92 | I . . A . . L .|
00001700: 20 12 20 4F 20 92 20 12 20 47 20 92 20 22 3A 99 | . O . . G . ":.|
00001710: 00 07 18 B3 06 99 22 01 0C 20 53 20 4F 20 46 20 |......".. S O F |
00001720: 54 20 57 20 41 20 52 20 45 22 3A 99 3A 8E 00 13 |T W A R E":.:...|
00001730: 18 B8 06 99 C7 28 31 34 37 29 00 34 18 BD 06 99 |.....(147).4....|
00001740: A3 31 34 29 22 12 20 55 54 49 4C 49 54 49 45 53 |.14)". UTILITIES|
00001750: 20 92 22 3A 8D 31 32 36 30 3A 99 00 51 18 C2 06 | .":.1260:..Q...|
00001760: 99 22 20 20 20 12 44 92 49 53 4B 20 44 49 52 45 |." .D.ISK DIRE|
00001770: 43 54 4F 52 59 22 3A 99 00 73 18 CC 06 99 22 20 |CTORY":..s...." |
00001780: 20 20 12 4D 92 45 4D 4F 52 59 20 41 56 41 49 4C | .M.EMORY AVAIL|
00001790: 41 42 49 4C 49 54 59 22 3A 99 00 92 18 D1 06 99 |ABILITY":.......|
000017A0: 22 20 20 20 12 46 92 49 4C 45 20 44 45 53 43 52 |" .F.ILE DESCR|
000017B0: 49 50 54 49 4F 4E 22 3A 99 00 B4 18 D6 06 99 22 |IPTION":......."|
000017C0: 20 20 20 12 52 92 45 54 55 52 4E 20 54 4F 20 4D | .R.ETURN TO M|
000017D0: 41 49 4E 20 4D 45 4E 55 22 3A 99 00 C2 18 E0 06 |AIN MENU":......|
000017E0: 99 3A 8D 31 32 36 30 3A 99 00 D6 18 F4 06 A1 56 |.:.1260:.......V|
000017F0: 24 3A 8B 56 24 B2 22 22 A7 31 37 38 30 00 E7 18 |$:.V$."".1780...|
00001800: FE 06 8B 56 24 B2 22 44 22 A7 34 30 30 30 00 F8 |...V$."D".4000..|
00001810: 18 12 07 8B 56 24 B2 22 4D 22 A7 31 38 37 30 00 |....V$."M".1870.|
00001820: 08 19 1C 07 8B 56 24 B2 22 52 22 A7 31 32 30 00 |.....V$."R".120.|
00001830: 19 19 26 07 8B 56 24 B2 22 46 22 A7 31 39 36 30 |..&..V$."F".1960|
00001840: 00 23 19 44 07 89 31 37 38 30 00 39 19 4E 07 99 |.#.D..1780.9.N..|
00001850: C7 28 31 39 29 3A 81 49 B2 31 A4 35 3A 99 3A 82 |.(19):.I.1.5:.:.|
00001860: 00 51 19 58 07 99 A3 32 34 29 22 3D 22 B8 28 30 |.Q.X...24)"=".(0|
00001870: 29 22 42 59 54 45 53 22 00 62 19 9E 07 99 C7 28 |)"BYTES".b.....(|
00001880: 31 39 29 3A 89 31 37 32 35 00 8F 19 A8 07 99 C7 |19):.1725.......|
00001890: 28 31 34 37 29 3A 99 22 46 49 4C 45 20 44 45 53 |(147):."FILE DES|
000018A0: 43 52 49 50 54 49 4F 4E 20 46 4F 52 20 22 4E 24 |CRIPTION FOR "N$|
000018B0: 3A 8D 31 32 36 30 00 B6 19 B2 07 99 22 4F 55 54 |:.1260......"OUT|
000018C0: 50 55 54 20 54 4F 20 12 53 92 43 52 45 45 4E 20 |PUT TO .S.CREEN |
000018D0: 4F 52 20 12 50 92 52 49 4E 54 45 52 22 00 D4 19 |OR .P.RINTER"...|
000018E0: BC 07 A1 4B 24 3A 8B 4B 24 B3 B1 22 53 22 AF 4B |...K$:.K$.."S".K|
000018F0: 24 B3 B1 22 50 22 A7 31 39 38 30 00 EB 19 C1 07 |$.."P".1980.....|
00001900: 8B 4B 24 B2 22 53 22 A7 44 56 B2 33 3A 89 31 39 |.K$."S".DV.3:.19|
00001910: 39 30 00 1F 1A C2 07 44 56 B2 34 3A 99 C7 28 31 |90.....DV.4:..(1|
00001920: 39 29 3A 99 3A 99 3A 99 22 3E 3E 20 45 4E 53 55 |9):.:.:.">> ENSU|
00001930: 52 45 20 50 52 49 4E 54 45 52 20 41 4C 49 47 4E |RE PRINTER ALIGN|
00001940: 45 44 20 3C 3C 22 00 45 1A C4 07 99 3A 99 22 50 |ED <<".E....:."P|
00001950: 52 45 53 53 20 12 20 53 50 41 43 45 20 42 41 52 |RESS . SPACE BAR|
00001960: 20 92 20 54 4F 20 50 52 49 4E 54 22 00 61 1A C5 | . TO PRINT".a..|
00001970: 07 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 B3 B1 |.K$."":.K$:.K$..|
00001980: 22 20 22 A7 31 39 38 39 00 6E 1A C6 07 9F 34 2C |" ".1989.n....4,|
00001990: 44 56 3A 9D 34 00 9B 1A D0 07 99 C7 28 31 34 37 |DV:.4.......(147|
000019A0: 29 3A 99 22 46 49 4C 45 20 44 45 53 43 52 49 50 |):."FILE DESCRIP|
000019B0: 54 49 4F 4E 20 46 4F 52 20 22 4E 24 3A 8D 31 32 |TION FOR "N$:.12|
000019C0: 37 30 00 BE 1A DA 07 81 43 B2 31 A4 58 3A 43 24 |70......C.1.X:C$|
000019D0: B2 C4 28 43 29 3A 8B 43 B3 31 30 A7 43 24 B2 43 |..(C):.C.10.C$.C|
000019E0: 24 AA 22 20 22 00 E3 1A E4 07 43 31 24 B2 C4 28 |$." ".....C1$..(|
000019F0: 41 28 43 29 29 3A 8B 41 28 43 29 B3 31 30 A7 43 |A(C)):.A(C).10.C|
00001A00: 31 24 B2 22 20 22 AA 43 31 24 00 1A 1B EE 07 99 |1$." ".C1$......|
00001A10: 22 46 49 45 4C 44 20 4E 4F 22 43 24 22 20 22 41 |"FIELD NO"C$" "A|
00001A20: 24 28 4F 2C 43 29 22 20 01 20 57 49 44 54 48 22 |$(O,C)" . WIDTH"|
00001A30: 43 31 24 22 20 20 54 59 50 45 20 22 41 41 24 28 |C1$" TYPE "AA$(|
00001A40: 43 29 00 31 1B F8 07 82 3A 98 34 3A A0 34 3A 8B |C).1....:.4:.4:.|
00001A50: 44 56 B2 34 A7 31 37 32 30 00 5A 1B FA 07 99 3A |DV.4.1720.Z....:|
00001A60: 99 22 50 52 45 53 53 20 12 20 53 50 41 43 45 20 |."PRESS . SPACE |
00001A70: 42 41 52 20 92 20 54 4F 20 43 4F 4E 54 49 4E 55 |BAR . TO CONTINU|
00001A80: 45 22 00 70 1B FC 07 A1 4B 24 3A 8B 4B 24 B3 B1 |E".p....K$:.K$..|
00001A90: 22 20 22 A7 32 30 34 34 00 7A 1B FE 07 89 31 37 |" ".2044.z....17|
00001AA0: 32 30 00 AC 1B 02 08 42 4C 24 B2 22 01 27 20 22 |20.....BL$.".' "|
00001AB0: 00 CA 1B 0C 08 99 22 91 91 22 3B 3A 99 42 4C 24 |......"..";:.BL$|
00001AC0: 3A 99 42 4C 24 3A 99 22 91 91 91 22 3A 8E 00 FC |:.BL$:."...":...|
00001AD0: 1B 16 08 53 24 B2 22 01 28 20 22 00 30 1C 20 08 |...S$.".( ".0. .|
00001AE0: 01 54 24 B2 22 01 28 9D 22 3A 8E 00 36 1C 2A 08 |.T$.".(.":..6.*.|
00001AF0: 3A 00 66 1C 34 08 8B 59 B2 30 A7 45 4D 24 B2 22 |:.f.4..Y.0.EM$."|
00001B00: 12 20 4E 4F 20 46 49 4C 45 20 49 4E 20 4D 45 4D |. NO FILE IN MEM|
00001B10: 4F 52 59 20 92 22 3A 8D 31 32 32 30 3A 89 31 32 |ORY .":.1220:.12|
00001B20: 30 00 8E 1C 3E 08 99 22 12 53 92 4F 52 54 20 4F |0...>..".S.ORT O|
00001B30: 52 20 12 56 92 49 45 57 20 49 4E 44 45 58 20 4F |R .V.IEW INDEX O|
00001B40: 52 20 12 45 92 58 49 54 22 00 A8 1C 48 08 4B 24 |R .E.XIT"...H.K$|
00001B50: B2 22 22 3A A1 4B 24 3A 8B 4B 24 B2 22 22 A7 32 |."":.K$:.K$."".2|
00001B60: 31 32 30 00 B9 1C 52 08 8B 4B 24 B2 22 56 22 A7 |120...R..K$."V".|
00001B70: 33 32 30 30 00 C9 1C 5C 08 8B 4B 24 B2 22 45 22 |3200...\..K$."E"|
00001B80: A7 31 32 30 00 DB 1C 66 08 8B 4B 24 B3 B1 22 53 |.120...f..K$.."S|
00001B90: 22 A7 32 31 32 30 00 0A 1D 70 08 99 3A 8D 32 30 |".2120...p..:.20|
00001BA0: 35 30 3A 99 22 45 4E 54 45 52 20 46 49 45 4C 44 |50:."ENTER FIELD|
00001BB0: 20 59 4F 55 20 57 49 53 48 20 54 4F 20 53 4F 52 | YOU WISH TO SOR|
00001BC0: 54 20 42 59 22 00 28 1D 7A 08 99 22 4B 45 59 20 |T BY".(.z.."KEY |
00001BD0: 12 31 20 54 4F 22 58 22 92 3A 20 22 3B 3A 8D 31 |.1 TO"X".: ";:.1|
00001BE0: 31 33 30 00 4A 1D 84 08 4D B2 C5 28 49 50 24 29 |130.J...M..(IP$)|
00001BF0: 3A 8B 4D B3 31 B0 4D B1 58 A7 8D 32 30 35 30 3A |:.M.1.M.X..2050:|
00001C00: 89 32 31 36 30 00 6F 1D 98 08 8D 32 30 35 30 3A |.2160.o....2050:|
00001C10: 99 22 12 20 53 4F 52 54 49 4E 47 20 92 20 50 4C |.". SORTING . PL|
00001C20: 45 41 53 45 20 57 41 49 54 22 00 7C 1D A2 08 81 |EASE WAIT".|....|
00001C30: 52 B2 31 A4 59 AB 31 00 8B 1D AC 08 81 49 B2 28 |R.1.Y.1......I.(|
00001C40: 52 AA 31 29 A4 59 00 B1 1D B6 08 8B 41 41 24 28 |R.1).Y......AA$(|
00001C50: 4D 29 B2 22 43 22 AF 41 24 28 49 2C 4D 29 B1 B2 |M)."C".A$(I,M)..|
00001C60: 41 24 28 52 2C 4D 29 A7 32 33 30 30 00 DD 1D C0 |A$(R,M).2300....|
00001C70: 08 8B 41 41 24 28 4D 29 B2 22 4E 22 AF C5 28 41 |..AA$(M)."N"..(A|
00001C80: 24 28 49 2C 4D 29 29 B1 B2 C5 28 41 24 28 52 2C |$(I,M))...(A$(R,|
00001C90: 4D 29 29 A7 32 33 30 30 00 E8 1D CA 08 81 43 B2 |M)).2300......C.|
00001CA0: 31 A4 58 00 FA 1D D4 08 42 24 28 43 29 B2 41 24 |1.X.....B$(C).A$|
00001CB0: 28 52 2C 43 29 00 0E 1E DE 08 41 24 01 28 52 2C |(R,C).....A$.(R,|
00001CC0: 43 29 B2 41 24 28 49 2C 43 29 00 20 1E E8 08 41 |C).A$(I,C). ...A|
00001CD0: 24 28 49 2C 43 29 B2 42 24 28 43 29 00 27 1E F2 |$(I,C).B$(C).'..|
00001CE0: 08 82 43 00 2F 1E FC 08 82 3A 82 00 62 1E 06 09 |..C./....:..b...|
00001CF0: 99 3A 8D 32 30 35 30 3A 99 22 12 20 53 4F 52 54 |.:.2050:.". SORT|
00001D00: 20 92 20 43 4F 4D 50 4C 45 54 45 44 22 3A 81 4A | . COMPLETED":.J|
00001D10: B2 31 A4 31 30 30 30 3A 82 3A 89 31 32 30 00 80 |.1.1000:.:.120..|
00001D20: 1E 10 09 43 4F 4C B2 31 3A 4C 4E 45 B2 32 31 3A |...COL.1:LNE.21:|
00001D30: 8D 32 33 34 30 3A 81 49 B2 31 A4 33 00 B4 1E 1A |.2340:.I.1.3....|
00001D40: 09 99 22 01 27 20 22 3A 82 49 3A 8E 00 E7 1E 24 |..".' ":.I:....$|
00001D50: 09 41 43 43 24 B2 22 01 27 1D 22 00 0B 1F 2E 09 |.ACC$.".'.".....|
00001D60: 44 4F 57 24 B2 22 01 0F 11 01 01 09 11 22 00 16 |DOW$."......."..|
00001D70: 1F 38 09 81 5A B2 31 A4 32 00 20 1F 42 09 99 22 |.8..Z.1.2. .B.."|
00001D80: 13 22 3B 00 3B 1F 4C 09 8B 43 4F 4C B1 31 A7 99 |.";.;.L..COL.1..|
00001D90: C8 28 41 43 43 24 2C 43 4F 4C AB 31 29 3B 00 56 |.(ACC$,COL.1);.V|
00001DA0: 1F 56 09 8B 4C 4E 45 B1 31 A7 99 C8 28 44 4F 57 |.V..LNE.1...(DOW|
00001DB0: 24 2C 4C 4E 45 AB 31 29 3B 00 8B 1F 60 09 8B 5A |$,LNE.1);...`..Z|
00001DC0: B2 31 A7 99 22 01 27 20 22 3B 00 92 1F 6A 09 82 |.1..".' ";...j..|
00001DD0: 5A 00 98 1F 74 09 8E 00 AB 1F 7E 09 99 C7 28 31 |Z...t.....~...(1|
00001DE0: 34 37 29 3B 3A 8D 31 32 36 30 00 DB 1F 88 09 99 |47);:.1260......|
00001DF0: 22 20 20 53 45 4C 45 43 54 20 54 48 45 20 12 20 |" SELECT THE . |
00001E00: 46 49 45 4C 44 53 20 92 20 54 48 41 54 20 41 52 |FIELDS . THAT AR|
00001E10: 45 20 54 4F 20 42 45 22 3A 99 00 0F 20 92 09 99 |E TO BE":... ...|
00001E20: 22 01 04 20 49 4E 43 4C 55 44 45 44 20 4F 4E 20 |".. INCLUDED ON |
00001E30: 45 41 43 48 20 50 52 49 4E 54 45 44 20 4C 41 01 |EACH PRINTED LA.|
00001E40: 42 45 4C 22 3A 99 3A 8D 31 32 36 30 3A 99 00 1C |BEL":.:.1260:...|
00001E50: 20 A6 09 42 B2 31 3A 42 42 B2 31 00 27 20 B0 09 | ..B.1:BB.1.' ..|
00001E60: 81 43 B2 31 A4 58 00 54 20 BA 09 99 41 24 28 30 |.C.1.X.T ...A$(0|
00001E70: 2C 43 29 A3 32 34 29 22 12 59 92 45 53 20 4F 52 |,C).24)".Y.ES OR|
00001E80: 20 12 4E 92 4F 20 5B 20 5D 9D 9D 22 3B 3A 8D 31 | .N.O [ ]..";:.1|
00001E90: 31 33 30 00 76 20 CE 09 8B 49 50 24 B2 22 59 22 |130.v ...IP$."Y"|
00001EA0: A7 42 28 42 29 B2 43 3A 42 B2 42 AA 31 3A 42 42 |.B(B).C:B.B.1:BB|
00001EB0: B2 42 42 AA 31 00 B0 20 D8 09 82 43 3A 99 3A 99 |.BB.1.. ...C:.:.|
00001EC0: 22 3E 3E 20 41 43 43 45 50 54 20 53 45 4C 45 43 |">> ACCEPT SELEC|
00001ED0: 54 49 4F 4E 20 3C 3C 01 09 20 12 59 92 2F 12 4E |TION <<.. .Y./.N|
00001EE0: 92 2F 12 45 92 58 49 54 22 00 BC 20 D9 09 99 3A |./.E.XIT".. ...:|
00001EF0: 8D 31 32 36 30 00 D6 20 DA 09 4B 24 B2 22 22 3A |.1260.. ..K$."":|
00001F00: A1 4B 24 3A 8B 4B 24 B2 22 22 A7 32 35 32 32 00 |.K$:.K$."".2522.|
00001F10: E7 20 DC 09 8B 4B 24 B2 22 4E 22 A7 32 34 33 30 |. ...K$."N".2430|
00001F20: 00 F7 20 DE 09 8B 4B 24 B2 22 45 22 A7 31 32 30 |.. ...K$."E".120|
00001F30: 00 09 21 E0 09 8B 4B 24 B3 B1 22 59 22 A7 32 35 |..!...K$.."Y".25|
00001F40: 32 32 00 15 21 E2 09 99 C7 28 31 34 37 29 00 39 |22..!....(147).9|
00001F50: 21 E7 09 99 A3 31 33 29 22 12 20 4C 41 42 45 4C |!....13)". LABEL|
00001F60: 20 46 4F 52 4D 41 54 20 92 22 3A 8D 31 32 36 30 | FORMAT .":.1260|
00001F70: 3A 99 00 77 21 F6 09 99 22 4C 41 42 45 4C 20 53 |:..w!..."LABEL S|
00001F80: 54 41 52 54 49 4E 47 20 50 4F 49 4E 54 20 28 31 |TARTING POINT (1|
00001F90: 2D 38 30 29 20 20 20 5B 20 20 5D 9D 9D 9D 22 3B |-80) [ ]...";|
00001FA0: 3A 8D 31 31 33 30 3A 4C 4E B2 C5 28 49 50 24 29 |:.1130:LN..(IP$)|
00001FB0: 00 B7 21 0A 0A 99 3A 99 22 4D 41 58 20 43 48 41 |..!...:."MAX CHA|
00001FC0: 52 41 43 54 45 52 20 57 49 44 54 48 20 54 4F 20 |RACTER WIDTH TO |
00001FD0: 50 52 49 4E 54 20 20 5B 20 20 5D 9D 9D 9D 22 3B |PRINT [ ]...";|
00001FE0: 3A 8D 31 31 33 30 3A 4C 57 B2 C5 28 49 50 24 29 |:.1130:LW..(IP$)|
00001FF0: 00 F5 21 14 0A 99 3A 99 22 4E 4F 3A 20 4F 46 20 |..!...:."NO: OF |
00002000: 4C 49 4E 45 53 20 42 45 54 57 45 45 4E 20 4C 41 |LINES BETWEEN LA|
00002010: 42 45 4C 53 20 20 20 5B 20 5D 9D 9D 22 3B 3A 8D |BELS [ ]..";:.|
00002020: 31 31 33 30 3A 42 4C B2 C5 28 49 50 24 29 00 35 |1130:BL..(IP$).5|
00002030: 22 19 0A 99 3A 99 22 48 4F 57 01 20 4D 41 4E 59 |"...:."HOW. MANY|
00002040: 20 4F 46 20 45 41 43 48 20 4C 41 42 45 4C 01 08 | OF EACH LABEL..|
00002050: 20 5B 20 20 5D 9D 9D 9D 22 3B 3A 8D 31 31 33 30 | [ ]...";:.1130|
00002060: 3A 4E 50 B2 C5 28 49 50 24 29 00 6E 22 3C 0A 99 |:NP..(IP$).n"<..|
00002070: 3A 99 3A 99 22 3E 3E 20 41 43 43 45 50 54 20 46 |:.:.">> ACCEPT F|
00002080: 4F 52 4D 41 54 20 3C 3C 01 0C 20 12 59 92 2F 12 |ORMAT <<.. .Y./.|
00002090: 4E 92 2F 12 45 92 58 49 54 22 00 7A 22 41 0A 99 |N./.E.XIT".z"A..|
000020A0: 3A 8D 31 32 36 30 00 94 22 46 0A 4B 24 B2 22 22 |:.1260.."F.K$.""|
000020B0: 3A A1 4B 24 3A 8B 4B 24 B2 22 22 A7 32 36 33 30 |:.K$:.K$."".2630|
000020C0: 00 A5 22 4B 0A 8B 4B 24 B2 22 4E 22 A7 32 35 33 |.."K..K$."N".253|
000020D0: 30 00 B5 22 50 0A 8B 4B 24 B2 22 45 22 A7 31 32 |0.."P..K$."E".12|
000020E0: 30 00 C7 22 52 0A 8B 4B 24 B3 B1 22 59 22 A7 32 |0.."R..K$.."Y".2|
000020F0: 36 33 30 00 D3 22 54 0A 99 C7 28 31 34 37 29 00 |630.."T...(147).|
00002100: FF 22 56 0A 99 A3 31 33 29 22 12 20 4C 41 42 45 |."V...13)". LABE|
00002110: 4C 20 50 52 49 4E 54 20 92 22 3A 8D 31 32 36 30 |L PRINT .":.1260|
00002120: 3A 81 49 B2 31 A4 35 3A 99 3A 82 00 2C 01 23 5A |:.I.1.5:.:..,.#Z|
00002130: 0A 99 22 01 06 20 3E 3E 20 54 45 53 54 20 50 52 |..".. >> TEST PR|
00002140: 49 4E 54 20 46 4F 52 4D 41 54 20 3C 3C 20 12 59 |INT FORMAT << .Y|
00002150: 92 2F 12 4E 92 22 00 41 23 5F 0A 81 49 B2 31 A4 |./.N.".A#_..I.1.|
00002160: 36 3A 99 3A 82 3A 8D 31 32 36 30 00 5B 23 64 0A |6:.:.:.1260.[#d.|
00002170: 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 B2 22 22 |K$."":.K$:.K$.""|
00002180: A7 32 36 36 30 00 78 23 69 0A 4B 4B 24 B2 4B 24 |.2660.x#i.KK$.K$|
00002190: 3A 99 C7 28 31 39 29 3A 81 49 B2 31 A4 37 3A 99 |:..(19):.I.1.7:.|
000021A0: 3A 82 00 A2 23 6E 0A 99 22 01 04 20 3E 3E 3E 20 |:...#n..".. >>> |
000021B0: 45 4E 53 55 52 45 20 50 52 49 4E 54 45 52 20 41 |ENSURE PRINTER A|
000021C0: 4C 49 47 4E 45 44 20 3C 3C 3C 22 00 C7 23 73 0A |LIGNED <<<"..#s.|
000021D0: 8B 4B 4B 24 B2 22 59 22 A7 8D 32 38 35 30 3A 99 |.KK$."Y"..2850:.|
000021E0: C7 28 31 39 29 3A 81 49 B2 31 A4 38 3A 99 3A 82 |.(19):.I.1.8:.:.|
000021F0: 00 05 24 78 0A 81 49 B2 31 A4 34 3A 99 3A 82 3A |..$x..I.1.4:.:.:|
00002200: 99 22 20 50 52 49 4E 54 20 12 41 92 4C 4C 20 2F |." PRINT .A.LL /|
00002210: 20 12 53 92 45 4C 45 43 54 45 44 20 52 45 43 4F | .S.ELECTED RECO|
00002220: 52 44 53 20 4F 52 20 12 4E 92 4F 4E 45 22 00 1F |RDS OR .N.ONE"..|
00002230: 24 82 0A 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 |$..K$."":.K$:.K$|
00002240: B2 22 22 A7 32 36 39 30 00 2F 24 8C 0A 8B 4B 24 |."".2690./$...K$|
00002250: B2 22 53 22 A7 34 32 30 00 3F 24 96 0A 8B 4B 24 |."S".420.?$...K$|
00002260: B2 22 4E 22 A7 31 32 30 00 51 24 A0 0A 8B 4B 24 |."N".120.Q$...K$|
00002270: B3 B1 22 41 22 A7 32 36 39 30 00 7E 24 A5 0A 99 |.."A".2690.~$...|
00002280: C7 28 31 34 37 29 3A 99 A3 31 32 29 22 12 20 4C |.(147):..12)". L|
00002290: 41 42 45 4C 53 20 50 52 49 4E 54 49 4E 47 20 92 |ABELS PRINTING .|
000022A0: 22 3A 8D 31 32 36 30 00 98 24 AA 0A 99 22 46 49 |":.1260..$..."FI|
000022B0: 4C 45 20 4E 41 4D 45 20 3A 20 12 20 22 4E 24 3A |LE NAME : . "N$:|
000022C0: 99 00 C3 24 AF 0A 99 22 53 45 4C 45 43 54 49 4F |...$..."SELECTIO|
000022D0: 4E 20 3A 20 12 20 41 4C 4C 20 52 45 43 4F 52 44 |N : . ALL RECORD|
000022E0: 53 20 92 22 3A 99 3A 8D 31 32 36 30 00 CF 24 B4 |S .":.:.1260..$.|
000022F0: 0A 9F 34 2C 34 3A 9D 34 00 DA 24 B9 0A 81 52 B2 |..4,4:.4..$...R.|
00002300: 31 A4 59 00 E7 24 BE 0A 81 4E 4C B2 31 A4 4E 50 |1.Y..$...NL.1.NP|
00002310: 00 F5 24 C8 0A 81 42 B2 31 A4 42 42 AB 31 00 0F |..$...B.1.BB.1..|
00002320: 25 D2 0A 99 A3 4C 4E 29 C8 28 01 41 24 28 52 2C |%....LN).(.A$(R,|
00002330: 42 28 42 29 29 2C 4C 57 29 00 16 25 DC 0A 82 42 |B(B)),LW)..%...B|
00002340: 00 27 25 E6 0A 81 49 B2 31 A4 42 4C 3A 99 3A 82 |.'%...I.1.BL:.:.|
00002350: 49 00 38 25 F0 0A 82 4E 4C 3A 82 52 3A 98 34 3A |I.8%...NL:.R:.4:|
00002360: A0 34 00 59 25 FA 0A 99 3A 99 A3 31 32 29 22 12 |.4.Y%...:..12)".|
00002370: 52 92 45 50 52 49 4E 54 20 4F 52 20 12 4D 92 45 |R.EPRINT OR .M.E|
00002380: 4E 55 22 00 6D 25 04 0B A1 4B 24 3A 8B 4B 24 B2 |NU".m%...K$:.K$.|
00002390: 22 22 A7 32 38 32 30 00 7D 25 0E 0B 8B 4B 24 B2 |"".2820.}%...K$.|
000023A0: 22 4D 22 A7 31 32 30 00 8E 25 13 0B 8B 4B 24 B2 |"M".120..%...K$.|
000023B0: 22 52 22 A7 32 37 32 35 00 98 25 18 0B 89 32 38 |"R".2725..%...28|
000023C0: 32 30 00 D0 25 22 0B 81 49 B2 31 A4 34 3A 99 3A |20..%"..I.1.4:.:|
000023D0: 82 3A 99 22 01 04 20 50 52 45 53 53 20 12 20 53 |.:.".. PRESS . S|
000023E0: 50 41 43 45 20 42 41 52 20 92 20 54 4F 20 50 52 |PACE BAR . TO PR|
000023F0: 49 4E 54 20 54 45 53 54 22 00 EC 25 27 0B 4B 24 |INT TEST"..%'.K$|
00002400: B2 22 22 3A A1 4B 24 3A 8B 4B 24 B3 B1 22 20 22 |."":.K$:.K$.." "|
00002410: A7 32 38 35 35 00 0F 26 2C 0B 41 24 B2 22 22 3A |.2855..&,.A$."":|
00002420: 81 49 B2 31 A4 4C 57 3A 41 24 01 B2 41 24 AA 22 |.I.1.LW:A$..A$."|
00002430: 58 22 3A 82 3A 9F 34 2C 34 00 2A 26 36 0B 81 49 |X":.:.4,4.*&6..I|
00002440: B2 31 A4 42 42 AB 31 3A 98 34 2C A3 4C 4E 29 3B |.1.BB.1:.4,.LN);|
00002450: 41 24 3A 82 00 51 26 40 0B 81 49 B2 31 A4 42 4C |A$:..Q&@..I.1.BL|
00002460: 3A 98 34 3A 82 3A A0 34 3A 99 C7 28 31 39 29 3A |:.4:.:.4:..(19):|
00002470: 81 49 B2 31 A4 31 32 3A 99 3A 82 00 80 26 4A 0B |.I.1.12:.:...&J.|
00002480: 99 22 01 04 20 54 45 53 54 20 4F 56 45 52 3A 20 |.".. TEST OVER: |
00002490: 12 43 92 4F 4E 54 49 4E 55 45 20 4F 52 20 12 52 |.C.ONTINUE OR .R|
000024A0: 92 45 53 45 54 2D 55 50 22 00 9A 26 54 0B 4B 24 |.ESET-UP"..&T.K$|
000024B0: B2 22 22 3A A1 4B 24 3A 8B 4B 24 B2 22 22 A7 32 |."":.K$:.K$."".2|
000024C0: 39 30 30 00 A8 26 5E 0B 8B 4B 24 B2 22 43 22 A7 |900..&^..K$."C".|
000024D0: 8E 00 BA 26 68 0B 8B 4B 24 B3 B1 22 52 22 A7 32 |...&h..K$.."R".2|
000024E0: 39 30 30 00 C4 26 72 0B 89 32 34 33 30 00 00 27 |900..&r..2430..'|
000024F0: B8 0B 86 20 41 24 28 32 30 30 2C 58 29 2C 41 41 |... A$(200,X),AA|
00002500: 24 28 58 29 2C 41 28 58 AA 32 29 2C 43 24 28 58 |$(X),A(X.2),C$(X|
00002510: 29 2C 42 24 28 58 29 2C 42 28 58 29 3A 41 24 28 |),B$(X),B(X):A$(|
00002520: 52 2C 43 29 B2 22 22 3A 8E 00 06 27 1C 0C 3A 00 |R,C)."":...'..:.|
00002530: 32 27 80 0C 99 C7 28 31 34 37 29 3A 99 A3 31 32 |2'....(147):..12|
00002540: 29 22 12 20 20 56 49 45 57 20 49 4E 44 45 58 20 |)". VIEW INDEX |
00002550: 20 92 22 3A 8D 31 32 36 30 3A 99 00 3F 27 85 0C | .":.1260:..?'..|
00002560: 8B 4D B2 30 A7 4D B2 31 00 6A 27 8A 0C 43 54 B2 |.M.0.M.1.j'..CT.|
00002570: 31 3A 81 49 B2 31 A4 59 3A 41 24 B2 C8 28 41 24 |1:.I.1.Y:A$..(A$|
00002580: 28 49 2C 4D 29 2C 33 30 29 3A 99 49 3B A3 36 29 |(I,M),30):.I;.6)|
00002590: 3B 41 24 00 8E 27 94 0C 8B C3 28 41 24 29 B3 33 |;A$..'....(A$).3|
000025A0: 30 A7 41 24 B2 41 24 AA C8 28 42 4C 24 2C 33 30 |0.A$.A$..(BL$,30|
000025B0: AB C3 28 41 24 29 29 00 A7 27 9E 0C 43 54 B2 43 |..(A$))..'..CT.C|
000025C0: 54 AA 31 3A 8B 43 54 B3 B1 31 35 A7 33 32 37 30 |T.1:.CT..15.3270|
000025D0: 00 D5 27 A8 0C 43 54 B2 31 3A 99 3A 99 22 50 52 |..'..CT.1:.:."PR|
000025E0: 45 53 53 20 12 20 53 50 41 43 45 20 42 41 52 20 |ESS . SPACE BAR |
000025F0: 92 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 F1 |. TO CONTINUE"..|
00002600: 27 B2 0C 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 |'..K$."":.K$:.K$|
00002610: B3 B1 22 20 22 A7 33 32 35 30 00 11 28 BC 0C 99 |.." ".3250..(...|
00002620: C7 28 31 39 29 3A 99 3A 99 3A 99 3A 81 5A B2 31 |.(19):.:.:.:.Z.1|
00002630: A4 31 37 3A 99 42 4C 24 3A 82 00 22 28 C1 0C 99 |.17:.BL$:.."(...|
00002640: C7 28 31 39 29 3A 99 3A 99 3A 99 00 53 28 C6 0C |.(19):.:.:..S(..|
00002650: 82 3A 99 3A 8D 31 32 36 30 3A 99 A3 36 29 22 50 |.:.:.1260:..6)"P|
00002660: 52 45 53 53 20 12 20 53 50 41 43 45 20 42 41 52 |RESS . SPACE BAR|
00002670: 20 92 20 46 4F 52 20 4D 45 4E 55 22 00 6F 28 D0 | . FOR MENU".o(.|
00002680: 0C 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 B3 B1 |.K$."":.K$:.K$..|
00002690: 22 20 22 A7 33 32 38 30 00 78 28 DA 0C 89 31 32 |" ".3280.x(...12|
000026A0: 30 00 99 28 A0 0F 99 22 93 22 3A 20 99 22 12 20 |0..(...".": .". |
000026B0: 44 49 53 4B 20 44 49 52 45 43 54 4F 52 59 20 92 |DISK DIRECTORY .|
000026C0: 11 22 00 CF 28 AA 0F 9F 31 2C 38 2C 31 35 2C 22 |."..(...1,8,15,"|
000026D0: 49 30 22 3A A0 31 3A 9F 31 2C 38 2C 30 2C 22 24 |I0":.1:.1,8,0,"$|
000026E0: 30 22 3A 81 4B B2 31 A4 32 35 3A A1 23 31 2C 58 |0":.K.1.25:.#1,X|
000026F0: 24 3A 82 4B 3A 44 B2 31 00 DE 28 B4 0F 8B 44 B2 |$:.K:D.1..(...D.|
00002700: 32 A7 44 B2 30 3A 99 00 FC 28 BE 0F 99 A3 32 30 |2.D.0:...(....20|
00002710: AC 44 29 3B 3A 81 4B B2 31 A4 34 3A A1 23 31 2C |.D);:.K.1.4:.#1,|
00002720: 58 24 3A 82 4B 00 16 29 C8 0F 03 8B 20 53 54 20 |X$:.K..).... ST |
00002730: B0 20 44 53 20 A7 A0 31 3A 99 3A 89 34 31 30 30 |. DS ..1:.:.4100|
00002740: 00 34 29 D2 0F A1 23 31 2C 58 24 3A 8B 58 24 B2 |.4)...#1,X$:.X$.|
00002750: 22 22 A7 44 B2 44 AA 31 3A 89 34 30 32 30 00 4D |"".D.D.1:.4020.M|
00002760: 29 DC 0F 8B 58 24 B2 C7 28 33 34 29 A7 4F B2 A8 |)...X$..(34).O..|
00002770: 4F 3A 89 34 30 35 30 00 59 29 E6 0F 8B 4F A7 99 |O:.4050.Y)...O..|
00002780: 58 24 3B 00 63 29 F0 0F 89 34 30 35 30 00 85 29 |X$;.c)...4050..)|
00002790: 04 10 99 22 50 52 45 53 53 20 12 53 50 41 43 45 |..."PRESS .SPACE|
000027A0: 20 42 41 52 92 20 46 4F 52 20 4D 45 4E 55 22 00 | BAR. FOR MENU".|
000027B0: 9B 29 09 10 A1 4B 24 3A 8B 4B 24 B3 B1 22 20 22 |.)...K$:.K$.." "|
000027C0: A7 34 31 30 35 00 A4 29 0E 10 89 31 32 30 00 00 |.4105..)...120..|
000027D0: 00 58 03 06 00 59 03 06 00 52 03 06 00 43 03 06 |.X...Y...R...C..|
000027E0: 00 49 D0 00 7C 08 00 00 4B 80 00 FF 9F 00 00 45 |.I..|...K......E|
000027F0: CD 00 89 08 00 00 4E 80 00 8F 08 00 00 46 03 06 |......N......F..|
00002800: 00 53 03 06 00 49 00 84 30 00 00 00 41 80 74 01 |.S...I..0...A.t.|
00002810: 02 00 0B 00 0B 00 9E 08 00 01 01 00 00 02 02 67 |...............g|
00002820: 00 54 49 45 53 2A 2A 92 22 3A 8D 32 36 33 3A 99 |.TIES**.":.263:.|
00002830: 00 B0 2B 60 01 99 22 20 20 12 4D 92 45 4D 4F 52 |..+`.." .M.EMOR|
00002840: 59 20 41 56 41 49 4C 41 42 49 4C 49 54 59 22 3A |Y AVAILABILITY":|
00002850: 99 3A 99 22 20 20 12 44 92 49 53 4B 20 44 49 52 |.:." .D.ISK DIR|
00002860: 45 43 54 4F 52 59 22 3A 99 00 CA 2B 61 01 99 22 |ECTORY":...+a.."|
00002870: 20 20 4D 45 4E 55 20 12 53 50 41 43 45 20 42 41 | MENU .SPACE BA|
00002880: 52 92 22 00 DD 2B 62 01 A1 56 24 3A 8B 56 24 B2 |R."..+b..V$:.V$.|
00002890: 22 22 A7 33 35 34 00 ED 2B 63 01 8B 56 24 B2 22 |"".354..+c..V$."|
000028A0: 4D 22 A7 33 36 31 00 FD 2B 64 01 8B 56 24 B2 22 |M".361..+d..V$."|
000028B0: 44 22 A7 35 33 38 00 0C 2C 65 02 01 8B 56 24 B2 |D".538..,e...V$.|
000028C0: 22 20 22 A7 31 32 00 2F 2C 66 01 99 3A 99 22 12 |" ".12./,f..:.".|
000028D0: 50 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 |PRESS SPACE BAR |
000028E0: 46 4F 52 20 4D 45 4E 55 22 00 44 2C 67 01 A1 4B |FOR MENU".D,g..K|
000028F0: 24 3A 8B 4B 24 B3 B1 22 20 22 A7 33 35 34 00 4C |$:.K$.." ".354.L|
00002900: 2C 68 01 89 31 32 00 6D 2C 69 01 99 22 13 02 04 |,h..12.m,i.."...|
00002910: 11 22 A3 32 34 29 22 3D 20 22 B8 28 30 29 22 42 |.".24)"= ".(0)"B|
00002920: 59 54 45 53 20 22 00 7D 2C 6A 01 99 C7 28 31 39 |YTES ".},j...(19|
00002930: 29 3A 89 33 35 31 00 86 2C 6B 01 8D 34 39 34 00 |):.351..,k..494.|
00002940: 8F 2C 6C 01 8D 35 31 34 00 9B 2C 6D 01 9F 34 2C |.,l..514..,m..4,|
00002950: 34 3A 9D 34 00 C6 2C 6E 01 99 C7 28 31 34 37 29 |4:.4..,n...(147)|
00002960: 3A 99 22 12 22 3B 4E 24 20 A3 31 39 29 22 52 45 |:.".";N$ .19)"RE|
00002970: 43 4F 52 44 20 4E 4F 22 3B 52 3A 99 4C 33 24 00 |CORD NO";R:.L3$.|
00002980: FF 2C 6F 01 43 B2 31 3A 99 22 12 22 C4 28 43 29 |.,o.C.1:.".".(C)|
00002990: 22 92 22 3B 3A 99 A3 32 29 22 12 22 20 41 24 28 |".";:..2)"." A$(|
000029A0: 30 2C 43 29 22 92 22 A3 33 29 3B C8 28 41 24 28 |0,C)".".3);.(A$(|
000029B0: 52 2C 43 29 2C 32 34 29 00 08 2D 70 01 99 4C 33 |R,C),24)..-p..L3|
000029C0: 24 00 16 2D 71 01 81 20 43 B2 32 20 A4 20 58 00 |$..-q.. C.2 . X.|
000029D0: 3D 2D 72 01 99 C4 28 43 29 3B 3A 99 A3 32 29 41 |=-r...(C);:..2)A|
000029E0: 24 28 30 2C 43 29 A3 33 29 C8 28 41 24 28 52 2C |$(0,C).3).(A$(R,|
000029F0: 43 29 2C 32 34 29 00 58 2D 73 01 82 3A 99 3A 8D |C),24).X-s..:.:.|
00002A00: 32 36 33 3A 99 3A 20 98 34 3A A0 34 3A 89 31 30 |263:.: .4:.4:.10|
00002A10: 31 00 96 2D 74 01 8D 34 39 34 3A 43 4F B2 31 3A |1..-t..494:CO.1:|
00002A20: 4C 4E B2 32 31 3A 8D 34 39 36 3A 99 22 44 4F 20 |LN.21:.496:."DO |
00002A30: 59 4F 55 20 57 49 53 48 20 54 4F 20 50 45 52 46 |YOU WISH TO PERF|
00002A40: 4F 52 4D 20 49 4E 44 49 56 49 44 55 41 4C 22 00 |ORM INDIVIDUAL".|
00002A50: B9 2D 75 01 99 22 12 43 92 41 4C 43 53 20 4F 52 |.-u..".C.ALCS OR|
00002A60: 20 12 54 92 4F 54 41 4C 49 53 45 20 46 49 45 4C | .T.OTALISE FIEL|
00002A70: 44 22 00 CC 2D 76 01 A1 4B 24 3A 8B 4B 24 B2 22 |D"..-v..K$:.K$."|
00002A80: 22 A7 33 37 34 00 E2 2D 77 01 8B 4B 24 B2 22 54 |".374..-w..K$."T|
00002A90: 22 A7 8D 34 31 30 3A 89 33 39 36 00 F8 2D 78 01 |"..410:.396..-x.|
00002AA0: 8B 4B 24 B2 22 43 22 A7 8D 34 31 30 3A 89 33 37 |.K$."C"..410:.37|
00002AB0: 38 00 01 2E 79 01 89 33 37 34 00 20 2E 7A 01 99 |8...y..374. .z..|
00002AC0: 22 57 48 49 43 48 20 46 49 45 4C 44 20 44 4F 20 |"WHICH FIELD DO |
00002AD0: 59 4F 55 20 57 49 53 48 22 00 4A 2E 7B 01 99 22 |YOU WISH".J.{.."|
00002AE0: 54 4F 20 43 41 4C 43 55 4C 41 54 45 2C 20 4B 45 |TO CALCULATE, KE|
00002AF0: 59 20 31 20 54 4F 20 22 58 22 20 3A 22 3B 3A 8D |Y 1 TO "X" :";:.|
00002B00: 32 35 33 00 66 2E 7C 01 43 B2 C5 28 49 50 24 29 |253.f.|.C..(IP$)|
00002B10: 3A 8B 43 B1 58 A7 8D 34 31 30 3A 89 33 37 38 00 |:.C.X..410:.378.|
00002B20: 6F 2E 7D 01 8D 34 31 30 00 94 2E 7E 01 8B 41 41 |o.}..410...~..AA|
00002B30: 24 28 43 29 B2 22 43 22 A7 99 22 12 43 48 41 52 |$(C)."C"..".CHAR|
00002B40: 41 43 54 45 52 92 20 46 49 45 4C 44 22 00 A8 2E |ACTER. FIELD"...|
00002B50: 7F 01 8B 41 41 24 28 43 29 B2 22 4E 22 A7 33 38 |...AA$(C)."N".38|
00002B60: 35 00 BD 2E 80 01 81 49 B2 31 A4 31 30 30 30 3A |5......I.1.1000:|
00002B70: 82 3A 89 31 31 34 00 EB 2E 81 01 99 22 4B 45 59 |.:.114......"KEY|
00002B80: 20 4C 45 54 54 45 52 20 46 4F 4C 4C 4F 57 45 44 | LETTER FOLLOWED|
00002B90: 20 42 59 20 41 4D 4F 55 4E 54 20 45 47 2E 28 41 | BY AMOUNT EG.(A|
00002BA0: 32 35 29 22 00 21 2F 82 01 99 22 12 41 92 44 44 |25)".!/...".A.DD|
00002BB0: 20 12 53 92 55 42 54 52 41 43 54 20 12 4D 92 55 | .S.UBTRACT .M.U|
00002BC0: 4C 54 49 50 4C 59 20 12 44 92 49 56 49 44 45 20 |LTIPLY .D.IVIDE |
00002BD0: 12 5A 92 45 52 4F 49 53 45 22 00 41 2F 83 01 99 |.Z.EROISE".A/...|
00002BE0: 22 12 52 92 45 50 4C 41 43 45 20 3A 22 3B 3A 8D |".R.EPLACE :";:.|
00002BF0: 32 35 33 3A 4C 24 B2 49 50 24 00 6A 2F 84 01 8B |253:L$.IP$.j/...|
00002C00: C8 28 4C 24 2C 31 29 B2 22 53 22 A7 50 B2 C5 28 |.(L$,1)."S".P..(|
00002C10: 41 24 28 52 2C 43 29 29 AB C5 28 CA 28 4C 24 2C |A$(R,C))..(.(L$,|
00002C20: 32 29 29 00 93 2F 85 01 8B C8 28 4C 24 2C 31 29 |2))../....(L$,1)|
00002C30: B2 22 41 22 A7 50 B2 C5 28 41 24 28 52 2C 43 29 |."A".P..(A$(R,C)|
00002C40: 29 AA C5 28 CA 28 4C 24 2C 32 29 29 00 BC 2F 86 |)..(.(L$,2))../.|
00002C50: 01 8B C8 28 4C 24 2C 31 29 B2 22 4D 22 A7 50 B2 |...(L$,1)."M".P.|
00002C60: C5 28 41 24 28 52 2C 43 29 29 AC C5 28 CA 28 4C |.(A$(R,C))..(.(L|
00002C70: 24 2C 32 29 29 00 E5 2F 87 01 8B C8 28 4C 24 2C |$,2))../....(L$,|
00002C80: 31 29 B2 22 44 22 A7 50 B2 C5 28 41 24 28 52 2C |1)."D".P..(A$(R,|
00002C90: 43 29 29 AD C5 28 CA 28 4C 24 2C 32 29 29 00 FA |C))..(.(L$,2))..|
00002CA0: 2F 88 01 8B C8 28 4C 24 2C 31 29 B2 22 5A 22 A7 |/....(L$,1)."Z".|
00002CB0: 50 B2 30 00 18 30 89 01 8B C8 28 4C 24 2C 31 29 |P.0..0....(L$,1)|
00002CC0: B2 22 52 22 A7 50 B2 C5 28 CA 28 4C 24 2C 32 29 |."R".P..(.(L$,2)|
00002CD0: 29 00 2E 30 8A 01 41 24 28 52 2C 43 29 B2 CA 28 |)..0..A$(R,C)..(|
00002CE0: C4 28 50 29 2C 32 29 00 37 30 8B 01 89 31 30 31 |.(P),2).70...101|
00002CF0: 00 56 30 8C 01 99 22 57 48 49 43 48 20 46 49 45 |.V0..."WHICH FIE|
00002D00: 4C 44 20 44 4F 20 59 4F 55 20 57 49 53 48 22 00 |LD DO YOU WISH".|
00002D10: 7E 30 8D 01 99 22 54 4F 20 54 4F 54 41 4C 49 53 |~0..."TO TOTALIS|
00002D20: 45 20 4B 45 59 20 31 20 54 4F 20 22 58 22 20 3A |E KEY 1 TO "X" :|
00002D30: 22 3B 3A 8D 32 35 33 00 9A 30 8E 01 43 B2 C5 28 |";:.253..0..C..(|
00002D40: 49 50 24 29 3A 8B 43 B1 58 A7 8D 34 31 30 3A 89 |IP$):.C.X..410:.|
00002D50: 33 39 36 00 A3 30 8F 01 8D 34 31 30 00 C8 30 90 |396..0...410..0.|
00002D60: 01 8B 41 41 24 28 43 29 B2 22 43 22 A7 99 22 12 |..AA$(C)."C"..".|
00002D70: 43 48 41 52 41 43 54 45 52 92 20 46 49 45 4C 44 |CHARACTER. FIELD|
00002D80: 22 00 DC 30 91 01 8B 41 41 24 28 43 29 B2 22 4E |"..0...AA$(C)."N|
00002D90: 22 A7 34 30 33 00 F1 30 92 01 81 49 B2 31 A4 31 |".403..0...I.1.1|
00002DA0: 30 30 30 3A 82 3A 89 31 31 34 00 F9 30 93 01 54 |000:.:.114..0..T|
00002DB0: B2 30 00 16 31 94 01 81 20 52 02 B2 31 A4 59 3A |.0..1... R..1.Y:|
00002DC0: 54 B2 54 AA C5 28 41 24 28 52 2C 43 29 29 3A 82 |T.T..(A$(R,C)):.|
00002DD0: 00 5C 31 95 01 99 22 54 4F 54 41 4C 20 46 49 4C |.\1..."TOTAL FIL|
00002DE0: 45 20 56 41 4C 55 45 20 4F 46 20 46 49 45 4C 44 |E VALUE OF FIELD|
00002DF0: 20 3A 22 3A 99 22 12 22 41 24 28 30 2C 43 29 22 | :":."."A$(0,C)"|
00002E00: 92 22 22 20 3D 02 0E 20 22 3B 54 00 7F 31 96 01 |."" =.. ";T..1..|
00002E10: 99 22 50 52 45 53 53 20 12 53 50 41 43 45 20 42 |."PRESS .SPACE B|
00002E20: 41 52 92 20 54 4F 20 52 45 54 55 52 4E 22 00 92 |AR. TO RETURN"..|
00002E30: 31 97 01 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 34 30 |1...K$:.K$."".40|
00002E40: 37 00 A2 31 98 01 8B 4B 24 B2 22 20 22 A7 31 30 |7..1...K$." ".10|
00002E50: 31 00 AB 31 99 01 89 34 30 37 00 B1 31 9A 01 3A |1..1...407..1..:|
00002E60: 00 CD 31 9B 01 99 22 91 91 22 3B 3A 99 53 24 3A |..1..."..";:.S$:|
00002E70: 99 53 24 3A 99 22 91 91 91 22 3A 8E 00 FE 31 9C |.S$:."...":...1.|
00002E80: 01 53 24 B2 22 02 27 20 22 00 30 32 02 9D 01 4C |.S$.".' ".02...L|
00002E90: 33 24 B2 22 02 27 2D 22 00 64 32 9E 01 54 24 B2 |3$.".'-".d2..T$.|
00002EA0: 22 02 28 9D 22 3A 8E 00 99 32 9F 01 86 20 41 24 |".(.":...2... A$|
00002EB0: 28 32 30 30 2C 58 29 2C 41 41 24 28 58 29 2C 41 |(200,X),AA$(X),A|
00002EC0: 28 58 29 2C 43 24 28 58 29 2C 42 24 28 58 29 3A |(X),C$(X),B$(X):|
00002ED0: 41 24 28 52 2C 43 29 B2 22 22 3A 8E 00 BB 32 A0 |A$(R,C)."":...2.|
00002EE0: 01 99 22 57 48 49 43 48 20 46 49 45 4C 44 20 44 |.."WHICH FIELD D|
00002EF0: 4F 20 59 4F 55 20 57 49 53 48 20 54 4F 22 00 E1 |O YOU WISH TO"..|
00002F00: 32 A1 01 99 22 53 4F 52 54 20 42 59 2E 2E 20 4B |2..."SORT BY.. K|
00002F10: 45 59 20 31 20 54 4F 20 22 58 22 20 3A 22 3B 3A |EY 1 TO "X" :";:|
00002F20: 8D 32 35 33 00 EE 32 A2 01 4D B2 C5 28 49 50 24 |.253..2..M..(IP$|
00002F30: 29 00 F7 32 A3 01 8D 34 31 30 00 14 33 A4 01 99 |)..2...410..3...|
00002F40: 22 12 53 4F 52 54 49 4E 47 92 20 50 4C 45 41 53 |".SORTING. PLEAS|
00002F50: 45 20 57 41 49 54 22 00 21 33 A5 01 81 52 B2 31 |E WAIT".!3...R.1|
00002F60: A4 59 AB 31 00 30 33 A6 01 81 49 B2 28 52 AA 31 |.Y.1.03...I.(R.1|
00002F70: 29 A4 59 00 55 33 A7 01 8B 41 41 24 28 4D 29 B2 |).Y.U3...AA$(M).|
00002F80: 22 43 22 AF 41 24 28 49 2C 4D 29 B1 B2 41 24 28 |"C".A$(I,M)..A$(|
00002F90: 52 2C 4D 29 A7 34 33 30 00 80 33 A8 01 8B 41 41 |R,M).430..3...AA|
00002FA0: 24 28 4D 29 B2 22 4E 22 AF C5 28 41 24 28 49 2C |$(M)."N"..(A$(I,|
00002FB0: 4D 29 29 B1 B2 C5 28 41 24 28 52 2C 4D 29 29 A7 |M))...(A$(R,M)).|
00002FC0: 34 33 30 00 8B 33 A9 01 81 43 B2 31 A4 58 00 9D |430..3...C.1.X..|
00002FD0: 33 AA 01 42 24 28 43 29 B2 41 24 28 52 2C 43 29 |3..B$(C).A$(R,C)|
00002FE0: 00 B1 33 AB 01 41 24 28 52 2C 43 29 B2 41 24 28 |..3..A$(R,C).A$(|
00002FF0: 49 2C 43 29 00 C3 33 AC 01 41 24 28 49 2C 43 29 |I,C)..3..A$(I,C)|
00003000: B2 42 24 28 43 29 00 CA 33 AD 01 82 43 00 D2 33 |.B$(C)..3...C..3|
00003010: AE 01 82 3A 82 00 FA 33 AF 01 99 22 12 53 4F 52 |...:...3...".SOR|
00003020: 54 92 20 43 4F 4D 50 4C 45 54 45 44 22 3A 81 4A |T. COMPLETED":.J|
00003030: B2 31 A4 31 30 30 30 3A 82 3A 89 31 32 00 20 34 |.1.1000:.:.12. 4|
00003040: B0 01 99 C7 28 31 34 37 29 3A 99 A3 31 30 29 22 |....(147):..10)"|
00003050: 12 2A 2A 52 45 50 4F 52 54 20 57 52 49 54 45 52 |.**REPORT WRITER|
00003060: 2A 2A 22 00 4C 34 B1 01 99 22 57 48 49 43 48 20 |**".L4..."WHICH |
00003070: 4F 46 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 |OF THE FOLLOWING|
00003080: 20 46 49 45 4C 44 53 20 44 4F 20 59 4F 55 22 00 | FIELDS DO YOU".|
00003090: 71 34 B2 01 99 22 57 49 53 48 20 54 4F 20 49 4E |q4..."WISH TO IN|
000030A0: 43 4C 55 44 45 20 49 4E 20 54 48 45 20 52 45 50 |CLUDE IN THE REP|
000030B0: 4F 52 54 22 00 7A 34 B3 01 99 4C 33 24 00 85 34 |ORT".z4...L3$..4|
000030C0: B4 01 81 43 B2 31 A4 58 00 93 34 B5 01 99 41 24 |...C.1.X..4...A$|
000030D0: 28 30 2C 43 29 3B 00 CB 34 B6 01 99 A3 32 35 29 |(0,C);..4....25)|
000030E0: 22 4B 45 59 20 12 59 92 20 4F 52 20 12 4E 92 20 |"KEY .Y. OR .N. |
000030F0: 5B 20 5D 9D 9D 22 3B 3A 8D 32 35 33 3A 43 24 28 |[ ]..";:.253:C$(|
00003100: 43 29 B2 C8 28 49 50 24 2C 31 29 3A 82 43 00 F9 |C)..(IP$,1):.C..|
00003110: 34 B7 01 99 4C 33 24 3A 99 3A 99 A3 36 29 22 3C |4...L3$:.:..6)"<|
00003120: 3C 20 41 43 43 45 50 54 20 46 49 45 4C 44 20 53 |< ACCEPT FIELD S|
00003130: 45 4C 45 43 54 49 4F 4E 20 3E 3E 22 00 2A 35 B8 |ELECTION >>".*5.|
00003140: 01 99 3A 99 A3 34 29 22 4B 45 59 20 12 59 92 20 |..:..4)"KEY .Y. |
00003150: 54 4F 20 43 4F 4E 54 49 4E 55 45 20 12 4E 92 20 |TO CONTINUE .N. |
00003160: 54 4F 20 52 45 2D 53 45 4C 45 43 54 22 00 33 35 |TO RE-SELECT".35|
00003170: B9 01 8D 35 31 32 00 43 35 BA 01 8B 4B 24 B2 22 |...512.C5...K$."|
00003180: 4E 22 A7 34 33 32 00 71 35 BB 01 8B 4B 24 B2 22 |N".432.q5...K$."|
00003190: 59 22 A7 99 C7 28 31 34 37 29 3A 99 A3 31 30 29 |Y"...(147):..10)|
000031A0: 22 12 2A 2A 52 45 50 4F 52 54 20 57 52 49 54 45 |".**REPORT WRITE|
000031B0: 52 2A 2A 22 00 96 35 BC 01 99 3A 99 A3 39 29 22 |R**"..5...:..9)"|
000031C0: 50 52 49 4E 54 45 52 20 49 4E 46 4F 52 4D 41 54 |PRINTER INFORMAT|
000031D0: 49 4F 4E 22 3A 99 4C 33 24 00 D1 35 BD 01 99 22 |ION":.L3$..5..."|
000031E0: 44 4F 20 59 4F 55 20 52 45 51 55 49 52 45 20 4C |DO YOU REQUIRE L|
000031F0: 49 4E 45 20 46 45 45 44 22 A3 32 35 29 22 4B 45 |INE FEED".25)"KE|
00003200: 59 20 12 59 92 20 4F 52 20 12 4E 92 20 5B 20 5D |Y .Y. OR .N. [ ]|
00003210: 9D 9D 22 3B 00 E9 35 BE 01 8D 32 35 33 3A 4C 46 |..";..5...253:LF|
00003220: 24 B2 C8 28 49 50 24 2C 31 29 3A 99 00 36 36 BF |$..(IP$,1):..66.|
00003230: 01 99 22 44 4F 20 59 4F 55 20 57 49 53 48 20 54 |.."DO YOU WISH T|
00003240: 4F 20 53 45 4E 44 20 41 22 3A 99 22 43 48 52 24 |O SEND A":."CHR$|
00003250: 20 54 4F 20 54 48 45 20 50 52 49 4E 54 45 52 22 | TO THE PRINTER"|
00003260: A3 32 35 29 22 4B 45 59 20 12 59 92 20 4F 52 20 |.25)"KEY .Y. OR |
00003270: 12 4E 92 20 5B 20 5D 22 3B 00 65 36 C0 01 99 22 |.N. [ ]";.e6..."|
00003280: 9D 9D 22 3B 3A 8D 32 35 33 3A 43 53 24 B2 C8 28 |..";:.253:CS$..(|
00003290: 49 50 24 2C 31 29 3A 47 B2 39 3A 8B 43 53 24 B2 |IP$,1):G.9:.CS$.|
000032A0: 22 59 22 A7 47 B2 31 31 00 9F 36 C1 01 8B 43 53 |"Y".G.11..6...CS|
000032B0: 24 B2 22 59 22 A7 99 3A 99 22 45 4E 54 45 52 20 |$."Y"..:."ENTER |
000032C0: 43 48 52 24 22 A3 33 35 29 22 5B 20 20 5D 9D 9D |CHR$".35)"[ ]..|
000032D0: 9D 22 3B 3A 8D 32 35 33 3A 43 53 B2 C5 28 49 50 |.";:.253:CS..(IP|
000032E0: 24 29 00 AD 36 C2 01 99 4C 33 24 3A 89 34 35 36 |$)..6...L3$:.456|
000032F0: 00 E2 36 C3 01 99 22 13 22 3A 81 49 B2 31 A4 47 |..6...".":.I.1.G|
00003300: 3A 99 3A 82 3A 81 49 B2 31 A4 32 33 AB 47 3A 99 |:.:.:.I.1.23.G:.|
00003310: 53 24 3A 82 49 3A 99 22 13 22 3A 81 49 B2 31 A4 |S$:.I:.".":.I.1.|
00003320: 47 3A 99 3A 82 00 2A 37 C4 01 99 A3 31 32 29 22 |G:.:..*7....12)"|
00003330: 12 2A 2A 54 45 53 54 20 4F 56 45 52 2A 2A 22 3A |.**TEST OVER**":|
00003340: 99 3A 99 A3 35 29 3A 99 22 4B 45 59 20 12 59 92 |.:..5):."KEY .Y.|
00003350: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 12 4E 92 | TO CONTINUE .N.|
00003360: 20 54 4F 20 52 45 2D 53 45 54 55 50 22 00 33 37 | TO RE-SETUP".37|
00003370: C5 01 8D 35 31 32 00 43 37 C6 01 8B 4B 24 B2 22 |...512.C7...K$."|
00003380: 59 22 A7 34 36 31 00 59 37 C7 01 8B 4B 24 B2 22 |Y".461.Y7...K$."|
00003390: 4E 22 A7 8D 35 31 37 3A 89 34 33 32 00 8F 37 C8 |N"..517:.432..7.|
000033A0: 01 99 22 44 4F 20 59 4F 55 20 52 45 51 55 49 52 |.."DO YOU REQUIR|
000033B0: 45 20 54 45 53 54 20 50 52 49 4E 54 3A 20 4B 45 |E TEST PRINT: KE|
000033C0: 59 20 12 59 92 20 4F 52 20 12 4E 92 22 3A 99 4C |Y .Y. OR .N.":.L|
000033D0: 33 24 00 98 37 C9 01 8D 35 31 32 00 AE 37 CA 01 |3$..7...512..7..|
000033E0: 8B 4B 24 B2 22 4E 22 A7 8D 35 31 34 3A 89 34 36 |.K$."N"..514:.46|
000033F0: 31 00 C4 37 CB 01 8B 4B 24 B2 22 59 22 A7 8D 35 |1..7...K$."Y"..5|
00003400: 31 34 3A 8D 35 31 38 00 CD 37 CC 01 89 34 35 31 |14:.518..7...451|
00003410: 00 D9 37 CD 01 9F 34 2C 34 3A 9D 34 00 EE 37 CE |..7...4,4:.4..7.|
00003420: 01 8B 43 53 24 B2 22 59 22 A7 99 20 C7 28 43 53 |..CS$."Y".. .(CS|
00003430: 29 00 10 38 CF 01 99 4D 24 A6 31 30 29 22 46 49 |)..8...M$.10)"FI|
00003440: 4C 45 4E 41 4D 45 20 3D 20 22 4E 24 3A 99 3A 8D |LENAME = "N$:.:.|
00003450: 35 33 31 00 1C 38 D0 01 52 B2 30 3A 50 B2 30 00 |531..8..R.0:P.0.|
00003460: 24 38 D1 01 43 B2 31 00 3D 38 D2 01 50 44 B2 41 |$8..C.1.=8..PD.A|
00003470: 28 43 29 AB C3 28 41 24 28 52 2C 43 29 29 AA 31 |(C)..(A$(R,C)).1|
00003480: 00 4C 38 D3 01 8B 50 44 B3 31 A7 50 44 B2 31 00 |.L8...PD.1.PD.1.|
00003490: 8C 38 D4 01 50 44 24 B2 C8 28 53 24 2C 50 44 29 |.8..PD$..(S$,PD)|
000034A0: 3A 8B 43 24 28 43 29 B2 22 59 22 A7 99 C8 28 41 |:.C$(C)."Y"...(A|
000034B0: 24 28 52 2C 43 29 2C 41 28 43 29 29 AA 50 44 24 |$(R,C),A(C)).PD$|
000034C0: 3B 3A 8B 52 B2 30 A7 50 B2 50 AA 41 28 43 29 00 |;:.R.0.P.P.A(C).|
000034D0: A1 38 D5 01 43 B2 43 AA 31 3A 8B 43 B3 58 AA 31 |.8..C.C.1:.C.X.1|
000034E0: A7 34 36 36 00 AA 38 D6 01 8D 35 33 31 00 CC 38 |.466..8...531..8|
000034F0: D7 01 8B 52 B2 30 A7 99 3A 81 49 B2 31 A4 50 AA |...R.0..:.I.1.P.|
00003500: 32 3A 99 22 2D 22 3B 3A 82 49 3A 8D 35 33 31 00 |2:."-";:.I:.531.|
00003510: E3 38 D8 01 52 B2 52 AA 31 3A 99 3A 8B 52 B3 59 |.8..R.R.1:.:.R.Y|
00003520: AA 31 A7 34 36 35 00 ED 38 D9 01 99 3A 99 3A 99 |.1.465..8...:.:.|
00003530: 00 05 39 DA 01 99 22 20 20 20 2A 54 4F 54 41 4C |..9..." *TOTAL|
00003540: 53 2A 22 3A 02 8D 35 33 31 00 1F 39 DB 01 99 22 |S*":..531..9..."|
00003550: 20 20 20 02 08 2D 22 3A 99 3A 8D 35 33 31 00 2E | ..-":.:.531..|
00003560: 39 DC 01 81 43 B2 31 A4 58 3A 54 B2 30 00 4A 39 |9...C.1.X:T.0.J9|
00003570: DD 01 81 52 B2 31 A4 59 3A 54 B2 54 AA C5 28 41 |...R.1.Y:T.T..(A|
00003580: 24 28 52 2C 43 29 29 3A 82 00 6E 39 DE 01 8B 41 |$(R,C)):..n9...A|
00003590: 41 24 28 43 29 B2 22 4E 22 A7 99 41 24 28 30 2C |A$(C)."N"..A$(0,|
000035A0: 43 29 A3 32 30 29 3B 54 3A 8D 35 33 31 00 75 39 |C).20);T:.531.u9|
000035B0: DF 01 82 43 00 7F 39 E0 01 98 34 3A A0 34 00 88 |...C..9...4:.4..|
000035C0: 39 E1 01 8D 35 31 37 00 90 39 E2 01 89 31 32 00 |9...517..9...12.|
000035D0: C7 39 E3 01 8D 34 39 34 3A 43 4F B2 31 3A 4C 4E |.9...494:CO.1:LN|
000035E0: B2 32 31 3A 8D 34 39 36 3A 99 22 12 44 45 4C 45 |.21:.496:.".DELE|
000035F0: 54 45 92 20 41 52 45 20 59 4F 55 20 53 55 52 45 |TE. ARE YOU SURE|
00003600: 3F 20 59 2F 4E 22 00 D0 39 E4 01 8D 35 31 32 00 |? Y/N"..9...512.|
00003610: E0 39 E5 01 8B 4B 24 B2 22 59 22 A7 34 38 38 00 |.9...K$."Y".488.|
00003620: F0 39 E6 01 8B 4B 24 B2 22 4E 22 A7 31 31 34 00 |.9...K$."N".114.|
00003630: F9 39 E7 01 89 34 38 34 00 0A 3A E8 01 54 B2 52 |.9...484..:..T.R|
00003640: 02 3A 81 52 B2 54 A4 59 AA 31 00 15 3A E9 01 81 |.:.R.T.Y.1..:...|
00003650: 43 B2 31 A4 58 00 2B 3A EA 01 41 24 28 52 2C 43 |C.1.X.+:..A$(R,C|
00003660: 29 B2 41 24 28 52 AA 31 2C 43 29 00 32 3A EB 01 |).A$(R.1,C).2:..|
00003670: 82 43 00 39 3A EC 01 82 52 00 48 3A ED 01 59 B2 |.C.9:...R.H:..Y.|
00003680: 59 AB 31 3A 89 31 30 30 00 63 3A EE 01 43 4F B2 |Y.1:.100.c:..CO.|
00003690: 31 3A 4C 4E B2 32 31 3A 8D 34 39 36 3A 81 49 B2 |1:LN.21:.496:.I.|
000036A0: 31 A4 33 00 97 3A EF 01 99 22 02 27 20 22 3A 82 |1.3..:...".' ":.|
000036B0: 49 3A 8E 00 CA 3A F0 01 41 43 43 24 B2 22 02 27 |I:...:..ACC$.".'|
000036C0: 1D 22 00 F0 3A F1 01 44 4F 57 24 B2 22 02 1A 11 |."..:..DOW$."...|
000036D0: 22 00 FB 3A F2 01 81 5A B2 31 A4 32 00 05 3B F3 |"..:...Z.1.2..;.|
000036E0: 01 99 02 22 13 22 3B 00 1E 3B F4 01 8B 43 4F B1 |...".";..;...CO.|
000036F0: 31 A7 99 C8 28 41 43 43 24 2C 43 4F AB 31 29 3B |1...(ACC$,CO.1);|
00003700: 00 37 3B F5 01 8B 4C 4E B1 31 A7 99 C8 28 44 4F |.7;...LN.1...(DO|
00003710: 57 24 2C 4C 4E AB 31 29 3B 00 6C 3B F6 01 8B 5A |W$,LN.1);.l;...Z|
00003720: B2 31 A7 99 22 02 27 20 22 3B 00 73 3B F7 01 82 |.1..".' ";.s;...|
00003730: 5A 00 79 3B F8 01 8E 00 A9 3B F9 01 82 3A 99 3A |Z.y;.....;...:.:|
00003740: 8D 32 36 33 3A 99 A3 36 29 22 50 52 45 53 53 20 |.263:..6)"PRESS |
00003750: 12 20 53 50 41 43 45 20 42 41 52 20 92 20 46 4F |. SPACE BAR . FO|
00003760: 52 20 4D 45 4E 55 22 00 C4 3B FA 01 4B 24 B2 22 |R MENU"..;..K$."|
00003770: 22 3A A1 4B 24 3A 8B 4B 24 B3 B1 22 20 22 A7 35 |":.K$:.K$.." ".5|
00003780: 30 36 00 CC 3B FB 01 89 31 32 00 E5 3B FC 01 8B |06..;...12..;...|
00003790: 50 52 B2 35 AF C3 28 C4 28 52 29 29 B2 32 A7 54 |PR.5..(.(R)).2.T|
000037A0: 54 B2 35 00 FE 3B FD 01 8B 50 52 B2 35 AF C3 28 |T.5..;...PR.5..(|
000037B0: C4 28 52 29 29 B2 33 A7 54 54 B2 34 00 17 3C 07 |.(R)).3.TT.4..<.|
000037C0: FE 01 8B 50 52 B2 35 AF C3 28 C4 28 52 29 29 B2 |...PR.5..(.(R)).|
000037D0: 34 A7 54 54 B2 33 00 1D 3C FF 01 8E 00 3A 3C 00 |4.TT.3..<....:<.|
000037E0: 02 A1 4B 24 3A 8B 4B 24 B3 B1 22 59 22 AF 4B 24 |..K$:.K$.."Y".K$|
000037F0: B3 B1 22 4E 22 A7 35 31 32 00 40 3C 01 02 8E 00 |.."N".512.@<....|
00003800: 7F 3C 02 02 43 4F B2 31 3A 4C 4E B2 32 31 3A 8D |.<..CO.1:LN.21:.|
00003810: 34 39 36 3A 99 22 20 3C 3C 20 45 4E 53 55 52 45 |496:." << ENSURE|
00003820: 20 54 48 41 54 20 50 52 49 4E 54 45 52 20 49 53 | THAT PRINTER IS|
00003830: 20 41 4C 49 47 4E 45 44 20 3E 3E 22 3A 99 00 B9 | ALIGNED >>":...|
00003840: 3C 03 02 99 22 07 04 20 50 52 45 53 53 20 12 53 |<...".. PRESS .S|
00003850: 50 41 43 45 20 42 41 52 92 20 54 4F 20 43 4F 4E |PACE BAR. TO CON|
00003860: 54 49 4E 55 45 22 3A A1 4B 24 3A 8B 4B 24 B3 B1 |TINUE":.K$:.K$..|
00003870: 22 20 22 A7 35 31 34 00 BF 3C 04 02 8E 00 E3 3C |" ".514..<.....<|
00003880: 05 02 81 43 B2 31 A4 58 3A 41 24 28 30 2C 43 29 |...C.1.X:A$(0,C)|
00003890: B2 C8 28 41 24 28 30 2C 43 29 2C 39 29 3A 82 3A |..(A$(0,C),9):.:|
000038A0: 8E 00 0C 3D 06 02 52 50 24 B2 22 22 3A 81 43 B2 |...=..RP$."":.C.|
000038B0: 31 A4 58 3A 54 50 24 B2 22 22 3A 8B 43 24 28 43 |1.X:TP$."":.C$(C|
000038C0: 29 B2 22 59 22 A7 8D 35 32 38 00 13 3D 07 02 82 |)."Y"..528..=...|
000038D0: 43 00 44 3D 08 02 52 B2 30 3A 52 24 B2 22 22 3A |C.D=..R.0:R$."":|
000038E0: 50 44 24 B2 22 22 3A 81 43 B2 31 A4 58 3A 50 44 |PD$."":.C.1.X:PD|
000038F0: B2 41 28 43 29 AB C3 28 41 24 28 52 2C 43 29 29 |.A(C)..(A$(R,C))|
00003900: AA 31 00 53 3D 09 02 8B 50 44 B3 31 A7 50 44 B2 |.1.S=...PD.1.PD.|
00003910: 31 00 89 3D 0A 02 50 44 24 B2 C8 28 53 24 2C 50 |1..=..PD$..(S$,P|
00003920: 44 29 3A 8B 43 24 28 43 29 B2 22 59 22 A7 52 24 |D):.C$(C)."Y".R$|
00003930: B2 52 24 AA C8 28 41 24 28 52 2C 43 29 2C 41 28 |.R$..(A$(R,C),A(|
00003940: 43 29 29 AA 50 44 24 00 90 3D 0B 02 82 43 00 AC |C)).PD$..=...C..|
00003950: 3D 0C 02 9F 34 2C 34 3A 9D 34 3A 8B 43 53 24 B2 |=...4,4:.4:.CS$.|
00003960: 22 59 22 A7 99 C7 28 43 53 29 00 CE 3D 0D 02 99 |"Y"...(CS)..=...|
00003970: 4D 24 A6 31 30 29 22 46 49 4C 45 4E 41 4D 45 20 |M$.10)"FILENAME |
00003980: 3D 20 22 4E 24 3A 99 3A 8D 35 33 31 00 F1 3D 0E |= "N$:.:.531..=.|
00003990: 02 99 52 24 3A 81 49 B2 31 A4 C3 28 52 24 29 3A |..R$:.I.1..(R$):|
000039A0: 99 22 2D 22 3B 3A 82 49 3A 99 3A 8D 35 33 31 00 |."-";:.I:.:.531.|
000039B0: 02 3E 0F 02 99 52 50 24 3A 98 34 3A A0 34 3A 8E |.>...RP$:.4:.4:.|
000039C0: 00 22 3E 10 02 81 49 B2 31 A4 41 28 43 29 3A 54 |.">...I.1.A(C):T|
000039D0: 50 24 B2 54 50 24 AA 41 41 24 28 43 29 3A 82 49 |P$.TP$.AA$(C):.I|
000039E0: 00 4D 3E 11 02 8B C3 28 54 50 24 29 B3 C3 28 41 |.M>....(TP$)..(A|
000039F0: 24 28 31 2C 43 29 29 A7 54 50 24 B2 54 50 24 AA |$(1,C)).TP$.TP$.|
00003A00: 41 41 24 28 43 29 3A 89 35 32 39 00 6B 3E 12 02 |AA$(C):.529.k>..|
00003A10: 54 50 24 B2 54 50 24 AA 22 20 22 3A 52 50 24 B2 |TP$.TP$." ":RP$.|
00003A20: 52 50 24 AA 54 50 24 3A 8E 00 7F 3E 13 02 8B 4C |RP$.TP$:...>...L|
00003A30: 46 24 B2 22 59 22 A7 99 C7 28 31 30 29 00 85 3E |F$."Y"...(10)..>|
00003A40: 14 02 8E 00 AE 3E 15 02 99 22 93 4D 41 58 20 4E |.....>...".MAX N|
00003A50: 4F 20 4F 46 20 52 45 43 4F 52 44 53 20 4E 4F 57 |O OF RECORDS NOW|
00003A60: 20 52 45 41 43 48 45 44 2E 22 3A 99 00 F7 3E 16 | REACHED.":...>.|
00003A70: 02 99 22 54 4F 20 49 4E 43 52 45 41 53 45 20 4D |.."TO INCREASE M|
00003A80: 41 58 49 4D 55 4D 20 52 45 2D 44 49 4D 45 4E 53 |AXIMUM RE-DIMENS|
00003A90: 49 4F 4E 22 3A 99 3A 99 22 50 52 4F 47 52 41 4D |ION":.:."PROGRAM|
00003AA0: 20 41 54 20 4C 49 4E 45 20 34 31 35 20 41 4E 44 | AT LINE 415 AND|
00003AB0: 20 31 37 34 22 00 42 3F 17 02 99 3A 99 22 4F 52 | 174".B?...:."OR|
00003AC0: 20 43 41 4C 4C 20 44 49 41 4C 4F 47 20 4F 4E 20 | CALL DIALOG ON |
00003AD0: 30 31 20 32 38 39 20 36 39 30 34 22 3A 99 3A 99 |01 289 6904":.:.|
00003AE0: 3A 99 3A 99 22 50 52 45 53 53 20 12 53 50 41 43 |:.:."PRESS .SPAC|
00003AF0: 45 20 42 41 52 92 20 46 4F 52 20 4D 45 4E 55 22 |E BAR. FOR MENU"|
00003B00: 00 57 3F 18 02 A1 4B 24 3A 8B 4B 24 B3 B1 22 20 |.W?...K$:.K$.." |
00003B10: 22 A7 35 33 36 00 65 3F 19 02 59 B2 32 30 30 3A |".536.e?..Y.200:|
00003B20: 89 31 32 00 86 3F 1A 02 99 22 93 22 3A 20 99 22 |.12..?...".": ."|
00003B30: 12 20 44 49 53 4B 20 44 49 52 45 43 54 4F 52 59 |. DISK DIRECTORY|
00003B40: 20 92 11 22 00 BC 3F 1B 02 9F 31 2C 38 2C 31 35 | .."..?...1,8,15|
00003B50: 2C 22 49 30 22 3A A0 31 3A 9F 31 2C 38 2C 30 2C |,"I0":.1:.1,8,0,|
00003B60: 22 24 30 22 3A 81 4B B2 31 A4 32 35 3A A1 23 31 |"$0":.K.1.25:.#1|
00003B70: 2C 58 24 3A 82 4B 3A 44 B2 31 00 CB 3F 1C 02 8B |,X$:.K:D.1..?...|
00003B80: 44 B2 32 A7 44 B2 30 3A 99 00 E9 3F 1D 02 99 A3 |D.2.D.0:...?....|
00003B90: 32 30 AC 44 29 3B 3A 81 4B B2 31 A4 34 3A A1 23 |20.D);:.K.1.4:.#|
00003BA0: 31 2C 58 24 3A 82 4B 00 02 40 1E 02 8B 20 53 54 |1,X$:.K..@... ST|
00003BB0: 20 B0 20 44 53 20 A7 A0 31 3A 99 3A 89 33 35 01 | . DS ..1:.:.35.|
00003BC0: 38 00 1F 40 1F 02 A1 23 31 2C 58 24 3A 8B 58 24 |8..@...#1,X$:.X$|
00003BD0: B2 22 22 A7 44 B2 44 AA 31 3A 89 35 34 30 00 37 |."".D.D.1:.540.7|
00003BE0: 40 20 02 8B 58 24 B2 C7 28 33 34 29 A7 4F B2 A8 |@ ..X$..(34).O..|
00003BF0: 4F 3A 89 35 34 33 00 43 40 21 02 8B 4F A7 99 58 |O:.543.C@!..O..X|
00003C00: 24 3B 00 4C 40 22 02 89 35 34 33 00 60 40 23 02 |$;.L@"..543.`@#.|
00003C10: 8B 49 50 24 B2 22 22 A7 49 50 24 B2 22 2D 22 00 |.IP$."".IP$."-".|
00003C20: 9B 40 24 02 8B C6 28 49 50 24 29 B3 34 36 B0 C6 |.@$...(IP$).46..|
00003C30: 28 49 50 24 29 B1 35 37 A7 41 43 B2 31 3A 99 3A |(IP$).57.AC.1:.:|
00003C40: 99 22 12 4E 55 4D 45 52 49 43 20 49 4E 50 55 54 |.".NUMERIC INPUT|
00003C50: 20 52 45 51 55 49 52 45 44 22 00 CB 40 25 02 8B | REQUIRED"..@%..|
00003C60: 52 B3 30 B0 52 B1 59 A7 99 3A 99 22 12 45 4E 54 |R.0.R.Y..:.".ENT|
00003C70: 45 52 20 41 20 56 41 4C 55 45 20 42 45 54 57 45 |ER A VALUE BETWE|
00003C80: 45 4E 20 31 20 41 4E 44 22 59 00 DD 40 26 02 81 |EN 1 AND"Y..@&..|
00003C90: 49 B2 31 A4 31 30 30 30 3A 82 3A 8E 00 00 00 58 |I.1.1000:.:....X|
00003CA0: 01 06 00 59 01 06 00 52 01 06 00 43 01 06 00 49 |...Y...R...C...I|
00003CB0: D0 00 6A 08 03 00 00 4B 80 01 FB 9F 00 00 45 CD |..j....K......E.|
00003CC0: 00 77 08 00 00 4E 80 00 F6 29 00 00 53 80 27 D5 |.w...N...)..S.'.|
00003CD0: 31 00 00 4C B3 27 07 32 00 00 54 80 28 38 32 00 |1..L.'.2..T.(82.|
00003CE0: 00 46 03 06 00 53 03 06 00 4B CB 09 95 0A 00 00 |.F...S...K......|
00003CF0: 4B 00 84 10 00 00 00 56 80 01 FD 9F 00 00 41 80 |K......V......A.|
00003D00: 74 01 02 00 0B 00 0B 00 91 08 03 A5 00 01 01 C3 |t...............|
00003D10: 00 01 3D 99 01 01 80 66 01 80 99 01 01 0A 66 62 |..=....f......fb|
00003D20: 01 75 66 01 80 99 01 01 80 66 01 80 99 01 01 0A |.uf......f......|
00003D30: 66 64 01 75 66 01 80 99 01 01 0A 66 64 01 75 66 |fd.uf......fd.uf|
00003D40: 01 80 99 01 01 80 66 01 80 99 01 01 0A 66 6E 01 |......f......fn.|
00003D50: 75 66 01 80 99 01 01 80 66 01 80 99 01 01 0A 66 |uf......f......f|
00003D60: 6E 01 75 66 01 80 99 01 01 80 66 01 80 99 01 01 |n.uf......f.....|
00003D70: 80 66 01 80 99 01 01 0A 66 6E 01 75 66 01 80 99 |.f......fn.uf...|
00003D80: 01 01 80 66 01 80 99 01 01 80 66 01 80 99 01 01 |...f......f.....|
00003D90: 0A 66 65 01 75 66 01 80 99 01 01 80 66 01 80 99 |.fe.uf......f...|
00003DA0: 01 01 0A 66 62 01 75 66 01 80 99 01 01 0A 66 63 |...fb.uf......fc|
00003DB0: 01 75 66 01 80 99 01 01 0A 66 64 01 75 66 01 80 |.uf......fd.uf..|
00003DC0: 99 01 01 80 66 01 80 99 01 01 0A 66 62 01 75 66 |....f......fb.uf|
00003DD0: 01 80 99 01 01 0A 66 64 01 75 66 01 80 99 01 01 |......fd.uf.....|
00003DE0: 80 66 01 80 99 01 01 80 66 01 80 99 01 01 80 66 |.f......f......f|
00003DF0: 01 80 99 01 01 0A 66 6E 01 75 66 01 80 99 01 01 |......fn.uf.....|
00003E00: 80 66 01 80 99 01 01 80 66 01 80 99 01 01 80 66 |.f......f......f|
00003E10: 01 80 99 01 01 80 66 01 80 99 01 01 80 66 01 80 |......f......f..|
00003E20: 99 01 01 80 66 01 80 99 01 01 80 66 01 80 99 01 |....f......f....|
00003E30: 01 80 66 01 80 99 01 01 0A 66 67 01 75 66 01 80 |..f......fg.uf..|
00003E40: 99 01 01 0A 66 62 01 75 66 01 80 99 01 01 80 66 |....fb.uf......f|
00003E50: 01 80 99 01 01 0A 66 6C 01 75 66 01 80 99 01 01 |......fl.uf.....|
00003E60: 80 66 01 80 99 01 01 0A 66 24 01 75 66 01 80 99 |.f......f$.uf...|
00003E70: 01 01 0A 66 64 01 75 66 01 80 99 01 01 0A 66 6E |...fd.uf......fn|
00003E80: 01 75 66 01 80 99 01 01 80 66 01 80 99 01 01 0A |.uf......f......|
00003E90: 66 64 01 75 66 01 80 99 01 01 80 66 01 80 99 01 |fd.uf......f....|
00003EA0: 01 0A 66 67 01 75 66 01 80 99 01 01 80 66 01 80 |..fg.uf......f..|
00003EB0: 99 01 01 80 66 01 80 99 01 01 80 66 01 80 99 01 |....f......f....|
00003EC0: 01 0A 66 62 01 75 66 01 80 99 01 01 80 66 01 80 |..fb.uf......f..|
00003ED0: 99 01 01 80 66 01 80 99 01 01 80 66 01 80 99 01 |....f......f....|
00003EE0: 01 80 66 01 80 99 01 01 0A 66 6E 01 75 66 01 80 |..f......fn.uf..|
00003EF0: 99 01 01 0A 66 6E 01 75 66 01 80 99 01 01 80 66 |....fn.uf......f|
00003F00: 01 80 99 01 01 80 66 01 80 99 01 01 80 66 01 80 |......f......f..|
00003F10: 99 01 01 80 66 01 80 99 01 01 0A 66 64 01 75 66 |....f......fd.uf|
00003F20: 01 80 99 01 01 0A 99 66 01 75 99 01 80 66 01 01 |.......f.u...f..|
00003F30: 0A 99 64 01 75 99 01 80 66 01 01 0A 99 6C 01 75 |..d.u...f....l.u|
00003F40: 99 01 80 66 01 01 0A 99 62 01 75 99 01 80 66 01 |...f....b.u...f.|
00003F50: 01 0A 99 26 01 75 99 01 80 66 01 01 0A 99 67 01 |...&.u...f....g.|
00003F60: 75 99 01 80 66 01 01 0A 99 66 01 75 99 01 80 66 |u...f....f.u...f|
00003F70: 01 01 0A 99 6E 01 75 99 01 80 66 01 01 0A 99 60 |....n.u...f....`|
00003F80: 01 75 99 01 80 66 01 01 0A 99 60 01 75 99 01 80 |.u...f....`.u...|
00003F90: 66 01 01 0A 99 61 01 75 99 01 80 66 01 01 0A 99 |f....a.u...f....|
00003FA0: 66 01 75 99 01 80 66 01 01 0A 99 66 01 75 99 01 |f.u...f....f.u..|
00003FB0: 80 66 01 01 0A 99 66 01 75 99 01 80 66 01 01 0A |.f....f.u...f...|
00003FC0: 99 66 01 75 99 01 80 66 01 01 0A 99 66 01 75 99 |.f.u...f....f.u.|
00003FD0: 01 80 66 01 01 0A 99 66 01 75 99 01 80 66 01 01 |..f....f.u...f..|
00003FE0: 0A 99 67 01 75 99 01 80 66 01 01 0A 99 60 01 75 |..g.u...f....`.u|
00003FF0: 99 01 80 66 01 01 0A 99 64 01 75 99 01 80 66 01 |...f....d.u...f.|
00004000: 01 0A 99 66 01 75 99 01 80 66 01 01 0A 99 62 01 |...f.u...f....b.|
00004010: 75 99 01 80 66 01 01 0A 99 67 01 75 99 01 80 66 |u...f....g.u...f|
00004020: 01 01 0A 99 6E 01 75 99 01 80 66 01 01 0A 99 65 |....n.u...f....e|
00004030: 01 75 99 01 80 66 01 01 0A 99 66 01 75 99 01 80 |.u...f....f.u...|
00004040: 66 01 01 0A 99 66 01 75 99 01 80 66 01 01 0A 99 |f....f.u...f....|
00004050: 66 01 75 99 01 80 66 01 01 0A 99 66 01 75 99 01 |f.u...f....f.u..|
00004060: 80 66 01 01 0A 99 67 01 75 99 01 80 66 01 01 0A |.f....g.u...f...|
00004070: 99 66 01 75 99 01 80 66 01 01 0A 99 61 01 75 99 |.f.u...f....a.u.|
00004080: 01 7B 66 59 39 20 93 55 01 55 01 09 99 60 01 75 |.{fY9 .U.U...`.u|
00004090: 99 01 80 66 01 01 0A 99 66 01 75 99 01 80 66 01 |...f....f.u...f.|
000040A0: 01 0A 99 2E 01 75 99 01 80 66 01 01 0A 99 66 01 |.....u...f....f.|
000040B0: 75 99 01 80 66 01 01 0A 99 6B 01 75 99 01 80 66 |u...f....k.u...f|
000040C0: 01 01 0A 99 62 01 75 99 01 80 66 01 01 0A 99 66 |....b.u...f....f|
000040D0: 01 75 99 01 80 66 01 01 0A 99 66 01 75 99 01 80 |.u...f....f.u...|
000040E0: 66 01 01 0A 99 66 01 75 99 01 80 66 01 01 0A 99 |f....f.u...f....|
000040F0: 65 01 75 99 01 80 66 01 01 0A 99 66 01 75 99 01 |e.u...f....f.u..|
00004100: 80 66 01 01 0A 99 64 01 75 99 01 80 66 01 01 0A |.f....d.u...f...|
00004110: 99 64 01 75 99 01 80 66 01 01 0A 99 66 01 75 99 |.d.u...f....f.u.|
00004120: 01 80 66 01 01 0A 99 66 01 75 99 01 80 66 01 01 |..f....f.u...f..|
00004130: 0A 99 67 01 75 99 01 80 66 01 01 0A 99 66 01 75 |..g.u...f....f.u|
00004140: 99 01 80 66 01 01 0A 99 64 01 75 99 01 80 66 01 |...f....d.u...f.|
00004150: 01 0A 99 64 01 75 99 01 80 66 01 01 0A 99 74 01 |...d.u...f....t.|
00004160: 75 99 01 80 66 01 01 0A 99 62 01 75 99 01 80 66 |u...f....b.u...f|
00004170: 01 01 0A 99 63 01 75 99 01 80 66 01 01 0A 99 66 |....c.u...f....f|
00004180: 01 75 99 01 80 66 01 01 0A 99 63 01 75 99 01 80 |.u...f....c.u...|
00004190: 66 01 01 0A 99 6C 01 75 99 01 80 66 01 01 0A 99 |f....l.u...f....|
000041A0: 64 01 75 99 01 80 66 01 01 0A 99 66 01 75 99 01 |d.u...f....f.u..|
000041B0: 80 66 01 01 0A 99 64 01 75 99 01 80 66 01 01 0A |.f....d.u...f...|
000041C0: 99 64 01 75 99 01 80 66 01 01 0A 99 67 01 75 99 |.d.u...f....g.u.|
000041D0: 01 80 66 01 01 0A 99 66 01 75 99 01 80 66 01 01 |..f....f.u...f..|
000041E0: 0A 99 26 01 75 99 01 80 66 01 01 80 99 01 80 66 |..&.u...f......f|
000041F0: 01 01 0A 99 9B 01 75 99 01 80 66 01 01 0A 99 98 |......u...f.....|
00004200: 01 75 99 01 80 66 01 01 80 99 01 80 66 01 01 0A |.u...f......f...|
00004210: 99 9F 01 75 99 01 80 66 01 01 0A 99 9B 01 75 99 |...u...f......u.|
00004220: 01 80 66 01 01 0A 99 9B 01 75 99 01 80 66 01 01 |..f......u...f..|
00004230: 80 99 01 80 66 01 01 0A 99 D8 01 75 99 01 80 66 |....f......u...f|
00004240: 01 01 80 99 01 80 66 01 01 80 99 01 80 66 01 01 |......f......f..|
00004250: 80 99 01 80 66 01 01 0A 99 9B 01 75 99 01 80 66 |....f......u...f|
00004260: 01 01 0A 99 98 01 75 99 01 80 66 01 01 80 99 01 |......u...f.....|
00004270: 80 66 01 01 80 99 01 80 66 01 01 80 99 01 80 66 |.f......f......f|
00004280: 01 01 0A 99 98 01 75 99 01 80 66 01 01 80 99 01 |......u...f.....|
00004290: 80 66 01 01 0A 99 DD 01 75 99 01 80 66 01 01 0A |.f......u...f...|
000042A0: 99 9D 01 75 99 01 80 66 01 01 80 99 01 80 66 01 |...u...f......f.|
000042B0: 01 0A 99 98 01 75 99 01 80 66 01 01 0A 99 D9 01 |.....u...f......|
000042C0: 75 99 01 80 66 01 01 80 99 01 80 66 01 01 0A 99 |u...f......f....|
000042D0: 98 01 75 99 01 80 66 01 01 0A 99 9F 01 75 99 01 |..u...f......u..|
000042E0: 80 66 01 01 0A 99 9B 01 75 99 01 80 66 01 01 80 |.f......u...f...|
000042F0: 99 01 80 66 01 01 0A 99 9E 01 75 99 01 80 66 01 |...f......u...f.|
00004300: 01 0A 99 93 01 75 99 01 80 66 01 01 80 99 01 80 |.....u...f......|
00004310: 66 01 01 0A 99 9B 01 75 99 01 80 66 01 01 0A 99 |f......u...f....|
00004320: 93 01 75 99 01 80 66 01 01 80 99 01 80 66 01 01 |..u...f......f..|
00004330: 80 99 01 80 66 01 01 80 99 01 80 66 01 01 0A 99 |....f......f....|
00004340: 91 01 75 99 01 80 66 01 01 80 99 01 80 66 01 01 |..u...f......f..|
00004350: 0A 99 9B 01 75 99 01 80 66 01 01 80 99 01 80 66 |....u...f......f|
00004360: 01 01 80 99 01 80 66 01 01 0A 99 98 01 75 99 01 |......f......u..|
00004370: 80 66 01 01 80 99 01 80 66 01 01 0A 99 91 01 75 |.f......f......u|
00004380: 99 01 80 66 01 01 0A 99 93 01 75 99 01 80 66 01 |...f......u...f.|
00004390: 01 0A 99 9E 01 75 99 01 80 66 01 01 0A 99 9F 01 |.....u...f......|
000043A0: 75 99 01 80 66 01 01 80 99 01 80 66 01 01 0A 99 |u...f......f....|
000043B0: 91 01 75 99 01 80 66 01 01 80 99 01 80 66 01 01 |..u...f......f..|
000043C0: 0A 99 9D 01 75 99 01 80 66 01 01 80 99 01 80 66 |....u...f......f|
000043D0: 01 01 80 99 01 80 66 01 01 0A 99 91 01 75 99 01 |......f......u..|
000043E0: 80 66 01 01 80 99 01 80 66 01 01 80 99 01 80 66 |.f......f......f|
000043F0: 01 01 0A 99 9F 01 75 99 01 80 66 01 01 0A 99 9D |......u...f.....|
00004400: 01 75 99 01 80 66 01 01 80 99 01 80 66 01 01 0A |.u...f......f...|
00004410: 99 9F 01 75 99 01 80 66 01 01 0A 99 9B 01 25 99 |...u...f......%.|
00004420: 31 EA 66 FE 47 FE 4A F3 91 F2 0E F2 50 F2 33 F3 |1.f.G.J.....P.3.|
00004430: 57 F1 CA F1 ED F6 3E F1 2F F3 66 FE A5 F4 ED F5 |W.....>./.f.....|
00004440: 01 30 99 01 80 66 01 01 0A 99 D9 01 75 99 01 80 |.0...f......u...|
00004450: 66 01 01 80 99 01 80 66 |f......f |
.......2061...X.....4.... ...K.S....P.N
.N.....P......H...........XJJJJ..ZHP..?
..B..I.N9.N<..Y......T..T.!..T....T....T
.8..... ..........T..T..T....T....T ...T
..........P......0.....@.........PH./P.
P..0..C.1..H. ...........F. .L.. ..L..
I....H ,.H J.$.../5..G.K.K..... ....
..F..........F.JJP.L...........%@....E.
......K.K)K).........L....(.(.....SA.AP.
.B` `.. `...H.,JP... `... `.I.....HP....
...&.F.F... `...HP...P.....PI.P.........
.........F....`....`...L...{..P.........
.............................'W.........
........................................
.............A.........Z...S..P..P... .
.... . ...Z.G..`.J.....A....B... . O...,
...%%*.,...%%*.,...%%*.,...%%*.,...%%*.,
...%%*.,...%%*.,...%%*.,.E...%!-...%%*.,
...%%*.,...~}..}........P..... .H@..R!>.
B....Y...WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWWWWWWWWWW7G7G.G'GG7G7G7G77G7.7GG
G..................7Q..H..Q.............
.............+...........?...........
.,.P.... ..3....4..........5....6.......
...7....8..........9....:...............
.-....0...`...N.8.A......A.J.....^,.P0.M
.PP........... =HH...............7L.....
........@..H.....K...............).)G+..
... H..... ..........H....1.............
...........L..ZP..{.P.I:..I ..8.08.P`.OG
RX..............|..........LH..1.F.G.J..
...P.3.W.J...>./.F............)DFM LABEL
S..........).).@<.......&........@.....@
.. ..P...'...............P.......R .....
U ..*.. *** ... .... ...... ***..
..*.> . ...D . . . . . . .=
. . . . . . . ..U ..F ... ........ .'C .
....... ...... ........ .... ......... .
.......... ..../..... ....... .... .....
...) .'C.Y .....H.... * DFM LABELS BY CH
RIS ELY * DIALOG SOFTWARE(C) 15/03/83 *
JA3004.C....53280,2:.53281,2:.".".....X.
0:Y.0:R.0:C.0:IP$."":K$."":EM$."":N$."".
..(.A$(R,C)."":F.0:S.0...2..G(147).J.<..
1680:.I.1.10:.:....F..".. SELECT: .U.PPE
R OR .L.OWER CASE"...P.. K$:. K$."".80.%
.Z..K$."U"..G(142) :.120.=.D..K$."L"..G(
14):.120.E.N..80.W.X..G(147):.1680.K....
:.N$.""..:.150......C(N$).9.N$.N$." ":.1
35......:.:.:..8)". FILE IN USE: ";N$;".
":.:.:..R....:..14)"KEY OPTION":.1260...
..".D.ATAFILE LOAD".27)".L.ABELS......"
.V.IEW RECORDS".27)".U.TILITIES".R....".
S.ORT/VIEW INDEX".27)".E.XIT PROGRAM":.:
.1260.^.... 158,0.Q.H..K$:.K$."".200...R
.KK$."DLVUSE":.K.1.6:.K$.J(KK$,K,1).220.
..W..K:.200.L....K.1300,2430,240,1720,21
00,1660.R...:.....RN.0:."ENTER RECORD .N
O:. OR .S.CROLL: ";:.1130:.IP$."S".270.
?...RN..(E(IP$)):.(RN.1.RN.Y)..:.2050:.2
40.R...R.RN:.G(147):..12)". RECORD VIEW
.":.1260:.300......G(147);:.R.1.Y:.G(19)
;:.1260.G....". RECORDS WILL DISPLAY IN
LOGICAL ORDER .":...."..".C.ONTINUOUS SC
ROLL: .S.TOP SCROLL: .E.XIT:":.:.1260.
".,..:."RECORD NO: ";R:.C.1.X.>.6.Q.C(A$
(R,C)):.Q.26.Q.26.Z.T.."."A$(0,C)H(BL$,9
.C(A$(0,C)))".".12)A$(R,C)H(BL$,26.Q)...
U..C.1.....Y..RN..0.3270...^..C:.R.1.390
...H.K$."":.K$:.K$."S".390...R..K$.."E".
.I.1.500:.I:.R...|.R.Y:.120.....K$."":.K
$:.K$.."C".K.$.."E".390......370.....:.&
....G(147).S.....8)". SELECTION FOR PRIN
TING .":.1260:..^....R.1.Y......"ENTER F
IELD TITLE [.. ]...";:.1130;...B.DP$.IP$
...L..C(DP$).9.DP$.DP$." ":.460.J.V..:C.
1......A$(0,C).DP$.510.....C.C.1:.C.X.1.
480.....EM$.". N.O SUCH FIELD .":.1220:.
120.;...."ENTER CRITERIA FOR "DP$:..X...
."[";:.2070:.H(S$,A(C));.U...."]";:.H(T$
,A(C));:.".";......1130:CP$.IP$:....&.F.
C(CP$)...:..AA$(C)."C".I.1:.660.M.D.."SH
OULD . "DP$" . BE:":....N...7)".E.QUAL T
O.. : "CP$:....X...7)".L.ESS T.HAN.. : "
CP$:..3.B...7)".G.REATER THAN : "CP$:..
>.L..158,0.Q.V..K$:.K$."".630.Y...KK$."E
LG":.I.1.3:.K$.J(KK$,I,1).660......I:.63
0......G(147):..12)". LABELS PRINTING ."
:.1260.L...."FILE NAME : . "N$:......."S
ELECTION : . "DP$:.......I.970,710,830..
.F.."CRITERIA < . "CP$" .":.:.1260.B.P.
.4,4:.R.1.Y:.NL.1.NP:.B.1.BB.1.Q....E(A$
(R,C)).E(CP$)..4,.LN)H(A$(R,B(B)),LW)...
...B:.E(A$(R,C)).E(CP$)..I.1.BL:.4:.I...
...NL:.R: 4:.1080.R.>.."CRITERIA > . "C
P$" .":.:.1260...H..4,4:.R.1.Y:.NL.1.NP:
.B.1.BB.1.$.\..E(A$(R,C)).E(CP$)..4,.LN)
H(A$(R,B(B)),LW).L.Z..B:.E(A$(R,C)).E(CP
$)..I.1.BL:.4:.I.`....NL:.R: 4:.1080...J
.."CRITERIA = . "CP$" .":.:.1260...T..4
,4:.R.1.Y:.NL.1.NP:.B.1.BB.1.V....H(A$(R
,C),F).CP$..4,.LN)H(A$(R,B(B)),LW)......
B:.H(A$(R,C),F).CP$..I.1.BL:.4:.I......N
L: .R: 4.4.8..:.158,0:..12)".R.EPRINT OR
.M.ENU".H.B..K$:.K$."".1090._.L..K$."M"
.R.R.1:.120.O.V..K$."R".660.Y.`..1090...
J.B$." ":."";. .T..IP$:.IP$.""..1140...~
..B$." ".F(IP$).20..1140......F(IP$).20.
B$.H(B$,C(B$).1):.". .";:.1140......IP$.
G(13).IP$.J(B.$,2):.:.."...A.F(IP$):.A.1
1..1140.D...B$.B$.IP$:.".";IP$;".";:.114
0.J...:.P...:.Z.D.. EM$.M.N.. T8.1 .1000
:..S.X...Y...:......".'.":.......".'-":.
.....:............"ARE YOU LOADING FROM:
-".$.(..".D.ISK OR .T.APE":.158,0.:.2..
K$:. K$."".1330.K.<..K$."T".1380.\.F..K$
."D".1440.F.P..1330.L.Z.:..D.T.1:U.0:NN
$.N$...N..2050:."IF DATA CASSETTE IS IN
PLACE".L.X.."PRESS .C.ONTINUE OR .A.BORT
".....K$."":.K$:.K$."".1410......K$.."C"
.120......1490..6. .T.8:U.4:N1$."0:":N2$
.",SEQ,READ":NN$.N1$.NN$.N2$.@....1490.F
.H.:..R..2050:."ENTER FILE NAME [.. ]..
.";:. 1130.....N$.H(IP$,8):NN$.N$:......
.T.1.."..."......1,T,U,NN$.K....1,Y:.1,X
:.3000...... C.1 . X:.1,A(C):....... C.1
. X:.1,AA$(C):....... R.1 . Y...".. C.1
. X.(.,..1,A$(R,C).0.6..:..>.@.. C.1 .
X.M.J..1,A$(0,C).S.T...Z.^. 1.C.H..120.I
.R.:...|..". EXIT . : ARE YOU SURE? [.Y.
/.N.]"....K$."":.K$:.K$."".1663......K$
.."Y".120.....N$."":.G(147):.1680:.:.:.:
.:.......:.:.:.:.144,85:.."....:." .
..*".R....".. *** . DFM . . MAIL . . LAB
ELS . ***".~....".. ..*":.......N$..""..
......".. BY":.......".. . D . . I . . A
. . L . . O . . G . ":.......".. S O F
T W A R E":.:.......G(147).4.....14)". U
TILITIES .":.1260:..Q.B.." .D.ISK DIRE
CTORY":..S.L.." .M.EMORY AVAILABILITY"
:....Q.." .F.ILE DESCRIPTION":....V.."
.R.ETURN TO MAIN MENU":..B....:.1260:
..V....V$:.V$."".1780......V$."D".4000..
....V$."M".1870......V$."R".120...&..V$.
"F".1960.#.D..1780.9.N..G(19):.I.1.5:.:.
.Q.X...24)"=".(0)"BYTES".B....G(19):.172
5......G(147):."FILE DESCRIPTION FOR "N$
:.1260......"OUTPUT TO .S.CREEN OR .P.RI
NTER".T....K$:.K$.."S".K$.."P".1980...A.
.K$."S".DV.3:.1990...B.DV.4:.G(19):.:.:.
">> ENSURE PRINTER ALIGNED <<".E.D..:."P
RESS . SPACE BAR . TO PRINT".A.E.K$."":.
K$:.K$.." ".1989.N.F..4,DV:.4...P..G(147
):."FILE DESCRIPTION FOR "N$:.1270...Z..
C.1.X:C$.D(C):.C.10.C$.C$." ".....C1$.D(
A(C)):.A(C).10.C1$." ".C1$......"FIELD N
O"C$" "A$(O,C)" . WIDTH"C1$" TYPE "AA$(
C).1....:.4: 4:.DV.4.1720.Z....:."PRESS
. SPACE BAR . TO CONTINUE".P....K$:.K$..
" ".2044.Z....1720.....BL$.".' ".J....".
.";:.BL$:.BL$:."...":......S$.".( ".0. .
.T$.".(.":..6.*.:.F.4..Y.0.EM$.". NO FIL
E IN MEMORY .":.1220:.120...>..".S.ORT O
R .V.IEW INDEX OR .E.XIT"...H.K$."":.K$:
.K$."".2120...R..K$."V".3200.I.\..K$."E"
.120...F..K$.."S".2120...P..:.2050:."ENT
ER FIELD YOU WISH TO SORT BY".(.Z.."KEY
.1 TO"X".: ";:.1130.J...M.E(IP$):.M.1.M.
X..2050:.2160.O....2050:.". SORTING . PL
EASE WAIT".|....R.1.Y.1......I.(R.1).Y..
....AA$(M)."C".A$(I,M)..A$(R,M).2300....
..AA$(M)."N".E(A$(I,M))..E(A$(R,M)).2300
...J..C.1.X...T.B$(C).A$(R,C).....A$.(R,
C).A$(I,C). ...A$(I,C).B$(C).'....C./...
.:..B....:.2050:.". SORT . COMPLETED":.J
.1.1000:.:.120.....COL.1:LNE.21:.2340:.I
.1.3......".' ":.I:....$.ACC$.".'.".....
DOW$."......."...8..Z.1.2. .B..".";.;.L.
.COL.1..H(ACC$,COL.1);.V.V..LNE.1..H(DOW
$,LNE.1);...`..Z.1..".' ";...J..Z...T...
..~..G(147);:.1260......" SELECT THE .
FIELDS . THAT ARE TO BE":... ...".. INCL
UDED ON EACH PRINTED LA.BEL":.:.1260:...
..B.1:BB.1.' ...C.1.X.T ...A$(0,C).24)"
.Y.ES OR .N.O [ ]..";:.1130.V N..IP$."Y"
.B(B).C:B.B.1:BB.BB.1.. X..C:.:.">> ACCE
PT SELECTION <<.. .Y./.N./.E.XIT".. Y..:
.1260.V Z.K$."":.K$:.K$."".2522.. ...K$.
"N".2430.. ...K$."E".120..!...K$.."Y".25
22..!...G(147).9!....13)". LABEL FORMAT
.":.1260:..W!..."LABEL STARTING POINT (1
-80) [ ]...";:.1130:LN.E(IP$)..!...:.
"MAX CHARACTER WIDTH TO PRINT [ ]...";
:.1130:LW.E(IP$)..!...:."NO: OF LINES BE
TWEEN LABELS [ ]..";:.1130:BL.E(IP$).5
"...:."HOW. MANY OF EACH LABEL.. [ ]...
";:.1130:NP.E(IP$).N"<..:.:.">> ACCEPT F
ORMAT <<.. .Y./.N./.E.XIT".Z"A..:.1260..
"F.K$."":.K$:.K$."".2630.."K..K$."N".253
0.."P..K$."E".120.G"R..K$.."Y".2630.S"T.
.G(147).."V...13)". LABEL PRINT .":.1260
:.I.1.5:.:..,.#Z..".. >> TEST PRINT FORM
AT << .Y./.N.".A#_..I.1.6:.:.:.1260.[#D.
K$."":.K$:.K$."".2660.X#I.KK$.K$:.G(19):
.I.1.7:.:...#N..".. >>> ENSURE PRINTER A
LIGNED <<<".G#S..KK$."Y"..2850:.G(19):.I
.1.8:.:...$X..I.1.4:.:.:." PRINT .A.LL /
.S.ELECTED RECORDS OR .N.ONE"..$..K$.""
:.K$:.K$."".2690./$...K$."S".420.?$...K$
."N".120.Q$ ..K$.."A".2690.~$...G(147):.
.12)". LABELS PRINTING .":.1260..$..."FI
LE NAME : . "N$:..C$..."SELECTION : . AL
L RECORDS .":.:.1260.O$...4,4:.4.Z$...R.
1.Y..$...NL.1.NP..$H..B.1.BB.1..%R...LN)
H(.A$(R,B(B)),LW)..%...B.'%...I.1.BL:.:.
I.8%...NL:.R:.4: 4.Y%...:..12)".R.EPRINT
OR .M.ENU".M%...K$:.K$."".2820.}%...K$.
"M".120..%...K$."R".2725..%...2820.P%"..
I.1.4:.:.:.".. PRESS . SPACE BAR . TO PR
INT TEST"..%'.K$."":.K$:.K$.." ".2855..&
,.A$."":.I.1.LW:A$..A$."X":.:.4,4.*&6..I
.1.BB.1:.4,.LN);A$:..Q&@..I.1.BL:.4:.: 4
:.G(19):.I.1.12:.:...&J..".. TEST OVER:
.C.ONTINUE OR .R.ESET-UP"..&T.K$."":.K$:
.K$."".2900..&^..K$."C"....&H..K$.."R".2
900.D&R..2430..'... A$(200,X),AA$(X),A(X
.2),C$(X),B$(X),B(X):A$(R,C)."":...'..:.
2'...G(147):..12)". VIEW INDEX .":.126
0:..?'...M.0.M.1.J'..CT.1:.I.1.Y:A$.H(A$
(I,M),30):.I;.6);A$..'...C(A$).30.A$.A$.
H(BL$,30.C(A$))..'..CT.CT.1:.CT..15.3270
.U'..CT.1:.:."PRESS . SPACE BAR . TO CON
TINUE"..'..K$."":.K$:.K$.." ".3250..(...
G(19):.:.:.:.Z.1.17:.BL$:.."(A..G(19):.:
.:..S(F..:.:.1260:..6)"PRESS . SPACE BAR
. FOR MENU".O(P.K$."":.K$:.K$.." ".3280
.X(Z..120..( ..".": .". DISK DIRECTORY .
.".O(...1,8,15,"I0": 1:.1,8,0,"$0":.K.1.
25:.#1,X$:.K:D.1..(...D.2.D.0:...(....20
.D);:.K.1.4:.#1,X$:.K..)H... ST . DS . 1
:.:.4100.4)R..#1,X$:.X$."".D.D.1:.4020.M
)...X$.G(34).O..O:.4050.Y)...O..X$;.C)..
.4050..)..."PRESS .SPACE BAR. FOR MENU".
.)...K$:.K$.." ".4105..)...120...X...Y..
.R...C...IP.|...K......EM.....N......F..
.S...I..0...A.T................G.TIES**.
":.263:...+`.." .M.EMORY AVAILABILITY":
.:." .D.ISK DIRECTORY":..J+A.." MENU .
SPACE BAR."..+B..V$:.V$."".354..+C..V$."
M".361..+D..V$."D".538..,E...V$." ".12./
,F..:.".PRESS SPACE BAR FOR MENU".D,G..K
$:.K$.." ".354.L,H..12.M,I.."....".24)"=
".(0)"BYTES ".},J..G(19):.351..,K..494.
.,L..514..,M..4,4:.4.F,N..G(147):.".";N$
.19)"RECORD NO";R:.L3$..,O.C.1:."."D(C)
".";:..2)"." A$(0,C)".".3);H(A$(R,C),24)
..-P..L3$..-Q.. C.2 . X.=-R..D(C);:..2)A
$(0,C).3)H(A$(R,C),24).X-S..:.:.263:.: .
4: 4:.101..-T..494:CO.1:LN.21:.496:."DO
YOU WISH TO PERFORM INDIVIDUAL"..-U..".C
.ALCS OR .T.OTALISE FIELD".L-V..K$:.K$."
".374..-W..K$."T"..410:.396..-X..K$."C".
.410:.378...Y..374. .Z.."WHICH FIELD DO
YOU WISH".J.{.."TO CALCULATE, KEY 1 TO "
X" :";:.253.F.|.C.E(IP$):.C.X..410:.378.
O.}..410...~..AA$(C)."C"..".CHARACTER. F
IELD".....AA$(C)."N".385......I.1.1000:
.:.114......"KEY LETTER FOLLOWED BY AMOU
NT EG.(A25)".!/...".A.DD .S.UBTRACT .M.U
LTIPLY .D.IVIDE .Z.EROISE".A/...".R.EPLA
CE :";:.253:L$.IP$.J/...H(L$,1)."S".P.E(
A$(R,C)).E(J(L$,2))../...H(L$,1)."A".P.E
(A$(R,C)).E(J(L$,2))../...H(L$,1)."M".P.
E(A$(R,C)).E(J(L$,2))../...H(L$,1)."D".P
.E(A$(R,C)).E(J(L$,2))../...H(L$,1)."Z".
P.0..0...H(L$,1)."R".P.E(J(L$,2))..0..A$
(R,C).J(D(P),2).70...101.V0..."WHICH FIE
LD DO YOU WISH".~0..."TO TOTALISE KEY 1
TO "X" :";:.253..0..C.E(IP$):.C.X..410:.
396..0...410.H0...AA$(C)."C"..".CHARACTE
R. FIELD"..0...AA$(C)."N".403..0...I.1.1
000:.:.114..0..T.0..1... R..1.Y:T.T.E(A$
(R,C)):..\1..."TOTAL FILE VALUE OF FIELD
:":."."A$(0,C)"."" =.. ";T.1..."PRESS
.SPACE BAR. TO RETURN"..1...K$:.K$."".40
7..1...K$." ".101..1...407..1..:.M1...".
.";:.S$:.S$:."...":...1..S$.".' ".02...L
3$.".'-".D2..T$.".(.":...2... A$(200,X),
AA$(X),A(X),C$(X),B$(X):A$(R,C)."":...2
.."WHICH FIELD DO YOU WISH TO"..2..."SOR
T BY.. KEY 1 TO "X" :";:.253..2..M.E(IP$
)..2...410..3...".SORTING. PLEASE WAIT".
!3...R.1.Y.1.03...I.(R.1).Y.U3...AA$(M).
"C".A$(I,M)..A$(R,M).430..3...AA$(M)."N"
.E(A$(I,M))..E(A$(R,M)).430..3...C.1.X..
3..B$(C).A$(R,C)..3..A$(R,C).A$(I,C).C3.
.A$(I,C).B$(C).J3...C.R3...:...3...".SOR
T. COMPLETED":.J.1.1000:.:.12. 4...G(147
):..10)".**REPORT WRITER**".L4..."WHICH
OF THE FOLLOWING FIELDS DO YOU".Q4..."WI
SH TO INCLUDE IN THE REPORT".Z4...L3$..4
...C.1.X..4...A$(0,C);.K4....25)"KEY .Y.
OR .N. [ ]..";:.253:C$(C).H(IP$,1):.C..
4...L3$:.:..6)"<< ACCEPT FIELD SELECTION
>>".*5...:..4)"KEY .Y. TO CONTINUE .N.
TO RE-SELECT".35...512.C5...K$."N".432.Q
5...K$."Y"..G(147):..10)".**REPORT WRITE
R**"..5...:..9)"PRINTER INFORMATION":.L3
$.Q5..."DO YOU REQUIRE LINE FEED".25)"KE
Y .Y. OR .N. [ ]..";..5...253:LF$.H(IP$,
1):..66..."DO YOU WISH TO SEND A":."CHR$
TO THE PRINTER".25)"KEY .Y. OR .N. [ ]"
;.E6..."..";:.253:CS$.H(IP$,1):G.9:.CS$.
"Y".G.11..6A..CS$."Y"..:."ENTER CHR$".35
)"[ ]...";:.253:CS.E(IP$)..6B..L3$:.456
..6C..".":.I.1.G:.:.:.I.1.23.G:.S$:.I:."
.":.I.1.G:.:..*7D...12)".**TEST OVER**":
.:..5):."KEY .Y. TO CONTINUE .N. TO RE-S
ETUP".37E..512.C7F..K$."Y".461.Y7G..K$."
N"..517:.432..7H.."DO YOU REQUIRE TEST P
RINT: KEY .Y. OR .N.":.L3$..7I..512..7J.
.K$."N"..514:.461.D7K..K$."Y"..514:.518.
M7L..451.Y7M..4,4:.4..7N..CS$."Y".. G(CS
)..8O..M$.10)"FILENAME = "N$:.:.531..8P.
R.0:P.0.$8Q.C.1.=8R.PD.A(C).C(A$(R,C)).1
.L8S..PD.1.PD.1..8T.PD$.H(S$,PD):.C$(C).
"Y"..H(A$(R,C),A(C)).PD$;:.R.0.P.P.A(C).
.8U.C.C.1:.C.X.1.466..8V..531.L8W..R.0..
:.I.1.P.2:."-";:.I:.531..8X.R.R.1:.:.R.Y
.1.465..8Y..:.:...9Z.." *TOTALS*":..53
1..9..." ..-":.:.531..9...C.1.X:T.0.J9
...R.1.Y:T.T.E(A$(R,C)):..N9...AA$(C)."N
"..A$(0,C).20);T:.531.U9...C.9...4: 4..
9...517..9...12.G9...494:CO.1:LN.21:.496
:.".DELETE. ARE YOU SURE? Y/N".P9...512.
.9...K$."Y".488..9...K$."N".114..9...484
..:..T.R.:.R.T.Y.1..:...C.1.X.+:..A$(R,C
).A$(R.1,C).2:...C.9:...R.H:..Y.Y.1:.100
.C:..CO.1:LN.21:.496:.I.1.3..:...".' ":.
I:..J:..ACC$.".'."..:..DOW$."..."..:...Z
.1.2..;....".";..;...CO.1..H(ACC$,CO.1);
.7;...LN.1..H(DOW$,LN.1);.L;...Z.1..".'
";.S;...Z.Y;.....;...:.:.263:..6)"PRESS
. SPACE BAR . FOR MENU".D;..K$."":.K$:.K
$.." ".506.L;...12..;...PR.5.C(D(R)).2.T
T.5..;...PR.5.C(D(R)).3.TT.4..<....PR.5.
C(D(R)).4.TT.3..<....:<...K$:.K$.."Y".K$
.."N".512.@<....<..CO.1:LN.21:.496:." <
< ENSURE THAT PRINTER IS ALIGNED >>":...
<...".. PRESS .SPACE BAR. TO CONTINUE":.
K$:.K$.." ".514..<.....<...C.1.X:A$(0,C)
.H(A$(0,C),9):.:...=..RP$."":.C.1.X:TP$.
"":.C$(C)."Y"..528..=...C.D=..R.0:R$."":
PD$."":.C.1.X:PD.A(C).C(A$(R,C)).1.S=...
PD.1.PD.1..=..PD$.H(S$,PD):.C$(C)."Y".R$
.R$.H(A$(R,C),A(C)).PD$..=...C..=...4,4:
.4:.CS$."Y"..G(CS).N=...M$.10)"FILENAME
= "N$:.:.531..=...R$:.I.1.C(R$):."-";:.I
:.:.531..>...RP$:.4: 4:..">...I.1.A(C):T
P$.TP$.AA$(C):.I.M>...C(TP$).C(A$(1,C)).
TP$.TP$.AA$(C):.529.K>..TP$.TP$." ":RP$.
RP$.TP$:..>...LF$."Y"..G(10)..>.....>..
.".MAX NO OF RECORDS NOW REACHED.":...>.
.."TO INCREASE MAXIMUM RE-DIMENSION":.:.
"PROGRAM AT LINE 415 AND 174".B?...:."OR
CALL DIALOG ON 01 289 6904":.:.:.:."PRE
SS .SPACE BAR. FOR MENU".W?...K$:.K$.."
".536.E?..Y.200:.12..?...".": .". DISK D
IRECTORY .."..?...1,8,15,"I0": 1:.1,8,0,
"$0":.K.1.25:.#1,X$:.K:D.1.K?...D.2.D.0:
...?....20.D);:.K.1.4:.#1,X$:.K..@... ST
. DS . 1:.:.35.8..@...#1,X$:.X$."".D.D.
1:.540.7@ ..X$.G(34).O..O:.543.C@!..O..X
$;.L@"..543.`@#..IP$."".IP$."-"..@$..F(I
P$).46.F(IP$).57.AC.1:.:.".NUMERIC INPUT
REQUIRED".K@%..R.0.R.Y..:.".ENTER A VAL
UE BETWEEN 1 AND"Y..@&..I.1.1000:.:....X
...Y...R...C...IP.J....K......EM.W...N..
.)..S.'U1..L.'.2..T.(82..F...S...KK.....
K......V......A.T..............C..=....F
......FB.UF......F......FD.UF......FD.UF
......F......FN.UF......F......FN.UF....
..F......F......FN.UF......F......F.....
.FE.UF......F......FB.UF......FC.UF.....
.FD.UF......F......FB.UF......FD.UF.....
.F......F......F......FN.UF......F......
F......F......F......F......F......F....
..F......FG.UF......FB.UF......F......FL
.UF......F......F$.UF......FD.UF......FN
.UF......F......FD.UF......F......FG.UF.
.....F......F......F......FB.UF......F..
....F......F......F......FN.UF......FN.U
F......F......F......F......F......FD.UF
.......F.U...F....D.U...F....L.U...F....
B.U...F....&.U...F....G.U...F....F.U...F
....N.U...F....`.U...F....`.U...F....A.U
...F....F.U...F....F.U...F....F.U...F...
.F.U...F....F.U...F....F.U...F....G.U...
F....`.U...F....D.U...F....F.U...F....B.
U...F....G.U...F....N.U...F....E.U...F..
..F.U...F....F.U...F....F.U...F....F.U..
.F....G.U...F....F.U...F....A.U..{FY9 .U
.U...`.U...F....F.U...F......U...F....F.
U...F....K.U...F....B.U...F....F.U...F..
..F.U...F....F.U...F....E.U...F....F.U..
.F....D.U...F....D.U...F....F.U...F....F
.U...F....G.U...F....F.U...F....D.U...F.
...D.U...F....T.U...F....B.U...F....C.U.
..F....F.U...F....C.U...F....L.U...F....
D.U...F....F.U...F....D.U...F....D.U...F
....G.U...F....F.U...F....&.U...F......F
......U...F......U...F......F......U...F
......U...F......U...F......F....X.U...F
......F......F......F......U...F......U.
..F......F......F......F......U...F.....
.F......U...F......U...F......F......U..
.F....Y.U...F......F......U...F......U..
.F......U...F......F......U...F......U..
.F......F......U...F......U...F......F..
....F......F......U...F......F......U...
F......F......F......U...F......F......U
...F......U...F......U...F......U...F...
...F......U...F......F......U...F......F
......F......U...F......F......F......U.
..F......U...F......F......U...F......%.
1.F.G.J.....P.3.W.J...>./.F......0...F..
..Y.U...F......F
> CLICK IMAGE PREVIEW FOR FULL MODAL