SYSTEM
FILE INFORMATION
FILENAME(S): SYSTEM
FILE TYPE(S): PRG
FILE SIZE: 17.1K
FIRST SEEN: 2025-10-19 22:48:43
APPEARS ON: 1 disk(s)
FILE HASH
e6fae64077cddea65113b64b2208a1ba0304f58792cddbe28d548a7741a09c38
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PROGRAM | SYSTEM | PRG | Radd Maxx | 14 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 01 00 8F 20 2A 2A 20 53 59 53 54 45 |....... ** SYSTE|
00000010: 4D 20 2A 2A 20 30 38 2D 30 34 2D 38 35 00 47 08 |M ** 08-04-85.G.|
00000020: 02 00 8F 20 43 4F 50 59 52 49 47 48 54 20 31 39 |... COPYRIGHT 19|
00000030: 38 33 20 43 4F 4E 54 49 4E 45 4E 54 41 4C 20 53 |83 CONTINENTAL S|
00000040: 4F 46 54 57 41 52 45 00 54 08 08 00 56 48 B2 35 |OFTWARE.T...VH.5|
00000050: 38 37 33 32 00 A4 08 0A 00 86 56 54 28 31 39 29 |8732......VT(19)|
00000060: 2C 48 54 28 31 39 29 2C 46 4C 28 31 39 29 2C 48 |,HT(19),FL(19),H|
00000070: 57 24 28 31 39 29 2C 52 4E 28 37 35 30 29 2C 54 |W$(19),RN(750),T|
00000080: 56 28 32 32 29 2C 4C 46 28 32 32 29 2C 54 48 28 |V(22),LF(22),TH(|
00000090: 32 32 29 2C 53 4C 24 28 32 31 29 2C 4C 50 25 28 |22),SL$(21),LP%(|
000000A0: 39 2C 35 29 00 D1 08 0C 00 86 20 45 56 28 35 29 |9,5)...... EV(5)|
000000B0: 2C 45 48 28 35 29 2C 4C 45 28 35 29 2C 4C 44 24 |,EH(5),LE(5),LD$|
000000C0: 28 34 29 2C 4E 41 24 28 38 29 2C 4F 50 24 28 33 |(4),NA$(8),OP$(3|
000000D0: 29 00 E1 08 0F 00 8D 36 30 30 30 30 3A 89 34 30 |)......60000:.40|
000000E0: 30 00 EC 08 14 00 97 32 30 34 2C 30 00 01 09 15 |0......204,0....|
000000F0: 00 A1 58 24 3A 8B 20 58 24 B3 B1 22 22 20 A7 32 |..X$:. X$.."" .2|
00000100: 30 00 14 09 16 00 A1 58 24 3A 8B 20 58 24 B2 22 |0......X$:. X$."|
00000110: 22 A7 32 32 00 26 09 18 00 8B 20 58 24 B2 C7 28 |".22.&.... X$..(|
00000120: 31 33 29 A7 32 36 00 5E 09 19 00 44 55 B2 C6 28 |13).26.^...DU..(|
00000130: 58 24 29 3A 8B 28 44 55 B3 33 32 AF 44 55 B1 34 |X$):.(DU.32.DU.4|
00000140: 29 B0 44 55 B2 34 34 B0 44 55 B2 35 39 B0 44 55 |).DU.44.DU.59.DU|
00000150: B1 31 33 33 A7 8D 39 30 30 30 3A 89 32 32 00 77 |.133..9000:.22.w|
00000160: 09 1A 00 97 32 30 34 2C 31 3A 99 22 20 9D 22 48 |....204,1:." ."H|
00000170: 57 24 28 31 37 29 3B 00 7D 09 1C 00 8E 00 8F 09 |W$(17);.}.......|
00000180: 28 00 44 55 24 B2 C8 28 42 4C 24 2C 51 4C 29 00 |(.DU$..(BL$,QL).|
00000190: A9 09 2A 00 9E 35 30 31 37 36 3A 99 C7 28 31 35 |..*..50176:..(15|
000001A0: 37 29 3B C7 28 33 32 29 3B 00 C3 09 2C 00 99 48 |7);.(32);...,..H|
000001B0: 57 24 28 31 38 29 22 20 9D 22 48 57 24 28 31 37 |W$(18)" ."HW$(17|
000001C0: 29 3A 8E 00 DE 09 4F 00 8F 20 42 45 4C 4F 57 20 |):....O.. BELOW |
000001D0: 49 53 20 53 43 52 45 45 4E 20 44 55 4D 50 00 F1 |IS SCREEN DUMP..|
000001E0: 09 50 00 8B 50 53 25 B2 30 A7 8D 39 30 30 30 3A |.P..PS%.0..9000:|
000001F0: 8E 00 08 0A 57 00 9F 34 2C 34 2C 53 44 25 3A 9D |....W..4,4,SD%:.|
00000200: 34 3A 9E 34 39 31 35 32 00 14 0A 58 00 98 34 3A |4:.49152...X..4:|
00000210: A0 34 3A 8E 00 1A 0A 5A 00 8E 00 31 0A 64 00 43 |.4:....Z...1.d.C|
00000220: 49 B2 31 3A 8D 33 30 39 30 3A 8B 43 49 B2 30 A7 |I.1:.3090:.CI.0.|
00000230: 8E 00 49 0A 6E 00 8D 33 34 30 31 3A 8D 33 34 31 |..I.n..3401:.341|
00000240: 30 3A 8D 33 34 33 30 3A 8E 00 79 0A C8 00 99 22 |0:.3430:..y...."|
00000250: 93 22 3A 97 32 31 31 2C 32 30 AB C3 28 53 43 24 |.":.211,20..(SC$|
00000260: 28 30 29 29 AD 32 3A 9E 56 48 3A 99 53 43 24 28 |(0)).2:.VH:.SC$(|
00000270: 30 29 3A 97 32 31 34 2C 33 00 A7 0A CA 00 97 32 |0):.214,3......2|
00000280: 31 31 2C 31 39 AB C3 28 4D 55 24 28 4D 55 29 29 |11,19..(MU$(MU))|
00000290: AD 32 3A 9E 56 48 3A 99 22 12 20 22 4D 55 24 28 |.2:.VH:.". "MU$(|
000002A0: 4D 55 29 22 20 92 22 00 BF 0A CD 00 8B 53 4C 24 |MU)" ."......SL$|
000002B0: 28 31 29 B2 22 22 B0 53 4C B2 31 A7 32 32 30 00 |(1)."".SL.1.220.|
000002C0: EA 0A D2 00 97 32 31 34 2C 32 3A 97 32 31 31 2C |.....214,2:.211,|
000002D0: 32 30 AB C3 28 53 4C 24 28 31 29 29 AD 32 3A 9E |20..(SL$(1)).2:.|
000002E0: 56 48 3A 99 53 4C 24 28 31 29 00 F0 0A DC 00 8E |VH:.SL$(1)......|
000002F0: 00 22 0B 90 01 99 22 93 22 3A 97 32 31 34 2C 33 |."....".":.214,3|
00000300: 3A 97 32 31 31 2C 32 30 AB C3 28 53 43 24 28 30 |:.211,20..(SC$(0|
00000310: 29 29 AD 32 3A 9E 56 48 3A 99 53 43 24 28 30 29 |)).2:.VH:.SC$(0)|
00000320: 3A 99 00 4A 0B 95 01 97 32 31 31 2C 31 39 AB C3 |:..J....211,19..|
00000330: 28 53 43 24 28 31 29 29 AD 32 3A 99 22 12 20 22 |(SC$(1)).2:.". "|
00000340: 53 43 24 28 31 29 22 20 92 22 00 83 0B 9A 01 97 |SC$(1)" ."......|
00000350: 32 31 34 2C 37 3A 81 58 B2 31 A4 37 3A 97 32 31 |214,7:.X.1.7:.21|
00000360: 31 2C 33 3A 9E 56 48 3A 99 22 12 20 22 58 22 9D |1,3:.VH:.". "X".|
00000370: 20 20 92 22 3B 3A 99 22 20 22 4D 55 24 28 58 29 | .";:." "MU$(X)|
00000380: 3A 82 58 00 A2 0B A4 01 97 32 31 34 2C 31 37 3A |:.X......214,17:|
00000390: 9E 56 48 3A 81 58 B2 31 37 A4 33 38 3A 99 22 20 |.VH:.X.17.38:." |
000003A0: 22 3B 00 DC 0B AE 01 97 32 31 31 2C 37 3A 9E 56 |";......211,7:.V|
000003B0: 48 3A 99 53 43 24 28 32 29 22 20 28 31 2D 37 29 |H:.SC$(2)" (1-7)|
000003C0: 20 A4 22 3B 3A 97 32 31 34 2C 31 37 3A 97 32 31 | .";:.214,17:.21|
000003D0: 31 2C 32 39 3A 9E 56 48 3A 8D 32 30 00 03 0C B3 |1,29:.VH:.20....|
000003E0: 01 53 4C 24 B2 58 24 3A 8B 53 4C 24 B3 22 31 22 |.SL$.X$:.SL$."1"|
000003F0: B0 53 4C 24 B1 22 37 22 A7 8D 39 30 30 30 3A 89 |.SL$."7"..9000:.|
00000400: 34 33 30 00 29 0C B8 01 99 53 4C 24 3A 53 4C B2 |430.)....SL$:SL.|
00000410: C6 28 53 4C 24 29 AB 34 38 3A 4D 55 B2 53 4C 3A |.(SL$).48:MU.SL:|
00000420: 8B 53 4C B2 37 A7 35 30 30 00 47 0C CC 01 8B 53 |.SL.7.500.G....S|
00000430: 4C B3 35 AF 43 49 B2 30 A7 8D 31 30 30 3A 8B 43 |L.5.CI.0..100:.C|
00000440: 49 B2 30 A7 34 30 30 00 75 0C EA 01 91 53 4C 8D |I.0.400.u....SL.|
00000450: 37 30 30 2C 31 33 30 30 2C 31 34 30 30 2C 31 35 |700,1300,1400,15|
00000460: 30 30 2C 38 30 30 2C 31 32 30 30 3A 8D 36 35 30 |00,800,1200:.650|
00000470: 3A 89 34 30 30 00 A5 0C F4 01 8D 36 35 30 3A 99 |:.400......650:.|
00000480: 22 93 22 3A 97 32 31 34 2C 31 30 3A 9E 56 48 3A |".":.214,10:.VH:|
00000490: 99 41 53 24 3A 97 32 31 34 2C 31 34 3A 9E 56 48 |.AS$:.214,14:.VH|
000004A0: 3A 99 41 53 24 00 DB 0C FE 01 97 32 31 34 2C 31 |:.AS$......214,1|
000004B0: 32 3A 97 32 31 31 2C 38 3A 9E 56 48 3A 99 22 12 |2:.211,8:.VH:.".|
000004C0: 22 4E 4C 24 4D 55 24 28 53 4C 29 22 20 92 22 3A |"NL$MU$(SL)" .":|
000004D0: 97 32 31 34 2C 32 30 3A 9E 56 48 00 F3 0C 58 02 |.214,20:.VH...X.|
000004E0: 8F 20 43 48 4B 20 49 46 20 50 52 47 52 4D 20 44 |. CHK IF PRGRM D|
000004F0: 49 53 4B 00 00 0D 6C 02 8D 33 30 37 30 3A A0 31 |ISK...l..3070:.1|
00000500: 00 30 0D 71 02 99 48 57 24 28 31 38 29 22 4E 45 |.0.q..HW$(18)"NE|
00000510: 57 3A 13 4C 4F 41 44 22 C7 28 33 34 29 22 4D 52 |W:.LOAD".(34)"MR|
00000520: 4D 45 4E 55 22 C7 28 33 34 29 22 2C 38 2C 31 22 |MENU".(34)",8,1"|
00000530: 00 66 0D 76 02 97 36 33 31 2C 31 39 3A 97 36 33 |.f.v..631,19:.63|
00000540: 32 2C 31 33 3A 97 36 33 33 2C 38 32 3A 97 36 33 |2,13:.633,82:.63|
00000550: 34 2C 32 31 33 3A 97 36 33 35 2C 31 33 3A 97 31 |4,213:.635,13:.1|
00000560: 39 38 2C 35 3A 80 00 8C 0D 8A 02 8B 45 46 B2 31 |98,5:.......EF.1|
00000570: A7 8D 33 30 39 30 3A 8B 43 49 A7 8D 33 33 39 35 |..3090:.CI..3395|
00000580: 3A 8D 33 34 32 30 3A 8D 33 34 33 30 00 92 0D 8F |:.3420:.3430....|
00000590: 02 8E 00 B0 0D BC 02 58 4C B2 30 3A 8D 37 30 30 |.......XL.0:.700|
000005A0: 30 3A 81 53 4C B2 31 A4 32 31 3A 8D 31 38 30 30 |0:.SL.1.21:.1800|
000005B0: 00 DE 0D BE 02 8B 53 4C 24 28 53 4C 29 B3 B1 22 |......SL$(SL).."|
000005C0: 49 4E 41 43 54 49 56 45 22 AF 53 4C AD 32 B2 B5 |INACTIVE".SL.2..|
000005D0: 28 53 4C AD 32 29 A7 58 4C B2 58 4C AA 31 00 EC |(SL.2).XL.XL.1..|
000005E0: 0D C1 02 82 53 4C 3A 8D 32 32 30 30 00 FD 0D C6 |....SL:.2200....|
000005F0: 02 8B 46 54 25 B2 31 A7 46 54 25 B2 32 00 27 0E |..FT%.1.FT%.2.'.|
00000600: EE 02 8D 37 30 34 30 3A 8B 53 4C 24 B2 22 58 22 |...7040:.SL$."X"|
00000610: A7 8D 33 34 30 31 3A 8D 33 34 31 30 3A 8D 33 34 |..3401:.3410:.34|
00000620: 33 30 3A 89 37 30 30 00 2D 0E 1B 03 8E 00 41 0E |30:.700.-.....A.|
00000630: 20 03 46 45 B2 30 3A 43 49 B2 30 3A 8D 33 30 37 | .FE.0:CI.0:.307|
00000640: 30 00 68 0E 25 03 8D 31 30 30 30 3A 81 53 4C B2 |0.h.%..1000:.SL.|
00000650: 31 A4 31 36 3A 8D 31 31 33 30 3A 82 3A 53 4C B2 |1.16:.1130:.:SL.|
00000660: 31 39 3A 8D 31 31 33 30 00 92 0E 52 03 8D 31 30 |19:.1130...R..10|
00000670: 34 30 3A 8B 53 4C 24 B2 22 58 22 A7 8D 33 38 30 |40:.SL$."X"..380|
00000680: 30 3A 8D 33 38 31 30 3A 8D 33 38 33 30 3A 89 38 |0:.3810:.3830:.8|
00000690: 30 35 00 A0 0E 5C 03 8B 46 45 B2 30 A7 38 39 35 |05...\..FE.0.895|
000006A0: 00 B6 0E 7A 03 8D 33 30 37 30 3A 8D 33 38 32 30 |...z..3070:.3820|
000006B0: 3A 8D 33 38 33 30 00 BC 0E 7F 03 8E 00 EE 0E 81 |:.3830..........|
000006C0: 03 81 53 4C B2 32 A4 31 33 3A 48 57 24 28 53 4C |..SL.2.13:HW$(SL|
000006D0: 29 B2 22 30 22 3A 82 53 4C 3A 81 53 4C B2 31 A4 |)."0":.SL:.SL.1.|
000006E0: 31 34 3A 8D 31 31 33 30 3A 82 53 4C 3A 8E 00 F8 |14:.1130:.SL:...|
000006F0: 0E 83 03 8D 39 30 30 30 00 1D 0F 84 03 46 45 B2 |....9000.....FE.|
00000700: 31 3A 97 32 31 34 2C 56 54 28 53 4C 29 3A 97 32 |1:.214,VT(SL):.2|
00000710: 31 31 2C 48 54 28 53 4C 29 3A 9E 56 48 00 2C 0F |11,HT(SL):.VH.,.|
00000720: 86 03 8B 53 4C B2 31 35 A7 39 35 30 00 69 0F 8E |...SL.15.950.i..|
00000730: 03 99 C8 28 55 4C 24 2C 46 4C 28 53 4C 29 29 AA |...(UL$,FL(SL)).|
00000740: 22 20 22 3B 3A 97 32 31 31 2C 48 54 28 53 4C 29 |" ";:.211,HT(SL)|
00000750: 3A 9E 56 48 3A 48 57 24 28 53 4C 29 B2 22 22 3A |:.VH:HW$(SL)."":|
00000760: 51 4C B2 46 4C 28 53 4C 29 00 7D 0F 8F 03 8D 34 |QL.FL(SL).}....4|
00000770: 30 3A 48 57 24 28 53 4C 29 B2 44 55 24 00 98 0F |0:HW$(SL).DU$...|
00000780: 98 03 8B C3 28 48 57 24 28 53 4C 29 29 B1 46 4C |....(HW$(SL)).FL|
00000790: 28 53 4C 29 A7 38 39 39 00 AC 0F A2 03 8D 31 31 |(SL).899......11|
000007A0: 30 30 3A 8B 4E 47 B2 31 A7 38 39 39 00 B2 0F A7 |00:.NG.1.899....|
000007B0: 03 8E 00 B8 0F B6 03 8F 00 CD 0F B8 03 A1 58 24 |..............X$|
000007C0: 3A 8B 20 58 24 B3 B1 22 22 20 A7 32 30 00 E1 0F |:. X$.."" .20...|
000007D0: BA 03 A1 58 24 3A 8B 20 58 24 B2 22 22 A7 39 35 |...X$:. X$."".95|
000007E0: 34 00 F1 0F BC 03 8B 58 24 B2 C7 28 31 33 29 A7 |4......X$..(13).|
000007F0: 8E 00 17 10 C0 03 8B 58 24 B3 B1 C7 28 31 33 35 |.......X$...(135|
00000800: 29 AF 58 24 B3 B1 C7 28 31 33 36 29 A7 8D 39 30 |).X$...(136)..90|
00000810: 30 30 3A 89 39 35 34 00 2B 10 C4 03 8B 58 24 B3 |00:.954.+....X$.|
00000820: B1 C7 28 31 33 36 29 A7 39 39 30 00 47 10 C6 03 |..(136).990.G...|
00000830: 42 58 25 B2 42 58 25 AA 31 3A 8B 42 58 25 B1 31 |BX%.BX%.1:.BX%.1|
00000840: 35 A7 42 58 25 B2 30 00 61 10 C8 03 97 35 33 32 |5.BX%.0.a....532|
00000850: 38 30 2C 42 58 25 3A 97 35 33 32 38 31 2C 42 58 |80,BX%:.53281,BX|
00000860: 25 00 74 10 C9 03 48 57 24 28 31 36 29 B2 C4 28 |%.t...HW$(16)..(|
00000870: 42 58 25 29 00 97 10 CA 03 97 32 31 31 2C 48 54 |BX%)......211,HT|
00000880: 28 31 36 29 3A 9E 56 48 3A 99 C9 28 48 57 24 28 |(16):.VH:..(HW$(|
00000890: 31 36 29 2C 32 29 3B 00 B1 10 CB 03 59 B2 42 58 |16),2);.....Y.BX|
000008A0: 25 3A 8D 39 37 36 3A 48 57 24 28 31 38 29 B2 58 |%:.976:HW$(18).X|
000008B0: 24 00 BA 10 CC 03 89 39 35 34 00 CF 10 D0 03 8B |$......954......|
000008C0: 59 B1 38 A7 58 24 B2 C7 28 59 AA 31 34 30 29 00 |Y.8.X$..(Y.140).|
000008D0: E0 10 D1 03 8B 59 B2 31 A7 58 24 B2 C7 28 35 29 |.....Y.1.X$..(5)|
000008E0: 00 F3 10 D2 03 8B 59 B2 30 A7 58 24 B2 C7 28 31 |......Y.0.X$..(1|
000008F0: 34 34 29 00 05 11 D3 03 8B 59 B2 32 A7 58 24 B2 |44)......Y.2.X$.|
00000900: C7 28 32 38 29 00 18 11 D4 03 8B 59 B2 33 A7 58 |.(28)......Y.3.X|
00000910: 24 B2 C7 28 31 35 39 29 00 2B 11 D5 03 8B 59 B2 |$..(159).+....Y.|
00000920: 34 A7 58 24 B2 C7 28 31 35 36 29 00 3D 11 D6 03 |4.X$..(156).=...|
00000930: 8B 59 B2 35 A7 58 24 B2 C7 28 33 30 29 00 4F 11 |.Y.5.X$..(30).O.|
00000940: D7 03 8B 59 B2 36 A7 58 24 B2 C7 28 33 31 29 00 |...Y.6.X$..(31).|
00000950: 62 11 D8 03 8B 59 B2 37 A7 58 24 B2 C7 28 31 35 |b....Y.7.X$..(15|
00000960: 38 29 00 75 11 D9 03 8B 59 B2 37 A7 58 24 B2 C7 |8).u....Y.7.X$..|
00000970: 28 31 32 39 29 00 7B 11 DA 03 8E 00 97 11 DE 03 |(129).{.........|
00000980: 46 58 25 B2 46 58 25 AA 31 3A 8B 46 58 25 B1 31 |FX%.FX%.1:.FX%.1|
00000990: 35 A7 46 58 25 B2 30 00 B1 11 E3 03 59 B2 46 58 |5.FX%.0.....Y.FX|
000009A0: 25 3A 8D 39 37 36 3A 48 57 24 28 31 37 29 B2 58 |%:.976:HW$(17).X|
000009B0: 24 00 C5 11 E4 03 99 48 57 24 28 31 37 29 3B 3A |$......HW$(17);:|
000009C0: 8D 31 30 30 30 00 E4 11 E5 03 59 B2 53 4C 3A 81 |.1000.....Y.SL:.|
000009D0: 53 4C B2 31 A4 31 36 3A 8D 31 31 33 30 3A 82 3A |SL.1.16:.1130:.:|
000009E0: 53 4C B2 59 00 22 12 E6 03 48 57 24 28 31 35 29 |SL.Y."...HW$(15)|
000009F0: B2 C4 28 46 58 25 29 3A 97 32 31 34 2C 56 54 28 |..(FX%):.214,VT(|
00000A00: 31 35 29 3A 97 32 31 31 2C 48 54 28 31 35 29 3A |15):.211,HT(15):|
00000A10: 9E 56 48 3A 99 C9 28 48 57 24 28 31 35 29 2C 32 |.VH:..(HW$(15),2|
00000A20: 29 3B 00 2B 12 E7 03 89 39 35 34 00 66 12 E8 03 |);.+....954.f...|
00000A30: 99 22 93 22 3A 97 32 31 34 2C 30 3A 97 32 31 31 |.".":.214,0:.211|
00000A40: 2C 32 30 AB C3 28 53 43 24 28 30 29 29 AD 32 3A |,20..(SC$(0)).2:|
00000A50: 9E 56 48 3A 99 53 43 24 28 30 29 3A 97 32 31 31 |.VH:.SC$(0):.211|
00000A60: 2C 38 3A 9E 56 48 00 B1 12 EA 03 99 22 12 20 48 |,8:.VH......". H|
00000A70: 41 52 44 57 41 52 45 20 43 4F 4E 46 49 47 55 52 |ARDWARE CONFIGUR|
00000A80: 41 54 49 4F 4E 20 92 22 3A 97 32 31 31 2C 38 3A |ATION .":.211,8:|
00000A90: 9E 56 48 3A 99 22 52 45 46 45 52 20 54 4F 20 43 |.VH:."REFER TO C|
00000AA0: 48 41 52 54 20 49 4E 20 4D 41 4E 55 41 4C 22 3A |HART IN MANUAL":|
00000AB0: 99 00 DB 12 ED 03 99 22 20 12 20 41 20 92 20 50 |......." . A . P|
00000AC0: 52 49 4E 54 45 52 3A 20 56 29 49 43 20 4F 29 54 |RINTER: V)IC O)T|
00000AD0: 48 45 52 20 4E 29 4F 4E 45 3F 22 00 03 13 EF 03 |HER N)ONE?".....|
00000AE0: 99 22 20 12 20 42 20 92 20 49 4E 54 45 52 46 41 |." . B . INTERFA|
00000AF0: 43 45 20 43 54 52 4C 20 43 48 41 52 41 43 54 45 |CE CTRL CHARACTE|
00000B00: 52 3F 22 00 34 13 F2 03 99 22 20 12 20 43 20 92 |R?".4...." . C .|
00000B10: 20 53 45 4E 44 20 4C 49 4E 45 20 46 45 45 44 3F | SEND LINE FEED?|
00000B20: 20 28 59 2F 4E 29 22 3A 99 3A 97 32 31 31 2C 32 | (Y/N)":.:.211,2|
00000B30: 3A 9E 56 48 00 65 13 F4 03 99 22 12 20 41 53 43 |:.VH.e....". ASC|
00000B40: 49 49 20 43 4F 44 45 28 53 29 20 46 4F 52 20 31 |II CODE(S) FOR 1|
00000B50: 33 32 2D 43 4F 4C 55 4D 4E 20 46 4F 52 4D 41 54 |32-COLUMN FORMAT|
00000B60: 20 92 22 3A 99 00 97 13 F7 03 81 58 B2 31 A4 35 | .":.......X.1.5|
00000B70: 3A 97 32 31 31 2C 35 AA 28 58 AB 31 29 AC 36 3A |:.211,5.(X.1).6:|
00000B80: 99 22 12 22 C7 28 36 37 AA 58 29 3B 3A 82 58 3A |.".".(67.X);:.X:|
00000B90: 99 22 92 22 3B 3A 99 00 DA 13 FC 03 97 32 31 34 |.".";:.......214|
00000BA0: 2C 31 32 3A 97 32 31 31 2C 32 3A 9E 56 48 3A 99 |,12:.211,2:.VH:.|
00000BB0: 22 12 20 41 53 43 49 49 20 43 4F 44 45 28 53 29 |". ASCII CODE(S)|
00000BC0: 20 46 4F 52 20 38 30 2D 43 4F 4C 55 4D 4E 20 46 | FOR 80-COLUMN F|
00000BD0: 4F 52 4D 41 54 20 92 22 3A 99 00 10 14 01 04 81 |ORMAT .":.......|
00000BE0: 58 B2 31 A4 35 3A 97 32 31 31 2C 35 AA 28 58 AB |X.1.5:.211,5.(X.|
00000BF0: 31 29 AC 36 3A 9E 56 48 3A 99 22 12 22 C7 28 37 |1).6:.VH:.".".(7|
00000C00: 32 AA 58 29 3B 3A 82 58 3A 99 22 92 22 3B 3A 99 |2.X);:.X:.".";:.|
00000C10: 00 46 14 06 04 97 32 31 34 2C 31 36 3A 9E 56 48 |.F....214,16:.VH|
00000C20: 3A 99 22 20 12 20 4E 20 92 20 4E 55 4D 42 45 52 |:." . N . NUMBER|
00000C30: 20 4F 46 20 44 52 49 56 45 53 20 49 4E 20 53 59 | OF DRIVES IN SY|
00000C40: 53 54 45 4D 20 22 00 72 14 07 04 99 22 20 12 20 |STEM ".r...." . |
00000C50: 4F 20 92 20 50 52 49 4E 54 45 52 20 53 55 50 50 |O . PRINTER SUPP|
00000C60: 4F 52 54 53 20 46 4F 52 4D 20 46 45 45 44 20 22 |ORTS FORM FEED "|
00000C70: 3A 99 00 B1 14 08 04 99 22 20 12 20 46 31 20 92 |:......." . F1 .|
00000C80: 20 43 4F 4C 4F 52 20 20 12 20 46 4F 52 45 20 92 | COLOR . FORE .|
00000C90: 20 20 20 20 12 20 42 41 43 4B 20 92 22 3A 97 32 | . BACK .":.2|
00000CA0: 31 34 2C 32 31 3A 97 32 31 31 2C 31 30 3A 9E 56 |14,21:.211,10:.V|
00000CB0: 48 00 EA 14 0B 04 99 53 43 24 28 33 29 22 20 28 |H......SC$(3)" (|
00000CC0: 41 2D 4F 29 22 3A 99 53 43 24 28 36 29 3B 3A 97 |A-O)":.SC$(6);:.|
00000CD0: 32 31 31 2C 32 37 3A 9E 56 48 3A 99 53 43 24 28 |211,27:.VH:.SC$(|
00000CE0: 34 29 3A 97 32 31 31 2C 31 32 00 1F 15 0C 04 9E |4):.211,12......|
00000CF0: 56 48 3A 99 53 43 24 28 32 29 3B 3A 8B 50 53 25 |VH:.SC$(2);:.PS%|
00000D00: B3 B1 30 A7 97 32 31 34 2C 32 32 3A 97 32 31 31 |..0..214,22:.211|
00000D10: 2C 31 34 3A 9E 56 48 3A 99 53 43 24 28 35 29 00 |,14:.VH:.SC$(5).|
00000D20: 25 15 0D 04 8E 00 5D 15 10 04 97 32 31 34 2C 32 |%.....]....214,2|
00000D30: 33 3A 97 32 31 31 2C 32 38 3A 9E 56 48 3A 99 C7 |3:.211,28:.VH:..|
00000D40: 28 31 37 35 29 3B 3A 97 32 31 31 2C 32 38 3A 9E |(175);:.211,28:.|
00000D50: 56 48 3A 8D 32 30 3A 53 4C 24 B2 58 24 00 7A 15 |VH:.20:SL$.X$.z.|
00000D60: 12 04 8B 53 4C 24 B2 22 52 22 B0 53 4C 24 B2 22 |...SL$."R".SL$."|
00000D70: 58 22 A7 99 3A 89 31 30 39 30 00 91 15 13 04 8B |X"..:.1090......|
00000D80: 53 4C 24 B2 22 50 22 A7 8D 38 30 3A 89 31 30 34 |SL$."P"..80:.104|
00000D90: 30 00 B0 15 14 04 8B 53 4C 24 B2 22 85 22 A7 99 |0......SL$."."..|
00000DA0: 22 46 31 22 3A 53 4C B2 31 35 3A 89 31 30 36 35 |"F1":SL.15:.1065|
00000DB0: 00 D1 15 15 04 8B 53 4C 24 B3 22 41 22 B0 53 4C |......SL$."A".SL|
00000DC0: 24 B1 22 4F 22 A7 8D 39 30 30 30 3A 89 31 30 34 |$."O"..9000:.104|
00000DD0: 30 00 F4 15 24 04 99 53 4C 24 3A 53 4C B2 C6 28 |0...$..SL$:SL..(|
00000DE0: 53 4C 24 29 AB 36 34 3A 8B 53 4C B2 31 35 A7 53 |SL$).64:.SL.15.S|
00000DF0: 4C B2 31 39 00 0A 16 29 04 8D 39 30 30 3A 8D 36 |L.19...)..900:.6|
00000E00: 31 30 30 30 3A 89 31 30 34 30 00 10 16 42 04 8E |1000:.1040...B..|
00000E10: 00 4E 16 4C 04 4E 47 B2 30 3A 8B 53 4C B2 31 AF |.N.L.NG.0:.SL.1.|
00000E20: 48 57 24 28 31 29 B3 B1 22 56 22 AF 48 57 24 28 |HW$(1).."V".HW$(|
00000E30: 31 29 B3 B1 22 4E 22 AF 48 57 24 28 31 29 B3 B1 |1).."N".HW$(1)..|
00000E40: 22 4F 22 A7 4E 47 B2 31 3A 89 31 31 39 30 00 7B |"O".NG.1:.1190.{|
00000E50: 16 51 04 8B 53 4C B2 32 AF 28 48 57 24 28 32 29 |.Q..SL.2.(HW$(2)|
00000E60: B3 22 30 22 B0 48 57 24 28 32 29 B1 22 39 22 29 |."0".HW$(2)."9")|
00000E70: A7 4E 47 B2 31 3A 89 31 31 39 30 00 B2 16 56 04 |.NG.1:.1190...V.|
00000E80: 8B 28 53 4C B2 33 B0 53 4C B2 31 39 29 AF 48 57 |.(SL.3.SL.19).HW|
00000E90: 24 28 53 4C 29 B3 B1 22 59 22 AF 48 57 24 28 53 |$(SL).."Y".HW$(S|
00000EA0: 4C 29 B3 B1 22 4E 22 A7 4E 47 B2 31 3A 89 31 31 |L).."N".NG.1:.11|
00000EB0: 39 30 00 DA 16 5A 04 8B 53 4C B1 33 AF 53 4C B3 |90...Z..SL.3.SL.|
00000EC0: 31 34 A7 8B 48 57 24 28 53 4C 29 B2 22 22 A7 48 |14..HW$(SL)."".H|
00000ED0: 57 24 28 53 4C 29 B2 22 30 22 00 39 17 5B 04 8B |W$(SL)."0".9.[..|
00000EE0: 28 53 4C B1 33 AF 53 4C B3 31 34 29 A7 81 5A B2 |(SL.3.SL.14)..Z.|
00000EF0: 31 A4 33 3A 8B 28 CA 28 48 57 24 28 53 4C 29 2C |1.3:.(.(HW$(SL),|
00000F00: 5A 2C 31 29 B3 22 30 22 B0 CA 28 48 57 24 28 53 |Z,1)."0"..(HW$(S|
00000F10: 4C 29 2C 5A 2C 31 29 B1 22 39 22 29 AF CA 28 48 |L),Z,1)."9")..(H|
00000F20: 57 24 28 53 4C 29 2C 5A 2C 31 29 B3 B1 22 22 A7 |W$(SL),Z,1).."".|
00000F30: 4E 47 B2 31 3A 5A B2 33 3A 00 57 17 5D 04 8B 53 |NG.1:Z.3:.W.]..S|
00000F40: 4C B1 33 AF 53 4C B3 31 34 A7 82 5A 3A 8B 4E 47 |L.3.SL.14..Z:.NG|
00000F50: B2 31 A7 31 31 39 30 00 82 17 5E 04 8B 53 4C B1 |.1.1190...^..SL.|
00000F60: 33 AF 53 4C B3 31 34 A7 8B C5 28 48 57 24 28 53 |3.SL.14...(HW$(S|
00000F70: 4C 29 29 B1 32 35 35 A7 4E 47 B2 31 3A 89 31 31 |L)).255.NG.1:.11|
00000F80: 39 30 00 B4 17 60 04 8B 53 4C B2 31 34 A7 48 57 |90...`..SL.14.HW|
00000F90: 25 B2 C5 28 48 57 24 28 31 34 29 29 3A 8B 48 57 |%..(HW$(14)):.HW|
00000FA0: 25 B3 31 B0 48 57 25 B1 32 A7 4E 47 B2 31 3A 89 |%.1.HW%.2.NG.1:.|
00000FB0: 31 31 39 30 00 EB 17 6A 04 97 32 31 31 2C 48 54 |1190...j..211,HT|
00000FC0: 28 53 4C 29 3A 97 32 31 34 2C 56 54 28 53 4C 29 |(SL):.214,VT(SL)|
00000FD0: 3A 9E 56 48 3A 99 C9 28 42 4C 24 AA 48 57 24 28 |:.VH:..(BL$.HW$(|
00000FE0: 53 4C 29 2C 46 4C 28 53 4C 29 29 00 F1 17 A6 04 |SL),FL(SL)).....|
00000FF0: 8E 00 32 18 B0 04 99 22 93 22 3A 97 32 31 34 2C |..2....".":.214,|
00001000: 38 3A 9E 56 48 3A 99 41 53 24 3A 97 32 31 34 2C |8:.VH:.AS$:.214,|
00001010: 31 34 3A 9E 56 48 3A 99 41 53 24 3A 97 32 31 34 |14:.VH:.AS$:.214|
00001020: 2C 39 3A 9E 56 48 3A 8D 39 30 30 30 3A 8D 39 30 |,9:.VH:.9000:.90|
00001030: 30 30 00 5F 18 B2 04 99 22 20 44 4F 20 59 4F 55 |00._...." DO YOU|
00001040: 20 57 49 53 48 20 54 4F 20 53 54 41 52 54 20 41 | WISH TO START A|
00001050: 20 4E 45 57 20 53 59 53 54 45 4D 3F 20 22 3B 00 | NEW SYSTEM? ";.|
00001060: 75 18 B3 04 A1 53 4E 24 3A 8B 53 4E 24 B2 22 22 |u....SN$:.SN$.""|
00001070: A7 31 32 30 33 00 91 18 B5 04 8B 53 4E 24 B3 B1 |.1203......SN$..|
00001080: 22 59 22 AF 53 4E 24 B3 B1 22 4E 22 A7 31 32 30 |"Y".SN$.."N".120|
00001090: 33 00 A8 18 B7 04 99 53 4E 24 3A 8B 53 4E 24 B2 |3......SN$:.SN$.|
000010A0: 22 4E 22 A7 31 32 39 30 00 DA 18 BA 04 8D 39 30 |"N".1290......90|
000010B0: 30 30 3A 99 22 20 41 52 45 20 59 4F 55 20 53 55 |00:." ARE YOU SU|
000010C0: 52 45 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 44 |RE YOU WANT TO D|
000010D0: 4F 20 54 48 49 53 3F 20 22 3B 00 F0 18 BD 04 A1 |O THIS? ";......|
000010E0: 53 4E 24 3A 8B 53 4E 24 B2 22 22 A7 31 32 31 33 |SN$:.SN$."".1213|
000010F0: 00 0C 19 BF 04 8B 53 4E 24 B3 B1 22 59 22 AF 53 |......SN$.."Y".S|
00001100: 4E 24 B3 B1 22 4E 22 A7 31 32 31 33 00 23 19 C4 |N$.."N".1213.#..|
00001110: 04 99 53 4E 24 3A 8B 53 4E 24 B2 22 4E 22 A7 31 |..SN$:.SN$."N".1|
00001120: 32 39 30 00 60 19 C9 04 97 32 31 34 2C 31 32 3A |290.`....214,12:|
00001130: 9E 56 48 3A 8D 39 30 30 30 3A 99 22 20 44 4F 20 |.VH:.9000:." DO |
00001140: 59 4F 55 20 48 41 56 45 20 41 4E 20 49 4E 49 54 |YOU HAVE AN INIT|
00001150: 49 41 4C 49 5A 45 44 20 44 49 53 4B 3F 20 22 3B |IALIZED DISK? ";|
00001160: 00 76 19 CB 04 A1 53 4E 24 3A 8B 53 4E 24 B2 22 |.v....SN$:.SN$."|
00001170: 22 A7 31 32 32 37 00 92 19 CE 04 8B 53 4E 24 B3 |".1227......SN$.|
00001180: B1 22 59 22 AF 53 4E 24 B3 B1 22 4E 22 A7 31 32 |."Y".SN$.."N".12|
00001190: 32 37 00 B9 19 D3 04 99 53 4E 24 3A 8B 53 4E 24 |27......SN$:.SN$|
000011A0: B2 22 59 22 A7 8D 36 32 30 30 3A 8B 50 4B B3 B1 |."Y"..6200:.PK..|
000011B0: 31 35 35 A7 46 54 25 B2 30 00 BF 19 0A 05 8E 00 |155.FT%.0.......|
000011C0: F2 19 14 05 8D 37 31 30 30 3A 81 53 4C B2 31 A4 |.....7100:.SL.1.|
000011D0: 31 30 3A 53 4C B2 53 4C AC 32 3A 8D 31 38 30 30 |10:SL.SL.2:.1800|
000011E0: 3A 53 4C B2 53 4C AD 32 3A 8D 31 39 30 30 3A 82 |:SL.SL.2:.1900:.|
000011F0: 53 4C 00 22 1A 46 05 8D 37 31 34 30 3A 8B 53 4C |SL.".F..7140:.SL|
00001200: 24 B2 22 58 22 A7 8D 33 34 30 31 3A 8D 33 34 31 |$."X"..3401:.341|
00001210: 30 3A 8D 33 34 33 30 3A 45 46 B2 30 3A 89 31 33 |0:.3430:EF.0:.13|
00001220: 30 30 00 28 1A 73 05 8E 00 5E 1A 78 05 8D 37 33 |00.(.s...^.x..73|
00001230: 30 30 3A 81 53 4C B2 31 A4 34 3A 8D 32 36 30 30 |00:.SL.1.4:.2600|
00001240: 3A 82 53 4C 3A 81 4C 50 B2 31 A4 C5 28 4C 44 24 |:.SL:.LP.1..(LD$|
00001250: 28 32 29 29 3A 8D 32 33 30 30 3A 82 4C 50 00 8E |(2)):.2300:.LP..|
00001260: 1A AA 05 8D 37 33 34 30 3A 8B 53 4C 24 B2 22 58 |....7340:.SL$."X|
00001270: 22 A7 8D 33 34 30 31 3A 8D 33 34 31 30 3A 8D 33 |"..3401:.3410:.3|
00001280: 34 33 30 3A 45 46 B2 30 3A 89 31 34 30 30 00 A9 |430:EF.0:.1400..|
00001290: 1A B4 05 8B 53 4C 24 B2 C7 28 31 33 33 29 A7 8D |....SL$..(133)..|
000012A0: 37 30 30 3A 89 31 34 30 30 00 AF 1A D7 05 8E 00 |700:.1400.......|
000012B0: CB 1A DC 05 8D 37 35 30 30 3A 81 53 4C B2 31 A4 |.....7500:.SL.1.|
000012C0: 35 3A 8D 35 38 30 30 3A 82 53 4C 00 D5 1A E6 05 |5:.5800:.SL.....|
000012D0: 8D 37 35 33 30 00 FA 1A 0E 06 8B 53 4C 24 B2 22 |.7530......SL$."|
000012E0: 58 22 A7 8D 33 34 30 31 3A 8D 33 34 31 30 3A 8D |X"..3401:.3410:.|
000012F0: 33 34 33 30 3A 89 31 35 30 30 00 00 1B 3B 06 8E |3430:.1500...;..|
00001300: 00 0A 1B 3F 06 8D 39 30 30 30 00 2F 1B 40 06 45 |...?..9000./.@.E|
00001310: 46 B2 31 3A 97 32 31 34 2C 54 56 28 53 4C 29 3A |F.1:.214,TV(SL):|
00001320: 97 32 31 31 2C 54 48 28 53 4C 29 3A 9E 56 48 00 |.211,TH(SL):.VH.|
00001330: 65 1B 4A 06 99 C8 28 55 4C 24 2C 4C 46 28 53 4C |e.J...(UL$,LF(SL|
00001340: 29 29 AA 22 20 22 3B 3A 97 32 31 31 2C 54 48 28 |))." ";:.211,TH(|
00001350: 53 4C 29 3A 9E 56 48 3A 51 4C B2 4C 46 28 53 4C |SL):.VH:QL.LF(SL|
00001360: 29 3A 8D 34 30 00 75 1B 4C 06 53 4C 24 28 53 4C |):.40.u.L.SL$(SL|
00001370: 29 B2 44 55 24 00 8B 1B 4F 06 8B 20 53 4C 24 28 |).DU$...O.. SL$(|
00001380: 53 4C 29 B2 22 22 A7 31 35 39 39 00 A7 1B 54 06 |SL)."".1599...T.|
00001390: 8B C3 28 53 4C 24 28 53 4C 29 29 B1 4C 46 28 53 |..(SL$(SL)).LF(S|
000013A0: 4C 29 A7 31 35 39 39 00 E7 1B 5E 06 8B 53 4C B1 |L).1599...^..SL.|
000013B0: 31 AF 53 4C AD 32 B3 B1 B5 28 53 4C AD 32 29 AF |1.SL.2...(SL.2).|
000013C0: 53 4C 24 28 53 4C AB 31 29 B3 B1 22 49 4E 41 43 |SL$(SL.1).."INAC|
000013D0: 54 49 56 45 22 AF C5 28 53 4C 24 28 53 4C 29 29 |TIVE"..(SL$(SL))|
000013E0: B3 31 A7 31 35 39 39 00 09 1C 63 06 8B 53 4C B3 |.1.1599...c..SL.|
000013F0: 33 AF 53 4C 24 28 53 4C 29 B2 22 49 4E 41 43 54 |3.SL$(SL)."INACT|
00001400: 49 56 45 22 A7 31 35 39 39 00 28 1C 68 06 8B 53 |IVE".1599.(.h..S|
00001410: 4C 24 28 53 4C 29 B3 B1 22 49 4E 41 43 54 49 56 |L$(SL).."INACTIV|
00001420: 45 22 A7 89 31 36 34 35 00 71 1C 69 06 58 4C B2 |E"..1645.q.i.XL.|
00001430: 53 4C 3A 81 53 4C B2 58 4C A4 32 30 3A 53 4C 24 |SL:.SL.XL.20:SL$|
00001440: 28 53 4C 29 B2 22 49 4E 41 43 54 49 56 45 22 3A |(SL)."INACTIVE":|
00001450: 8D 31 38 30 30 3A 53 4C B2 53 4C AA 31 3A 53 4C |.1800:SL.SL.1:SL|
00001460: 24 28 53 4C 29 B2 22 30 22 3A 8D 31 38 30 30 3A |$(SL)."0":.1800:|
00001470: 82 00 8B 1C 6A 06 8D 32 32 30 30 3A 58 4C B2 58 |....j..2200:XL.X|
00001480: 4C AD 32 AB 31 3A 89 31 36 39 30 00 A9 1C 6D 06 |L.2.1:.1690...m.|
00001490: 8B 53 4C B3 B1 31 AF C5 28 53 4C 24 28 53 4C 29 |.SL..1..(SL$(SL)|
000014A0: 29 B1 32 34 A7 31 35 39 39 00 BA 1C 72 06 8B 20 |).24.1599...r.. |
000014B0: 53 4C B2 31 A7 89 31 36 39 30 00 E4 1C 73 06 8B |SL.1..1690...s..|
000014C0: 53 4C AD 32 B3 B1 B5 28 53 4C AD 32 29 A7 8D 32 |SL.2...(SL.2)..2|
000014D0: 32 30 30 3A 8B 4D 43 25 AB 54 55 25 B3 30 A7 89 |200:.MC%.TU%.0..|
000014E0: 31 35 39 39 00 0F 1D 75 06 8F 20 49 46 20 43 48 |1599...u.. IF CH|
000014F0: 41 52 2E 20 55 53 45 44 20 54 55 25 3E 4D 43 25 |AR. USED TU%>MC%|
00001500: 20 4D 41 58 20 54 48 45 4E 20 45 52 52 4F 52 00 | MAX THEN ERROR.|
00001510: 15 1D 9A 06 8E 00 1F 1D A3 06 8D 39 30 30 30 00 |...........9000.|
00001520: 28 1D A4 06 45 46 B2 31 00 5E 1D AE 06 97 32 31 |(...EF.1.^....21|
00001530: 34 2C 54 56 28 53 4C AC 32 29 3A 97 32 31 31 2C |4,TV(SL.2):.211,|
00001540: 31 34 3A 9E 56 48 3A 99 C8 28 55 4C 24 2C C5 28 |14:.VH:..(UL$,.(|
00001550: 53 4C 24 28 53 4C AC 32 AA 31 29 29 29 3B 00 90 |SL$(SL.2.1)));..|
00001560: 1D B3 06 97 32 31 31 2C 31 34 3A 9E 56 48 3A 51 |....211,14:.VH:Q|
00001570: 4C B2 C5 28 53 4C 24 28 53 4C AC 32 AA 31 29 29 |L..(SL$(SL.2.1))|
00001580: 3A 8D 34 30 3A 44 46 24 28 53 4C 29 B2 44 55 24 |:.40:DF$(SL).DU$|
00001590: 00 B4 1D B8 06 8B C3 28 44 46 24 28 53 4C 29 29 |.......(DF$(SL))|
000015A0: B1 C5 28 53 4C 24 28 53 4C AC 32 AA 31 29 29 A7 |..(SL$(SL.2.1)).|
000015B0: 31 36 39 39 00 BE 1D C2 06 8D 31 39 30 30 00 C4 |1699......1900..|
000015C0: 1D FE 06 8E 00 04 1E 08 07 97 32 31 34 2C 54 56 |..........214,TV|
000015D0: 28 53 4C 29 3A 97 32 31 31 2C 54 48 28 53 4C 29 |(SL):.211,TH(SL)|
000015E0: 3A 9E 56 48 3A 99 C8 28 42 4C 24 2C 4C 46 28 53 |:.VH:..(BL$,LF(S|
000015F0: 4C 29 29 3B 3A 97 32 31 31 2C 54 48 28 53 4C 29 |L));:.211,TH(SL)|
00001600: 3A 9E 56 48 00 30 1E 0D 07 8B 53 4C B1 31 AF 53 |:.VH.0....SL.1.S|
00001610: 4C AD 32 B3 B1 B5 28 53 4C AD 32 29 AF C5 28 53 |L.2...(SL.2)..(S|
00001620: 4C 24 28 53 4C 29 29 B3 31 30 A7 99 22 20 22 3B |L$(SL)).10.." ";|
00001630: 00 3F 1E 12 07 99 53 4C 24 28 53 4C 29 3A 8E 00 |.?....SL$(SL):..|
00001640: 85 1E 6C 07 97 32 31 31 2C 31 34 3A 97 32 31 34 |..l..211,14:.214|
00001650: 2C 54 56 28 53 4C AC 32 29 3A 9E 56 48 3A 81 58 |,TV(SL.2):.VH:.X|
00001660: B2 31 34 A4 33 38 3A 99 22 20 22 3B 3A 82 3A 97 |.14.38:." ";:.:.|
00001670: 32 31 31 2C 31 34 3A 9E 56 48 3A 99 44 46 24 28 |211,14:.VH:.DF$(|
00001680: 53 4C 29 3A 8E 00 8F 1E D0 07 45 46 B2 31 31 00 |SL):......EF.11.|
00001690: B2 1E 34 08 97 32 31 31 2C 48 28 31 29 3A 97 32 |..4..211,H(1):.2|
000016A0: 31 34 2C 56 28 31 29 3A 9E 56 48 3A 99 4E 4C 24 |14,V(1):.VH:.NL$|
000016B0: 3A 8E 00 DC 1E 98 08 54 55 25 B2 30 3A 81 4C 53 |:......TU%.0:.LS|
000016C0: B2 33 A4 32 31 A9 32 3A 54 55 25 B2 54 55 25 AA |.3.21.2:TU%.TU%.|
000016D0: C5 28 53 4C 24 28 4C 53 29 29 3A 82 00 11 1F A2 |.(SL$(LS)):.....|
000016E0: 08 97 32 31 34 2C 31 37 3A 97 32 31 31 2C 32 38 |..214,17:.211,28|
000016F0: 3A 9E 56 48 3A 99 C9 28 42 4C 24 AA C4 28 54 55 |:.VH:..(BL$..(TU|
00001700: 25 29 2C 33 29 3A 97 32 31 31 2C 32 38 3A 9E 56 |%),3):.211,28:.V|
00001710: 48 00 2C 1F A7 08 99 C9 28 42 4C 24 AA C4 28 4D |H.,.....(BL$..(M|
00001720: 43 25 AB 54 55 25 29 2C 33 29 3A 8E 00 46 1F FC |C%.TU%),3):..F..|
00001730: 08 97 32 31 34 2C 4C 50 AA 31 30 3A 97 32 31 31 |..214,LP.10:.211|
00001740: 2C 33 3A 9E 56 48 00 61 1F FD 08 99 C8 28 42 4C |,3:.VH.a.....(BL|
00001750: 24 2C 33 36 29 3B 3A 97 32 31 31 2C 33 3A 9E 56 |$,36);:.211,3:.V|
00001760: 48 00 76 1F FE 08 99 53 4C 24 28 4C 50 25 28 4C |H.v....SL$(LP%(L|
00001770: 50 2C 31 29 29 3B 00 9D 1F 00 09 97 32 31 31 2C |P,1));......211,|
00001780: 31 34 3A 9E 56 48 3A 50 50 B2 32 3A 8D 32 33 35 |14:.VH:PP.2:.235|
00001790: 30 3A 97 32 31 31 2C 31 36 3A 9E 56 48 00 E5 1F |0:.211,16:.VH...|
000017A0: 01 09 99 53 4C 24 28 4C 50 25 28 4C 50 2C 33 29 |...SL$(LP%(LP,3)|
000017B0: 29 3B 3A 97 32 31 31 2C 32 37 3A 9E 56 48 3A 50 |);:.211,27:.VH:P|
000017C0: 50 B2 34 3A 8D 32 33 35 30 3A 97 32 31 31 2C 32 |P.4:.2350:.211,2|
000017D0: 39 3A 9E 56 48 3A 99 53 4C 24 28 4C 50 25 28 4C |9:.VH:.SL$(LP%(L|
000017E0: 50 2C 35 29 29 00 EB 1F 02 09 8E 00 2A 20 2E 09 |P,5)).......* ..|
000017F0: 8B 4C 50 25 28 4C 50 2C 50 50 29 B3 33 32 AF 4C |.LP%(LP,PP).32.L|
00001800: 50 25 28 4C 50 2C 50 50 29 B1 30 A7 99 22 12 22 |P%(LP,PP).0.."."|
00001810: C7 28 4C 50 25 28 4C 50 2C 50 50 29 AA 36 34 29 |.(LP%(LP,PP).64)|
00001820: 22 92 22 3B 3A 89 32 33 36 30 00 3E 20 33 09 99 |".";:.2360.> 3..|
00001830: C7 28 4C 50 25 28 4C 50 2C 50 50 29 29 3B 00 44 |.(LP%(LP,PP));.D|
00001840: 20 38 09 8E 00 4E 20 C3 09 8D 39 30 30 30 00 57 | 8...N ...9000.W|
00001850: 20 C4 09 45 46 B2 31 00 97 20 CE 09 97 32 31 34 | ..EF.1.. ...214|
00001860: 2C 56 43 28 53 4C 29 3A 97 32 31 31 2C 48 43 28 |,VC(SL):.211,HC(|
00001870: 53 4C 29 AA 31 3A 9E 56 48 3A 99 C8 28 55 4C 24 |SL).1:.VH:..(UL$|
00001880: 2C 4C 43 28 53 4C 29 29 3B 3A 97 32 31 31 2C 48 |,LC(SL));:.211,H|
00001890: 43 28 53 4C 29 AA 31 00 B5 20 D3 09 51 4C B2 4C |C(SL).1.. ..QL.L|
000018A0: 43 28 53 4C 29 3A 8D 34 30 3A 4C 44 24 28 53 4C |C(SL):.40:LD$(SL|
000018B0: 29 B2 44 55 24 00 E5 20 D8 09 8B C3 28 4C 44 24 |).DU$.. ....(LD$|
000018C0: 28 53 4C 29 29 B1 4C 43 28 53 4C 29 B0 28 C5 28 |(SL)).LC(SL).(.(|
000018D0: 4C 44 24 28 53 4C 29 29 B2 30 AF 53 4C B3 34 29 |LD$(SL)).0.SL.4)|
000018E0: A7 32 34 39 39 00 EB 20 1E 0A 8E 00 18 21 28 0A |.2499.. .....!(.|
000018F0: 97 32 31 34 2C 56 43 28 53 4C 29 3A 97 32 31 31 |.214,VC(SL):.211|
00001900: 2C 48 43 28 53 4C 29 AA 31 3A 9E 56 48 3A 99 4C |,HC(SL).1:.VH:.L|
00001910: 44 24 28 53 4C 29 3A 8E 00 4D 21 8C 0A 45 46 B2 |D$(SL):..M!..EF.|
00001920: 31 3A 81 58 B2 31 A4 35 3A 97 32 31 34 2C 53 4C |1:.X.1.5:.214,SL|
00001930: AA 31 30 3A 97 32 31 31 2C 48 50 28 58 29 3A 9E |.10:.211,HP(X):.|
00001940: 56 48 3A 8D 32 38 30 30 3A 82 58 3A 8E 00 72 21 |VH:.2800:.X:..r!|
00001950: F0 0A 99 C8 28 42 4C 24 2C 33 39 AB 48 50 28 58 |....(BL$,39.HP(X|
00001960: 29 29 3B 3A 97 32 31 31 2C 48 50 28 58 29 3A 9E |));:.211,HP(X):.|
00001970: 56 48 00 7D 21 F2 0A 97 32 30 34 2C 30 00 95 21 |VH.}!...204,0..!|
00001980: F3 0A A1 4C 50 24 3A 8B 20 4C 50 24 B3 B1 22 22 |...LP$:. LP$..""|
00001990: A7 32 38 30 33 00 AC 21 F4 0A A1 4C 50 24 3A 8B |.2803..!...LP$:.|
000019A0: 20 4C 50 24 B2 22 22 A7 32 38 30 34 00 C0 21 F5 | LP$."".2804..!.|
000019B0: 0A 8B 4C 50 24 B2 C7 28 31 33 29 A7 32 38 30 37 |..LP$..(13).2807|
000019C0: 00 EF 21 F6 0A 44 55 B2 C6 28 4C 50 24 29 3A 8B |..!..DU..(LP$):.|
000019D0: 28 44 55 B3 33 32 AF 44 55 B1 31 29 B0 44 55 B1 |(DU.32.DU.1).DU.|
000019E0: 31 32 37 A7 8D 39 30 30 30 3A 89 32 38 30 34 00 |127..9000:.2804.|
000019F0: 08 22 F7 0A 97 32 30 34 2C 31 3A 99 22 20 9D 22 |."...204,1:." ."|
00001A00: 48 57 24 28 31 37 29 3B 00 26 22 F8 0A 8B 4C 50 |HW$(17);.&"...LP|
00001A10: 24 B2 C7 28 31 33 29 A7 4C 50 24 B2 C7 28 30 29 |$..(13).LP$..(0)|
00001A20: 3A 89 32 38 39 30 00 50 22 F9 0A 4D 53 25 28 53 |:.2890.P"..MS%(S|
00001A30: 4C 29 B2 30 3A 91 58 89 32 38 31 30 2C 32 38 33 |L).0:.X.2810,283|
00001A40: 30 2C 32 38 31 30 2C 32 38 33 30 2C 32 38 31 30 |0,2810,2830,2810|
00001A50: 00 87 22 FA 0A 8B C6 28 4C 50 24 29 AD 32 B3 B1 |.."....(LP$).2..|
00001A60: B5 28 C6 28 4C 50 24 29 AD 32 29 B0 4C 50 24 B3 |.(.(LP$).2).LP$.|
00001A70: 22 41 22 B0 4C 50 24 B1 22 54 22 A7 8D 39 30 30 |"A".LP$."T"..900|
00001A80: 30 3A 89 32 38 30 30 00 B5 22 04 0B 99 53 4C 24 |0:.2800.."...SL$|
00001A90: 28 C6 28 4C 50 24 29 AB 36 34 29 3A 4C 50 25 28 |(.(LP$).64):LP%(|
00001AA0: 53 4C 2C 58 29 B2 C6 28 4C 50 24 29 AB 36 34 3A |SL,X)..(LP$).64:|
00001AB0: 89 32 38 39 35 00 DF 22 0E 0B 8B C6 28 4C 50 24 |.2895.."....(LP$|
00001AC0: 29 B3 33 32 A7 99 22 12 22 C7 28 C6 28 4C 50 24 |).32..".".(.(LP$|
00001AD0: 29 AA 36 34 29 22 92 22 3B 3A 8D 39 30 30 30 00 |).64)".";:.9000.|
00001AE0: E8 22 4A 0B 99 4C 50 24 00 FD 22 4C 0B 4C 50 25 |."J..LP$.."L.LP%|
00001AF0: 28 53 4C 2C 58 29 B2 C6 28 4C 50 24 29 00 2E 23 |(SL,X)..(LP$)..#|
00001B00: 4F 0B 4D 53 25 28 53 4C 29 B2 B6 28 B6 28 4C 50 |O.MS%(SL)..(.(LP|
00001B10: 25 28 53 4C 2C 32 29 B2 31 29 AA B6 28 4C 50 25 |%(SL,2).1)..(LP%|
00001B20: 28 53 4C 2C 34 29 B2 31 29 B1 30 29 3A 8E 00 41 |(SL,4).1).0):..A|
00001B30: 23 B8 0B 98 31 2C 22 49 30 22 3A 44 55 24 B2 22 |#...1,"I0":DU$."|
00001B40: 22 00 5A 23 BA 0B 8D 33 30 39 30 30 3A 8B 45 31 |".Z#...30900:.E1|
00001B50: 25 B1 32 30 A7 33 33 30 30 30 00 6F 23 BD 0B A0 |%.20.33000.o#...|
00001B60: 32 3A 9F 32 2C 4E 43 25 2C 30 2C 22 24 30 22 00 |2:.2,NC%,0,"$0".|
00001B70: 88 23 C0 0B 8D 33 30 39 30 30 3A 8B 45 31 25 B1 |.#...30900:.E1%.|
00001B80: 32 30 A7 33 33 30 30 30 00 9C 23 C2 0B 81 58 B2 |20.33000..#...X.|
00001B90: 31 A4 36 3A 8D 33 30 34 30 30 3A 82 00 B7 23 C7 |1.6:.30400:...#.|
00001BA0: 0B 8D 33 30 34 30 30 3A 8B 58 24 B3 B1 C7 28 33 |..30400:.X$...(3|
00001BB0: 34 29 A7 33 30 31 35 00 DE 23 CC 0B 8D 33 30 34 |4).3015..#...304|
00001BC0: 30 30 3A 8B 58 24 B3 B1 C7 28 33 34 29 A7 44 55 |00:.X$...(34).DU|
00001BD0: 24 B2 44 55 24 AA 58 24 3A 89 33 30 32 30 00 EB |$.DU$.X$:.3020..|
00001BE0: 23 D1 0B 8D 33 30 31 30 30 3A 8E 00 02 24 E0 0B |#...30100:...$..|
00001BF0: 8F 20 49 46 4E 44 25 3C 3E 38 54 48 45 4E 33 30 |. IFND%<>8THEN30|
00001C00: 35 30 00 21 24 E1 0B A0 31 3A 9F 31 2C 4E 44 25 |50.!$...1:.1,ND%|
00001C10: 2C 31 35 3A 4E 43 25 B2 4E 44 25 3A 8D 33 30 30 |,15:NC%.ND%:.300|
00001C20: 30 00 3F 24 E2 0B 8B C8 28 44 55 24 2C 37 29 B3 |0.?$....(DU$,7).|
00001C30: B1 22 50 52 4F 47 52 41 4D 22 A7 33 30 35 30 00 |."PROGRAM".3050.|
00001C40: 57 24 E5 0B 8D 33 32 30 30 30 3A 8B C6 28 58 24 |W$...32000:..(X$|
00001C50: 29 B2 31 33 33 A7 8E 00 61 24 E6 0B 89 33 30 34 |).133...a$...304|
00001C60: 30 00 97 24 EA 0B A0 31 3A 9F 31 2C 4E 44 25 2C |0..$...1:.1,ND%,|
00001C70: 31 35 3A 4E 43 25 B2 4E 44 25 3A 8D 33 30 30 30 |15:NC%.ND%:.3000|
00001C80: 3A 8B C8 28 44 55 24 2C 34 29 B3 B1 22 44 41 54 |:..(DU$,4).."DAT|
00001C90: 41 22 A7 33 30 36 30 00 AF 24 EC 0B 8D 33 32 30 |A".3060..$...320|
00001CA0: 30 30 3A 8B C6 28 58 24 29 B2 31 33 33 A7 8E 00 |00:..(X$).133...|
00001CB0: B9 24 EE 0B 89 33 30 34 30 00 BF 24 F4 0B 8E 00 |.$...3040..$....|
00001CC0: F3 24 FE 0B A0 31 3A 9F 31 2C 38 2C 31 35 3A 4E |.$...1:.1,8,15:N|
00001CD0: 43 25 B2 38 3A 8D 33 30 30 30 3A 8B C8 28 44 55 |C%.8:.3000:..(DU|
00001CE0: 24 2C 37 29 B2 22 50 52 4F 47 52 41 4D 22 A7 33 |$,7)."PROGRAM".3|
00001CF0: 30 38 30 00 04 25 03 0C 8D 33 31 33 30 30 3A 89 |080..%...31300:.|
00001D00: 33 30 37 30 00 0A 25 08 0C 8E 00 40 25 0A 0C A0 |3070..%....@%...|
00001D10: 31 3A 9F 31 2C 4E 44 25 2C 31 35 3A 4E 43 25 B2 |1:.1,ND%,15:NC%.|
00001D20: 4E 44 25 3A 8D 33 30 30 30 3A 8B C8 28 44 55 24 |ND%:.3000:..(DU$|
00001D30: 2C 34 29 B3 B1 22 44 41 54 41 22 A7 33 30 38 36 |,4).."DATA".3086|
00001D40: 00 5C 25 0C 0C 8D 33 32 30 30 30 3A 8B C6 28 58 |.\%...32000:..(X|
00001D50: 24 29 B3 B1 31 33 33 A7 33 30 38 32 00 84 25 0E |$)..133.3082..%.|
00001D60: 0C 8B 53 4C B2 36 A7 8B 4E 44 25 B2 38 A7 8D 33 |..SL.6..ND%.8..3|
00001D70: 30 34 30 3A 8B C6 28 58 24 29 B3 B1 31 33 33 A7 |040:..(X$)..133.|
00001D80: 33 30 38 32 00 8A 25 11 0C 8E 00 C4 25 12 0C 43 |3082..%.....%..C|
00001D90: 49 B2 31 3A A0 31 3A 9F 31 2C 4E 44 25 2C 31 35 |I.1:.1:.1,ND%,15|
00001DA0: 3A 4E 43 25 B2 4E 44 25 3A 8D 33 30 30 30 3A 8B |:NC%.ND%:.3000:.|
00001DB0: C8 28 44 55 24 2C 34 29 B2 22 44 41 54 41 22 A7 |.(DU$,4)."DATA".|
00001DC0: 33 30 39 39 00 D8 25 17 0C 8D 33 31 31 30 30 3A |3099..%...31100:|
00001DD0: 8B 43 49 A7 33 30 39 30 00 DE 25 1B 0C 8E 00 F1 |.CI.3090..%.....|
00001DE0: 25 1C 0C 4E 41 25 B2 30 3A 8D 33 30 30 35 30 3A |%..NA%.0:.30050:|
00001DF0: 8E 00 13 26 2B 0C 98 31 2C 22 50 22 AA C7 28 32 |...&+..1,"P"..(2|
00001E00: AA 39 36 29 AA C7 28 31 29 AA C7 28 30 29 AA C7 |.96)..(1)..(0)..|
00001E10: 28 31 29 00 1E 26 2C 0C 8D 33 30 39 30 30 00 2C |(1)..&,..30900.,|
00001E20: 26 2D 0C 44 55 24 B2 C4 28 54 52 29 00 37 26 2E |&-.DU$..(TR).7&.|
00001E30: 0C 81 59 B2 31 A4 33 00 67 26 30 0C 44 55 24 B2 |..Y.1.3.g&0.DU$.|
00001E40: 44 55 24 AA C7 28 31 33 29 AA C4 28 54 4E 28 59 |DU$..(13)..(TN(Y|
00001E50: 29 29 AA C7 28 31 33 29 AA 22 4E 4F 54 20 53 4F |))..(13)."NOT SO|
00001E60: 52 54 45 44 22 3A 82 00 74 26 32 0C 8D 33 30 33 |RTED":..t&2..303|
00001E70: 37 30 3A 8E 00 81 26 3A 0C 8D 33 30 31 30 30 3A |70:...&:..30100:|
00001E80: 8E 00 9A 26 44 0C 8F 20 43 52 45 41 54 45 20 4C |...&D.. CREATE L|
00001E90: 41 53 54 20 52 45 43 4F 52 44 00 AD 26 46 0C 81 |AST RECORD..&F..|
00001EA0: 5A B2 32 35 30 A4 37 35 30 A9 32 35 30 00 C8 26 |Z.250.750.250..&|
00001EB0: 48 0C 58 B2 B5 28 5A AD 32 35 36 29 3A 59 B2 5A |H.X..(Z.256):Y.Z|
00001EC0: AB 28 58 AC 32 35 36 29 00 EA 26 4C 0C 98 31 2C |.(X.256)..&L..1,|
00001ED0: 22 50 22 AA C7 28 32 AA 39 36 29 AA C7 28 59 29 |"P"..(2.96)..(Y)|
00001EE0: AA C7 28 58 29 AA C7 28 31 29 00 FA 26 4E 0C 44 |..(X)..(1)..&N.D|
00001EF0: 55 24 B2 22 44 55 4D 4D 59 22 00 1A 27 50 0C 44 |U$."DUMMY"..'P.D|
00001F00: 55 24 B2 44 55 24 AA C7 28 31 33 29 AA 44 55 24 |U$.DU$..(13).DU$|
00001F10: AA C7 28 31 33 29 AA 44 55 24 00 25 27 52 0C 8D |..(13).DU$.%'R..|
00001F20: 33 30 33 37 30 00 2C 27 54 0C 82 5A 00 32 27 58 |30370.,'T..Z.2'X|
00001F30: 0C 8E 00 4C 27 E4 0C 81 58 B2 31 A4 33 3A 4E 41 |...L'...X.1.3:NA|
00001F40: 25 B2 35 AA 58 3A 8D 33 30 30 35 30 00 6E 27 EE |%.5.X:.30050.n'.|
00001F50: 0C 81 44 55 B2 31 A4 31 30 3A 8D 33 30 33 30 30 |..DU.1.10:.30300|
00001F60: 3A 82 3A 8D 33 30 31 30 30 3A 82 58 3A 8E 00 74 |:.:.30100:.X:..t|
00001F70: 27 43 0D 8F 00 87 27 48 0D 4E 41 25 B2 31 3A 8D |'C....'H.NA%.1:.|
00001F80: 33 30 30 30 30 3A 8E 00 9A 27 49 0D 4E 41 25 B2 |30000:...'I.NA%.|
00001F90: 32 3A 8D 33 30 30 30 30 3A 8E 00 BA 27 52 0D 81 |2:.30000:...'R..|
00001FA0: 58 B2 31 A4 32 31 3A 8D 33 30 32 35 30 3A 53 4C |X.1.21:.30250:SL|
00001FB0: 24 28 58 29 B2 44 55 24 3A 82 00 DA 27 54 0D 81 |$(X).DU$:...'T..|
00001FC0: 58 B2 31 A4 31 30 3A 8D 33 30 32 35 30 3A 44 46 |X.1.10:.30250:DF|
00001FD0: 24 28 58 29 B2 44 55 24 3A 82 00 F9 27 56 0D 81 |$(X).DU$:...'V..|
00001FE0: 58 B2 31 A4 34 3A 8D 33 30 32 35 30 3A 4C 44 24 |X.1.4:.30250:LD$|
00001FF0: 28 58 29 B2 44 55 24 3A 82 00 34 28 58 0D 81 58 |(X).DU$:..4(X..X|
00002000: B2 31 A4 39 3A 8D 33 30 32 30 30 3A 4D 53 25 28 |.1.9:.30200:MS%(|
00002010: 58 29 B2 44 55 3A 81 59 B2 31 A4 35 3A 8D 33 30 |X).DU:.Y.1.5:.30|
00002020: 32 30 30 3A 4C 50 25 28 58 2C 59 29 B2 44 55 3A |200:LP%(X,Y).DU:|
00002030: 82 59 2C 58 00 55 28 5A 0D 81 59 B2 31 A4 35 3A |.Y,X.U(Z..Y.1.5:|
00002040: 8D 33 30 32 35 30 3A 45 46 24 28 59 29 B2 44 55 |.30250:EF$(Y).DU|
00002050: 24 3A 82 3A 8E 00 75 28 5C 0D 81 58 B2 31 A4 32 |$:.:..u(\..X.1.2|
00002060: 31 3A 44 55 24 B2 53 4C 24 28 58 29 3A 8D 33 30 |1:DU$.SL$(X):.30|
00002070: 33 35 30 3A 82 00 95 28 5E 0D 81 58 B2 31 A4 31 |350:...(^..X.1.1|
00002080: 30 3A 44 55 24 B2 44 46 24 28 58 29 3A 8D 33 30 |0:DU$.DF$(X):.30|
00002090: 33 35 30 3A 82 00 B4 28 5F 0D 81 58 B2 31 A4 34 |350:...(_..X.1.4|
000020A0: 3A 44 55 24 B2 4C 44 24 28 58 29 3A 8D 33 30 33 |:DU$.LD$(X):.303|
000020B0: 35 30 3A 82 00 EF 28 60 0D 81 58 B2 31 A4 39 3A |50:...(`..X.1.9:|
000020C0: 44 55 B2 4D 53 25 28 58 29 3A 8D 33 30 33 30 30 |DU.MS%(X):.30300|
000020D0: 3A 81 59 B2 31 A4 35 3A 44 55 B2 4C 50 25 28 58 |:.Y.1.5:DU.LP%(X|
000020E0: 2C 59 29 3A 8D 33 30 33 30 30 3A 82 59 2C 58 00 |,Y):.30300:.Y,X.|
000020F0: 0E 29 62 0D 81 59 B2 31 A4 35 3A 44 55 24 B2 45 |.)b..Y.1.5:DU$.E|
00002100: 46 24 28 59 29 3A 8D 33 30 33 35 30 3A 82 00 19 |F$(Y):.30350:...|
00002110: 29 64 0D 45 46 B2 30 3A 8E 00 26 29 66 0D 8D 33 |)d.EF.0:..&)f..3|
00002120: 30 31 30 30 3A 8E 00 44 29 AC 0D 4E 41 25 B2 33 |0100:..D)..NA%.3|
00002130: 3A 8D 33 30 30 30 30 3A 44 55 B2 54 52 3A 8D 33 |:.30000:DU.TR:.3|
00002140: 30 33 30 30 00 51 29 B6 0D 8D 33 30 31 30 30 3A |0300.Q)...30100:|
00002150: 8E 00 64 29 D8 0E 4E 41 25 B2 34 3A 8D 33 30 30 |..d)..NA%.4:.300|
00002160: 30 30 3A 8E 00 94 29 E2 0E 8D 33 30 32 30 30 3A |00:...)...30200:|
00002170: 46 54 25 B2 44 55 3A 81 53 4C B2 31 A4 31 39 3A |FT%.DU:.SL.1.19:|
00002180: 8D 33 30 32 35 30 3A 48 57 24 28 53 4C 29 B2 44 |.30250:HW$(SL).D|
00002190: 55 24 3A 82 00 B2 29 E4 0E 50 53 25 B2 30 3A 8B |U$:...)..PS%.0:.|
000021A0: 48 57 24 28 31 34 29 B3 B1 22 4E 22 A7 50 53 25 |HW$(14).."N".PS%|
000021B0: B2 31 00 C9 29 E7 0E 4E 44 25 B2 37 AA C5 28 48 |.1..)..ND%.7..(H|
000021C0: 57 24 28 31 34 29 29 3A 8E 00 DA 29 EC 0E 4E 41 |W$(14)):...)..NA|
000021D0: 25 B2 35 3A 8D 33 30 30 30 30 00 EF 29 EE 0E 4E |%.5:.30000..)..N|
000021E0: 44 25 B2 37 AA C5 28 48 57 24 28 31 34 29 29 00 |D%.7..(HW$(14)).|
000021F0: 21 2A F0 0E 44 55 B2 46 54 25 3A 8D 33 30 33 30 |!*..DU.FT%:.3030|
00002200: 30 3A 81 53 4C B2 31 A4 31 39 3A 44 55 24 B2 48 |0:.SL.1.19:DU$.H|
00002210: 57 24 28 53 4C 29 3A 8D 33 30 33 35 30 3A 82 3A |W$(SL):.30350:.:|
00002220: 8E 00 2E 2A F6 0E 8D 33 30 31 30 30 3A 8E 00 34 |...*...30100:..4|
00002230: 2A 3C 0F 8E 00 3E 2A 43 16 8D 39 30 30 30 00 63 |*<...>*C..9000.c|
00002240: 2A 44 16 45 46 B2 31 3A 97 32 31 34 2C 45 56 28 |*D.EF.1:.214,EV(|
00002250: 53 4C 29 3A 97 32 31 31 2C 45 48 28 53 4C 29 3A |SL):.211,EH(SL):|
00002260: 9E 56 48 00 87 2A 4E 16 99 C8 28 55 4C 24 2C 4C |.VH..*N...(UL$,L|
00002270: 45 28 53 4C 29 29 3B 3A 97 32 31 31 2C 45 48 28 |E(SL));:.211,EH(|
00002280: 53 4C 29 3A 9E 56 48 00 B6 2A 53 16 51 4C B2 4C |SL):.VH..*S.QL.L|
00002290: 45 28 53 4C 29 3A 8D 34 30 3A 45 46 24 28 53 4C |E(SL):.40:EF$(SL|
000022A0: 29 B2 44 55 24 3A 8B 45 46 24 28 53 4C 29 B2 22 |).DU$:.EF$(SL)."|
000022B0: 22 A7 35 36 39 39 00 D2 2A 58 16 8B C3 28 45 46 |".5699..*X...(EF|
000022C0: 24 28 53 4C 29 29 B1 4C 45 28 53 4C 29 A7 35 36 |$(SL)).LE(SL).56|
000022D0: 39 39 00 15 2B 59 16 8B 53 4C B3 33 AF 45 46 24 |99..+Y..SL.3.EF$|
000022E0: 28 53 4C 29 B3 B1 CA 28 53 43 24 2C 53 4C AA B6 |(SL)...(SC$,SL..|
000022F0: 28 53 4C B2 32 29 2C 31 29 AF 45 46 24 28 53 4C |(SL.2),1).EF$(SL|
00002300: 29 B3 B1 CA 28 53 43 24 2C 53 4C AC 32 2C 31 29 |)...(SC$,SL.2,1)|
00002310: A7 35 36 39 39 00 1B 2B 9E 16 8E 00 54 2B A8 16 |.5699..+....T+..|
00002320: 97 32 31 34 2C 45 56 28 53 4C 29 3A 97 32 31 31 |.214,EV(SL):.211|
00002330: 2C 45 48 28 53 4C 29 3A 9E 56 48 3A 99 C9 28 42 |,EH(SL):.VH:..(B|
00002340: 4C 24 AA 45 46 24 28 53 4C 29 2C 4C 45 28 53 4C |L$.EF$(SL),LE(SL|
00002350: 29 29 3A 8E 00 6F 2B 38 18 8D 33 32 30 30 30 3A |)):..o+8..32000:|
00002360: 8B C6 28 58 24 29 B2 31 33 33 A7 36 32 34 30 00 |..(X$).133.6240.|
00002370: 78 2B 3A 18 43 49 B2 30 00 8F 2B 3D 18 8D 33 30 |x+:.CI.0..+=..30|
00002380: 34 30 3A 8B C6 28 58 24 29 B2 31 33 33 A7 8E 00 |40:..(X$).133...|
00002390: B7 2B 3F 18 8F 20 47 4F 53 55 42 33 30 38 32 3A |.+?.. GOSUB3082:|
000023A0: 49 46 41 53 43 28 58 24 29 3D 31 33 33 54 48 45 |IFASC(X$)=133THE|
000023B0: 4E 52 45 54 55 52 4E 00 C2 2B 40 18 8D 33 34 30 |NRETURN..+@..340|
000023C0: 30 30 00 D3 2B 41 18 98 31 2C 22 4E 30 3A 44 41 |00..+A..1,"N0:DA|
000023D0: 54 41 22 00 EF 2B 42 18 8D 33 35 30 30 3A 8D 33 |TA"..+B..3500:.3|
000023E0: 34 30 30 3A 8D 33 34 32 30 3A 8D 33 34 33 30 00 |400:.3420:.3430.|
000023F0: F9 2B 4C 18 8D 33 33 30 30 00 15 2C 56 18 8D 33 |.+L..3300..,V..3|
00002400: 31 30 30 3A 8D 33 31 31 35 3A 8D 33 31 34 30 3A |100:.3115:.3140:|
00002410: 8D 33 31 33 30 00 1B 2C 60 18 8E 00 24 2C 58 1B |.3130..,`...$,X.|
00002420: 8D 32 30 30 00 65 2C 5D 1B 97 32 31 34 2C 35 3A |.200.e,]..214,5:|
00002430: 9E 56 48 3A 99 22 12 41 92 20 4C 49 53 54 20 4E |.VH:.".A. LIST N|
00002440: 41 4D 45 3E 3E 22 3A 99 3A 97 32 31 31 2C 32 3A |AME>>":.:.211,2:|
00002450: 9E 56 48 3A 99 22 12 20 46 49 45 4C 44 20 4E 41 |.VH:.". FIELD NA|
00002460: 4D 45 20 22 3B 00 8C 2C 5F 1B 97 32 31 31 2C 31 |ME ";..,_..211,1|
00002470: 37 3A 9E 56 48 3A 99 22 20 43 48 41 52 41 43 54 |7:.VH:." CHARACT|
00002480: 45 52 20 4C 49 4D 49 54 20 22 3A 99 00 C5 2C 67 |ER LIMIT ":...,g|
00002490: 1B 81 58 B2 31 A4 31 30 3A 99 22 12 22 C7 28 36 |..X.1.10:.".".(6|
000024A0: 34 AA 58 AC 32 29 3B 3A 97 32 31 31 2C 31 34 3A |4.X.2);:.211,14:|
000024B0: 9E 56 48 3A 99 22 12 22 C7 28 36 35 AA 58 AC 32 |.VH:.".".(65.X.2|
000024C0: 29 3A 82 3A 99 00 FD 2C 6C 1B 97 32 31 34 2C 31 |):.:...,l..214,1|
000024D0: 35 3A 97 32 31 31 2C 32 30 3A 9E 56 48 3A 99 22 |5:.211,20:.VH:."|
000024E0: 54 4F 54 41 4C 20 43 48 41 52 41 43 54 45 52 53 |TOTAL CHARACTERS|
000024F0: 22 3A 97 32 31 31 2C 32 30 3A 9E 56 48 00 43 2D |":.211,20:.VH.C-|
00002500: 6E 1B 99 22 2D 2D 2D 2D 2D 20 2D 2D 2D 2D 2D 2D |n.."----- ------|
00002510: 2D 2D 2D 2D 22 3A 97 32 31 31 2C 32 30 3A 9E 56 |----":.211,20:.V|
00002520: 48 3A 99 22 55 53 45 44 20 3E 3E 22 3A 97 32 31 |H:."USED >>":.21|
00002530: 31 2C 32 30 3A 9E 56 48 3A 99 22 4C 45 46 54 20 |1,20:.VH:."LEFT |
00002540: 3E 3E 22 00 80 2D 7B 1B 97 32 31 34 2C 32 30 3A |>>"..-{..214,20:|
00002550: 97 32 31 31 2C 31 30 3A 9E 56 48 3A 99 53 43 24 |.211,10:.VH:.SC$|
00002560: 28 33 29 22 20 28 41 2D 55 29 22 3A 99 53 43 24 |(3)" (A-U)":.SC$|
00002570: 28 36 29 3B 3A 97 32 31 31 2C 32 37 3A 9E 56 48 |(6);:.211,27:.VH|
00002580: 00 A6 2D 7C 1B 99 22 28 5A 29 52 45 43 4F 52 44 |..-|.."(Z)RECORD|
00002590: 22 3A 97 32 31 31 2C 31 32 3A 9E 56 48 3A 99 53 |":.211,12:.VH:.S|
000025A0: 43 24 28 32 29 3B 00 D3 2D 7D 1B 8B 50 53 25 B3 |C$(2);..-}..PS%.|
000025B0: B1 30 20 A7 97 32 31 34 2C 32 31 3A 97 32 31 31 |.0 ..214,21:.211|
000025C0: 2C 31 34 3A 9E 56 48 3A 99 22 28 59 29 50 52 49 |,14:.VH:."(Y)PRI|
000025D0: 4E 54 22 00 D9 2D 7F 1B 8E 00 06 2E 80 1B 97 32 |NT"..-.........2|
000025E0: 31 34 2C 32 32 3A 97 32 31 31 2C 32 38 3A 9E 56 |14,22:.211,28:.V|
000025F0: 48 3A 99 C7 28 31 37 35 29 3B 3A 97 32 31 31 2C |H:..(175);:.211,|
00002600: 32 38 3A 9E 56 48 00 15 2E 81 1B 8D 32 30 3A 53 |28:.VH......20:S|
00002610: 4C 24 B2 58 24 00 3F 2E 82 1B 53 4C B2 C6 28 53 |L$.X$.?...SL..(S|
00002620: 4C 24 29 AB 36 34 3A 8B 53 4C 24 B2 22 5A 22 B0 |L$).64:.SL$."Z".|
00002630: 53 4C 24 B2 22 58 22 A7 99 3A 89 37 30 39 30 00 |SL$."X"..:.7090.|
00002640: 58 2E 83 1B 8B 53 4C 24 B2 22 59 22 A7 99 3A 8D |X....SL$."Y"..:.|
00002650: 38 30 3A 89 37 30 34 30 00 85 2E 85 1B 8B 53 4C |80:.7040......SL|
00002660: 24 B3 22 41 22 B0 53 4C 24 B1 22 55 22 B0 53 4C |$."A".SL$."U".SL|
00002670: B1 28 58 4C AA 31 29 AC 32 A7 8D 39 30 30 30 3A |.(XL.1).2..9000:|
00002680: 89 37 30 34 30 00 A2 2E 94 1B 99 53 4C 24 3A 8D |.7040......SL$:.|
00002690: 31 36 30 30 3A 8B 53 4C B3 B1 32 32 A7 8D 31 38 |1600:.SL..22..18|
000026A0: 30 30 00 E0 2E 99 1B 8B 53 4C B2 32 AC 58 4C AA |00......SL.2.XL.|
000026B0: 32 AF 53 4C B3 32 31 A7 53 4C B2 53 4C AA 31 3A |2.SL.21.SL.SL.1:|
000026C0: 8D 31 36 30 30 3A 8D 31 38 30 30 3A 58 4C B2 58 |.1600:.1800:XL.X|
000026D0: 4C AA 31 3A 8B 58 4C B2 31 31 A7 58 4C B2 31 30 |L.1:.XL.11.XL.10|
000026E0: 00 EA 2E 9E 1B 89 37 30 34 30 00 F0 2E B2 1B 8E |......7040......|
000026F0: 00 F9 2E BC 1B 8D 32 30 30 00 41 2F C1 1B 97 32 |......200.A/...2|
00002700: 31 34 2C 35 3A 97 32 31 31 2C 36 3A 9E 56 48 3A |14,5:.211,6:.VH:|
00002710: 99 22 12 20 54 59 50 45 20 2A 20 46 4F 52 20 52 |.". TYPE * FOR R|
00002720: 45 50 45 41 54 20 46 45 41 54 55 52 45 20 22 3A |EPEAT FEATURE ":|
00002730: 97 32 31 34 2C 37 3A 97 32 31 31 2C 33 3A 9E 56 |.214,7:.211,3:.V|
00002740: 48 00 6D 2F C3 1B 99 22 20 4C 41 42 45 4C 20 22 |H.m/..." LABEL "|
00002750: 3B 3A 97 32 31 31 2C 31 34 3A 99 22 20 44 45 46 |;:.211,14:." DEF|
00002760: 41 55 4C 54 20 49 4E 50 55 54 22 3A 99 00 93 2F |AULT INPUT":.../|
00002770: CB 1B 97 32 31 34 2C 39 3A 81 58 B2 31 A4 31 30 |...214,9:.X.1.10|
00002780: 3A 99 22 12 22 C7 28 36 34 AA 58 29 3A 82 3A 99 |:.".".(64.X):.:.|
00002790: 22 92 22 00 D9 2F DF 1B 97 32 31 34 2C 32 30 3A |"."../...214,20:|
000027A0: 97 32 31 31 2C 31 30 3A 99 53 43 24 28 33 29 22 |.211,10:.SC$(3)"|
000027B0: 20 28 41 2D 4A 29 22 3A 99 53 43 24 28 36 29 3B | (A-J)":.SC$(6);|
000027C0: 3A 97 32 31 31 2C 32 37 3A 9E 56 48 3A 99 22 28 |:.211,27:.VH:."(|
000027D0: 52 29 52 45 43 4F 52 44 22 00 1A 30 E1 1B 97 32 |R)RECORD"..0...2|
000027E0: 31 31 2C 31 32 3A 9E 56 48 3A 99 53 43 24 28 32 |11,12:.VH:.SC$(2|
000027F0: 29 3B 3A 8B 50 53 25 B3 B1 30 A7 97 32 31 34 2C |);:.PS%..0..214,|
00002800: 32 31 3A 97 32 31 31 2C 31 34 3A 9E 56 48 3A 99 |21:.211,14:.VH:.|
00002810: 22 28 50 29 50 52 49 4E 54 22 00 20 30 E3 1B 8E |"(P)PRINT". 0...|
00002820: 00 4D 30 E4 1B 97 32 31 34 2C 32 32 3A 97 32 31 |.M0...214,22:.21|
00002830: 31 2C 32 38 3A 9E 56 48 3A 99 C7 28 31 37 35 29 |1,28:.VH:..(175)|
00002840: 3B 3A 97 32 31 31 2C 32 38 3A 9E 56 48 00 5C 30 |;:.211,28:.VH.\0|
00002850: E5 1B 8D 32 30 3A 53 4C 24 B2 58 24 00 7A 30 E6 |...20:SL$.X$.z0.|
00002860: 1B 3A 8B 53 4C 24 B2 22 52 22 B0 53 4C 24 B2 22 |.:.SL$."R".SL$."|
00002870: 58 22 A7 99 3A 89 37 31 39 30 00 93 30 E7 1B 8B |X"..:.7190..0...|
00002880: 53 4C 24 B2 22 50 22 A7 99 3A 8D 38 30 3A 89 37 |SL$."P"..:.80:.7|
00002890: 31 34 30 00 B4 30 E9 1B 8B 53 4C 24 B3 22 41 22 |140..0...SL$."A"|
000028A0: B0 53 4C 24 B1 22 4A 22 A7 8D 39 30 30 30 3A 89 |.SL$."J"..9000:.|
000028B0: 37 31 34 30 00 EC 30 F8 1B 99 53 4C 24 3A 53 4C |7140..0...SL$:SL|
000028C0: B2 C6 28 53 4C 24 29 AB 36 34 3A 8B 53 4C 24 28 |..(SL$).64:.SL$(|
000028D0: 53 4C AC 32 29 B2 22 49 4E 41 43 54 49 56 45 22 |SL.2)."INACTIVE"|
000028E0: A7 8D 39 30 30 30 3A 89 37 31 34 30 00 F6 30 FD |..9000:.7140..0.|
000028F0: 1B 8D 31 37 30 30 00 00 31 02 1C 89 37 31 34 30 |..1700..1...7140|
00002900: 00 06 31 16 1C 8E 00 0F 31 84 1C 8D 32 30 30 00 |..1.....1...200.|
00002910: 53 31 8E 1C 97 32 31 34 2C 35 3A 9E 56 48 3A 99 |S1...214,5:.VH:.|
00002920: 22 20 12 41 92 20 4C 41 42 45 4C 20 57 49 44 54 |" .A. LABEL WIDT|
00002930: 48 22 3B 3A 97 32 31 31 2C 32 32 3A 9E 56 48 3A |H";:.211,22:.VH:|
00002940: 99 22 12 42 92 20 4C 41 42 45 4C 20 48 45 49 47 |.".B. LABEL HEIG|
00002950: 48 54 22 00 89 31 93 1C 99 22 20 12 43 92 20 48 |HT"..1..." .C. H|
00002960: 4F 57 20 4D 41 4E 59 20 4C 41 42 45 4C 53 20 41 |OW MANY LABELS A|
00002970: 43 52 4F 53 53 3F 22 3A 99 22 20 12 44 92 20 4D |CROSS?":." .D. M|
00002980: 45 53 53 41 47 45 22 3A 99 00 B8 31 A2 1C 99 22 |ESSAGE":...1..."|
00002990: 20 4C 20 50 4F 53 49 54 49 4F 4E 20 31 20 50 20 | L POSITION 1 P |
000029A0: 50 4F 53 49 54 49 4F 4E 20 32 20 50 20 50 4F 53 |POSITION 2 P POS|
000029B0: 49 54 49 4F 4E 20 33 22 00 F3 31 A3 1C 99 22 20 |ITION 3"..1..." |
000029C0: 2D 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 2D 20 2D |- ---------- - -|
000029D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 2D 20 2D 2D 2D 2D |--------- - ----|
000029E0: 2D 2D 2D 2D 2D 2D 22 3A 97 32 31 34 2C 31 31 3A |------":.214,11:|
000029F0: 9E 56 48 00 3E 32 A4 1C 81 58 B2 31 A4 39 3A 99 |.VH.>2...X.1.9:.|
00002A00: 22 20 12 22 C7 28 58 AA 34 38 29 22 92 22 3A 82 |" .".(X.48)".":.|
00002A10: 3A 97 32 31 31 2C 35 3A 9E 56 48 3A 99 22 3C 3C |:.211,5:.VH:."<<|
00002A20: 46 31 3E 3E 20 46 4F 52 20 53 43 52 45 45 4E 20 |F1>> FOR SCREEN |
00002A30: 4C 41 42 45 4C 20 4C 45 54 54 45 52 53 22 00 7F |LABEL LETTERS"..|
00002A40: 32 A7 1C 97 32 31 34 2C 32 31 3A 97 32 31 31 2C |2...214,21:.211,|
00002A50: 38 3A 9E 56 48 3A 99 22 49 54 45 4D 20 54 4F 20 |8:.VH:."ITEM TO |
00002A60: 45 44 49 54 20 28 41 2D 44 20 4F 52 20 31 2D 39 |EDIT (A-D OR 1-9|
00002A70: 29 22 3A 99 22 20 20 22 53 43 24 28 36 29 3B 00 |)":." "SC$(6);.|
00002A80: B1 32 A8 1C 97 32 31 31 2C 32 39 3A 9E 56 48 3A |.2...211,29:.VH:|
00002A90: 99 22 28 52 29 52 45 43 4F 52 44 22 3A 97 32 31 |."(R)RECORD":.21|
00002AA0: 31 2C 31 32 3A 9E 56 48 3A 99 53 43 24 28 32 29 |1,12:.VH:.SC$(2)|
00002AB0: 3B 00 DD 32 A9 1C 8B 50 53 25 B3 B1 30 A7 97 32 |;..2...PS%..0..2|
00002AC0: 31 34 2C 32 32 3A 97 32 31 31 2C 31 36 3A 9E 56 |14,22:.211,16:.V|
00002AD0: 48 3A 99 22 28 50 29 50 52 49 4E 54 22 00 E3 32 |H:."(P)PRINT"..2|
00002AE0: AB 1C 8E 00 10 33 AC 1C 97 32 31 34 2C 32 33 3A |.....3...214,23:|
00002AF0: 97 32 31 31 2C 32 38 3A 9E 56 48 3A 99 C7 28 31 |.211,28:.VH:..(1|
00002B00: 37 35 29 3B 3A 97 32 31 31 2C 32 38 3A 9E 56 48 |75);:.211,28:.VH|
00002B10: 00 1F 33 AD 1C 8D 32 30 3A 53 4C 24 B2 58 24 00 |..3...20:SL$.X$.|
00002B20: 34 33 AE 1C 8B 20 53 4C 24 B2 C7 28 31 33 29 A7 |43... SL$..(13).|
00002B30: 37 33 36 30 00 5E 33 AF 1C 99 53 4C 24 3A 8B 53 |7360.^3...SL$:.S|
00002B40: 4C 24 B2 22 52 22 B0 53 4C 24 B2 22 58 22 B0 53 |L$."R".SL$."X".S|
00002B50: 4C 24 B2 C7 28 31 33 33 29 A7 37 33 39 30 00 75 |L$..(133).7390.u|
00002B60: 33 B6 1C 8B 53 4C 24 B2 22 50 22 A7 8D 38 30 3A |3...SL$."P"..80:|
00002B70: 89 37 33 34 30 00 B2 33 C0 1C 8B C5 28 53 4C 24 |.7340..3....(SL$|
00002B80: 29 B2 30 AF 28 53 4C 24 B3 22 41 22 B0 53 4C 24 |).0.(SL$."A".SL$|
00002B90: B1 22 44 22 29 B0 C5 28 53 4C 24 29 B1 C5 28 4C |."D")..(SL$)..(L|
00002BA0: 44 24 28 32 29 29 A7 8D 39 30 30 30 3A 89 37 33 |D$(2))..9000:.73|
00002BB0: 34 30 00 E4 33 CF 1C 8B 53 4C 24 B1 22 39 22 A7 |40..3...SL$."9".|
00002BC0: 53 4C B2 C6 28 53 4C 24 29 AB 36 34 3A 8D 32 35 |SL..(SL$).64:.25|
00002BD0: 30 30 3A 8D 32 36 30 30 3A 8D 37 34 30 30 3A 89 |00:.2600:.7400:.|
00002BE0: 37 33 34 30 00 01 34 D4 1C 53 4C B2 C6 28 53 4C |7340..4..SL..(SL|
00002BF0: 24 29 AB 34 38 3A 8D 32 37 30 30 3A 89 37 33 34 |$).48:.2700:.734|
00002C00: 30 00 07 34 DE 1C 8E 00 3D 34 E3 1C 8B 43 4C 28 |0..4....=4...CL(|
00002C10: 32 29 B3 B1 30 A7 97 32 31 34 2C 31 32 3A 99 22 |2)..0..214,12:."|
00002C20: 12 22 3A 81 5A B2 31 A4 43 4C 28 32 29 3A 99 C7 |.":.Z.1.CL(2):..|
00002C30: 28 34 38 AA 5A 29 3A 82 3A 99 22 92 22 00 6A 34 |(48.Z):.:.".".j4|
00002C40: E5 1C 8B 20 43 4C 28 32 29 B3 39 A7 81 5A B2 43 |... CL(2).9..Z.C|
00002C50: 4C 28 32 29 AA 31 A4 39 3A 97 32 31 34 2C 31 31 |L(2).1.9:.214,11|
00002C60: AA 5A 3A 9E AB 38 36 38 3A 82 00 70 34 E6 1C 8E |.Z:..868:..p4...|
00002C70: 00 8C 34 E8 1C 81 4C 50 B2 31 A4 C5 28 4C 44 24 |..4...LP.1..(LD$|
00002C80: 28 32 29 29 3A 8D 32 33 30 30 3A 82 00 CD 34 EA |(2)):.2300:...4.|
00002C90: 1C 8B 4C 50 B3 B1 31 30 A7 81 4C 50 B2 C5 28 4C |..LP..10..LP..(L|
00002CA0: 44 24 28 32 29 29 AA 31 A4 39 3A 97 32 31 34 2C |D$(2)).1.9:.214,|
00002CB0: 31 30 AA 4C 50 3A 97 32 31 31 2C 33 3A 9E 56 48 |10.LP:.211,3:.VH|
00002CC0: 3A 99 C8 28 42 4C 24 2C 33 36 29 3A 82 00 D3 34 |:..(BL$,36):...4|
00002CD0: F2 1C 8E 00 DC 34 4C 1D 8D 32 30 30 00 10 35 56 |.....4L..200..5V|
00002CE0: 1D 97 32 31 34 2C 38 3A 9E 56 48 3A 99 22 12 41 |..214,8:.VH:.".A|
00002CF0: 92 20 50 52 49 4E 54 20 52 45 54 55 52 4E 20 41 |. PRINT RETURN A|
00002D00: 44 44 52 45 53 53 3F 20 28 59 2F 4E 29 22 3A 99 |DDRESS? (Y/N)":.|
00002D10: 00 59 35 58 1D 99 22 12 42 92 20 53 49 4E 47 4C |.Y5X..".B. SINGL|
00002D20: 45 20 4F 52 20 43 4F 4E 54 49 4E 4F 55 53 3F 20 |E OR CONTINOUS? |
00002D30: 28 53 2F 43 29 22 3A 99 3A 99 22 12 43 92 20 4C |(S/C)":.:.".C. L|
00002D40: 45 46 54 20 4D 41 52 47 49 4E 20 46 4F 52 20 41 |EFT MARGIN FOR A|
00002D50: 44 44 52 45 53 53 22 3A 99 00 A7 35 60 1D 99 22 |DDRESS":...5`.."|
00002D60: 12 44 92 20 45 4E 56 45 4C 4F 50 45 20 48 45 49 |.D. ENVELOPE HEI|
00002D70: 47 48 54 20 49 4E 20 4C 49 4E 45 53 22 3A 99 3A |GHT IN LINES":.:|
00002D80: 99 22 12 45 92 20 4C 49 4E 45 53 3A 20 52 45 54 |.".E. LINES: RET|
00002D90: 55 52 4E 20 41 44 44 52 45 53 53 20 54 4F 20 41 |URN ADDRESS TO A|
00002DA0: 44 44 52 45 53 53 22 00 AD 35 62 1D 8E 00 EA 35 |DDRESS"..5b....5|
00002DB0: 6A 1D 97 32 31 34 2C 32 30 3A 97 32 31 31 2C 31 |j..214,20:.211,1|
00002DC0: 30 3A 9E 56 48 3A 99 53 43 24 28 33 29 22 20 28 |0:.VH:.SC$(3)" (|
00002DD0: 41 2D 45 29 22 3A 99 53 43 24 28 36 29 3B 3A 97 |A-E)":.SC$(6);:.|
00002DE0: 32 31 31 2C 32 37 3A 9E 56 48 00 10 36 6C 1D 99 |211,27:.VH..6l..|
00002DF0: 22 28 52 29 52 45 43 4F 52 44 22 3A 97 32 31 31 |"(R)RECORD":.211|
00002E00: 2C 31 32 3A 9E 56 48 3A 99 53 43 24 28 32 29 3B |,12:.VH:.SC$(2);|
00002E10: 00 3C 36 6E 1D 8B 50 53 25 B3 B1 30 A7 97 32 31 |.<6n..PS%..0..21|
00002E20: 34 2C 32 31 3A 97 32 31 31 2C 31 34 3A 9E 56 48 |4,21:.211,14:.VH|
00002E30: 3A 99 22 28 50 29 50 52 49 4E 54 22 00 69 36 74 |:."(P)PRINT".i6t|
00002E40: 1D 97 32 31 34 2C 32 32 3A 97 32 31 31 2C 32 38 |..214,22:.211,28|
00002E50: 3A 9E 56 48 3A 99 C7 28 31 37 35 29 3B 3A 97 32 |:.VH:..(175);:.2|
00002E60: 31 31 2C 32 38 3A 9E 56 48 00 78 36 75 1D 8D 32 |11,28:.VH.x6u..2|
00002E70: 30 3A 53 4C 24 B2 58 24 00 96 36 76 1D 3A 8B 53 |0:SL$.X$..6v.:.S|
00002E80: 4C 24 B2 22 52 22 B0 53 4C 24 B2 22 58 22 A7 99 |L$."R".SL$."X"..|
00002E90: 3A 89 37 35 39 30 00 AF 36 77 1D 8B 53 4C 24 B2 |:.7590..6w..SL$.|
00002EA0: 22 50 22 A7 99 3A 8D 38 30 3A 89 37 35 34 30 00 |"P"..:.80:.7540.|
00002EB0: D0 36 79 1D 8B 53 4C 24 B3 22 41 22 B0 53 4C 24 |.6y..SL$."A".SL$|
00002EC0: B1 22 45 22 A7 8D 39 30 30 30 3A 89 37 35 34 30 |."E"..9000:.7540|
00002ED0: 00 08 37 88 1D 99 53 4C 24 3A 53 4C B2 C6 28 53 |..7...SL$:SL..(S|
00002EE0: 4C 24 29 AB 36 34 3A 8B 53 4C 24 28 53 4C AC 32 |L$).64:.SL$(SL.2|
00002EF0: 29 B2 22 49 4E 41 43 54 49 56 45 22 A7 8D 39 30 |)."INACTIVE"..90|
00002F00: 30 30 3A 89 37 35 34 30 00 1E 37 8D 1D 8D 35 37 |00:.7540..7...57|
00002F10: 30 30 3A 8D 35 38 30 30 3A 89 37 35 34 30 00 24 |00:.5800:.7540.$|
00002F20: 37 A6 1D 8E 00 7C 37 6C 20 56 54 B2 31 30 AA 53 |7....|7l VT.10.S|
00002F30: 4C 3A 81 59 B2 31 A4 33 3A 8D 36 33 30 30 3A 4C |L:.Y.1.3:.6300:L|
00002F40: 50 25 28 58 2C 59 29 B2 5A 3A 8B 59 B3 33 A7 8D |P%(X,Y).Z:.Y.3..|
00002F50: 38 34 30 30 3A 4C 50 25 28 58 2C 59 AA 31 29 B2 |8400:LP%(X,Y.1).|
00002F60: C6 28 50 43 24 29 3A 8B 50 43 24 B2 22 20 22 A7 |.(PC$):.PC$." ".|
00002F70: 4C 50 25 28 58 2C 59 AA 31 29 B2 30 00 83 37 76 |LP%(X,Y.1).0..7v|
00002F80: 20 82 59 00 89 37 C6 20 8E 00 AA 37 D0 20 97 32 | .Y..7. ...7. .2|
00002F90: 31 34 2C 56 54 3A 97 32 31 31 2C 31 32 AA 28 59 |14,VT:.211,12.(Y|
00002FA0: AB 31 29 AC 31 33 3A 9E 56 48 00 C0 37 D2 20 A1 |.1).13:.VH..7. .|
00002FB0: 50 43 24 3A 8B 50 43 24 B2 22 22 A7 38 34 30 32 |PC$:.PC$."".8402|
00002FC0: 00 CA 37 D4 20 99 50 43 24 3B 00 EE 37 DA 20 A1 |..7. .PC$;..7. .|
00002FD0: 48 4B 24 3A 8B 48 4B 24 B3 B1 C7 28 38 29 AF 48 |HK$:.HK$...(8).H|
00002FE0: 4B 24 B3 B1 C7 28 31 33 29 A7 38 34 31 30 00 01 |K$...(13).8410..|
00002FF0: 38 E4 20 8B 48 4B 24 B2 C7 28 38 29 A7 38 34 30 |8. .HK$..(8).840|
00003000: 30 00 07 38 EE 20 8E 00 11 38 33 21 8D 39 30 30 |0..8. ...83!.900|
00003010: 30 00 22 38 28 23 8F 20 42 45 4C 4C 20 53 4F 55 |0."8(#. BELL SOU|
00003020: 4E 44 00 36 38 29 23 8D 36 32 30 30 30 3A 41 58 |ND.68)#.62000:AX|
00003030: B2 35 34 32 37 32 00 4F 38 32 23 97 41 58 AA 32 |.54272.O82#.AX.2|
00003040: 34 2C 31 34 33 3A 97 41 58 AA 36 2C 32 34 30 00 |4,143:.AX.6,240.|
00003050: 64 38 3C 23 97 41 58 AA 34 2C 36 35 3A 46 30 B2 |d8<#.AX.4,65:F0.|
00003060: 37 33 39 31 00 90 38 41 23 81 54 30 B2 31 A4 39 |7391..8A#.T0.1.9|
00003070: 3A 46 31 B2 46 30 3A 46 33 B2 B5 28 46 31 AD 32 |:F1.F0:F3..(F1.2|
00003080: 35 36 29 3A 46 32 B2 46 31 AB 46 33 AC 32 35 36 |56):F2.F1.F3.256|
00003090: 00 AA 38 43 23 97 35 34 32 37 32 2C 46 32 3A 97 |..8C#.54272,F2:.|
000030A0: 35 34 32 37 33 2C 46 33 3A 82 00 B7 38 46 23 97 |54273,F3:...8F#.|
000030B0: 41 58 AA 32 34 2C 30 00 BD 38 50 23 8E 00 D4 38 |AX.24,0..8P#...8|
000030C0: 30 75 8F 20 4F 50 45 4E 20 46 49 4C 45 20 38 20 |0u. OPEN FILE 8 |
000030D0: 53 55 42 52 00 EF 38 3A 75 8F 20 3F 22 4F 50 45 |SUBR..8:u. ?"OPE|
000030E0: 4E 20 38 20 20 20 4E 41 25 3D 22 3B 4E 41 25 00 |N 8 NA%=";NA%.|
000030F0: 00 39 3F 75 A0 31 3A 9F 31 2C 4E 43 25 2C 31 35 |.9?u.1:.1,NC%,15|
00003100: 00 19 39 44 75 A0 32 3A 9F 32 2C 4E 43 25 2C 32 |..9Du.2:.2,NC%,2|
00003110: 2C 4E 41 24 28 4E 41 25 29 00 24 39 49 75 8D 33 |,NA$(NA%).$9Iu.3|
00003120: 30 39 30 30 00 2A 39 58 75 8E 00 43 39 62 75 8F |0900.*9Xu..C9bu.|
00003130: 20 4F 50 45 4E 20 46 49 4C 45 20 4E 44 25 20 53 | OPEN FILE ND% S|
00003140: 55 42 52 00 5E 39 67 75 8F 20 3F 22 4F 50 45 4E |UBR.^9gu. ?"OPEN|
00003150: 20 4E 44 25 20 4E 41 25 3D 22 3B 4E 41 25 00 6F | ND% NA%=";NA%.o|
00003160: 39 69 75 A0 31 3A 9F 31 2C 4E 44 25 2C 31 35 00 |9iu.1:.1,ND%,15.|
00003170: 88 39 6C 75 A0 32 3A 9F 32 2C 4E 44 25 2C 32 2C |.9lu.2:.2,ND%,2,|
00003180: 4E 41 24 28 4E 41 25 29 00 93 39 71 75 8D 33 30 |NA$(NA%)..9qu.30|
00003190: 39 30 30 00 99 39 80 75 8E 00 AF 39 94 75 8F 20 |900..9.u...9.u. |
000031A0: 43 4C 4F 53 45 20 46 49 4C 45 20 53 55 42 52 00 |CLOSE FILE SUBR.|
000031B0: C7 39 99 75 8F 20 3F 22 43 4C 4F 53 45 20 4E 41 |.9.u. ?"CLOSE NA|
000031C0: 25 3D 22 3B 4E 41 25 00 CE 39 9E 75 A0 32 00 DB |%=";NA%..9.u.2..|
000031D0: 39 AD 75 8D 33 30 39 30 30 3A 8E 00 EC 39 BC 75 |9.u.30900:...9.u|
000031E0: A0 31 3A 9F 31 2C 4E 43 25 2C 31 35 00 F2 39 C6 |.1:.1,NC%,15..9.|
000031F0: 75 8E 00 05 3A F8 75 8F 20 49 4E 50 55 54 20 23 |u...:.u. INPUT #|
00003200: 20 53 55 42 52 00 0E 3A FD 75 44 55 B2 30 00 1F | SUBR..:.uDU.0..|
00003210: 3A 02 76 84 32 2C 44 55 3A 8D 33 30 39 30 30 00 |:.v.2,DU:.30900.|
00003220: 25 3A 20 76 8E 00 38 3A 2A 76 8F 20 49 4E 50 55 |%: v..8:*v. INPU|
00003230: 54 20 24 20 53 55 42 52 00 43 3A 2F 76 44 55 24 |T $ SUBR.C:/vDU$|
00003240: B2 22 22 00 55 3A 34 76 84 32 2C 44 55 24 3A 8D |."".U:4v.2,DU$:.|
00003250: 33 30 39 30 30 00 6C 3A 3E 76 8B 44 55 24 B2 C7 |30900.l:>v.DU$..|
00003260: 28 31 36 30 29 A7 44 55 24 B2 22 22 00 72 3A 48 |(160).DU$."".r:H|
00003270: 76 8E 00 85 3A 5C 76 8F 20 50 52 49 4E 54 20 23 |v...:\v. PRINT #|
00003280: 20 53 55 42 52 00 9A 3A 61 76 8F 20 3F 22 50 20 | SUBR..:av. ?"P |
00003290: 23 20 44 55 3D 22 3B 44 55 2C 00 A4 3A 66 76 98 |# DU=";DU,..:fv.|
000032A0: 32 2C 44 55 00 AF 3A 6D 76 8D 33 30 39 30 30 00 |2,DU..:mv.30900.|
000032B0: B5 3A 7A 76 8E 00 C8 3A 8E 76 8F 20 50 52 49 4E |.:zv...:.v. PRIN|
000032C0: 54 20 24 20 53 55 42 52 00 DD 3A 93 76 8F 20 3F |T $ SUBR..:.v. ?|
000032D0: 22 50 20 24 20 44 55 3D 22 3B 44 55 24 00 F5 3A |"P $ DU=";DU$..:|
000032E0: 95 76 8B 20 44 55 24 B2 22 22 A7 44 55 24 B2 C7 |.v. DU$."".DU$..|
000032F0: 28 31 36 30 29 00 00 3B 98 76 98 32 2C 44 55 24 |(160)..;.v.2,DU$|
00003300: 00 0B 3B 9C 76 8D 33 30 39 30 30 00 11 3B 9E 76 |..;.v.30900..;.v|
00003310: 8E 00 21 3B A2 76 8F 20 50 52 49 4E 54 20 52 45 |..!;.v. PRINT RE|
00003320: 4C 00 39 3B A4 76 8F 20 3F 22 50 20 52 45 4C 20 |L.9;.v. ?"P REL |
00003330: 44 55 24 3D 22 3B 44 55 24 00 51 3B A6 76 8B 20 |DU$=";DU$.Q;.v. |
00003340: 44 55 24 B2 22 22 A7 44 55 24 B2 C7 28 31 36 30 |DU$."".DU$..(160|
00003350: 29 00 5D 3B AC 76 98 32 2C 44 55 24 3B 00 68 3B |).];.v.2,DU$;.h;|
00003360: B0 76 8D 33 30 39 30 30 00 6E 3B B6 76 8E 00 7F |.v.30900.n;.v...|
00003370: 3B C0 76 8F 20 47 45 54 20 24 20 53 55 42 52 00 |;.v. GET $ SUBR.|
00003380: 8A 3B CA 76 A1 23 32 2C 58 24 00 95 3B DE 76 8D |.;.v.#2,X$..;.v.|
00003390: 33 30 39 30 30 00 9B 3B E8 76 8E 00 AC 3B B3 78 |30900..;.v...;.x|
000033A0: A0 31 3A 9F 31 2C 4E 43 25 2C 31 35 00 C3 3B B4 |.1:.1,NC%,15..;.|
000033B0: 78 84 31 2C 45 31 25 2C 45 52 24 2C 45 32 25 2C |x.1,E1%,ER$,E2%,|
000033C0: 45 33 25 00 DA 3B BE 78 8B 20 45 31 25 B1 32 30 |E3%..;.x. E1%.20|
000033D0: AF 4E 41 25 A7 33 33 30 30 30 00 E0 3B C8 78 8E |.NA%.33000..;.x.|
000033E0: 00 27 3C 7C 79 99 22 93 22 3A 97 32 31 34 2C 38 |.'<|y.".":.214,8|
000033F0: 3A 9E 56 48 3A 99 41 53 24 3A 99 3A 97 32 31 31 |:.VH:.AS$:.:.211|
00003400: 2C 33 3A 9E 56 48 3A 99 22 52 45 4D 4F 56 45 20 |,3:.VH:."REMOVE |
00003410: 41 4E 59 20 44 49 53 4B 20 46 52 4F 4D 20 44 52 |ANY DISK FROM DR|
00003420: 49 56 45 20 23 22 3B 00 5E 3C 7E 79 97 32 31 31 |IVE #";.^<~y.211|
00003430: 2C 33 3A 9E 56 48 3A 99 22 52 45 4D 4F 56 45 20 |,3:.VH:."REMOVE |
00003440: 41 4E 59 20 44 49 53 4B 20 46 52 4F 4D 20 44 52 |ANY DISK FROM DR|
00003450: 49 56 45 20 23 22 4E 44 25 22 41 4E 44 22 00 93 |IVE #"ND%"AND"..|
00003460: 3C 81 79 97 32 31 31 2C 31 34 AB C3 28 53 43 24 |<.y.211,14..(SC$|
00003470: 28 30 29 29 AD 32 3A 9E 56 48 3A 99 22 49 4E 53 |(0)).2:.VH:."INS|
00003480: 45 52 54 20 22 53 43 24 28 30 29 22 20 44 41 54 |ERT "SC$(0)" DAT|
00003490: 41 2E 22 00 B2 3C 86 79 97 32 31 31 2C 37 3A 9E |A."..<.y.211,7:.|
000034A0: 56 48 3A 99 CA 28 53 4D 24 28 32 29 2C 31 32 29 |VH:..(SM$(2),12)|
000034B0: 3A 99 00 DD 3C 88 79 97 32 31 31 2C 31 30 3A 9E |:...<.y.211,10:.|
000034C0: 56 48 3A 99 22 50 52 45 53 53 20 3C 3C 46 31 3E |VH:."PRESS <<F1>|
000034D0: 3E 20 46 4F 52 20 4D 45 4E 55 22 3A 99 00 F7 3C |> FOR MENU":...<|
000034E0: 8B 79 99 41 53 24 48 57 24 28 31 38 29 3A 8D 39 |.y.AS$HW$(18):.9|
000034F0: 30 30 30 3A 8D 32 31 00 0C 3D 90 79 8B 20 58 24 |000:.21..=.y. X$|
00003500: B2 C7 28 31 33 33 29 A7 43 49 B2 30 00 12 3D 95 |..(133).CI.0..=.|
00003510: 79 8E 00 38 3D 44 7A 99 22 93 22 3A 97 32 31 34 |y..8=Dz.".":.214|
00003520: 2C 38 3A 9E 56 48 3A 99 41 53 24 3A 99 3A 97 32 |,8:.VH:.AS$:.:.2|
00003530: 31 31 2C 32 3A 9E 56 48 00 42 3D 46 7A 8D 39 30 |11,2:.VH.B=Fz.90|
00003540: 30 30 00 91 3D 49 7A 99 22 52 45 4D 4F 56 45 20 |00..=Iz."REMOVE |
00003550: 41 4E 59 20 44 49 53 4B 45 54 54 45 20 46 52 4F |ANY DISKETTE FRO|
00003560: 4D 20 44 52 49 56 45 20 23 38 20 41 4E 44 22 3A |M DRIVE #8 AND":|
00003570: 99 22 20 20 20 20 20 20 49 4E 53 45 52 54 20 22 |." INSERT "|
00003580: 53 43 24 28 30 29 22 20 50 52 4F 47 52 41 4D 2E |SC$(0)" PROGRAM.|
00003590: 22 00 C2 3D 4E 7A 97 32 31 31 2C 37 3A 9E 56 48 |"..=Nz.211,7:.VH|
000035A0: 3A 99 CA 28 53 4D 24 28 32 29 2C 31 32 29 3A 99 |:..(SM$(2),12):.|
000035B0: 3A 99 41 53 24 48 57 24 28 31 38 29 3A 8D 32 31 |:.AS$HW$(18):.21|
000035C0: 3A 8E 00 0B 3E 00 7D 99 22 93 22 3A 97 32 31 34 |:...>.}.".":.214|
000035D0: 2C 38 3A 9E 56 48 3A 99 41 53 24 3A 99 3A 97 32 |,8:.VH:.AS$:.:.2|
000035E0: 31 31 2C 35 3A 9E 56 48 3A 99 22 52 45 4D 4F 56 |11,5:.VH:."REMOV|
000035F0: 45 20 41 4E 59 20 44 49 53 4B 20 46 52 4F 4D 20 |E ANY DISK FROM |
00003600: 44 52 49 56 45 20 23 22 4E 44 25 00 4A 3E 02 7D |DRIVE #"ND%.J>.}|
00003610: 97 32 31 31 2C 34 3A 9E 56 48 3A 99 22 41 4E 44 |.211,4:.VH:."AND|
00003620: 20 49 4E 53 45 52 54 20 42 4C 41 4E 4B 20 49 4E | INSERT BLANK IN|
00003630: 49 54 49 41 4C 49 5A 45 44 20 44 49 53 4B 22 3A |ITIALIZED DISK":|
00003640: 97 32 31 31 2C 38 3A 9E 56 48 00 93 3E 05 7D 99 |.211,8:.VH..>.}.|
00003650: CA 28 53 4D 24 28 32 29 2C 31 33 29 3A 99 3A 97 |.(SM$(2),13):.:.|
00003660: 32 31 31 2C 34 3A 9E 56 48 3A 99 22 50 52 45 53 |211,4:.VH:."PRES|
00003670: 53 20 3C 3C 46 31 3E 3E 20 54 4F 20 41 42 4F 52 |S <<F1>> TO ABOR|
00003680: 54 20 50 52 4F 43 45 44 55 52 45 22 3A 99 3A 99 |T PROCEDURE":.:.|
00003690: 41 53 24 00 AA 3E 0A 7D 99 48 57 24 28 31 38 29 |AS$..>.}.HW$(18)|
000036A0: 3A 8D 39 30 30 30 3A 8D 32 31 00 B0 3E 14 7D 8E |:.9000:.21..>.}.|
000036B0: 00 CA 3E E8 80 8F 20 44 49 53 4B 20 49 2F 4F 20 |..>... DISK I/O |
000036C0: 45 52 52 4F 52 20 53 55 42 52 00 D9 3E ED 80 8D |ERROR SUBR..>...|
000036D0: 39 30 30 30 3A 99 22 93 22 00 0E 3F F2 80 97 32 |9000:."."..?...2|
000036E0: 31 34 2C 38 3A 9E 56 48 3A 99 41 53 24 3A 99 3A |14,8:.VH:.AS$:.:|
000036F0: 97 32 31 31 2C 36 3A 9E 56 48 3A 99 22 44 49 53 |.211,6:.VH:."DIS|
00003700: 4B 20 45 52 52 4F 52 20 23 22 3B 45 31 25 00 3C |K ERROR #";E1%.<|
00003710: 3F FC 80 99 3A 97 32 31 31 2C 36 3A 9E 56 48 3A |?...:.211,6:.VH:|
00003720: 99 45 52 24 22 20 54 52 41 43 4B 22 45 32 25 22 |.ER$" TRACK"E2%"|
00003730: 20 42 4C 4F 43 4B 22 45 33 25 3A 99 00 64 3F 01 | BLOCK"E3%:..d?.|
00003740: 81 8B 20 45 31 25 B2 32 36 B0 45 31 25 B2 32 39 |.. E1%.26.E1%.29|
00003750: B0 45 31 25 B2 37 34 B0 45 31 25 B2 32 31 A7 33 |.E1%.74.E1%.21.3|
00003760: 33 30 33 35 00 97 3F 06 81 99 3A 97 32 31 31 2C |3035..?...:.211,|
00003770: 36 3A 9E 56 48 3A 99 22 49 4E 53 45 52 54 20 47 |6:.VH:."INSERT G|
00003780: 4F 4F 44 20 50 52 4F 47 52 41 4D 20 44 49 53 4B |OOD PROGRAM DISK|
00003790: 45 54 54 45 22 3A 99 00 D3 3F 0B 81 97 32 31 31 |ETTE":...?...211|
000037A0: 2C 36 3A 9E 56 48 3A 99 22 48 49 54 20 41 4E 59 |,6:.VH:."HIT ANY|
000037B0: 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | KEY TO CONTINUE|
000037C0: 22 3A 99 3A 99 41 53 24 48 57 24 28 31 38 29 3A |":.:.AS$HW$(18):|
000037D0: 8D 32 31 00 F7 3F 10 81 8B 20 45 31 25 B2 32 36 |.21..?... E1%.26|
000037E0: B0 45 31 25 B2 32 39 B0 45 31 25 B2 37 34 B0 45 |.E1%.29.E1%.74.E|
000037F0: 31 25 B2 32 31 A7 8E 00 08 40 1A 81 A0 32 3A 53 |1%.21....@...2:S|
00003800: 4C B2 37 3A 89 35 30 30 00 2E 40 D0 84 99 22 93 |L.7:.500..@...".|
00003810: 22 3A 97 32 31 34 2C 38 3A 9E 56 48 3A 99 41 53 |":.214,8:.VH:.AS|
00003820: 24 3A 99 3A 97 32 31 31 2C 36 3A 9E 56 48 00 53 |$:.:.211,6:.VH.S|
00003830: 40 D2 84 99 22 50 52 45 50 41 52 49 4E 47 20 4E |@..."PREPARING N|
00003840: 45 57 20 44 41 54 41 20 44 49 53 4B 45 54 54 45 |EW DATA DISKETTE|
00003850: 22 3A 99 00 88 40 D5 84 97 32 31 31 2C 37 3A 9E |":...@...211,7:.|
00003860: 56 48 3A 99 22 20 50 4C 45 41 53 45 20 44 4F 20 |VH:." PLEASE DO |
00003870: 4E 4F 54 20 49 4E 54 45 52 52 55 50 54 20 22 3A |NOT INTERRUPT ":|
00003880: 99 3A 99 41 53 24 3A 8E 00 BC 40 60 EA 81 58 B2 |.:.AS$:...@`..X.|
00003890: 30 A4 33 38 3A 42 4C 24 B2 42 4C 24 AA 22 20 22 |0.38:BL$.BL$." "|
000038A0: 3A 55 4C 24 B2 55 4C 24 AA C7 28 31 37 35 29 3A |:UL$.UL$..(175):|
000038B0: 3A 41 53 24 B2 41 53 24 AA 22 2A 22 00 C2 40 65 |:AS$.AS$."*"..@e|
000038C0: EA 82 00 D8 40 67 EA 41 53 24 B2 22 20 22 AA C8 |....@g.AS$." "..|
000038D0: 28 41 53 24 2C 33 38 29 00 19 41 6A EA 83 20 20 |(AS$,38)..Aj.. |
000038E0: 35 2C 31 34 2C 32 2C 35 2C 33 36 2C 31 2C 36 2C |5,14,2,5,36,1,6,|
000038F0: 32 36 2C 31 2C 37 2C 31 30 2C 32 35 3A 81 58 B2 |26,1,7,10,25:.X.|
00003900: 31 A4 34 3A 87 56 43 28 58 29 2C 48 43 28 58 29 |1.4:.VC(X),HC(X)|
00003910: 2C 4C 43 28 58 29 3A 82 58 00 43 41 6C EA 83 20 |,LC(X):.X.CAl.. |
00003920: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
00003930: 30 3A 81 58 B2 31 A4 39 3A 87 4D 53 25 28 58 29 |0:.X.1.9:.MS%(X)|
00003940: 3A 82 58 00 68 41 6F EA 83 20 33 2C 31 34 2C 31 |:.X.hAo.. 3,14,1|
00003950: 36 2C 32 37 2C 32 39 3A 81 58 B2 31 A4 35 3A 87 |6,27,29:.X.1.5:.|
00003960: 48 50 28 58 29 3A 82 58 00 BA 41 74 EA 4E 4C 24 |HP(X):.X..At.NL$|
00003970: B2 22 20 4E 4F 57 20 4C 4F 41 44 49 4E 47 20 22 |." NOW LOADING "|
00003980: 3A 46 54 24 28 30 29 B2 22 36 22 3A 54 52 25 B2 |:FT$(0)."6":TR%.|
00003990: 37 35 30 3A 4D 43 25 B2 31 33 32 3A 4C 57 B2 33 |750:MC%.132:LW.3|
000039A0: 35 3A 4E 55 24 B2 C7 28 30 29 AA C7 28 30 29 3A |5:NU$..(0)..(0):|
000039B0: 53 43 24 B2 22 59 4E 53 43 22 00 00 42 79 EA 83 |SC$."YNSC"..By..|
000039C0: 20 46 49 45 4C 44 20 4E 41 4D 45 53 2C 44 45 46 | FIELD NAMES,DEF|
000039D0: 41 55 4C 54 20 49 4E 50 55 54 53 2C 50 52 49 4E |AULT INPUTS,PRIN|
000039E0: 54 45 44 20 4C 41 42 45 4C 20 46 4F 52 4D 41 54 |TED LABEL FORMAT|
000039F0: 2C 45 4E 56 45 4C 4F 50 45 20 46 4F 52 4D 41 54 |,ENVELOPE FORMAT|
00003A00: 00 28 42 7B EA 83 20 48 41 52 44 57 41 52 45 2C |.(B{.. HARDWARE,|
00003A10: 53 54 41 52 54 20 4E 45 57 20 4C 49 53 54 2C 4D |START NEW LIST,M|
00003A20: 41 49 4E 20 4D 45 4E 55 00 6C 42 7E EA 83 20 20 |AIN MENU.lB~.. |
00003A30: 2A 2A 20 46 2E 43 2E 4D 2E 20 2A 2A 2C 53 59 53 |** F.C.M. **,SYS|
00003A40: 54 45 4D 20 55 54 49 4C 49 54 49 45 53 2C 45 4E |TEM UTILITIES,EN|
00003A50: 54 45 52 20 53 45 4C 45 43 54 49 4F 4E 2C 4C 45 |TER SELECTION,LE|
00003A60: 54 54 45 52 20 54 4F 20 45 44 49 54 00 8F 42 80 |TTER TO EDIT..B.|
00003A70: EA 83 20 28 52 29 52 45 43 4F 52 44 2C 28 50 29 |.. (R)RECORD,(P)|
00003A80: 50 52 49 4E 54 2C 28 58 29 43 41 4E 43 45 4C 00 |PRINT,(X)CANCEL.|
00003A90: B7 42 83 EA 81 58 B2 31 A4 37 3A 87 4D 55 24 28 |.B...X.1.7:.MU$(|
00003AA0: 58 29 3A 82 58 3A 81 58 B2 30 A4 36 3A 87 53 43 |X):.X:.X.0.6:.SC|
00003AB0: 24 28 58 29 3A 82 58 00 09 43 88 EA 53 4D 24 28 |$(X):.X..C..SM$(|
00003AC0: 30 29 B2 22 50 52 4F 47 52 41 4D 22 3A 53 4D 24 |0)."PROGRAM":SM$|
00003AD0: 28 31 29 B2 22 44 41 54 41 22 3A 53 4D 24 28 32 |(1)."DATA":SM$(2|
00003AE0: 29 B2 22 20 20 44 49 53 4B 45 54 54 45 2E 20 50 |)." DISKETTE. P|
00003AF0: 52 45 53 53 20 41 4E 59 20 4B 45 59 20 57 48 45 |RESS ANY KEY WHE|
00003B00: 4E 20 52 45 41 44 59 2E 22 00 52 43 92 EA 83 20 |N READY.".RC... |
00003B10: 34 2C 33 33 2C 31 2C 35 2C 33 31 2C 31 2C 36 2C |4,33,1,5,31,1,6,|
00003B20: 32 37 2C 31 2C 31 30 2C 37 2C 33 2C 31 30 2C 31 |27,1,10,7,3,10,1|
00003B30: 33 2C 33 2C 31 30 2C 31 39 2C 33 2C 31 30 2C 32 |3,3,10,19,3,10,2|
00003B40: 35 2C 33 2C 31 30 2C 33 31 2C 33 2C 31 34 2C 37 |5,3,10,31,3,14,7|
00003B50: 2C 33 00 90 43 93 EA 83 20 31 34 2C 31 33 2C 33 |,3..C... 14,13,3|
00003B60: 2C 31 34 2C 31 39 2C 33 2C 31 34 2C 32 35 2C 33 |,14,19,3,14,25,3|
00003B70: 2C 31 34 2C 33 31 2C 33 2C 31 36 2C 33 32 2C 31 |,14,31,3,16,32,1|
00003B80: 2C 31 39 2C 32 30 2C 32 2C 31 39 2C 33 30 2C 32 |,19,20,2,19,30,2|
00003B90: 00 C7 43 94 EA 81 58 B2 31 A4 31 39 3A 87 56 54 |..C...X.1.19:.VT|
00003BA0: 28 58 29 2C 48 54 28 58 29 2C 46 4C 28 58 29 3A |(X),HT(X),FL(X):|
00003BB0: 82 3A 83 20 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |.:. 0,0,0,0,0,0,|
00003BC0: 31 37 2C 33 32 2C 31 00 15 44 96 EA 83 35 2C 31 |17,32,1..D...5,1|
00003BD0: 35 2C 32 30 2C 39 2C 32 2C 31 30 2C 39 2C 31 36 |5,20,9,2,10,9,16|
00003BE0: 2C 32 2C 31 30 2C 32 2C 31 30 2C 31 30 2C 31 36 |,2,10,2,10,10,16|
00003BF0: 2C 32 2C 31 31 2C 32 2C 31 30 2C 31 31 2C 31 36 |,2,11,2,10,11,16|
00003C00: 2C 32 2C 31 32 2C 32 2C 31 30 2C 31 32 2C 31 36 |,2,12,2,10,12,16|
00003C10: 2C 32 2C 31 33 00 62 44 97 EA 83 32 2C 31 30 2C |,2,13.bD...2,10,|
00003C20: 31 33 2C 31 36 2C 32 2C 31 34 2C 32 2C 31 30 2C |13,16,2,14,2,10,|
00003C30: 31 34 2C 31 36 2C 32 2C 31 35 2C 32 2C 31 30 2C |14,16,2,15,2,10,|
00003C40: 31 35 2C 31 36 2C 32 2C 31 36 2C 32 2C 31 30 2C |15,16,2,16,2,10,|
00003C50: 31 36 2C 31 36 2C 32 2C 31 37 2C 32 2C 31 30 2C |16,16,2,17,2,10,|
00003C60: 31 37 00 99 44 98 EA 83 31 36 2C 32 2C 31 38 2C |17..D...16,2,18,|
00003C70: 32 2C 31 30 2C 31 38 2C 31 36 2C 32 3A 81 58 B2 |2,10,18,16,2:.X.|
00003C80: 31 A4 32 31 3A 87 54 56 28 58 29 2C 54 48 28 58 |1.21:.TV(X),TH(X|
00003C90: 29 2C 4C 46 28 58 29 3A 82 00 E4 44 99 EA 83 20 |),LF(X):...D... |
00003CA0: 53 59 53 54 45 4D 20 4E 41 4D 45 2C 46 49 52 53 |SYSTEM NAME,FIRS|
00003CB0: 54 20 4E 41 4D 45 2C 31 30 2C 4C 41 53 54 20 4E |T NAME,10,LAST N|
00003CC0: 41 4D 45 2C 31 35 2C 43 4F 4D 50 41 4E 59 2C 32 |AME,15,COMPANY,2|
00003CD0: 30 2C 41 44 44 52 45 53 53 2C 32 34 2C 43 49 54 |0,ADDRESS,24,CIT|
00003CE0: 59 2C 32 30 00 25 45 9A EA 83 20 53 54 41 54 45 |Y,20.%E... STATE|
00003CF0: 2C 32 2C 5A 49 50 20 43 4F 44 45 2C 31 30 2C 54 |,2,ZIP CODE,10,T|
00003D00: 45 4C 45 50 48 4F 4E 45 2C 31 32 2C 53 50 45 43 |ELEPHONE,12,SPEC|
00003D10: 49 41 4C 20 23 31 2C 38 2C 53 50 45 43 49 41 4C |IAL #1,8,SPECIAL|
00003D20: 20 23 32 2C 36 00 53 45 9B EA 81 58 B2 31 A4 32 | #2,6.SE...X.1.2|
00003D30: 31 3A 87 53 4C 24 28 58 29 3A 82 3A 81 58 B2 31 |1:.SL$(X):.:.X.1|
00003D40: A4 31 30 3A 44 46 24 28 58 29 B2 C7 28 31 36 30 |.10:DF$(X)..(160|
00003D50: 29 3A 82 00 64 45 9C EA 8F 20 44 49 53 4B 20 53 |):..dE... DISK S|
00003D60: 54 55 46 46 00 6A 45 9D EA 8F 00 79 45 9E EA A0 |TUFF.jE....yE...|
00003D70: 31 3A 9F 31 2C 38 2C 31 35 00 C5 45 9F EA 4E 41 |1:.1,8,15..E..NA|
00003D80: 24 28 30 29 B2 22 30 3A 4D 52 45 4E 54 52 59 2C |$(0)."0:MRENTRY,|
00003D90: 4C 2C 22 AA C7 28 31 34 32 29 3A 4E 41 24 28 31 |L,"..(142):NA$(1|
00003DA0: 29 B2 22 40 30 3A 43 55 53 54 4F 4D 2C 53 2C 57 |)."@0:CUSTOM,S,W|
00003DB0: 22 3A 4E 41 24 28 32 29 B2 22 30 3A 43 55 53 54 |":NA$(2)."0:CUST|
00003DC0: 4F 4D 2C 52 22 00 0E 46 A1 EA 4E 41 24 28 33 29 |OM,R"..F..NA$(3)|
00003DD0: B2 22 30 3A 4D 52 44 41 54 41 2C 53 2C 57 22 3A |."0:MRDATA,S,W":|
00003DE0: 4E 41 24 28 34 29 B2 22 48 41 52 44 57 41 52 45 |NA$(4)."HARDWARE|
00003DF0: 2C 53 2C 52 22 3A 4E 41 24 28 35 29 B2 22 40 30 |,S,R":NA$(5)."@0|
00003E00: 3A 48 41 52 44 57 41 52 45 2C 53 2C 57 22 00 5D |:HARDWARE,S,W".]|
00003E10: 46 A2 EA 4E 41 24 28 36 29 B2 22 30 3A 53 4F 52 |F..NA$(6)."0:SOR|
00003E20: 54 46 49 4C 45 31 2C 53 2C 57 22 3A 4E 41 24 28 |TFILE1,S,W":NA$(|
00003E30: 37 29 B2 22 30 3A 53 4F 52 54 46 49 4C 45 32 2C |7)."0:SORTFILE2,|
00003E40: 53 2C 57 22 3A 4E 41 24 28 38 29 B2 22 30 3A 53 |S,W":NA$(8)."0:S|
00003E50: 4F 52 54 46 49 4C 45 33 2C 53 2C 57 22 00 81 46 |ORTFILE3,S,W"..F|
00003E60: A3 EA 8D 33 30 37 30 3A 4E 41 25 B2 34 3A 8D 33 |...3070:NA%.4:.3|
00003E70: 30 30 30 30 3A 8D 33 38 31 30 3A 8D 33 30 31 30 |0000:.3810:.3010|
00003E80: 30 00 A3 46 A5 EA 46 58 25 B2 C5 28 48 57 24 28 |0..F..FX%..(HW$(|
00003E90: 31 35 29 29 3A 42 58 25 B2 C5 28 48 57 24 28 31 |15)):BX%..(HW$(1|
00003EA0: 36 29 29 00 C6 46 A6 EA 97 35 33 32 38 30 2C 42 |6))..F...53280,B|
00003EB0: 58 25 3A 97 35 33 32 38 31 2C 42 58 25 3A 99 48 |X%:.53281,BX%:.H|
00003EC0: 57 24 28 31 37 29 00 0F 47 A7 EA 83 32 2C 30 2C |W$(17)..G...2,0,|
00003ED0: 34 2C 30 2C 30 2C 36 2C 30 2C 30 2C 30 2C 30 2C |4,0,0,6,0,0,0,0,|
00003EE0: 38 2C 30 2C 30 2C 30 2C 30 2C 31 30 2C 34 34 2C |8,0,0,0,0,10,44,|
00003EF0: 31 32 2C 30 2C 31 34 2C 30 2C 30 2C 30 2C 30 2C |12,0,14,0,0,0,0,|
00003F00: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 |0,0,0,0,0,0,0,0.|
00003F10: 3B 47 A8 EA 83 20 30 2C 30 2C 30 2C 30 2C 30 2C |;G... 0,0,0,0,0,|
00003F20: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
00003F30: 59 2C 53 2C 32 30 2C 32 35 2C 36 00 6D 47 AA EA |Y,S,20,25,6.mG..|
00003F40: 81 58 B2 31 A4 39 3A 81 59 B2 31 A4 35 3A 87 4C |.X.1.9:.Y.1.5:.L|
00003F50: 50 25 28 58 2C 59 29 3A 82 59 2C 58 3A 81 59 B2 |P%(X,Y):.Y,X:.Y.|
00003F60: 31 A4 35 3A 87 45 46 24 28 59 29 3A 82 00 8C 47 |1.5:.EF$(Y):...G|
00003F70: B0 EA 83 33 35 2C 36 2C 31 2C 30 3A 81 58 B2 31 |...35,6,1,0:.X.1|
00003F80: A4 34 3A 87 4C 44 24 28 58 29 3A 82 00 B8 47 BA |.4:.LD$(X):...G.|
00003F90: EA 83 38 2C 33 31 2C 31 2C 31 30 2C 33 31 2C 31 |..8,31,1,10,31,1|
00003FA0: 2C 31 32 2C 32 37 2C 32 2C 31 34 2C 32 38 2C 32 |,12,27,2,14,28,2|
00003FB0: 2C 31 36 2C 33 36 2C 32 00 D8 47 BC EA 81 59 B2 |,16,36,2..G...Y.|
00003FC0: 31 A4 35 3A 87 45 56 28 59 29 2C 45 48 28 59 29 |1.5:.EV(Y),EH(Y)|
00003FD0: 2C 4C 45 28 59 29 3A 82 00 F0 47 48 EE 50 46 24 |,LE(Y):...GH.PF$|
00003FE0: 28 30 29 B2 22 22 3A 50 46 24 28 31 29 B2 22 22 |(0)."":PF$(1).""|
00003FF0: 00 2B 48 52 EE 81 48 57 B2 34 A4 38 3A 43 48 B2 |.+HR..HW.4.8:CH.|
00004000: B5 28 C5 28 48 57 24 28 48 57 29 29 AA 2E 35 29 |.(.(HW$(HW))..5)|
00004010: 3A 8B 43 48 B3 B1 30 A7 50 46 24 28 30 29 B2 50 |:.CH..0.PF$(0).P|
00004020: 46 24 28 30 29 AA C7 28 43 48 29 00 69 48 57 EE |F$(0)..(CH).iHW.|
00004030: 82 3A 81 48 57 B2 39 A4 31 33 3A 43 48 B2 B5 28 |.:.HW.9.13:CH..(|
00004040: C5 28 48 57 24 28 48 57 29 29 AA 2E 35 29 3A 8B |.(HW$(HW))..5):.|
00004050: 43 48 B3 B1 30 A7 50 46 24 28 31 29 B2 50 46 24 |CH..0.PF$(1).PF$|
00004060: 28 31 29 AA C7 28 43 48 29 00 6F 48 5C EE 82 00 |(1)..(CH).oH\...|
00004070: 8C 48 66 EE 50 53 25 B2 30 3A 8B 48 57 24 28 31 |.Hf.PS%.0:.HW$(1|
00004080: 29 B3 B1 22 4E 22 A7 50 53 25 B2 31 00 9E 48 70 |).."N".PS%.1..Hp|
00004090: EE 53 44 25 B2 C5 28 48 57 24 28 32 29 29 00 C9 |.SD%..(HW$(2))..|
000040A0: 48 7A EE 4C 46 24 B2 22 22 3A 8B 48 57 24 28 33 |Hz.LF$."":.HW$(3|
000040B0: 29 B2 22 59 22 A7 4C 46 24 B2 C7 28 31 30 29 3A |)."Y".LF$..(10):|
000040C0: 97 34 39 32 30 37 2C 31 30 00 E2 48 7C EE 8B 48 |.49207,10..H|..H|
000040D0: 57 24 28 33 29 B2 22 4E 22 A7 97 34 39 32 30 37 |W$(3)."N"..49207|
000040E0: 2C 30 00 06 49 84 EE 8B 48 57 24 28 31 29 B2 22 |,0..I...HW$(1)."|
000040F0: 4F 22 A7 97 34 39 31 37 34 2C 31 32 3A 97 34 39 |O"..49174,12:.49|
00004100: 31 39 32 2C 36 34 00 29 49 86 EE 8B 48 57 24 28 |192,64.)I...HW$(|
00004110: 31 29 B2 22 56 22 A7 97 34 39 31 37 34 2C 34 3A |1)."V"..49174,4:|
00004120: 97 34 39 31 39 32 2C 36 34 00 34 49 3C F0 58 B2 |.49192,64.4I<.X.|
00004130: B8 28 30 29 00 55 49 30 F2 41 58 B2 35 34 32 37 |.(0).UI0.AX.5427|
00004140: 32 3A 81 59 5A B2 30 A4 32 34 3A 97 41 58 AA 59 |2:.YZ.0.24:.AX.Y|
00004150: 5A 2C 30 3A 82 00 74 49 3A F2 97 41 58 AA 31 34 |Z,0:..tI:..AX.14|
00004160: 2C 35 3A 97 41 58 AA 31 38 2C 31 36 3A 97 41 58 |,5:.AX.18,16:.AX|
00004170: AA 33 2C 31 00 8D 49 44 F2 97 41 58 AA 32 34 2C |.3,1..ID..AX.24,|
00004180: 31 34 33 3A 97 41 58 AA 36 2C 32 34 30 00 93 49 |143:.AX.6,240..I|
00004190: 18 F6 8E 00 00 00 00 EA 83 32 2C 30 2C 34 2C 30 |.........2,0,4,0|
000041A0: 2C 30 2C 36 2C 30 2C 30 2C 30 2C 30 2C 38 2C 30 |,0,6,0,0,0,0,8,0|
000041B0: 2C 30 2C 30 2C 30 2C 31 30 2C 34 34 2C 31 32 2C |,0,0,0,10,44,12,|
000041C0: 30 2C 31 34 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 |0,14,0,0,0,0,0,0|
000041D0: 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 |,0,0,0,0,0,0,0,0|
000041E0: 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 |,0,0,0,0,0,0,0,0|
000041F0: 2C 30 2C 30 2C 30 2C 59 2C 53 2C 32 30 2C 32 35 |,0,0,0,Y,S,20,25|
00004200: 2C 36 3A 81 58 B2 31 A4 39 3A 81 59 B2 31 A4 35 |,6:.X.1.9:.Y.1.5|
00004210: 3A 87 4C 50 25 28 58 2C 59 29 3A 82 59 2C 58 3A |:.LP%(X,Y):.Y,X:|
00004220: 81 59 B2 31 A4 35 3A 87 45 46 24 28 59 29 3A 82 |.Y.1.5:.EF$(Y):.|
00004230: 59 00 18 3B B0 EA 83 20 33 35 2C 36 2C 31 2C 30 |Y..;... 35,6,1,0|
00004240: 3A 81 58 B2 31 A4 34 3A 87 4C 44 24 28 58 29 3A |:.X.1.4:.LD$(X):|
00004250: 82 00 C4 3B BA 00 58 FF FF EE 8A FF 44 FF 40 08 |...;..X.....D.@.|
00004260: FF 01 0D D0 8A FF C0 FF 48 D8 96 8B 18 D0 8A FF |........H.......|
00004270: C0 FF 58 D0 8A FF C4 FF 48 D8 96 8B 18 D0 8A FF |..X.....H.......|
00004280: C4 FF 80 E0 5C E1 B9 FF FF FF 40 CB 8A FF 58 AC |....\.....@...X.|
00004290: FF 41 CE FF FE FF FF EE 8A FF FF EE FF FF 10 1A |.A..............|
000042A0: CE FF 58 FF AC FF 45 C4 C1 0D D8 AA 8A FF C0 FF |..X...E.........|
000042B0: 48 D8 AA 8A FF C0 FF 18 6E FF AC FF FF 81 40 5C |H.......n.....@\|
000042C0: FF B9 FF FF EE 58 FF FF FF 40 FF 8A C4 44 58 AC |.....X...@...DX.|
000042D0: FF 41 CE FF FE FF FF EE 8A FF FF EE FF FF 10 1A |.A..............|
000042E0: CE FF 50 8B 43 48 B3 B1 30 A7 50 46 24 28 31 29 |..P.CH..0.PF$(1)|
000042F0: B2 50 46 24 28 31 29 AA C7 28 43 48 29 00 03 3C |.PF$(1)..(CH)..<|
00004300: 48 EE 50 46 24 28 30 29 B2 22 22 3A 50 46 24 28 |H.PF$(0)."":PF$(|
00004310: 31 29 B2 22 22 3A 50 39 24 B2 C7 28 39 29 3A 50 |1)."":P9$..(9):P|
00004320: 4C 24 B2 50 39 24 AA 22 4B 22 3A 50 24 28 30 29 |L$.P9$."K":P$(0)|
00004330: B2 22 22 3A 50 24 28 31 29 B2 22 22 00 1A 3C 49 |."":P$(1).""..<I|
00004340: EE 8B 20 48 57 24 28 32 29 B2 22 53 22 A7 36 31 |.. HW$(2)."S".61|
00004350: 30 31 30 00 3F 3C 4D EE 50 24 28 30 29 B2 50 39 |010.?<M.P$(0).P9|
00004360: 24 AA 22 31 33 32 4E 22 3A 50 24 28 31 29 B2 50 |$."132N":P$(1).P|
00004370: 39 24 AA 22 38 30 4E 22 00 6F 3C 4E EE 8B 48 57 |9$."80N".o<N..HW|
00004380: 24 28 33 29 B2 22 59 22 A7 50 24 28 30 29 B2 50 |$(3)."Y".P$(0).P|
00004390: 4C 24 AA 50 24 28 30 29 3A 50 24 28 31 29 B2 50 |L$.P$(0):P$(1).P|
000043A0: 4C 24 AA 50 24 28 31 29 00 AA 3C 52 EE 81 48 57 |L$.P$(1)..<R..HW|
000043B0: B2 34 A4 38 3A 43 48 B2 B5 28 C5 28 48 57 24 28 |.4.8:CH..(.(HW$(|
000043C0: 48 57 29 29 AA 2E 35 29 3A 8B 43 48 B3 B1 30 A7 |HW))..5):.CH..0.|
000043D0: 50 46 24 28 30 29 B2 50 46 24 28 30 29 AA C7 28 |PF$(0).PF$(0)..(|
000043E0: 43 48 29 00 E8 3C 57 EE 82 3A 81 48 57 B2 39 A4 |CH)..<W..:.HW.9.|
000043F0: 31 33 3A 43 48 B2 B5 28 C5 28 48 57 24 28 48 57 |13:CH..(.(HW$(HW|
00004400: 29 29 AA 2E 35 29 3A 8B 43 48 B3 B1 30 A7 50 46 |))..5):.CH..0.PF|
00004410: 24 28 31 29 B2 50 46 24 28 31 29 AA C7 28 43 48 |$(1).PF$(1)..(CH|
00004420: 29 00 20 3D 5C EE 82 48 57 3A 50 46 24 28 30 29 |). =\..HW:PF$(0)|
00004430: B2 4E 55 24 AA 50 46 24 28 30 29 AA 50 24 28 30 |.NU$.PF$(0).P$(0|
00004440: 29 3A 50 46 24 28 31 29 B2 4E 55 24 AA 50 46 24 |):PF$(1).NU$.PF$|
00004450: 28 31 29 AA 50 24 28 31 29 00 32 3D 66 EE 50 53 |(1).P$(1).2=f.PS|
00004460: 25 B2 C5 28 48 57 24 28 31 29 29 00 3C 3D 0F EF |%..(HW$(1)).<=..|
00004470: 4E 44 25 B2 38 00 49 3D 10 EF 58 B2 B8 28 30 29 |ND%.8.I=..X..(0)|
00004480: 3A 8E 00 00 00 |:.... |
....... ** SYSTEM ** 08-04-85.G.... COPY
RIGHT 1983 CONTINENTAL SOFTWARE.T...VH.5
8732......VT(19),HT(19),FL(19),HW$(19),R
N(750),TV(22),LF(22),TH(22),SL$(21),LP%(
9,5).Q.... EV(5),EH(5),LE(5),LD$(4),NA$(
8),OP$(3)......60000:.400......204,0....
..X$:. X$.."" .20......X$:. X$."".22.&..
.. X$.G(13).26.^...DU.F(X$):.(DU.32.DU.4
).DU.44.DU.59.DU.133..9000:.22.W....204,
1:." ."HW$(17);.}.......(.DU$.H(BL$,QL).
..*..50176:.G(157);G(32);.C.,..HW$(18)"
."HW$(17):....O.. BELOW IS SCREEN DUMP..
.P..PS%.0..9000:....W..4,4,SD%:.4:.49152
...X..4: 4:....Z...1.D.CI.1:.3090:.CI.0.
..I.N..3401:.3410:.3430:..Y.H..".":.211,
20.C(SC$(0)).2:.VH:.SC$(0):.214,3...J..2
11,19.C(MU$(MU)).2:.VH:.". "MU$(MU)" .".
..M..SL$(1)."".SL.1.220...R..214,2:.211,
20.C(SL$(1)).2:.VH:.SL$(1)......."....".
":.214,3:.211,20.C(SC$(0)).2:.VH:.SC$(0)
:..J....211,19.C(SC$(1)).2:.". "SC$(1)"
."......214,7:.X.1.7:.211,3:.VH:.". "X".
.";:." "MU$(X):.X......214,17:.VH:.X.1
7.38:." ";......211,7:.VH:.SC$(2)" (1-7)
.";:.214,17:.211,29:.VH:.20.....SL$.X$:
.SL$."1".SL$."7"..9000:.430.)....SL$:SL.
F(SL$).48:MU.SL:.SL.7.500.G.L..SL.5.CI.0
..100:.CI.0.400.U....SL.700,1300,1400,15
00,800,1200:.650:.400......650:.".":.214
,10:.VH:.AS$:.214,14:.VH:.AS$......214,1
2:.211,8:.VH:."."NL$MU$(SL)" .":.214,20:
.VH...X.. CHK IF PRGRM DISK...L..3070: 1
.0.Q..HW$(18)"NEW:.LOAD"G(34)"MRMENU"G(3
4)",8,1".F.V..631,19:.632,13:.633,82:.63
4,213:.635,13:.198,5:.......EF.1..3090:.
CI..3395:.3420:.3430...........XL.0:.700
0:.SL.1.21:.1800......SL$(SL).."INACTIVE
".SL.2..(SL.2).XL.XL.1...A..SL:.2200...F
..FT%.1.FT%.2.'....7040:.SL$."X"..3401:.
3410:.3430:.700.-.....A. .FE.0:CI.0:.307
0.H.%..1000:.SL.1.16:.1130:.:SL.19:.1130
...R..1040:.SL$."X"..3800:.3810:.3830:.8
05. .\..FE.0.895...Z..3070:.3820:.3830..
.........SL.2.13:HW$(SL)."0":.SL:.SL.1.
14:.1130:.SL:.......9000.....FE.1:.214,V
T(SL):.211,HT(SL):.VH.,....SL.15.950.I..
..H(UL$,FL(SL))." ";:.211,HT(SL):.VH:HW$
(SL)."":QL.FL(SL).}....40:HW$(SL).DU$...
...C(HW$(SL)).FL(SL).899......1100:.NG.1
.899.............M....X$:. X$.."" .20...
...X$:. X$."".954......X$.G(13)........X
$..G(135).X$..G(136)..9000:.954.+.D..X$.
.G(136).990.G.F.BX%.BX%.1:.BX%.15.BX%.0.
A.H..53280,BX%:.53281,BX%.T.I.HW$(16).D(
BX%)...J..211,HT(16):.VH:.I(HW$(16),2);.
..K.Y.BX%:.976:HW$(18).X$...L..954.O.P..
Y.8.X$.G(Y.140)...Q..Y.1.X$.G(5)...R..Y.
0.X$.G(144)...S..Y.2.X$.G(28)...T..Y.3.X
$.G(159).+.U..Y.4.X$.G(156).=.V..Y.5.X$.
G(30).O.W..Y.6.X$.G(31).B.X..Y.7.X$.G(15
8).U.Y..Y.7.X$.G(129).{.Z.......FX%.FX%.
1:.FX%.15.FX%.0.....Y.FX%:.976:HW$(17).X
$.E....HW$(17);:.1000.....Y.SL:.SL.1.16:
.1130:.:SL.Y."...HW$(15).D(FX%):.214,VT(
15):.211,HT(15):.VH:.I(HW$(15),2);.+....
954.F....".":.214,0:.211,20.C(SC$(0)).2:
.VH:.SC$(0):.211,8:.VH......". HARDWARE
CONFIGURATION .":.211,8:.VH:."REFER TO C
HART IN MANUAL":......." . A . PRINTER:
V)IC O)THER N)ONE?"......" . B . INTERFA
CE CTRL CHARACTER?".4...." . C . SEND LI
NE FEED? (Y/N)":.:.211,2:.VH.E....". ASC
II CODE(S) FOR 132-COLUMN FORMAT .":....
...X.1.5:.211,5.(X.1).6:."."G(67.X);:.X:
.".";:..Z....214,12:.211,2:.VH:.". ASCII
CODE(S) FOR 80-COLUMN FORMAT .":.......
X.1.5:.211,5.(X.1).6:.VH:."."G(72.X);:.X
:.".";:..F....214,16:.VH:." . N . NUMBER
OF DRIVES IN SYSTEM ".R...." . O . PRIN
TER SUPPORTS FORM FEED ":......." . F1 .
COLOR . FORE . . BACK .":.214,21:.2
11,10:.VH......SC$(3)" (A-O)":.SC$(6);:.
211,27:.VH:.SC$(4):.211,12......VH:.SC$(
2);:.PS%..0..214,22:.211,14:.VH:.SC$(5).
%.....]....214,23:.211,28:.VH:.G(175);:.
211,28:.VH:.20:SL$.X$.Z....SL$."R".SL$."
X"..:.1090......SL$."P"..80:.1040......S
L$.".".."F1":SL.15:.1065.Q....SL$."A".SL
$."O"..9000:.1040...$..SL$:SL.F(SL$).64:
.SL.15.SL.19...)..900:.61000:.1040...B..
.N.L.NG.0:.SL.1.HW$(1).."V".HW$(1).."N".
HW$(1).."O".NG.1:.1190.{.Q..SL.2.(HW$(2)
."0".HW$(2)."9").NG.1:.1190...V..(SL.3.S
L.19).HW$(SL).."Y".HW$(SL).."N".NG.1:.11
90.Z.Z..SL.3.SL.14..HW$(SL)."".HW$(SL)."
0".9.[..(SL.3.SL.14)..Z.1.3:.(J(HW$(SL),
Z,1)."0".J(HW$(SL),Z,1)."9").J(HW$(SL),Z
,1).."".NG.1:Z.3:.W.]..SL.3.SL.14..Z:.NG
.1.1190...^..SL.3.SL.14..E(HW$(SL)).255.
NG.1:.1190...`..SL.14.HW%.E(HW$(14)):.HW
%.1.HW%.2.NG.1:.1190...J..211,HT(SL):.21
4,VT(SL):.VH:.I(BL$.HW$(SL),FL(SL)).....
..2....".":.214,8:.VH:.AS$:.214,14:.VH:.
AS$:.214,9:.VH:.9000:.9000._...." DO YOU
WISH TO START A NEW SYSTEM? ";.U....SN$
:.SN$."".1203......SN$.."Y".SN$.."N".120
3......SN$:.SN$."N".1290.Z....9000:." AR
E YOU SURE YOU WANT TO DO THIS? ";......
SN$:.SN$."".1213......SN$.."Y".SN$.."N".
1213.#.D..SN$:.SN$."N".1290.`.I..214,12:
.VH:.9000:." DO YOU HAVE AN INITIALIZED
DISK? ";.V.K..SN$:.SN$."".1227...N..SN$.
."Y".SN$.."N".1227...S..SN$:.SN$."Y"..62
00:.PK..155.FT%.0............7100:.SL.1.
10:SL.SL.2:.1800:SL.SL.2:.1900:.SL.".F..
7140:.SL$."X"..3401:.3410:.3430:EF.0:.13
00.(.S...^.X..7300:.SL.1.4:.2600:.SL:.LP
.1.E(LD$(2)):.2300:.LP......7340:.SL$."X
"..3401:.3410:.3430:EF.0:.1400......SL$.
G(133)..700:.1400...W...K....7500:.SL.1.
5:.5800:.SL.U....7530......SL$."X"..3401
:.3410:.3430:.1500...;.....?..9000./.@.E
F.1:.214,TV(SL):.211,TH(SL):.VH.E.J..H(U
L$,LF(SL))." ";:.211,TH(SL):.VH:QL.LF(SL
):.40.U.L.SL$(SL).DU$...O.. SL$(SL)."".1
599...T..C(SL$(SL)).LF(SL).1599...^..SL.
1.SL.2...(SL.2).SL$(SL.1).."INACTIVE".E(
SL$(SL)).1.1599...C..SL.3.SL$(SL)."INACT
IVE".1599.(.H..SL$(SL).."INACTIVE"..1645
.Q.I.XL.SL:.SL.XL.20:SL$(SL)."INACTIVE":
.1800:SL.SL.1:SL$(SL)."0":.1800:....J..2
200:XL.XL.2.1:.1690...M..SL..1.E(SL$(SL)
).24.1599...R.. SL.1..1690...S..SL.2...(
SL.2)..2200:.MC%.TU%.0..1599...U.. IF CH
AR. USED TU%>MC% MAX THEN ERROR.........
...9000.(...EF.1.^....214,TV(SL.2):.211,
14:.VH:.H(UL$,E(SL$(SL.2.1)));......211,
14:.VH:QL.E(SL$(SL.2.1)):.40:DF$(SL).DU$
......C(DF$(SL)).E(SL$(SL.2.1)).1699...B
..1900.D..........214,TV(SL):.211,TH(SL)
:.VH:.H(BL$,LF(SL));:.211,TH(SL):.VH.0..
..SL.1.SL.2...(SL.2).E(SL$(SL)).10.." ";
.?....SL$(SL):....L..211,14:.214,TV(SL.2
):.VH:.X.14.38:." ";:.:.211,14:.VH:.DF$(
SL):....P.EF.11...4..211,H(1):.214,V(1):
.VH:.NL$:......TU%.0:.LS.3.21.2:TU%.TU%.
E(SL$(LS)):.......214,17:.211,28:.VH:.I(
BL$.D(TU%),3):.211,28:.VH.,....I(BL$.D(M
C%.TU%),3):..F....214,LP.10:.211,3:.VH.A
....H(BL$,36);:.211,3:.VH.V....SL$(LP%(L
P,1));......211,14:.VH:PP.2:.2350:.211,1
6:.VH......SL$(LP%(LP,3));:.211,27:.VH:P
P.4:.2350:.211,29:.VH:.SL$(LP%(LP,5))...
....* ...LP%(LP,PP).32.LP%(LP,PP).0.."."
G(LP%(LP,PP).64)".";:.2360.> 3..G(LP%(LP
,PP));.D 8...N C..9000.W D.EF.1.. N..214
,VC(SL):.211,HC(SL).1:.VH:.H(UL$,LC(SL))
;:.211,HC(SL).1.. S.QL.LC(SL):.40:LD$(SL
).DU$.. X..C(LD$(SL)).LC(SL).(E(LD$(SL))
.0.SL.4).2499.. .....!(..214,VC(SL):.211
,HC(SL).1:.VH:.LD$(SL):..M!..EF.1:.X.1.5
:.214,SL.10:.211,HP(X):.VH:.2800:.X:..R!
...H(BL$,39.HP(X));:.211,HP(X):.VH.}!...
204,0..!...LP$:. LP$.."".2803..!...LP$:.
LP$."".2804..!...LP$.G(13).2807..!..DU.
F(LP$):.(DU.32.DU.1).DU.127..9000:.2804.
."...204,1:." ."HW$(17);.&"...LP$.G(13).
LP$.G(0):.2890.P"..MS%(SL).0:.X.2810,283
0,2810,2830,2810.."...F(LP$).2...(F(LP$)
.2).LP$."A".LP$."T"..9000:.2800.."...SL$
(F(LP$).64):LP%(SL,X).F(LP$).64:.2895.."
...F(LP$).32.."."G(F(LP$).64)".";:.9000.
."J..LP$.."L.LP%(SL,X).F(LP$)..#O.MS%(SL
)..(.(LP%(SL,2).1)..(LP%(SL,4).1).0):..A
#...1,"I0":DU$."".Z#...30900:.E1%.20.330
00.O#.. 2:.2,NC%,0,"$0"..#...30900:.E1%.
20.33000..#B..X.1.6:.30400:...#G..30400:
.X$..G(34).3015..#L..30400:.X$..G(34).DU
$.DU$.X$:.3020..#Q..30100:...$... IFND%<
>8THEN3050.!$.. 1:.1,ND%,15:NC%.ND%:.300
0.?$...H(DU$,7).."PROGRAM".3050.W$...320
00:.F(X$).133...A$...3040..$.. 1:.1,ND%,
15:NC%.ND%:.3000:.H(DU$,4).."DATA".3060.
.$...32000:.F(X$).133....$...3040..$....
.$.. 1:.1,8,15:NC%.8:.3000:.H(DU$,7)."PR
OGRAM".3080..%...31300:.3070..%....@%..
1:.1,ND%,15:NC%.ND%:.3000:.H(DU$,4).."DA
TA".3086.\%...32000:.F(X$)..133.3082..%.
..SL.6..ND%.8..3040:.F(X$)..133.3082..%.
...D%..CI.1: 1:.1,ND%,15:NC%.ND%:.3000:.
H(DU$,4)."DATA".3099.X%...31100:.CI.3090
..%.....%..NA%.0:.30050:...&+..1,"P".G(2
.96).G(1).G(0).G(1)..&,..30900.,&-.DU$.D
(TR).7&...Y.1.3.G&0.DU$.DU$.G(13).D(TN(Y
)).G(13)."NOT SORTED":..T&2..30370:...&:
..30100:...&D.. CREATE LAST RECORD..&F..
Z.250.750.250.H&H.X..(Z.256):Y.Z.(X.256)
..&L..1,"P".G(2.96).G(Y).G(X).G(1)..&N.D
U$."DUMMY"..'P.DU$.DU$.G(13).DU$.G(13).D
U$.%'R..30370.,'T..Z.2'X...L'...X.1.3:NA
%.5.X:.30050.N'...DU.1.10:.30300:.:.3010
0:.X:..T'C....'H.NA%.1:.30000:...'I.NA%.
2:.30000:...'R..X.1.21:.30250:SL$(X).DU$
:..Z'T..X.1.10:.30250:DF$(X).DU$:...'V..
X.1.4:.30250:LD$(X).DU$:..4(X..X.1.9:.30
200:MS%(X).DU:.Y.1.5:.30200:LP%(X,Y).DU:
.Y,X.U(Z..Y.1.5:.30250:EF$(Y).DU$:.:..U(
\..X.1.21:DU$.SL$(X):.30350:...(^..X.1.1
0:DU$.DF$(X):.30350:...(_..X.1.4:DU$.LD$
(X):.30350:...(`..X.1.9:DU.MS%(X):.30300
:.Y.1.5:DU.LP%(X,Y):.30300:.Y,X..)B..Y.1
.5:DU$.EF$(Y):.30350:...)D.EF.0:..&)F..3
0100:..D)..NA%.3:.30000:DU.TR:.30300.Q).
..30100:..D)X.NA%.4:.30000:...)...30200:
FT%.DU:.SL.1.19:.30250:HW$(SL).DU$:...).
.PS%.0:.HW$(14).."N".PS%.1.I)..ND%.7.E(H
W$(14)):..Z)..NA%.5:.30000..)..ND%.7.E(H
W$(14)).!*..DU.FT%:.30300:.SL.1.19:DU$.H
W$(SL):.30350:.:...*...30100:..4*<...>*C
..9000.C*D.EF.1:.214,EV(SL):.211,EH(SL):
.VH..*N..H(UL$,LE(SL));:.211,EH(SL):.VH.
.*S.QL.LE(SL):.40:EF$(SL).DU$:.EF$(SL)."
".5699.R*X..C(EF$(SL)).LE(SL).5699..+Y..
SL.3.EF$(SL)..J(SC$,SL..(SL.2),1).EF$(SL
)..J(SC$,SL.2,1).5699..+....T+...214,EV(
SL):.211,EH(SL):.VH:.I(BL$.EF$(SL),LE(SL
)):..O+8..32000:.F(X$).133.6240.X+:.CI.0
..+=..3040:.F(X$).133....+?.. GOSUB3082:
IFASC(X$)=133THENRETURN.B+@..34000.S+A..
1,"N0:DATA"..+B..3500:.3400:.3420:.3430.
.+L..3300..,V..3100:.3115:.3140:.3130..,
`...$,X..200.E,]..214,5:.VH:.".A. LIST N
AME>>":.:.211,2:.VH:.". FIELD NAME ";..,
_..211,17:.VH:." CHARACTER LIMIT ":..E,G
..X.1.10:."."G(64.X.2);:.211,14:.VH:."."
G(65.X.2):.:...,L..214,15:.211,20:.VH:."
TOTAL CHARACTERS":.211,20:.VH.C-N.."----
- ----------":.211,20:.VH:."USED >>":.21
1,20:.VH:."LEFT >>"..-{..214,20:.211,10:
.VH:.SC$(3)" (A-U)":.SC$(6);:.211,27:.VH
..-|.."(Z)RECORD":.211,12:.VH:.SC$(2);.S
-}..PS%..0 ..214,21:.211,14:.VH:."(Y)PRI
NT".Y-........214,22:.211,28:.VH:.G(175
);:.211,28:.VH......20:SL$.X$.?...SL.F(S
L$).64:.SL$."Z".SL$."X"..:.7090.X....SL$
."Y"..:.80:.7040......SL$."A".SL$."U".SL
.(XL.1).2..9000:.7040......SL$:.1600:.SL
..22..1800......SL.2.XL.2.SL.21.SL.SL.1:
.1600:.1800:XL.XL.1:.XL.11.XL.10......70
40............200.A/A..214,5:.211,6:.VH:
.". TYPE * FOR REPEAT FEATURE ":.214,7:.
211,3:.VH.M/C.." LABEL ";:.211,14:." DEF
AULT INPUT":.../K..214,9:.X.1.10:."."G(6
4.X):.:.".".Y/...214,20:.211,10:.SC$(3)"
(A-J)":.SC$(6);:.211,27:.VH:."(R)RECORD
"..0...211,12:.VH:.SC$(2);:.PS%..0..214,
21:.211,14:.VH:."(P)PRINT". 0....M0...21
4,22:.211,28:.VH:.G(175);:.211,28:.VH.\0
...20:SL$.X$.Z0..:.SL$."R".SL$."X"..:.71
90..0...SL$."P"..:.80:.7140..0...SL$."A"
.SL$."J"..9000:.7140..0...SL$:SL.F(SL$).
64:.SL$(SL.2)."INACTIVE"..9000:.7140..0.
..1700..1...7140..1.....1...200.S1...214
,5:.VH:." .A. LABEL WIDTH";:.211,22:.VH:
.".B. LABEL HEIGHT"..1..." .C. HOW MANY
LABELS ACROSS?":." .D. MESSAGE":...1..."
L POSITION 1 P POSITION 2 P POSITION 3"
..1..." - ---------- - ---------- - ----
------":.214,11:.VH.>2...X.1.9:." ."G(X.
48)".":.:.211,5:.VH:."<<F1>> FOR SCREEN
LABEL LETTERS".2...214,21:.211,8:.VH:."
ITEM TO EDIT (A-D OR 1-9)":." "SC$(6);.
.2...211,29:.VH:."(R)RECORD":.211,12:.VH
:.SC$(2);..2...PS%..0..214,22:.211,16:.V
H:."(P)PRINT"..2.....3...214,23:.211,28:
.VH:.G(175);:.211,28:.VH..3...20:SL$.X$.
43... SL$.G(13).7360.^3...SL$:.SL$."R".S
L$."X".SL$.G(133).7390.U3...SL$."P"..80:
.7340..3...E(SL$).0.(SL$."A".SL$."D").E(
SL$).E(LD$(2))..9000:.7340..3O..SL$."9".
SL.F(SL$).64:.2500:.2600:.7400:.7340..4T
.SL.F(SL$).48:.2700:.7340..4....=4...CL(
2)..0..214,12:.".":.Z.1.CL(2):.G(48.Z):.
:.".".J4... CL(2).9..Z.CL(2).1.9:.214,11
.Z:..868:..P4.....4...LP.1.E(LD$(2)):.23
00:..M4...LP..10..LP.E(LD$(2)).1.9:.214,
10.LP:.211,3:.VH:.H(BL$,36):..S4.....4L.
.200..5V..214,8:.VH:.".A. PRINT RETURN A
DDRESS? (Y/N)":..Y5X..".B. SINGLE OR CON
TINOUS? (S/C)":.:.".C. LEFT MARGIN FOR A
DDRESS":...5`..".D. ENVELOPE HEIGHT IN L
INES":.:.".E. LINES: RETURN ADDRESS TO A
DDRESS"..5B....5J..214,20:.211,10:.VH:.S
C$(3)" (A-E)":.SC$(6);:.211,27:.VH..6L..
"(R)RECORD":.211,12:.VH:.SC$(2);.<6N..PS
%..0..214,21:.211,14:.VH:."(P)PRINT".I6T
..214,22:.211,28:.VH:.G(175);:.211,28:.V
H.X6U..20:SL$.X$..6V.:.SL$."R".SL$."X"..
:.7590..6W..SL$."P"..:.80:.7540.P6Y..SL$
."A".SL$."E"..9000:.7540..7...SL$:SL.F(S
L$).64:.SL$(SL.2)."INACTIVE"..9000:.7540
..7...5700:.5800:.7540.$7....|7L VT.10.S
L:.Y.1.3:.6300:LP%(X,Y).Z:.Y.3..8400:LP%
(X,Y.1).F(PC$):.PC$." ".LP%(X,Y.1).0..7V
.Y..7F ...7P .214,VT:.211,12.(Y.1).13:.
VH..7R .PC$:.PC$."".8402.J7T .PC$;..7Z .
HK$:.HK$..G(8).HK$..G(13).8410..8. .HK$.
G(8).8400..8. ...83!.9000."8(#. BELL SOU
ND.68)#.62000:AX.54272.O82#.AX.24,143:.A
X.6,240.D8<#.AX.4,65:F0.7391..8A#.T0.1.9
:F1.F0:F3..(F1.256):F2.F1.F3.256..8C#.54
272,F2:.54273,F3:...8F#.AX.24,0..8P#..T8
0U. OPEN FILE 8 SUBR..8:U. ?"OPEN 8 NA
%=";NA%..9?U 1:.1,NC%,15..9DU 2:.2,NC%,2
,NA$(NA%).$9IU.30900.*9XU..C9BU. OPEN FI
LE ND% SUBR.^9GU. ?"OPEN ND% NA%=";NA%.O
9IU 1:.1,ND%,15..9LU 2:.2,ND%,2,NA$(NA%)
..9QU.30900..9.U...9.U. CLOSE FILE SUBR.
G9.U. ?"CLOSE NA%=";NA%.N9.U 2..9.U.3090
0:...9.U 1:.1,NC%,15..9FU...:.U. INPUT #
SUBR..:.UDU.0..:.V.2,DU:.30900.%: V..8:
*V. INPUT $ SUBR.C:/VDU$."".U:4V.2,DU$:.
30900.L:>V.DU$.G(160).DU$."".R:HV...:\V.
PRINT # SUBR..:AV. ?"P # DU=";DU,..:FV.
2,DU..:MV.30900..:ZV..H:.V. PRINT $ SUBR
..:.V. ?"P $ DU=";DU$..:.V. DU$."".DU$.G
(160)..;.V.2,DU$..;.V.30900..;.V..!;.V.
PRINT REL.9;.V. ?"P REL DU$=";DU$.Q;.V.
DU$."".DU$.G(160).];.V.2,DU$;.H;.V.30900
.N;.V..;.V. GET $ SUBR..;JV.#2,X$..;.V.
30900..;.V...;.X 1:.1,NC%,15.C;.X.1,E1%,
ER$,E2%,E3%.Z;.X. E1%.20.NA%.33000..;HX.
.'<|Y.".":.214,8:.VH:.AS$:.:.211,3:.VH:.
"REMOVE ANY DISK FROM DRIVE #";.^<~Y.211
,3:.VH:."REMOVE ANY DISK FROM DRIVE #"ND
%"AND"..<.Y.211,14.C(SC$(0)).2:.VH:."INS
ERT "SC$(0)" DATA."..<.Y.211,7:.VH:.J(SM
$(2),12):...<.Y.211,10:.VH:."PRESS <<F1>
> FOR MENU":...<.Y.AS$HW$(18):.9000:.21.
.=.Y. X$.G(133).CI.0..=.Y..8=DZ.".":.214
,8:.VH:.AS$:.:.211,2:.VH.B=FZ.9000..=IZ.
"REMOVE ANY DISKETTE FROM DRIVE #8 AND":
." INSERT "SC$(0)" PROGRAM.".B=NZ.2
11,7:.VH:.J(SM$(2),12):.:.AS$HW$(18):.21
:...>.}.".":.214,8:.VH:.AS$:.:.211,5:.VH
:."REMOVE ANY DISK FROM DRIVE #"ND%.J>.}
.211,4:.VH:."AND INSERT BLANK INITIALIZE
D DISK":.211,8:.VH..>.}.J(SM$(2),13):.:.
211,4:.VH:."PRESS <<F1>> TO ABORT PROCED
URE":.:.AS$..>.}.HW$(18):.9000:.21..>.}.
.J>... DISK I/O ERROR SUBR.Y>...9000:.".
"..?...214,8:.VH:.AS$:.:.211,6:.VH:."DIS
K ERROR #";E1%.<?...:.211,6:.VH:.ER$" TR
ACK"E2%" BLOCK"E3%:..D?... E1%.26.E1%.29
.E1%.74.E1%.21.33035..?...:.211,6:.VH:."
INSERT GOOD PROGRAM DISKETTE":..S?...211
,6:.VH:."HIT ANY KEY TO CONTINUE":.:.AS$
HW$(18):.21..?... E1%.26.E1%.29.E1%.74.E
1%.21....@.. 2:SL.7:.500..@P..".":.214,8
:.VH:.AS$:.:.211,6:.VH.S@R.."PREPARING N
EW DATA DISKETTE":...@U..211,7:.VH:." PL
EASE DO NOT INTERRUPT ":.:.AS$:...@`..X.
0.38:BL$.BL$." ":UL$.UL$.G(175)::AS$.AS$
."*".B@E...X@G.AS$." ".H(AS$,38)..AJ..
5,14,2,5,36,1,6,26,1,7,10,25:.X.1.4:.VC(
X),HC(X),LC(X):.X.CAL.. 0,0,0,0,0,0,0,0,
0:.X.1.9:.MS%(X):.X.HAO.. 3,14,16,27,29:
.X.1.5:.HP(X):.X..AT.NL$." NOW LOADING "
:FT$(0)."6":TR%.750:MC%.132:LW.35:NU$.G(
0).G(0):SC$."YNSC"..BY.. FIELD NAMES,DEF
AULT INPUTS,PRINTED LABEL FORMAT,ENVELOP
E FORMAT.(B{.. HARDWARE,START NEW LIST,M
AIN MENU.LB~.. ** F.C.M. **,SYSTEM UTIL
ITIES,ENTER SELECTION,LETTER TO EDIT..B.
.. (R)RECORD,(P)PRINT,(X)CANCEL..B...X.1
.7:.MU$(X):.X:.X.0.6:.SC$(X):.X..C..SM$(
0)."PROGRAM":SM$(1)."DATA":SM$(2)." DIS
KETTE. PRESS ANY KEY WHEN READY.".RC...
4,33,1,5,31,1,6,27,1,10,7,3,10,13,3,10,1
9,3,10,25,3,10,31,3,14,7,3..C... 14,13,3
,14,19,3,14,25,3,14,31,3,16,32,1,19,20,2
,19,30,2.GC...X.1.19:.VT(X),HT(X),FL(X):
.:. 0,0,0,0,0,0,17,32,1..D...5,15,20,9,2
,10,9,16,2,10,2,10,10,16,2,11,2,10,11,16
,2,12,2,10,12,16,2,13.BD...2,10,13,16,2,
14,2,10,14,16,2,15,2,10,15,16,2,16,2,10,
16,16,2,17,2,10,17..D...16,2,18,2,10,18,
16,2:.X.1.21:.TV(X),TH(X),LF(X):...D...
SYSTEM NAME,FIRST NAME,10,LAST NAME,15,C
OMPANY,20,ADDRESS,24,CITY,20.%E... STATE
,2,ZIP CODE,10,TELEPHONE,12,SPECIAL #1,8
,SPECIAL #2,6.SE...X.1.21:.SL$(X):.:.X.1
.10:DF$(X).G(160):..DE... DISK STUFF.JE.
...YE.. 1:.1,8,15.EE..NA$(0)."0:MRENTRY,
L,".G(142):NA$(1)."@0:CUSTOM,S,W":NA$(2)
."0:CUSTOM,R"..F..NA$(3)."0:MRDATA,S,W":
NA$(4)."HARDWARE,S,R":NA$(5)."@0:HARDWAR
E,S,W".]F..NA$(6)."0:SORTFILE1,S,W":NA$(
7)."0:SORTFILE2,S,W":NA$(8)."0:SORTFILE3
,S,W"..F...3070:NA%.4:.30000:.3810:.3010
0..F..FX%.E(HW$(15)):BX%.E(HW$(16)).FF..
.53280,BX%:.53281,BX%:.HW$(17)..G...2,0,
4,0,0,6,0,0,0,0,8,0,0,0,0,10,44,12,0,14,
0,0,0,0,0,0,0,0,0,0,0,0.;G... 0,0,0,0,0,
0,0,0,0,0,0,0,0,Y,S,20,25,6.MG...X.1.9:.
Y.1.5:.LP%(X,Y):.Y,X:.Y.1.5:.EF$(Y):...G
...35,6,1,0:.X.1.4:.LD$(X):...G...8,31,1
,10,31,1,12,27,2,14,28,2,16,36,2.XG...Y.
1.5:.EV(Y),EH(Y),LE(Y):...GH.PF$(0)."":P
F$(1)."".+HR..HW.4.8:CH..(E(HW$(HW))..5)
:.CH..0.PF$(0).PF$(0).G(CH).IHW..:.HW.9.
13:CH..(E(HW$(HW))..5):.CH..0.PF$(1).PF$
(1).G(CH).OH\....HF.PS%.0:.HW$(1).."N".P
S%.1..HP.SD%.E(HW$(2)).IHZ.LF$."":.HW$(3
)."Y".LF$.G(10):.49207,10..H|..HW$(3)."N
"..49207,0..I...HW$(1)."O"..49174,12:.49
192,64.)I...HW$(1)."V"..49174,4:.49192,6
4.4I<.X..(0).UI0.AX.54272:.YZ.0.24:.AX.Y
Z,0:..TI:..AX.14,5:.AX.18,16:.AX.3,1..ID
..AX.24,143:.AX.6,240..I.........2,0,4,0
,0,6,0,0,0,0,8,0,0,0,0,10,44,12,0,14,0,0
,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
,0,0,0,Y,S,20,25,6:.X.1.9:.Y.1.5:.LP%(X,
Y):.Y,X:.Y.1.5:.EF$(Y):.Y..;... 35,6,1,0
:.X.1.4:.LD$(X):..D;..X.....D.@....P....
HX...P....XP..D.HX...P..D...\.....@K..X.
.AN.............N.X...EDA.X.....HX......
N.....@\.....X...@..DDX..AN.............
N.P.CH..0.PF$(1).PF$(1).G(CH)..<H.PF$(0)
."":PF$(1)."":P9$.G(9):PL$.P9$."K":P$(0)
."":P$(1).""..<I.. HW$(2)."S".61010.?<M.
P$(0).P9$."132N":P$(1).P9$."80N".O<N..HW
$(3)."Y".P$(0).PL$.P$(0):P$(1).PL$.P$(1)
..<R..HW.4.8:CH..(E(HW$(HW))..5):.CH..0.
PF$(0).PF$(0).G(CH)..<W..:.HW.9.13:CH..(
E(HW$(HW))..5):.CH..0.PF$(1).PF$(1).G(CH
). =\..HW:PF$(0).NU$.PF$(0).P$(0):PF$(1)
.NU$.PF$(1).P$(1).2=F.PS%.E(HW$(1)).<=..
ND%.8.I=..X..(0):....
> CLICK IMAGE PREVIEW FOR FULL MODAL