home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1987-02-12 | 17.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| TrID
| MP3 audio
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| ff 26 16 01 00 3a 8f d9 | 20 2a 2a 2a 2a 2a 2a 2a |.&...:..| *******|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 00 | 4d 16 02 00 3a 8f d9 20 |*******.|M...:.. |
|00000030| 2a 20 20 20 20 20 20 4c | 41 42 45 4c 20 4d 41 4b |* L|ABEL MAK|
|00000040| 45 52 20 36 2e 30 34 20 | 20 20 20 20 20 2a 00 74 |ER 6.04 | *.t|
|00000050| 16 03 00 3a 8f d9 20 2a | 20 20 20 20 20 20 20 20 |...:.. *| |
|00000060| 4c 42 4c 50 4e 54 36 30 | 2e 41 54 54 20 20 20 20 |LBLPNT60|.ATT |
|00000070| 20 20 20 20 2a 00 9b 16 | 04 00 3a 8f d9 20 2a 20 | *...|..:.. * |
|00000080| 20 20 20 20 53 45 50 54 | 45 4d 42 45 52 20 32 35 | SEPT|EMBER 25|
|00000090| 2c 20 31 39 38 36 20 20 | 20 20 20 2a 00 c2 16 05 |, 1986 | *....|
|000000a0| 00 3a 8f d9 20 2a 20 20 | 20 20 20 20 20 20 41 54 |.:.. * | AT|
|000000b0| 26 54 20 56 45 52 53 49 | 4f 4e 20 20 20 20 20 20 |&T VERSI|ON |
|000000c0| 20 20 2a 00 e9 16 06 00 | 3a 8f d9 20 2a 2a 2a 2a | *.....|:.. ****|
|000000d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 00 22 17 0a 00 3a |********|**."...:|
|000000f0| 8f d9 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2a |.. | *|
|00000100| 2a 2a 2a 2a 20 20 49 4e | 49 54 49 41 4c 49 5a 45 |**** IN|ITIALIZE|
|00000110| 20 54 48 45 20 50 52 4f | 47 52 41 4d 20 20 2a 2a | THE PRO|GRAM **|
|00000120| 2a 2a 2a 00 32 17 14 00 | 92 20 1c b8 0b 20 3a 20 |***.2...|. ... : |
|00000130| c9 20 dd 00 43 17 1e 00 | 8d 20 0e 4a 06 3a 20 8d |. ..C...|. .J.: .|
|00000140| 20 0e 3e 08 00 6f 17 28 | 00 97 20 d1 20 41 24 28 | .>..o.(|.. . A$(|
|00000150| 59 29 e7 d6 28 59 2c 0f | 20 29 3a 20 97 20 d1 20 |Y)..(Y,.| ): . . |
|00000160| 42 24 28 4c 4c 29 e7 d6 | 28 4c 4c 2c 22 2d 22 29 |B$(LL)..|(LL,"-")|
|00000170| 00 79 17 32 00 ad 20 49 | ea 4e 00 91 17 3c 00 c0 |.y.2.. I|.N...<..|
|00000180| 3a 20 4c 49 4e 45 43 4f | 55 4e 54 e7 11 3a 20 49 |: LINECO|UNT..: I|
|00000190| e7 12 00 b1 17 46 00 86 | 20 46 49 4c 45 24 28 1c |.....F..| FILE$(.|
|000001a0| 2c 01 29 2c 20 43 4f 4d | 4d 45 4e 54 53 24 28 0f |,.), COM|MENTS$(.|
|000001b0| 0a 29 00 bf 17 50 00 95 | 20 a7 20 89 20 0e 56 1d |.)...P..| . . .V.|
|000001c0| 00 ed 17 64 00 3a 8f d9 | 20 20 20 20 20 20 20 20 |...d.:..| |
|000001d0| 20 20 20 20 2a 2a 2a 2a | 2a 20 20 52 45 41 44 20 | ****|* READ |
|000001e0| 49 4e 20 44 41 54 41 20 | 20 2a 2a 2a 2a 2a 00 0c |IN DATA | *****..|
|000001f0| 18 6e 00 ba 20 22 4e 41 | 4d 45 44 49 53 4b 2e 5a |.n.. "NA|MEDISK.Z|
|00000200| 51 57 22 20 82 20 85 20 | 41 53 20 23 12 00 9f 18 |QW" . . |AS #....|
|00000210| 78 00 20 20 8b 20 45 46 | 4c 41 47 e7 0f 35 20 cd |x. . EF|LAG..5 .|
|00000220| 20 45 46 4c 41 47 e7 11 | 3a 20 91 20 ce 0f 1c 29 | EFLAG..|: . ...)|
|00000230| 22 44 69 73 6b 20 68 61 | 73 20 6e 6f 74 20 62 65 |"Disk ha|s not be|
|00000240| 65 6e 20 6e 61 6d 65 64 | 2e 22 3a 20 91 3a 20 91 |en named|.": .: .|
|00000250| 20 ce 0f 14 29 22 49 66 | 20 74 68 65 20 69 6e 73 | ...)"If| the ins|
|00000260| 74 61 6c 6c 61 74 69 6f | 6e 20 70 72 6f 67 72 61 |tallatio|n progra|
|00000270| 6d 20 68 61 73 20 62 65 | 65 6e 20 72 75 6e 22 3a |m has be|en run":|
|00000280| 91 3a 91 20 ce 0f 20 29 | 20 22 74 68 65 6e 20 72 |.:. .. )| "then r|
|00000290| 75 6e 20 4c 42 4c 2e 42 | 41 54 2e 22 3a 20 fe 83 |un LBL.B|AT.": ..|
|000002a0| 00 b8 18 82 00 20 20 8b | 20 45 46 4c 41 47 e8 e6 |..... .| EFLAG..|
|000002b0| 11 20 cd 20 89 20 0e 6a | 1d 00 48 19 8c 00 85 20 |. . . .j|..H.... |
|000002c0| 23 12 2c 44 49 53 4b 4e | 41 4d 45 24 2c 43 4e 24 |#.,DISKN|AME$,CN$|
|000002d0| 2c 46 52 45 45 42 59 54 | 45 53 2c 42 59 54 45 53 |,FREEBYT|ES,BYTES|
|000002e0| 55 53 45 44 2c 44 53 24 | 2c 54 59 50 45 50 52 49 |USED,DS$|,TYPEPRI|
|000002f0| 4e 54 45 52 24 2c 44 43 | 4f 55 4e 54 25 2c 46 43 |NTER$,DC|OUNT%,FC|
|00000300| 4f 55 4e 54 25 2c 4c 41 | 42 45 4c 2e 53 49 5a 45 |OUNT%,LA|BEL.SIZE|
|00000310| 2c 54 4c 2c 53 4b 49 50 | 46 49 4c 45 53 24 2c 4a |,TL,SKIP|FILES$,J|
|00000320| 53 2c 4a 42 2c 4a 46 2c | 4a 57 2c 4a 48 2c 4a 4e |S,JB,JF,|JW,JH,JN|
|00000330| 42 2c 4a 53 4e 3a 20 44 | 53 4b 4e 41 4d 45 24 e7 |B,JSN: D|SKNAME$.|
|00000340| 44 49 53 4b 4e 41 4d 45 | 24 00 ab 19 96 00 8b 20 |DISKNAME|$...... |
|00000350| 54 59 50 45 50 52 49 4e | 54 45 52 24 e8 e6 22 4f |TYPEPRIN|TER$.."O|
|00000360| 54 48 45 52 22 20 cd 20 | 54 59 50 45 50 52 49 4e |THER" . |TYPEPRIN|
|00000370| 54 45 52 24 e7 22 45 50 | 53 4f 4e 22 3a 20 4b 4f |TER$."EP|SON": KO|
|00000380| 4d 4d 45 4e 54 53 2e 50 | 45 52 2e 4c 41 42 45 4c |MMENTS.P|ER.LABEL|
|00000390| e7 19 3a 20 4c 49 4e 45 | 53 2e 4f 46 2e 46 49 4c |..: LINE|S.OF.FIL|
|000003a0| 45 53 e7 0f 0b 3a 20 89 | 20 0e b4 00 00 f6 19 a0 |ES...: .| .......|
|000003b0| 00 8b 20 54 59 50 45 50 | 52 49 4e 54 45 52 24 e7 |.. TYPEP|RINTER$.|
|000003c0| 22 4f 54 48 45 52 22 20 | cd 20 4b 4f 4d 4d 45 4e |"OTHER" |. KOMMEN|
|000003d0| 54 53 2e 50 45 52 2e 4c | 41 42 45 4c e7 15 3a 20 |TS.PER.L|ABEL..: |
|000003e0| 4c 49 4e 45 53 2e 4f 46 | 2e 46 49 4c 45 53 e7 15 |LINES.OF|.FILES..|
|000003f0| 3a 20 89 20 0e b4 00 00 | 00 1a aa 00 89 20 0e 6a |: . ....|..... .j|
|00000400| 1d 00 54 1a b4 00 82 20 | 4b e7 12 20 cc 20 4b 4f |..T.... |K.. . KO|
|00000410| 4d 4d 45 4e 54 53 2e 50 | 45 52 2e 4c 41 42 45 4c |MMENTS.P|ER.LABEL|
|00000420| 3a 20 85 20 23 12 2c 43 | 4f 4d 4d 45 4e 54 53 24 |: . #.,C|OMMENTS$|
|00000430| 28 4b 29 3a 20 8b 20 43 | 4f 4d 4d 45 4e 54 53 24 |(K): . C|OMMENTS$|
|00000440| 28 4b 29 e7 22 22 20 cd | 20 89 20 0e be 00 20 3a |(K)."" .| . ... :|
|00000450| a1 20 83 20 4b 00 a6 1a | be 00 bb 20 12 3a 20 4b |. . K...|... .: K|
|00000460| 4f 55 4e 54 e7 4b ea 12 | 3a 20 43 4e 25 e7 ff 94 |OUNT.K..|: CN%...|
|00000470| 28 43 4e 24 29 3a 20 8b | 20 53 4b 49 50 46 49 4c |(CN$): .| SKIPFIL|
|00000480| 45 53 24 e7 22 6e 6f 22 | 20 cd 20 43 4e 25 e7 44 |ES$."no"| . CN%.D|
|00000490| 43 4f 55 4e 54 25 3a 20 | 8b 20 43 4e 25 e7 11 20 |COUNT%: |. CN%.. |
|000004a0| cd 20 89 20 0e 0e 01 00 | c5 1a c8 00 ba 20 22 54 |. . ....|..... "T|
|000004b0| 45 4d 50 46 49 4c 45 2e | 5a 51 57 22 20 82 20 85 |EMPFILE.|ZQW" . .|
|000004c0| 20 41 53 20 23 12 00 ea | 1a d2 00 20 20 8b 20 45 | AS #...|... . E|
|000004d0| 46 4c 41 47 e7 0f 37 20 | cd 20 45 46 4c 41 47 e7 |FLAG..7 |. EFLAG.|
|000004e0| 11 3a 20 bb 3a 20 89 20 | 0e c8 00 00 03 1b dc 00 |.: .: . |........|
|000004f0| 20 20 8b 20 45 46 4c 41 | 47 e8 e6 11 20 cd 20 89 | . EFLA|G... . .|
|00000500| 20 0e 6a 1d 00 13 1b e6 | 00 82 20 49 e7 12 20 cc | .j.....|.. I.. .|
|00000510| 20 43 4e 25 00 27 1b f0 | 00 20 20 85 20 23 12 2c | CN%.'..|. . #.,|
|00000520| 46 49 4c 45 24 28 49 29 | 00 5e 1b fa 00 20 20 8b |FILE$(I)|.^... .|
|00000530| 20 ff 92 28 46 49 4c 45 | 24 28 49 29 29 e8 0f 0d | ..(FILE|$(I))...|
|00000540| 20 cd 20 46 49 4c 45 24 | 28 49 29 e7 46 49 4c 45 | . FILE$|(I).FILE|
|00000550| 24 28 49 29 e9 22 20 22 | 3a 20 89 20 0e fa 00 00 |$(I)." "|: . ....|
|00000560| 69 1b 04 01 83 20 49 3a | 20 bb 00 8c 1b 0e 01 8b |i.... I:| .......|
|00000570| 20 54 59 50 45 50 52 49 | 4e 54 45 52 24 e7 22 4f | TYPEPRI|NTER$."O|
|00000580| 54 48 45 52 22 20 cd 20 | 89 20 0e 4a 01 00 a8 1b |THER" . |. .J....|
|00000590| 18 01 95 20 4c 41 42 45 | 4c 2e 53 49 5a 45 20 89 |... LABE|L.SIZE .|
|000005a0| 20 0e 22 01 2c 20 0e 40 | 01 00 ee 1b 22 01 46 49 | ."., .@|....".FI|
|000005b0| 4c 45 53 2e 50 45 52 2e | 4c 49 4e 45 e7 15 3a 20 |LES.PER.|LINE..: |
|000005c0| 4c 49 4e 45 53 2e 50 45 | 52 2e 4c 41 42 45 4c e7 |LINES.PE|R.LABEL.|
|000005d0| 19 3a 20 54 4f 54 41 4c | 2e 46 49 4c 45 53 e7 0f |.: TOTAL|.FILES..|
|000005e0| 60 3a 20 54 45 4d 50 2e | 4b 4f 55 4e 54 e7 18 00 |`: TEMP.|KOUNT...|
|000005f0| 06 1c 2c 01 8b 20 4b 4f | 55 4e 54 e6 15 20 cd 20 |..,.. KO|UNT.. . |
|00000600| 4b 4f 55 4e 54 e7 15 00 | 1e 1c 36 01 4c 4c e7 0f |KOUNT...|..6.LL..|
|00000610| 39 3a 20 54 4c e7 0f 0f | 3a 20 89 20 0e 54 01 00 |9: TL...|: . .T..|
|00000620| 7c 1c 40 01 46 49 4c 45 | 53 2e 50 45 52 2e 4c 49 ||.@.FILE|S.PER.LI|
|00000630| 4e 45 e7 16 3a 20 4c 49 | 4e 45 53 2e 50 45 52 2e |NE..: LI|NES.PER.|
|00000640| 4c 41 42 45 4c e7 0f 0f | 3a 20 54 4f 54 41 4c 2e |LABEL...|: TOTAL.|
|00000650| 46 49 4c 45 53 e7 1c 04 | 01 3a 20 54 45 4d 50 2e |FILES...|.: TEMP.|
|00000660| 4b 4f 55 4e 54 e7 0f 0e | 3a 20 4c 4c e7 0f 40 3a |KOUNT...|: LL..@:|
|00000670| 20 54 4c e7 0f 11 3a 20 | 89 20 0e 54 01 00 d0 1c | TL...: |. .T....|
|00000680| 4a 01 46 49 4c 45 53 2e | 50 45 52 2e 4c 49 4e 45 |J.FILES.|PER.LINE|
|00000690| e7 16 3a 20 4c 49 4e 45 | 53 2e 50 45 52 2e 4c 41 |..: LINE|S.PER.LA|
|000006a0| 42 45 4c e7 19 3a 20 54 | 4f 54 41 4c 2e 46 49 4c |BEL..: T|OTAL.FIL|
|000006b0| 45 53 e7 0f 78 3a 20 54 | 45 4d 50 2e 4b 4f 55 4e |ES..x: T|EMP.KOUN|
|000006c0| 54 e7 19 3a 20 4c 4c e7 | 0f 40 3a 20 54 4c e7 0f |T..: LL.|.@: TL..|
|000006d0| 11 00 32 1d 54 01 8b 20 | 43 4e 25 e6 54 4f 54 41 |..2.T.. |CN%.TOTA|
|000006e0| 4c 2e 46 49 4c 45 53 20 | cd 20 91 3a 20 91 22 59 |L.FILES |. .: ."Y|
|000006f0| 6f 75 20 61 72 65 20 6c | 69 6d 69 74 65 64 20 74 |ou are l|imited t|
|00000700| 6f 20 61 20 74 6f 74 61 | 6c 20 6f 66 22 3b 54 4f |o a tota|l of";TO|
|00000710| 54 41 4c 2e 46 49 4c 45 | 53 3b 22 20 66 69 6c 65 |TAL.FILE|S;" file|
|00000720| 73 22 3a 20 43 4e 25 e7 | 54 4f 54 41 4c 2e 46 49 |s": CN%.|TOTAL.FI|
|00000730| 4c 45 53 00 6c 1d 90 01 | 3a 8f d9 20 20 20 20 20 |LES.l...|:.. |
|00000740| 20 20 20 20 20 20 2a 2a | 2a 2a 2a 20 20 50 52 49 | **|*** PRI|
|00000750| 4e 54 20 4f 4e 20 56 49 | 44 45 4f 20 4f 52 20 50 |NT ON VI|DEO OR P|
|00000760| 52 49 4e 54 45 52 20 20 | 2a 2a 2a 2a 2a 00 7b 1d |RINTER |*****.{.|
|00000770| 9a 01 bf 20 4a 46 2c 4a | 42 3a 20 c0 00 85 1d a4 |... JF,J|B: .....|
|00000780| 01 8d 20 0e f2 03 00 c6 | 1d ae 01 ca 20 0f 0d 2c |.. .....|.... ..,|
|00000790| 16 3a 20 91 22 44 6f 20 | 79 6f 75 20 77 61 6e 74 |.: ."Do |you want|
|000007a0| 20 74 6f 20 70 72 69 6e | 74 20 6f 6e 20 28 56 29 | to prin|t on (V)|
|000007b0| 69 64 65 6f 20 6f 72 20 | 74 68 65 20 28 50 29 72 |ideo or |the (P)r|
|000007c0| 69 6e 74 65 72 3f 22 00 | e8 1d b8 01 58 e7 0f 38 |inter?".|....X..8|
|000007d0| 3a 20 59 e7 0f 0d 3a 20 | ca 20 59 2c 58 3a 20 8b |: Y...: |. Y,X: .|
|000007e0| 20 4a 53 e7 12 20 cd 20 | c5 00 fb 1d c2 01 8d 20 | JS.. . |....... |
|000007f0| 0e ee 0c 3a 20 56 50 24 | e7 49 4e 24 00 7b 1e cc |...: VP$|.IN$.{..|
|00000800| 01 3a 8f d9 20 49 46 20 | 56 50 24 3d 22 56 22 20 |.:.. IF |VP$="V" |
|00000810| 4f 52 20 56 50 24 3d 22 | 76 22 20 54 48 45 4e 20 |OR VP$="|v" THEN |
|00000820| 4f 50 45 4e 20 22 53 43 | 52 4e 3a 22 20 46 4f 52 |OPEN "SC|RN:" FOR|
|00000830| 20 4f 55 54 50 55 54 20 | 41 53 20 23 32 3a 20 50 | OUTPUT |AS #2: P|
|00000840| 52 49 4e 54 45 52 46 4c | 41 47 3d 30 3a 20 4e 42 |RINTERFL|AG=0: NB|
|00000850| 52 2e 4c 41 42 45 4c 53 | 3d 31 3a 20 47 4f 53 55 |R.LABELS|=1: GOSU|
|00000860| 42 20 31 30 31 30 3a 20 | 47 4f 53 55 42 20 35 30 |B 1010: |GOSUB 50|
|00000870| 31 30 3a 20 47 4f 54 4f | 20 36 31 30 00 cf 1e d1 |10: GOTO| 610....|
|00000880| 01 8b 20 56 50 24 e7 22 | 56 22 20 ef 20 56 50 24 |.. VP$."|V" . VP$|
|00000890| e7 22 76 22 20 cd 20 56 | 50 24 e7 22 56 22 3a 20 |."v" . V|P$."V": |
|000008a0| 50 52 49 4e 54 45 52 46 | 4c 41 47 e7 11 3a 20 4e |PRINTERF|LAG..: N|
|000008b0| 42 52 2e 4c 41 42 45 4c | 53 e7 12 3a 20 8d 20 0e |BR.LABEL|S..: . .|
|000008c0| f2 03 3a 20 8d 20 0e 92 | 13 3a 20 89 20 0e 62 02 |..: . ..|.: . .b.|
|000008d0| 00 1e 1f d6 01 3a 8f d9 | 20 49 46 20 56 50 24 3d |.....:..| IF VP$=|
|000008e0| 22 50 22 20 4f 52 20 56 | 50 24 3d 22 70 22 20 54 |"P" OR V|P$="p" T|
|000008f0| 48 45 4e 20 4f 50 45 4e | 20 22 4c 50 54 31 3a 22 |HEN OPEN| "LPT1:"|
|00000900| 20 41 53 20 23 32 3a 20 | 50 52 49 4e 54 45 52 46 | AS #2: |PRINTERF|
|00000910| 4c 41 47 3d 31 3a 20 47 | 4f 54 4f 20 34 39 30 00 |LAG=1: G|OTO 490.|
|00000920| 56 1f db 01 8b 20 56 50 | 24 e7 22 50 22 20 ef 20 |V.... VP|$."P" . |
|00000930| 56 50 24 e7 22 70 22 20 | cd 20 56 50 24 e7 22 50 |VP$."p" |. VP$."P|
|00000940| 22 3a 20 50 52 49 4e 54 | 45 52 46 4c 41 47 e7 12 |": PRINT|ERFLAG..|
|00000950| 3a 20 89 20 0e ea 01 00 | 60 1f e0 01 89 20 0e b8 |: . ....|`.... ..|
|00000960| 01 00 9d 1f ea 01 ca 20 | 0f 0f 2c 0f 0a 3a 20 91 |....... |..,..: .|
|00000970| 20 22 48 6f 77 20 6d 61 | 6e 79 20 6c 61 62 65 6c | "How ma|ny label|
|00000980| 73 20 64 6f 20 79 6f 75 | 20 77 61 6e 74 20 74 6f |s do you| want to|
|00000990| 20 70 72 69 6e 74 20 28 | 30 2d 39 29 3f 22 00 bf | print (|0-9)?"..|
|000009a0| 1f f4 01 58 e7 0f 37 3a | 20 59 e7 0f 0f 3a 20 ca |...X..7:| Y...: .|
|000009b0| 20 59 2c 58 3a 20 8b 20 | 4a 53 e7 12 20 cd 20 c5 | Y,X: . |JS.. . .|
|000009c0| 00 c9 1f fe 01 8d 20 0e | ee 0c 00 fd 1f 08 02 8b |...... .|........|
|000009d0| 20 49 4e 24 e8 22 30 22 | 20 ef 20 49 4e 24 e6 22 | IN$."0"| . IN$."|
|000009e0| 39 22 20 cd 20 0e f4 01 | 20 3a a1 20 4e 42 52 2e |9" . ...| :. NBR.|
|000009f0| 4c 41 42 45 4c 53 e7 ff | 94 28 49 4e 24 29 00 16 |LABELS..|.(IN$)..|
|00000a00| 20 12 02 8b 20 4e 42 52 | 2e 4c 41 42 45 4c 53 e7 | ... NBR|.LABELS.|
|00000a10| 11 20 cd 20 0e 9a 01 00 | 30 20 1c 02 8b 20 50 52 |. . ....|0 ... PR|
|00000a20| 49 4e 54 45 52 46 4c 41 | 47 e7 12 20 cd 20 0e b6 |INTERFLA|G.. . ..|
|00000a30| 0d 00 3e 20 26 02 4e 4c | e7 4e 4c 20 e9 20 12 00 |..> &.NL|.NL . ..|
|00000a40| 48 20 30 02 8d 20 0e 7a | 17 00 52 20 3a 02 8d 20 |H 0.. .z|..R :.. |
|00000a50| 0e 92 13 00 96 20 58 02 | 3a 8f d9 20 20 20 20 20 |..... X.|:.. |
|00000a60| 20 20 20 20 20 20 2a 2a | 2a 2a 2a 20 20 53 45 54 | **|*** SET|
|00000a70| 20 55 50 20 4c 49 4e 45 | 20 4f 46 20 46 49 4c 45 | UP LINE| OF FILE|
|00000a80| 20 4e 41 4d 45 53 20 46 | 4f 52 20 4c 41 42 45 4c | NAMES F|OR LABEL|
|00000a90| 20 20 2a 2a 2a 2a 2a 00 | 9e 20 62 02 4a e7 12 00 | *****.|. b.J...|
|00000aa0| d3 20 6c 02 8b 20 53 4b | 49 50 46 49 4c 45 53 24 |. l.. SK|IPFILES$|
|00000ab0| e7 22 6e 6f 22 20 cd 20 | 43 4e 25 e7 44 43 4f 55 |."no" . |CN%.DCOU|
|00000ac0| 4e 54 25 3a 20 8b 20 43 | 4e 25 e7 11 20 cd 20 89 |NT%: . C|N%.. . .|
|00000ad0| 20 0e 2a 03 00 e1 20 76 | 02 4c 41 42 45 4c 24 e7 | .*... v|.LABEL$.|
|00000ae0| 22 22 00 fc 20 80 02 82 | 20 4d e7 12 20 cc 20 46 |"".. ...| M.. . F|
|00000af0| 49 4c 45 53 2e 50 45 52 | 2e 4c 49 4e 45 00 18 21 |ILES.PER|.LINE..!|
|00000b00| 8a 02 20 20 46 49 4c 45 | 24 e7 ff 81 28 46 49 4c |.. FILE|$...(FIL|
|00000b10| 45 24 28 4a 29 2c 0f 0d | 29 00 57 21 94 02 20 20 |E$(J),..|).W!.. |
|00000b20| 4c 41 42 45 4c 24 e7 4c | 41 42 45 4c 24 e9 46 49 |LABEL$.L|ABEL$.FI|
|00000b30| 4c 45 24 3a 20 8b 20 4c | 41 42 45 4c 2e 53 49 5a |LE$: . L|ABEL.SIZ|
|00000b40| 45 e7 12 20 cd 20 4c 41 | 42 45 4c 24 e7 4c 41 42 |E.. . LA|BEL$.LAB|
|00000b50| 45 4c 24 e9 22 20 20 22 | 00 74 21 9e 02 20 20 4a |EL$." "|.t!.. J|
|00000b60| e7 4a e9 12 3a 20 8b 20 | 4a e6 43 4e 25 20 cd 20 |.J..: . |J.CN% . |
|00000b70| 89 20 0e b2 02 00 7c 21 | a8 02 83 20 4d 00 c5 21 |. ....|!|... M..!|
|00000b80| b2 02 8d 20 0e 92 13 20 | 20 20 20 20 20 20 20 20 |... ... | |
|00000b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000ba0| 20 3a 8f d9 20 50 52 49 | 4e 54 20 4c 49 4e 45 20 | :.. PRI|NT LINE |
|00000bb0| 4f 46 20 46 49 4c 45 20 | 4e 41 4d 45 53 20 4f 4e |OF FILE |NAMES ON|
|00000bc0| 20 4c 41 42 45 4c 00 ed | 21 bc 02 8b 20 4c 49 4e | LABEL..|!... LIN|
|00000bd0| 45 43 4f 55 4e 54 e7 4c | 49 4e 45 53 2e 50 45 52 |ECOUNT.L|INES.PER|
|00000be0| 2e 4c 41 42 45 4c 20 cd | 20 8d 20 0e 6e 19 00 01 |.LABEL .| . .n...|
|00000bf0| 22 c6 02 8b 20 4a e6 43 | 4e 25 20 cd 20 89 20 0e |"... J.C|N% . . .|
|00000c00| da 02 00 0b 22 d0 02 89 | 20 0e 76 02 00 27 22 da |...."...| .v..'".|
|00000c10| 02 8b 20 4a e6 54 4f 54 | 41 4c 2e 46 49 4c 45 53 |.. J.TOT|AL.FILES|
|00000c20| 20 cd 20 89 20 0e 86 15 | 00 31 22 e4 02 8d 20 0e | . . ...|.1"... .|
|00000c30| 62 1b 00 72 22 20 03 3a | 8f d9 20 20 20 20 20 20 |b..r" .:|.. |
|00000c40| 20 20 20 20 20 2a 2a 2a | 2a 2a 20 20 52 45 41 44 | ***|** READ|
|00000c50| 20 41 4e 44 20 50 52 49 | 4e 54 20 43 4f 4d 4d 45 | AND PRI|NT COMME|
|00000c60| 4e 54 53 20 4f 4e 20 4c | 41 42 45 4c 20 20 2a 2a |NTS ON L|ABEL **|
|00000c70| 2a 2a 2a 00 b2 22 2a 03 | 82 20 4e e7 12 20 cc 20 |***.."*.|. N.. . |
|00000c80| 4b 4f 55 4e 54 3a 20 4c | 41 42 45 4c 24 e7 43 4f |KOUNT: L|ABEL$.CO|
|00000c90| 4d 4d 45 4e 54 53 24 28 | 4e 29 3a 20 8d 20 0e 92 |MMENTS$(|N): . ..|
|00000ca0| 13 3a 20 83 20 4e 3a 20 | 49 43 4f 4d 4d 45 4e 54 |.: . N: |ICOMMENT|
|00000cb0| 53 e7 12 00 cc 22 34 03 | 8b 20 4c 49 4e 45 43 4f |S...."4.|. LINECO|
|00000cc0| 55 4e 54 e6 11 20 cd 20 | 8d 20 0e 80 1b 00 d6 22 |UNT.. . |. ....."|
|00000cd0| 3e 03 8d 20 0e 6e 19 00 | e0 22 48 03 8d 20 0e 3e |>.. .n..|."H.. .>|
|00000ce0| 08 00 3c 23 52 03 8b 20 | 4e 4c e8 4e 42 52 2e 4c |..<#R.. |NL.NBR.L|
|00000cf0| 41 42 45 4c 53 20 cd 20 | 4c 49 4e 45 43 4f 55 4e |ABELS . |LINECOUN|
|00000d00| 54 e7 11 3a 20 4a e7 12 | 3a 20 4a 4c 41 42 45 4c |T..: J..|: JLABEL|
|00000d10| e7 11 3a 20 49 43 4f 4d | 4d 45 4e 54 53 e7 11 3a |..: ICOM|MENTS..:|
|00000d20| 20 8b 20 50 52 49 4e 54 | 45 52 46 4c 41 47 e7 12 | . PRINT|ERFLAG..|
|00000d30| 20 cd 20 0e 26 02 20 3a | a1 20 0e 86 15 00 46 23 | . .&. :|. ....F#|
|00000d40| 5c 03 8d 20 0e 86 15 00 | 4c 23 66 03 81 00 7c 23 |\.. ....|L#f...|#|
|00000d50| e8 03 3a 8f d9 20 20 20 | 20 20 20 20 20 20 20 2a |..:.. | *|
|00000d60| 2a 2a 2a 2a 20 20 54 49 | 54 4c 45 20 53 55 42 52 |**** TI|TLE SUBR|
|00000d70| 4f 55 54 49 4e 45 20 20 | 2a 2a 2a 2a 2a 00 bd 23 |OUTINE |*****..#|
|00000d80| f2 03 ca 20 12 2c 0f 11 | 3a 20 91 20 d6 28 0f 0a |... .,..|: . .(..|
|00000d90| 2c 22 2d 22 29 e9 22 4c | 20 41 20 42 20 45 20 4c |,"-")."L| A B E L|
|00000da0| 20 20 20 4d 20 41 20 4b | 20 45 20 52 20 20 20 36 | M A K| E R 6|
|00000db0| 2e 30 34 22 e9 d6 28 0f | 0a 2c 22 2d 22 29 00 e4 |.04"..(.|.,"-")..|
|00000dc0| 23 fc 03 ca 20 13 2c 0f | 1d 3a 20 91 22 55 53 45 |#... .,.|.: ."USE|
|00000dd0| 52 20 53 55 50 50 4f 52 | 54 45 44 20 53 4f 46 54 |R SUPPOR|TED SOFT|
|00000de0| 57 41 52 45 22 00 02 24 | 06 04 ca 20 14 2c 0f 1f |WARE"..$|... .,..|
|00000df0| 3a 20 91 22 53 65 72 69 | 61 6c 20 4e 6f 2e 22 3b |: ."Seri|al No.";|
|00000e00| 4a 53 4e 00 41 24 10 04 | ca 20 0f 17 2c 0f 14 3a |JSN.A$..|. ..,..:|
|00000e10| 20 91 22 43 6f 70 79 72 | 69 67 68 74 20 28 63 29 | ."Copyr|ight (c)|
|00000e20| 20 31 39 38 34 2c 20 31 | 39 38 35 2c 20 31 39 38 | 1984, 1|985, 198|
|00000e30| 36 20 46 6f 72 74 27 73 | 20 53 6f 66 74 77 61 72 |6 Fort's| Softwar|
|00000e40| 65 22 00 47 24 1a 04 8e | 00 8f 24 dc 05 3a 8f d9 |e".G$...|..$..:..|
|00000e50| 20 20 20 20 20 20 20 20 | 20 20 2a 2a 2a 2a 2a 20 | | ***** |
|00000e60| 20 49 4e 49 54 49 41 4c | 49 5a 45 20 41 4e 44 20 | INITIAL|IZE AND |
|00000e70| 53 45 54 20 54 48 45 20 | 50 52 49 4e 54 45 52 20 |SET THE |PRINTER |
|00000e80| 46 4f 52 20 54 49 54 4c | 45 20 20 2a 2a 2a 2a 2a |FOR TITL|E *****|
|00000e90| 00 cc 24 e6 05 9d 20 ff | 96 28 0f 1b 29 22 38 22 |..$... .|.(..)"8"|
|00000ea0| 3b 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |; | |
|00000eb0| 20 3a 8f d9 20 44 49 53 | 41 42 4c 45 20 50 41 50 | :.. DIS|ABLE PAP|
|00000ec0| 45 52 2d 45 4e 44 20 53 | 49 47 4e 41 4c 00 0a 25 |ER-END S|IGNAL..%|
|00000ed0| f0 05 9d 20 ff 96 28 0f | 1b 29 22 33 22 3b 20 ff |... ..(.|.)"3"; .|
|00000ee0| 96 28 0f 22 29 3b 20 20 | 20 20 20 20 3a 8f d9 20 |.(."); | :.. |
|00000ef0| 53 45 54 20 54 4f 20 33 | 34 2f 32 31 36 22 20 4c |SET TO 3|4/216" L|
|00000f00| 49 4e 45 20 53 50 41 43 | 49 4e 47 00 50 25 fa 05 |INE SPAC|ING.P%..|
|00000f10| 9d 20 ff 96 28 0f 1b 29 | 22 47 22 3b 20 20 20 20 |. ..(..)|"G"; |
|00000f20| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a 8f d9 20 | | :.. |
|00000f30| 53 45 54 20 50 52 49 4e | 54 45 52 20 54 4f 20 44 |SET PRIN|TER TO D|
|00000f40| 4f 55 42 4c 45 20 53 54 | 52 49 4b 45 20 4d 4f 44 |OUBLE ST|RIKE MOD|
|00000f50| 45 00 93 25 04 06 9d 20 | ff 96 28 0f 1b 29 22 45 |E..%... |..(..)"E|
|00000f60| 22 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |"; | |
|00000f70| 20 20 3a 8f d9 20 53 45 | 54 20 50 52 49 4e 54 45 | :.. SE|T PRINTE|
|00000f80| 52 20 54 4f 20 45 4d 50 | 48 41 53 49 5a 45 44 20 |R TO EMP|HASIZED |
|00000f90| 4d 4f 44 45 00 d4 25 0e | 06 9d 20 ff 96 28 0f 0e |MODE..%.|.. ..(..|
|00000fa0| 29 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |); | |
|00000fb0| 20 20 20 20 20 3a 8f d9 | 20 53 45 54 20 50 52 49 | :..| SET PRI|
|00000fc0| 4e 54 45 52 20 54 4f 20 | 45 4e 4c 41 52 47 45 44 |NTER TO |ENLARGED|
|00000fd0| 20 4d 4f 44 45 00 da 25 | 18 06 8e 00 1e 26 40 06 | MODE..%|.....&@.|
|00000fe0| 3a 8f d9 20 20 20 20 20 | 20 20 20 20 20 2a 2a 2a |:.. | ***|
|00000ff0| 2a 2a 20 20 52 45 49 4e | 49 54 49 41 4c 49 5a 45 |** REIN|ITIALIZE|
|00001000| 20 54 48 45 20 50 52 49 | 4e 54 45 52 20 41 46 54 | THE PRI|NTER AFT|
|00001010| 45 52 20 54 49 54 4c 45 | 20 20 2a 2a 2a 2a 2a 00 |ER TITLE| *****.|
|00001020| 5a 26 4a 06 9d 20 ff 96 | 28 0f 1b 29 22 39 22 3b |Z&J.. ..|(..)"9";|
|00001030| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001040| 3a 8f d9 20 45 4e 41 42 | 4c 45 20 50 41 50 45 52 |:.. ENAB|LE PAPER|
|00001050| 2d 45 4e 44 20 53 49 47 | 4e 41 4c 00 97 26 54 06 |-END SIG|NAL..&T.|
|00001060| 9d 20 ff 96 28 0f 1b 29 | 22 32 22 3b 20 20 20 20 |. ..(..)|"2"; |
|00001070| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a 8f d9 20 | | :.. |
|00001080| 53 45 54 20 54 4f 20 31 | 2f 36 22 20 4c 49 4e 45 |SET TO 1|/6" LINE|
|00001090| 20 53 50 41 43 49 4e 47 | 00 d5 26 5e 06 9d 20 ff | SPACING|..&^.. .|
|000010a0| 96 28 0f 1b 29 22 48 22 | 3b 20 20 20 20 20 20 20 |.(..)"H"|; |
|000010b0| 20 20 20 20 20 20 20 20 | 20 3a 8f d9 20 43 41 4e | | :.. CAN|
|000010c0| 43 45 4c 20 44 4f 55 42 | 4c 45 20 53 54 52 49 4b |CEL DOUB|LE STRIK|
|000010d0| 45 20 4d 4f 44 45 00 10 | 27 68 06 9d 20 ff 96 28 |E MODE..|'h.. ..(|
|000010e0| 0f 1b 29 22 46 22 3b 20 | 20 20 20 20 20 20 20 20 |..)"F"; | |
|000010f0| 20 20 20 20 20 20 20 3a | 8f d9 20 43 41 4e 43 45 | :|.. CANCE|
|00001100| 4c 20 45 4d 50 48 41 53 | 49 5a 45 44 20 4d 4f 44 |L EMPHAS|IZED MOD|
|00001110| 45 00 49 27 72 06 9d 20 | ff 96 28 0f 14 29 3b 20 |E.I'r.. |..(..); |
|00001120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001130| 20 20 3a 8f d9 20 43 41 | 4e 43 45 4c 20 45 4e 4c | :.. CA|NCEL ENL|
|00001140| 41 52 47 45 44 20 4d 4f | 44 45 00 4f 27 7c 06 8e |ARGED MO|DE.O'|..|
|00001150| 00 9c 27 d0 07 3a 8f d9 | 20 20 20 20 20 20 20 20 |..'..:..| |
|00001160| 20 20 2a 2a 2a 2a 2a 20 | 20 49 4e 49 54 49 41 4c | ***** | INITIAL|
|00001170| 49 5a 45 20 41 4e 44 20 | 53 45 54 20 54 48 45 20 |IZE AND |SET THE |
|00001180| 50 52 49 4e 54 45 52 20 | 46 4f 52 20 46 49 4c 45 |PRINTER |FOR FILE|
|00001190| 20 4e 41 4d 45 53 20 20 | 2a 2a 2a 2a 2a 00 d9 27 | NAMES |*****..'|
|000011a0| da 07 9d 20 ff 96 28 0f | 1b 29 22 38 22 3b 20 20 |... ..(.|.)"8"; |
|000011b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a 8f | | :.|
|000011c0| d9 20 44 49 53 41 42 4c | 45 20 50 41 50 45 52 2d |. DISABL|E PAPER-|
|000011d0| 45 4e 44 20 53 49 47 4e | 41 4c 00 17 28 e4 07 9d |END SIGN|AL..(...|
|000011e0| 20 ff 96 28 0f 1b 29 22 | 33 22 3b 20 ff 96 28 0f | ..(..)"|3"; ..(.|
|000011f0| 10 29 3b 20 20 20 20 20 | 20 3a 8f d9 20 53 45 54 |.); | :.. SET|
|00001200| 20 54 4f 20 31 36 2f 32 | 31 36 22 20 4c 49 4e 45 | TO 16/2|16" LINE|
|00001210| 20 53 50 41 43 49 4e 47 | 00 51 28 ee 07 9d 20 ff | SPACING|.Q(... .|
|00001220| 96 28 0f 1b 29 22 53 22 | 3b 20 ff 96 28 11 29 3b |.(..)"S"|; ..(.);|
|00001230| 20 20 20 20 20 20 20 3a | 8f d9 20 53 45 54 20 54 | :|.. SET T|
|00001240| 4f 20 53 55 50 45 52 53 | 43 52 49 50 54 20 4d 4f |O SUPERS|CRIPT MO|
|00001250| 44 45 00 93 28 f8 07 9d | 20 ff 96 28 0f 0f 29 3b |DE..(...| ..(..);|
|00001260| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001270| 20 20 20 3a 8f d9 20 53 | 45 54 20 50 52 49 4e 54 | :.. S|ET PRINT|
|00001280| 45 52 20 54 4f 20 43 4f | 4e 44 45 4e 53 45 44 20 |ER TO CO|NDENSED |
|00001290| 4d 4f 44 45 00 99 28 02 | 08 8e 00 e2 28 34 08 3a |MODE..(.|....(4.:|
|000012a0| 8f d9 20 20 20 20 20 20 | 20 20 20 20 2a 2a 2a 2a |.. | ****|
|000012b0| 2a 20 20 52 45 49 4e 49 | 54 49 41 4c 49 5a 45 20 |* REINI|TIALIZE |
|000012c0| 54 48 45 20 50 52 49 4e | 54 45 52 20 41 46 54 45 |THE PRIN|TER AFTE|
|000012d0| 52 20 46 49 4c 45 20 4e | 41 4d 45 53 20 20 2a 2a |R FILE N|AMES **|
|000012e0| 2a 2a 2a 00 1e 29 3e 08 | 9d 20 ff 96 28 0f 1b 29 |***..)>.|. ..(..)|
|000012f0| 22 39 22 3b 20 20 20 20 | 20 20 20 20 20 20 20 20 |"9"; | |
|00001300| 20 20 20 20 3a 8f d9 20 | 45 4e 41 42 4c 45 20 50 | :.. |ENABLE P|
|00001310| 41 50 45 52 2d 45 4e 44 | 20 53 49 47 4e 41 4c 00 |APER-END| SIGNAL.|
|00001320| 5b 29 48 08 9d 20 ff 96 | 28 0f 1b 29 22 32 22 3b |[)H.. ..|(..)"2";|
|00001330| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001340| 3a 8f d9 20 53 45 54 20 | 54 4f 20 31 2f 36 22 20 |:.. SET |TO 1/6" |
|00001350| 4c 49 4e 45 20 53 50 41 | 43 49 4e 47 00 97 29 52 |LINE SPA|CING..)R|
|00001360| 08 9d 20 ff 96 28 0f 1b | 29 22 54 22 3b 20 20 20 |.. ..(..|)"T"; |
|00001370| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a 8f d9 | | :..|
|00001380| 20 43 41 4e 43 45 4c 20 | 53 55 50 45 52 53 43 52 | CANCEL |SUPERSCR|
|00001390| 49 50 54 20 4d 4f 44 45 | 00 d1 29 5c 08 9d 20 ff |IPT MODE|..)\.. .|
|000013a0| 96 28 0f 12 29 3b 20 20 | 20 20 20 20 20 20 20 20 |.(..); | |
|000013b0| 20 20 20 20 20 20 20 20 | 20 3a 8f d9 20 43 41 4e | | :.. CAN|
|000013c0| 43 45 4c 20 43 4f 4e 44 | 45 4e 53 45 44 20 4d 4f |CEL COND|ENSED MO|
|000013d0| 44 45 00 d7 29 66 08 8e | 00 07 2a b8 0b 3a 8f d9 |DE..)f..|..*..:..|
|000013e0| 20 20 20 20 20 20 20 20 | 20 20 2a 2a 2a 2a 2a 20 | | ***** |
|000013f0| 20 49 4e 4b 45 59 20 53 | 55 42 52 4f 55 54 49 4e | INKEY S|UBROUTIN|
|00001400| 45 20 20 2a 2a 2a 2a 2a | 00 33 2a c2 0b 57 24 e7 |E *****|.3*..W$.|
|00001410| 22 22 3a 20 49 4e 24 e7 | 22 22 3a 20 43 46 e7 11 |"": IN$.|"": CF..|
|00001420| 3a 20 57 44 e7 11 3a 20 | 57 53 e7 57 44 3a 20 57 |: WD..: |WS.WD: W|
|00001430| 4c e7 57 44 00 61 2a cc | 0b 91 20 d6 28 ff 86 28 |L.WD.a*.|.. .(..(|
|00001440| 46 4c 29 2c 20 ff 96 28 | 0f fe 29 29 3a 20 ca 20 |FL), ..(|..)): . |
|00001450| 59 2c 58 3a 20 8b 20 46 | 4c e7 11 20 cd 20 46 4c |Y,X: . F|L.. . FL|
|00001460| e7 12 00 6a 2a d6 0b 57 | 24 e7 de 00 84 2a e0 0b |...j*..W|$....*..|
|00001470| 8b 20 57 24 e8 e6 22 22 | 20 cd 20 0e ea 0b 20 3a |. W$..""| . ... :|
|00001480| a1 20 0e d6 0b 00 9b 2a | ea 0b 8b 20 57 24 e8 e6 |. .....*|... W$..|
|00001490| ff 96 28 0f 0d 29 20 cd | 20 0e 08 0c 00 bd 2a f4 |..(..) .| .....*.|
|000014a0| 0b ca 20 59 2c 58 e9 57 | 4c 3a 20 91 20 d6 28 ff |.. Y,X.W|L: . .(.|
|000014b0| 86 28 46 4c 29 ea 57 4c | 2c 22 20 22 29 3b 00 c3 |.(FL).WL|," ");..|
|000014c0| 2a fe 0b 8e 00 d9 2a 08 | 0c 8b 20 ff 92 28 57 24 |*.....*.|.. ..(W$|
|000014d0| 29 e8 e6 13 20 cd 20 0e | 26 0c 00 e2 2a 12 0c 43 |)... . .|&...*..C|
|000014e0| 46 e7 12 00 e8 2a 1c 0c | 8e 00 fe 2a 26 0c 8b 20 |F....*..|...*&.. |
|000014f0| 57 24 e8 e6 ff 96 28 19 | 29 20 cd 20 0e 4e 0c 00 |W$....(.|) . .N..|
|00001500| 2b 2b 30 0c 8b 20 57 4c | e6 11 20 cd 20 57 4c e7 |++0.. WL|.. . WL.|
|00001510| 57 4c ea 12 3a 20 49 4e | 24 e7 ff 81 28 49 4e 24 |WL..: IN|$...(IN$|
|00001520| 2c 57 4c 29 3a 20 3a a1 | 20 0e 4e 0c 00 4a 2b 3a |,WL): :.| .N..J+:|
|00001530| 0c ca 20 59 2c 58 3a 20 | 91 20 d6 28 ff 86 28 46 |.. Y,X: |. .(..(F|
|00001540| 4c 29 2c 20 ff 96 28 0f | fe 29 29 00 62 2b 44 0c |L), ..(.|.)).b+D.|
|00001550| ca 20 59 2c 58 3a 20 91 | 20 49 4e 24 3a 20 89 20 |. Y,X: .| IN$: . |
|00001560| 0e d6 0b 00 8f 2b 4e 0c | 8b 20 57 24 e7 ff 96 28 |.....+N.|. W$...(|
|00001570| 0f 1b 29 20 cd 20 57 4c | e7 11 3a 20 49 4e 24 e7 |..) . WL|..: IN$.|
|00001580| 22 22 3a 20 ca 20 59 2c | 58 3a 20 89 20 0e cc 0b |"": . Y,|X: . ...|
|00001590| 00 a5 2b 58 0c 8b 20 ff | 86 28 46 4c 29 e7 57 4c |..+X.. .|.(FL).WL|
|000015a0| 20 cd 20 0e d6 0b 00 cc | 2b 62 0c 8b 20 46 4c e6 | . .....|+b.. FL.|
|000015b0| 11 20 cd 20 8b 20 57 24 | e6 e7 22 20 22 20 ee 20 |. . . W$|.." " . |
|000015c0| 57 24 e8 e7 22 7a 22 20 | cd 20 0e 76 0c 00 e8 2b |W$.."z" |. .v...+|
|000015d0| 6c 0c 8b 20 57 24 e8 22 | 30 22 20 ef 20 57 24 e6 |l.. W$."|0" . W$.|
|000015e0| 22 39 22 20 cd 20 0e c2 | 0b 00 fc 2b 76 0c ca 20 |"9" . ..|...+v.. |
|000015f0| 59 2c 58 e9 57 4c 3a 20 | 91 20 57 24 3b 00 0b 2c |Y,X.WL: |. W$;..,|
|00001600| 80 0c 49 4e 24 e7 49 4e | 24 e9 57 24 00 17 2c 8a |..IN$.IN|$.W$..,.|
|00001610| 0c 57 4c e7 57 4c e9 12 | 00 2a 2c 94 0c 8b 20 ff |.WL.WL..|.*,... .|
|00001620| 86 28 46 4c 29 e7 12 20 | cd 20 8e 00 34 2c 9e 0c |.(FL).. |. ..4,..|
|00001630| 89 20 0e d6 0b 00 6e 2c | e4 0c 3a 8f d9 20 20 20 |. ....n,|..:.. |
|00001640| 20 20 20 20 20 20 20 2a | 2a 2a 2a 2a 20 53 49 4e | *|**** SIN|
|00001650| 47 4c 45 20 4b 45 59 20 | 49 4e 4b 45 59 20 53 55 |GLE KEY |INKEY SU|
|00001660| 42 52 4f 55 54 49 4e 45 | 20 20 2a 2a 2a 2a 2a 00 |BROUTINE| *****.|
|00001670| 79 2c ee 0c 49 4e 24 e7 | 22 22 00 93 2c f8 0c 49 |y,..IN$.|""..,..I|
|00001680| 4e 24 e7 de 3a 20 8b 20 | 49 4e 24 e7 22 22 20 cd |N$..: . |IN$."" .|
|00001690| 20 0e f8 0c 00 99 2c 02 | 0d 8e 00 ca 2c ac 0d 3a | .....,.|....,..:|
|000016a0| 8f d9 20 20 20 20 20 20 | 20 20 20 20 2a 2a 2a 2a |.. | ****|
|000016b0| 2a 20 20 50 52 4f 4d 50 | 54 20 53 55 42 52 4f 55 |* PROMP|T SUBROU|
|000016c0| 54 49 4e 45 20 20 2a 2a | 2a 2a 2a 00 f4 2c b6 0d |TINE **|***..,..|
|000016d0| 91 3a 20 91 20 ce 0f 0a | 29 22 49 66 20 74 68 65 |.: . ...|)"If the|
|000016e0| 20 6c 61 62 65 6c 20 69 | 73 20 6c 69 6e 65 64 20 | label i|s lined |
|000016f0| 75 70 3a 20 22 00 15 2d | c0 0d 91 20 ce 0f 14 29 |up: "..-|... ...)|
|00001700| 22 48 69 74 20 3c 43 3e | 20 74 6f 20 63 6f 6e 74 |"Hit <C>| to cont|
|00001710| 69 6e 75 65 20 22 00 32 | 2d ca 0d 91 20 ce 0f 14 |inue ".2|-... ...|
|00001720| 29 22 48 69 74 20 3c 41 | 3e 20 74 6f 20 61 62 6f |)"Hit <A|> to abo|
|00001730| 72 74 22 00 65 2d d4 0d | 91 20 ce 0f 14 29 22 48 |rt".e-..|. ...)"H|
|00001740| 69 74 20 3c 45 3e 20 74 | 6f 20 65 64 69 74 20 74 |it <E> t|o edit t|
|00001750| 68 65 20 74 69 74 6c 65 | 20 6f 72 20 63 6f 6d 6d |he title| or comm|
|00001760| 65 6e 74 73 2e 22 00 97 | 2d de 0d 91 20 ce 0f 14 |ents."..|-... ...|
|00001770| 29 22 48 69 74 20 3c 4c | 3e 20 74 6f 20 63 68 61 |)"Hit <L|> to cha|
|00001780| 6e 67 65 20 74 68 65 20 | 73 69 7a 65 20 6f 66 20 |nge the |size of |
|00001790| 6c 61 62 65 6c 73 2e 22 | 00 bb 2d e8 0d 91 20 ce |labels."|..-... .|
|000017a0| 0f 1e 29 20 22 45 6e 74 | 65 72 20 79 6f 75 72 20 |..) "Ent|er your |
|000017b0| 73 65 6c 65 63 74 69 6f | 6e 2d 2d 22 00 de 2d f2 |selectio|n--"..-.|
|000017c0| 0d 58 e7 0f 35 3a 20 59 | e7 db ea 12 3a 20 ca 20 |.X..5: Y|....: . |
|000017d0| 59 2c 58 3a 20 8b 20 4a | 53 e7 12 20 cd 20 c5 00 |Y,X: . J|S.. . ..|
|000017e0| e8 2d fc 0d 8d 20 0e ee | 0c 00 06 2e 06 0e 8b 20 |.-... ..|....... |
|000017f0| 49 4e 24 e7 22 43 22 20 | ef 20 49 4e 24 e7 22 63 |IN$."C" |. IN$."c|
|00001800| 22 20 cd 20 0e 26 02 00 | 24 2e 10 0e 8b 20 49 4e |" . .&..|$.... IN|
|00001810| 24 e7 22 41 22 20 ef 20 | 49 4e 24 e7 22 61 22 20 |$."A" . |IN$."a" |
|00001820| cd 20 0e 4e 16 00 42 2e | 1a 0e 8b 20 49 4e 24 e7 |. .N..B.|... IN$.|
|00001830| 22 45 22 20 ef 20 49 4e | 24 e7 22 65 22 20 cd 20 |"E" . IN|$."e" . |
|00001840| 0e 4a 1f 00 60 2e 24 0e | 8b 20 49 4e 24 e7 22 4c |.J..`.$.|. IN$."L|
|00001850| 22 20 ef 20 49 4e 24 e7 | 22 6c 22 20 cd 20 0e 32 |" . IN$.|"l" . .2|
|00001860| 23 00 6d 2e 2e 0e 91 3a | 20 89 20 0e f2 0d 00 ab |#.m....:| . .....|
|00001870| 2e a0 0f 3a 8f d9 20 20 | 20 20 20 20 20 20 20 20 |...:.. | |
|00001880| 2a 2a 2a 2a 2a 20 20 50 | 52 49 4e 54 20 54 49 54 |***** P|RINT TIT|
|00001890| 4c 45 20 46 4f 52 20 45 | 50 53 4f 4e 20 50 52 49 |LE FOR E|PSON PRI|
|000018a0| 4e 54 45 52 53 20 20 2a | 2a 2a 2a 2a 00 eb 2e aa |NTERS *|****....|
|000018b0| 0f 8b 20 50 52 49 4e 54 | 45 52 46 4c 41 47 e7 12 |.. PRINT|ERFLAG..|
|000018c0| 20 cd 20 8d 20 0e e6 05 | 20 20 20 20 20 20 20 20 | . . ...| |
|000018d0| 20 20 20 3a 8f d9 20 53 | 45 54 20 50 52 49 4e 54 | :.. S|ET PRINT|
|000018e0| 45 52 20 46 4f 52 20 54 | 49 54 4c 45 00 30 2f b4 |ER FOR T|ITLE.0/.|
|000018f0| 0f 3a 8f d9 20 50 52 49 | 4e 54 3a 20 50 52 49 4e |.:.. PRI|NT: PRIN|
|00001900| 54 20 23 32 2c 20 44 49 | 53 4b 4e 41 4d 45 24 20 |T #2, DI|SKNAME$ |
|00001910| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001920| 27 20 50 52 49 4e 54 20 | 44 49 53 4b 20 4e 41 4d |' PRINT |DISK NAM|
|00001930| 45 00 4b 2f b5 0f 8b 20 | 56 50 24 e7 22 56 22 20 |E.K/... |VP$."V" |
|00001940| cd 20 0e b6 0f 20 3a a1 | 20 0e ba 0f 00 82 2f b6 |. ... :.| ...../.|
|00001950| 0f 91 3a 20 91 20 44 49 | 53 4b 4e 41 4d 45 24 3a |..: . DI|SKNAME$:|
|00001960| 20 89 20 0e be 0f 20 20 | 20 20 20 20 20 20 20 20 | . ... | |
|00001970| 3a 8f d9 20 50 52 49 4e | 54 20 44 49 53 4b 20 4e |:.. PRIN|T DISK N|
|00001980| 41 4d 45 00 c0 2f ba 0f | 9d 20 44 49 53 4b 4e 41 |AME../..|. DISKNA|
|00001990| 4d 45 24 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ME$ | |
|000019a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a 8f | | :.|
|000019b0| d9 20 50 52 49 4e 54 20 | 44 49 53 4b 20 4e 41 4d |. PRINT |DISK NAM|
|000019c0| 45 00 da 2f be 0f 4c 49 | 4e 45 43 4f 55 4e 54 e7 |E../..LI|NECOUNT.|
|000019d0| 4c 49 4e 45 43 4f 55 4e | 54 e9 12 00 fd 2f c8 0f |LINECOUN|T..../..|
|000019e0| 8b 20 50 52 49 4e 54 45 | 52 46 4c 41 47 e7 12 20 |. PRINTE|RFLAG.. |
|000019f0| cd 20 8d 20 0e 4a 06 3a | 20 8d 20 0e da 07 00 43 |. . .J.:| . ....C|
|00001a00| 30 d2 0f 4c 41 42 45 4c | 24 e7 d1 20 42 24 28 4c |0..LABEL|$.. B$(L|
|00001a10| 4c 29 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |L) | |
|00001a20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a 8f d9 | | :..|
|00001a30| 20 53 45 54 20 54 4f 20 | 50 52 49 4e 54 20 41 20 | SET TO |PRINT A |
|00001a40| 4c 49 4e 45 00 49 30 dc | 0f 8e 00 96 30 94 11 3a |LINE.I0.|....0..:|
|00001a50| 8f d9 20 20 20 20 20 20 | 20 20 20 20 2a 2a 2a 2a |.. | ****|
|00001a60| 2a 20 20 53 45 54 20 50 | 52 49 4e 54 45 52 20 41 |* SET P|RINTER A|
|00001a70| 4e 44 20 50 52 49 4e 54 | 20 54 49 54 4c 45 20 46 |ND PRINT| TITLE F|
|00001a80| 4f 52 20 4f 54 48 45 52 | 20 50 52 49 4e 54 45 52 |OR OTHER| PRINTER|
|00001a90| 53 20 2a 2a 2a 2a 2a 00 | b2 30 9e 11 8b 20 50 52 |S *****.|.0... PR|
|00001aa0| 49 4e 54 45 52 46 4c 41 | 47 e7 11 20 cd 20 89 20 |INTERFLA|G.. . . |
|00001ab0| 0e ee 11 00 f4 30 a8 11 | 9d 20 ff 96 28 0f 12 29 |.....0..|. ..(..)|
|00001ac0| 3b 3a 20 9d 20 ff 96 28 | 0f 14 29 3b 20 20 20 20 |;: . ..(|..); |
|00001ad0| 20 20 20 20 20 3a 8f d9 | 20 43 41 4e 43 45 4c 20 | :..| CANCEL |
|00001ae0| 43 4f 4e 44 20 26 20 45 | 4e 4c 20 50 52 49 4e 54 |COND & E|NL PRINT|
|00001af0| 20 4d 4f 44 45 00 3d 31 | b2 11 9d 20 ff 96 28 0f | MODE.=1|... ..(.|
|00001b00| 0e 29 3b 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.); | |
|00001b10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a 8f | | :.|
|00001b20| d9 20 53 45 54 20 50 52 | 49 4e 54 45 52 20 54 4f |. SET PR|INTER TO|
|00001b30| 20 45 4e 4c 41 52 47 45 | 44 20 4d 4f 44 45 00 8b | ENLARGE|D MODE..|
|00001b40| 31 bc 11 3a 8f d9 20 57 | 49 44 54 48 20 23 32 2c |1..:.. W|IDTH #2,|
|00001b50| 32 35 35 3a 20 50 52 49 | 4e 54 20 23 32 2c 20 44 |255: PRI|NT #2, D|
|00001b60| 49 53 4b 4e 41 4d 45 24 | 20 20 20 20 20 20 20 20 |ISKNAME$| |
|00001b70| 20 20 27 20 50 52 49 4e | 54 20 44 49 53 4b 20 4e | ' PRIN|T DISK N|
|00001b80| 41 4d 45 20 54 4f 20 4c | 41 42 45 4c 00 d3 31 c1 |AME TO L|ABEL..1.|
|00001b90| 11 91 20 44 49 53 4b 4e | 41 4d 45 24 20 20 20 20 |.. DISKN|AME$ |
|00001ba0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001bb0| 20 20 20 20 20 20 20 20 | 3a 8f d9 20 50 52 49 4e | |:.. PRIN|
|00001bc0| 54 20 44 49 53 4b 20 4e | 41 4d 45 20 54 4f 20 4c |T DISK N|AME TO L|
|00001bd0| 41 42 45 4c 00 e7 31 c6 | 11 3a 8f d9 20 57 49 44 |ABEL..1.|.:.. WID|
|00001be0| 54 48 20 23 32 2c 38 30 | 00 01 32 d0 11 4c 49 4e |TH #2,80|..2..LIN|
|00001bf0| 45 43 4f 55 4e 54 e7 4c | 49 4e 45 43 4f 55 4e 54 |ECOUNT.L|INECOUNT|
|00001c00| e9 12 00 42 32 da 11 9d | 20 ff 96 28 0f 14 29 3b |...B2...| ..(..);|
|00001c10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c20| 20 20 20 20 20 20 20 20 | 20 20 20 3a 8f d9 20 43 | | :.. C|
|00001c30| 41 4e 43 45 4c 20 45 4e | 4c 41 52 47 45 44 20 4d |ANCEL EN|LARGED M|
|00001c40| 4f 44 45 00 8c 32 e4 11 | 9d 20 ff 96 28 0f 0f 29 |ODE..2..|. ..(..)|
|00001c50| 3b 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |; | |
|00001c60| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a 8f d9 20 | | :.. |
|00001c70| 53 45 54 20 50 52 49 4e | 54 45 52 20 54 4f 20 43 |SET PRIN|TER TO C|
|00001c80| 4f 4e 44 45 4e 53 45 44 | 20 4d 4f 44 45 00 a1 32 |ONDENSED| MODE..2|
|00001c90| ee 11 4c 41 42 45 4c 24 | e7 d6 28 0f 40 2c 22 5f |..LABEL$|..(.@,"_|
|00001ca0| 22 29 00 e8 32 f8 11 3a | 8f d9 20 49 46 20 50 52 |")..2..:|.. IF PR|
|00001cb0| 49 4e 54 45 52 46 4c 41 | 47 3d 31 20 54 48 45 4e |INTERFLA|G=1 THEN|
|00001cc0| 20 52 45 54 55 52 4e 20 | 45 4c 53 45 20 50 52 49 | RETURN |ELSE PRI|
|00001cd0| 4e 54 20 23 32 2c 20 44 | 49 53 4b 4e 41 4d 45 24 |NT #2, D|ISKNAME$|
|00001ce0| 3b 3a 20 52 45 54 55 52 | 4e 00 13 33 fd 11 8b 20 |;: RETUR|N..3... |
|00001cf0| 50 52 49 4e 54 45 52 46 | 4c 41 47 e7 12 20 cd 20 |PRINTERF|LAG.. . |
|00001d00| 8e 20 3a a1 20 91 20 44 | 49 53 4b 4e 41 4d 45 24 |. :. . D|ISKNAME$|
|00001d10| 3b 3a 20 8e 00 3d 33 88 | 13 3a 8f d9 20 20 20 20 |;: ..=3.|.:.. |
|00001d20| 20 20 20 20 20 20 2a 2a | 2a 2a 2a 20 20 50 52 49 | **|*** PRI|
|00001d30| 4e 54 20 4c 49 4e 45 20 | 20 2a 2a 2a 2a 2a 00 58 |NT LINE | *****.X|
|00001d40| 33 92 13 8b 20 4c 49 4e | 45 43 4f 55 4e 54 e8 e6 |3... LIN|ECOUNT..|
|00001d50| 11 20 cd 20 89 20 0e d8 | 13 00 7e 33 9c 13 8b 20 |. . . ..|..~3... |
|00001d60| 4a e6 43 4e 25 20 cd 20 | 8b 20 4b 4f 55 4e 54 e7 |J.CN% . |. KOUNT.|
|00001d70| 11 20 cd 20 49 43 4f 4d | 4d 45 4e 54 53 e7 12 00 |. . ICOM|MENTS...|
|00001d80| 9e 33 a6 13 8b 20 4a e6 | 43 4e 25 20 cd 20 8b 20 |.3... J.|CN% . . |
|00001d90| 49 43 4f 4d 4d 45 4e 54 | 53 e7 12 20 cd 20 8e 00 |ICOMMENT|S.. . ..|
|00001da0| fb 33 b0 13 8b 20 4a 4c | 41 42 45 4c 20 e7 11 20 |.3... JL|ABEL .. |
|00001db0| cd 20 89 20 0e c4 13 20 | 3a a1 20 8b 20 4a 4c 41 |. . ... |:. . JLA|
|00001dc0| 42 45 4c e8 15 20 ee 20 | 50 52 49 4e 54 45 52 46 |BEL.. . |PRINTERF|
|00001dd0| 4c 41 47 e7 11 20 cd 20 | 91 3a 20 85 22 48 69 74 |LAG.. . |.: ."Hit|
|00001de0| 20 3c 45 4e 54 45 52 3e | 20 74 6f 20 63 6f 6e 74 | <ENTER>| to cont|
|00001df0| 69 6e 75 65 22 3b 5a 5a | 24 3a 20 91 00 13 34 ba |inue";ZZ|$: ...4.|
|00001e00| 13 8b 20 4a 4c 41 42 45 | 4c e6 e7 15 20 cd 20 89 |.. JLABE|L... . .|
|00001e10| 20 0e 86 15 00 36 34 c4 | 13 8b 20 54 59 50 45 50 | ....64.|.. TYPEP|
|00001e20| 52 49 4e 54 45 52 24 e7 | 22 45 50 53 4f 4e 22 20 |RINTER$.|"EPSON" |
|00001e30| cd 20 8d 20 0e aa 0f 00 | 59 34 ce 13 8b 20 54 59 |. . ....|Y4... TY|
|00001e40| 50 45 50 52 49 4e 54 45 | 52 24 e7 22 4f 54 48 45 |PEPRINTE|R$."OTHE|
|00001e50| 52 22 20 cd 20 8d 20 0e | 9e 11 00 72 34 d8 13 3a |R" . . .|...r4..:|
|00001e60| 8f d9 20 50 52 49 4e 54 | 20 23 32 2c 20 4c 41 42 |.. PRINT| #2, LAB|
|00001e70| 45 4c 24 00 92 34 db 13 | 8b 20 56 50 24 e7 22 56 |EL$..4..|. VP$."V|
|00001e80| 22 20 cd 20 91 20 4c 41 | 42 45 4c 24 3a 20 89 20 |" . . LA|BEL$: . |
|00001e90| 0e e2 13 00 9f 34 de 13 | 9d 20 4c 41 42 45 4c 24 |.....4..|. LABEL$|
|00001ea0| 00 b9 34 e2 13 4c 49 4e | 45 43 4f 55 4e 54 e7 4c |..4..LIN|ECOUNT.L|
|00001eb0| 49 4e 45 43 4f 55 4e 54 | e9 12 00 dd 34 ec 13 8b |INECOUNT|....4...|
|00001ec0| 20 4c 49 4e 45 43 4f 55 | 4e 54 e7 4c 49 4e 45 53 | LINECOU|NT.LINES|
|00001ed0| 2e 50 45 52 2e 4c 41 42 | 45 4c 20 cd 20 8e 00 e3 |.PER.LAB|EL . ...|
|00001ee0| 34 f6 13 8e 00 23 35 7c | 15 3a 8f d9 20 20 20 20 |4....#5||.:.. |
|00001ef0| 20 20 20 20 20 20 2a 2a | 2a 2a 2a 20 20 45 4e 44 | **|*** END|
|00001f00| 20 50 52 4f 47 52 41 4d | 20 4f 52 20 50 52 49 4e | PROGRAM| OR PRIN|
|00001f10| 54 20 4d 4f 52 45 20 4c | 41 42 45 4c 53 20 20 2a |T MORE L|ABELS *|
|00001f20| 2a 2a 2a 2a 00 68 35 86 | 15 bb 20 13 3a 20 91 3a |****.h5.|.. .: .:|
|00001f30| 20 91 22 44 4f 20 59 4f | 55 20 57 41 4e 54 20 54 | ."DO YO|U WANT T|
|00001f40| 4f 20 50 52 49 4e 54 20 | 4d 4f 52 45 20 4c 41 42 |O PRINT |MORE LAB|
|00001f50| 45 4c 53 20 46 4f 52 20 | 54 48 49 53 20 44 49 53 |ELS FOR |THIS DIS|
|00001f60| 4b 20 28 59 2f 4e 29 3f | 22 00 8b 35 90 15 58 e7 |K (Y/N)?|"..5..X.|
|00001f70| 0f 31 3a 20 59 e7 db ea | 12 3a 20 ca 20 59 2c 58 |.1: Y...|.: . Y,X|
|00001f80| 3a 20 8b 20 4a 53 e7 12 | 20 cd 20 c5 00 95 35 9a |: . JS..| . ...5.|
|00001f90| 15 8d 20 0e ee 0c 00 e4 | 35 a4 15 8b 20 49 4e 24 |.. .....|5... IN$|
|00001fa0| e7 22 59 22 20 ef 20 49 | 4e 24 e7 22 79 22 20 cd |."Y" . I|N$."y" .|
|00001fb0| 20 4c 49 4e 45 43 4f 55 | 4e 54 e7 11 3a 20 4a e7 | LINECOU|NT..: J.|
|00001fc0| 12 3a 20 4a 4c 41 42 45 | 4c e7 11 3a 20 49 43 4f |.: JLABE|L..: ICO|
|00001fd0| 4d 4d 45 4e 54 53 e7 11 | 3a 20 4e 4c e7 11 3a 20 |MMENTS..|: NL..: |
|00001fe0| 89 20 0e 9a 01 00 0e 36 | ae 15 8b 20 49 4e 24 e7 |. .....6|... IN$.|
|00001ff0| 22 4e 22 20 ef 20 49 4e | 24 e7 22 6e 22 20 cd 20 |"N" . IN|$."n" . |
|00002000| 0e a8 16 20 3a a1 20 91 | 3a 20 89 20 0e 90 15 00 |... :. .|: . ....|
|00002010| 4d 36 44 16 3a 8f d9 20 | 20 20 20 20 20 20 20 20 |M6D.:.. | |
|00002020| 20 2a 2a 2a 2a 2a 20 20 | 53 54 41 52 54 20 50 52 | ***** |START PR|
|00002030| 4f 47 52 41 4d 20 4f 56 | 45 52 20 4f 52 20 54 45 |OGRAM OV|ER OR TE|
|00002040| 52 4d 49 4e 41 54 45 20 | 20 2a 2a 2a 2a 2a 00 76 |RMINATE | *****.v|
|00002050| 36 4e 16 c0 3a 20 bb 20 | 23 13 3a 20 ca 20 16 2c |6N..: . |#.: . .,|
|00002060| 0f 0a 3a 20 91 20 22 44 | 6f 20 79 6f 75 20 77 61 |..: . "D|o you wa|
|00002070| 6e 74 20 74 6f 3a 22 00 | a8 36 58 16 ca 20 18 2c |nt to:".|.6X.. .,|
|00002080| 0f 14 3a 20 91 20 22 3c | 53 3e 74 61 72 74 20 74 |..: . "<|S>tart t|
|00002090| 68 65 20 70 72 69 6e 74 | 20 72 6f 75 74 69 6e 65 |he print| routine|
|000020a0| 20 6f 76 65 72 20 6f 72 | 22 00 d1 36 62 16 ca 20 | over or|"..6b.. |
|000020b0| 19 2c 0f 14 3a 20 91 20 | 22 3c 54 3e 65 72 6d 69 |.,..: . |"<T>ermi|
|000020c0| 6e 61 74 65 20 74 68 65 | 20 70 72 6f 67 72 61 6d |nate the| program|
|000020d0| 3f 22 00 f7 36 6c 16 ca | 20 0f 0a 2c 0f 1e 3a 20 |?"..6l..| ..,..: |
|000020e0| 91 20 22 45 6e 74 65 72 | 20 79 6f 75 72 20 73 65 |. "Enter| your se|
|000020f0| 6c 65 63 74 69 6f 6e 22 | 00 19 37 76 16 58 e7 0f |lection"|..7v.X..|
|00002100| 34 3a 20 59 e7 0f 0a 3a | 20 ca 20 59 2c 58 3a 20 |4: Y...:| . Y,X: |
|00002110| 8b 20 4a 53 e7 12 20 cd | 20 c5 00 23 37 80 16 8d |. JS.. .| ..#7...|
|00002120| 20 0e ee 0c 00 46 37 8a | 16 8b 20 49 4e 24 e7 22 | ....F7.|.. IN$."|
|00002130| 53 22 20 ef 20 49 4e 24 | e7 22 73 22 20 cd 20 c0 |S" . IN$|."s" . .|
|00002140| 3a 20 89 20 0e 9a 01 00 | 64 37 94 16 8b 20 49 4e |: . ....|d7... IN|
|00002150| 24 e7 22 54 22 20 ef 20 | 49 4e 24 e7 22 74 22 20 |$."T" . |IN$."t" |
|00002160| cd 20 0e a8 16 00 6e 37 | 9e 16 89 20 0e 76 16 00 |. ....n7|... .v..|
|00002170| 9e 37 a8 16 8b 20 50 52 | 49 4e 54 45 52 46 4c 41 |.7... PR|INTERFLA|
|00002180| 47 e7 12 20 cd 20 8d 20 | 0e 4a 06 3a 20 8d 20 0e |G.. . . |.J.: . .|
|00002190| 3e 08 3a 20 c0 3a 20 fe | 83 20 3a a1 20 fe 83 00 |>.: .: .|. :. ...|
|000021a0| d1 37 70 17 3a 8f d9 20 | 20 20 20 20 20 20 20 20 |.7p.:.. | |
|000021b0| 20 2a 2a 2a 2a 2a 20 20 | 50 52 49 4e 54 20 41 4e | ***** |PRINT AN|
|000021c0| 4f 54 48 45 52 20 4c 41 | 42 45 4c 20 20 2a 2a 2a |OTHER LA|BEL ***|
|000021d0| 2a 2a 00 e7 37 7a 17 c0 | 3a 20 8b 20 4e 4c e6 12 |**..7z..|: . NL..|
|000021e0| 20 cd 20 89 20 0e de 17 | 00 25 38 84 17 ca 20 19 | . . ...|.%8... .|
|000021f0| 2c 0f 0f 3a 20 91 20 22 | 49 53 20 4f 4e 45 20 4f |,..: . "|IS ONE O|
|00002200| 46 20 54 48 45 20 4c 41 | 42 45 4c 53 20 46 4f 52 |F THE LA|BELS FOR|
|00002210| 20 41 20 4d 41 53 54 45 | 52 20 44 49 53 4b 20 28 | A MASTE|R DISK (|
|00002220| 59 2f 4e 29 3f 22 00 46 | 38 8e 17 58 e7 0f 3e 3a |Y/N)?".F|8..X..>:|
|00002230| 20 59 e7 19 3a 20 ca 20 | 59 2c 58 3a 20 8b 20 4a | Y..: . |Y,X: . J|
|00002240| 53 e7 12 20 cd 20 c5 00 | 50 38 98 17 8d 20 0e ee |S.. . ..|P8... ..|
|00002250| 0c 00 70 38 a2 17 8b 20 | 49 4e 24 e7 22 59 22 20 |..p8... |IN$."Y" |
|00002260| ef 20 49 4e 24 e7 22 79 | 22 20 cd 20 89 20 0e c0 |. IN$."y|" . . ..|
|00002270| 17 00 90 38 ac 17 8b 20 | 49 4e 24 e7 22 4e 22 20 |...8... |IN$."N" |
|00002280| ef 20 49 4e 24 e7 22 6e | 22 20 cd 20 89 20 0e de |. IN$."n|" . . ..|
|00002290| 17 00 9a 38 b6 17 89 20 | 0e 8e 17 00 b6 38 c0 17 |...8... |.....8..|
|000022a0| 95 20 4c 41 42 45 4c 2e | 53 49 5a 45 20 89 20 0e |. LABEL.|SIZE . .|
|000022b0| ca 17 2c 20 0e d4 17 00 | dd 38 ca 17 44 49 53 4b |.., ....|.8..DISK|
|000022c0| 4e 41 4d 45 24 e7 ff 81 | 28 44 49 53 4b 4e 41 4d |NAME$...|(DISKNAM|
|000022d0| 45 24 2c 0f 0f 29 e9 22 | 20 4d 22 3a 20 8e 00 03 |E$,..)."| M": ...|
|000022e0| 39 d4 17 44 49 53 4b 4e | 41 4d 45 24 e7 ff 81 28 |9..DISKN|AME$...(|
|000022f0| 44 49 53 4b 4e 41 4d 45 | 24 2c 0f 12 29 e9 22 4d |DISKNAME|$,..)."M|
|00002300| 22 3a 20 8e 00 1f 39 de | 17 95 20 4c 41 42 45 4c |": ...9.|.. LABEL|
|00002310| 2e 53 49 5a 45 20 89 20 | 0e e8 17 2c 20 0e f2 17 |.SIZE . |..., ...|
|00002320| 00 4d 39 e8 17 44 49 53 | 4b 4e 41 4d 45 24 e7 ff |.M9..DIS|KNAME$..|
|00002330| 81 28 44 49 53 4b 4e 41 | 4d 45 24 2c 0f 0f 29 e9 |.(DISKNA|ME$,..).|
|00002340| 22 20 22 20 3a 20 8e 20 | 3a a1 20 0e 7a 17 00 7b |" " : . |:. .z..{|
|00002350| 39 f2 17 44 49 53 4b 4e | 41 4d 45 24 e7 ff 81 28 |9..DISKN|AME$...(|
|00002360| 44 49 53 4b 4e 41 4d 45 | 24 2c 0f 12 29 e9 22 20 |DISKNAME|$,..)." |
|00002370| 22 20 3a 20 8e 20 3a a1 | 20 0e 7a 17 00 ae 39 64 |" : . :.| .z...9d|
|00002380| 19 3a 8f d9 20 20 20 20 | 20 20 20 20 20 20 2a 2a |.:.. | **|
|00002390| 2a 2a 2a 20 20 4e 45 57 | 20 50 41 47 45 20 53 55 |*** NEW| PAGE SU|
|000023a0| 42 52 4f 55 54 49 4e 45 | 20 20 2a 2a 2a 2a 2a 00 |BROUTINE| *****.|
|000023b0| d3 39 6e 19 8b 20 42 4f | 54 54 4f 4d 46 4c 41 47 |.9n.. BO|TTOMFLAG|
|000023c0| e7 12 20 cd 20 42 4f 54 | 54 4f 4d 46 4c 41 47 e7 |.. . BOT|TOMFLAG.|
|000023d0| 11 3a 20 8e 00 63 3a 78 | 19 3a 8f d9 20 49 46 20 |.: ..c:x|.:.. IF |
|000023e0| 4c 41 42 45 4c 2e 53 49 | 5a 45 3d 31 20 54 48 45 |LABEL.SI|ZE=1 THE|
|000023f0| 4e 20 50 52 49 4e 54 20 | 23 32 2c 20 44 41 54 45 |N PRINT |#2, DATE|
|00002400| 24 3b 22 20 20 22 3b 46 | 43 4f 55 4e 54 25 3b 22 |$;" ";F|COUNT%;"|
|00002410| 46 49 4c 45 53 22 3b 22 | 20 20 20 20 42 59 54 45 |FILES";"| BYTE|
|00002420| 53 3a 22 3b 42 59 54 45 | 53 55 53 45 44 3b 22 55 |S:";BYTE|SUSED;"U|
|00002430| 53 45 44 20 20 22 3b 3b | 46 52 45 45 42 59 54 45 |SED ";;|FREEBYTE|
|00002440| 53 3b 22 46 52 45 45 22 | 3a 20 4a 4c 41 42 45 4c |S;"FREE"|: JLABEL|
|00002450| 3d 4a 4c 41 42 45 4c 2b | 31 3a 20 47 4f 54 4f 20 |=JLABEL+|1: GOTO |
|00002460| 36 35 34 30 00 df 3a 82 | 19 3a 8f d9 20 50 52 49 |6540..:.|.:.. PRI|
|00002470| 4e 54 20 23 32 2c 20 44 | 41 54 45 24 3b 22 20 22 |NT #2, D|ATE$;" "|
|00002480| 3b 46 43 4f 55 4e 54 25 | 3b 22 46 49 4c 45 53 22 |;FCOUNT%|;"FILES"|
|00002490| 3b 22 20 20 46 4f 52 4d | 41 54 20 22 3b 44 53 24 |;" FORM|AT ";DS$|
|000024a0| 3b 22 20 20 42 59 54 45 | 53 3a 22 3b 42 59 54 45 |;" BYTE|S:";BYTE|
|000024b0| 53 55 53 45 44 3b 22 55 | 53 45 44 20 22 3b 3b 46 |SUSED;"U|SED ";;F|
|000024c0| 52 45 45 42 59 54 45 53 | 3b 22 46 52 45 45 22 3a |REEBYTES|;"FREE":|
|000024d0| 20 4a 4c 41 42 45 4c 3d | 4a 4c 41 42 45 4c 2b 31 | JLABEL=|JLABEL+1|
|000024e0| 00 07 3b 8c 19 3a 8f d9 | 20 49 46 20 50 52 49 4e |..;..:..| IF PRIN|
|000024f0| 54 45 52 46 4c 41 47 3d | 30 20 54 48 45 4e 20 47 |TERFLAG=|0 THEN G|
|00002500| 4f 54 4f 20 36 35 38 30 | 00 48 3b 96 19 3a 8f d9 |OTO 6580|.H;..:..|
|00002510| 20 49 46 20 54 59 50 45 | 50 52 49 4e 54 45 52 24 | IF TYPE|PRINTER$|
|00002520| 3d 22 45 50 53 4f 4e 22 | 20 54 48 45 4e 20 4c 50 |="EPSON"| THEN LP|
|00002530| 52 49 4e 54 20 43 48 52 | 24 28 32 37 29 22 33 22 |RINT CHR|$(27)"3"|
|00002540| 3b 43 48 52 24 28 31 38 | 29 00 88 3b a0 19 3a 8f |;CHR$(18|)..;..:.|
|00002550| d9 20 4c 50 52 49 4e 54 | 3a 20 49 46 20 4c 41 42 |. LPRINT|: IF LAB|
|00002560| 45 4c 2e 53 49 5a 45 3d | 31 20 54 48 45 4e 20 4c |EL.SIZE=|1 THEN L|
|00002570| 50 52 49 4e 54 20 43 48 | 52 24 28 32 37 29 22 33 |PRINT CH|R$(27)"3|
|00002580| 22 3b 43 48 52 24 28 33 | 29 00 b8 3b aa 19 3a 8f |";CHR$(3|)..;..:.|
|00002590| d9 20 49 46 20 54 59 50 | 45 50 52 49 4e 54 45 52 |. IF TYP|EPRINTER|
|000025a0| 24 3d 22 45 50 53 4f 4e | 22 20 54 48 45 4e 20 47 |$="EPSON|" THEN G|
|000025b0| 4f 53 55 42 20 32 31 31 | 30 00 d8 3b b4 19 3a 8f |OSUB 211|0..;..:.|
|000025c0| d9 20 4c 49 4e 45 43 4f | 55 4e 54 3d 30 3a 20 47 |. LINECO|UNT=0: G|
|000025d0| 4f 53 55 42 20 35 30 31 | 30 00 20 3c be 19 3a 8f |OSUB 501|0. <..:.|
|000025e0| d9 20 49 46 20 4a 3e 43 | 4e 25 20 54 48 45 4e 20 |. IF J>C|N% THEN |
|000025f0| 49 46 20 49 43 4f 4d 4d | 45 4e 54 53 3d 31 20 54 |IF ICOMM|ENTS=1 T|
|00002600| 48 45 4e 20 52 45 54 55 | 52 4e 20 45 4c 53 45 20 |HEN RETU|RN ELSE |
|00002610| 49 46 20 4a 3e 43 4e 25 | 20 47 4f 54 4f 20 38 31 |IF J>CN%| GOTO 81|
|00002620| 30 00 2f 3c c8 19 3a 8f | d9 20 52 45 54 55 52 4e |0./<..:.|. RETURN|
|00002630| 00 4a 3c d2 19 8b 20 56 | 50 24 e7 22 56 22 20 cd |.J<... V|P$."V" .|
|00002640| 20 0e 36 1a 20 3a a1 20 | 0e 9a 1a 00 8e 3c 2c 1a | .6. :. |.....<,.|
|00002650| 3a 8f d9 20 20 20 20 20 | 20 20 20 20 20 2a 2a 2a |:.. | ***|
|00002660| 2a 2a 20 20 4e 45 57 20 | 50 41 47 45 20 53 55 42 |** NEW |PAGE SUB|
|00002670| 52 4f 55 54 49 4e 45 20 | 46 4f 52 20 56 49 44 45 |ROUTINE |FOR VIDE|
|00002680| 4f 20 4f 55 54 50 55 54 | 20 20 2a 2a 2a 2a 2a 00 |O OUTPUT| *****.|
|00002690| b6 3c 36 1a 8b 20 54 59 | 50 45 50 52 49 4e 54 45 |.<6.. TY|PEPRINTE|
|000026a0| 52 24 e7 22 45 50 53 4f | 4e 22 20 cd 20 91 20 d1 |R$."EPSO|N" . . .|
|000026b0| 20 42 24 28 4c 4c 29 00 | 2f 3d 40 1a 8b 20 4c 41 | B$(LL).|/=@.. LA|
|000026c0| 42 45 4c 2e 53 49 5a 45 | e7 12 20 cd 20 91 20 fe |BEL.SIZE|.. . . .|
|000026d0| 8d 3b 22 20 20 22 3b 46 | 43 4f 55 4e 54 25 3b 22 |.;" ";F|COUNT%;"|
|000026e0| 46 49 4c 45 53 22 3b 22 | 20 20 20 20 42 59 54 45 |FILES";"| BYTE|
|000026f0| 53 3a 22 3b 42 59 54 45 | 53 55 53 45 44 3b 22 55 |S:";BYTE|SUSED;"U|
|00002700| 53 45 44 20 20 22 3b 3b | 46 52 45 45 42 59 54 45 |SED ";;|FREEBYTE|
|00002710| 53 3b 22 46 52 45 45 22 | 3a 20 4a 4c 41 42 45 4c |S;"FREE"|: JLABEL|
|00002720| e7 4a 4c 41 42 45 4c e9 | 12 3a 20 89 20 0e 54 1a |.JLABEL.|.: . .T.|
|00002730| 00 9c 3d 4a 1a 91 20 fe | 8d 3b 22 20 22 3b 46 43 |..=J.. .|.;" ";FC|
|00002740| 4f 55 4e 54 25 3b 22 46 | 49 4c 45 53 22 3b 22 20 |OUNT%;"F|ILES";" |
|00002750| 20 46 4f 52 4d 41 54 20 | 22 3b 44 53 24 3b 22 20 | FORMAT |";DS$;" |
|00002760| 20 42 59 54 45 53 3a 22 | 3b 42 59 54 45 53 55 53 | BYTES:"|;BYTESUS|
|00002770| 45 44 3b 22 55 53 45 44 | 20 22 3b 3b 46 52 45 45 |ED;"USED| ";;FREE|
|00002780| 42 59 54 45 53 3b 22 46 | 52 45 45 22 3a 20 4a 4c |BYTES;"F|REE": JL|
|00002790| 41 42 45 4c e7 4a 4c 41 | 42 45 4c e9 12 00 b3 3d |ABEL.JLA|BEL....=|
|000027a0| 54 1a 4c 49 4e 45 43 4f | 55 4e 54 e7 11 3a 20 8d |T.LINECO|UNT..: .|
|000027b0| 20 0e 92 13 00 e4 3d 5e | 1a 8b 20 4a e6 43 4e 25 | .....=^|.. J.CN%|
|000027c0| 20 cd 20 8b 20 49 43 4f | 4d 4d 45 4e 54 53 e7 12 | . . ICO|MMENTS..|
|000027d0| 20 cd 20 8e 20 3a a1 20 | 8b 20 4a e6 43 4e 25 20 | . . :. |. J.CN% |
|000027e0| 89 20 0e 2a 03 00 ea 3d | 68 1a 8e 00 30 3e 90 1a |. .*...=|h...0>..|
|000027f0| 3a 8f d9 20 20 20 20 20 | 20 20 20 20 20 2a 2a 2a |:.. | ***|
|00002800| 2a 2a 20 20 4e 45 57 20 | 50 41 47 45 20 53 55 42 |** NEW |PAGE SUB|
|00002810| 52 4f 55 54 49 4e 45 20 | 46 4f 52 20 50 52 49 4e |ROUTINE |FOR PRIN|
|00002820| 54 45 52 20 4f 55 54 50 | 55 54 20 20 2a 2a 2a 2a |TER OUTP|UT ****|
|00002830| 2a 00 58 3e 9a 1a 8b 20 | 54 59 50 45 50 52 49 4e |*.X>... |TYPEPRIN|
|00002840| 54 45 52 24 e7 22 45 50 | 53 4f 4e 22 20 cd 20 9d |TER$."EP|SON" . .|
|00002850| 20 d1 20 42 24 28 4c 4c | 29 00 d1 3e a4 1a 8b 20 | . B$(LL|)..>... |
|00002860| 4c 41 42 45 4c 2e 53 49 | 5a 45 e7 12 20 cd 20 9d |LABEL.SI|ZE.. . .|
|00002870| 20 fe 8d 3b 22 20 20 22 | 3b 46 43 4f 55 4e 54 25 | ..;" "|;FCOUNT%|
|00002880| 3b 22 46 49 4c 45 53 22 | 3b 22 20 20 20 20 42 59 |;"FILES"|;" BY|
|00002890| 54 45 53 3a 22 3b 42 59 | 54 45 53 55 53 45 44 3b |TES:";BY|TESUSED;|
|000028a0| 22 55 53 45 44 20 20 22 | 3b 3b 46 52 45 45 42 59 |"USED "|;;FREEBY|
|000028b0| 54 45 53 3b 22 46 52 45 | 45 22 3a 20 4a 4c 41 42 |TES;"FRE|E": JLAB|
|000028c0| 45 4c e7 4a 4c 41 42 45 | 4c e9 12 3a 20 89 20 0e |EL.JLABE|L..: . .|
|000028d0| b8 1a 00 3e 3f ae 1a 9d | 20 fe 8d 3b 22 20 22 3b |...>?...| ..;" ";|
|000028e0| 46 43 4f 55 4e 54 25 3b | 22 46 49 4c 45 53 22 3b |FCOUNT%;|"FILES";|
|000028f0| 22 20 20 46 4f 52 4d 41 | 54 20 22 3b 44 53 24 3b |" FORMA|T ";DS$;|
|00002900| 22 20 20 42 59 54 45 53 | 3a 22 3b 42 59 54 45 53 |" BYTES|:";BYTES|
|00002910| 55 53 45 44 3b 22 55 53 | 45 44 20 22 3b 3b 46 52 |USED;"US|ED ";;FR|
|00002920| 45 45 42 59 54 45 53 3b | 22 46 52 45 45 22 3a 20 |EEBYTES;|"FREE": |
|00002930| 4a 4c 41 42 45 4c e7 4a | 4c 41 42 45 4c e9 12 00 |JLABEL.J|LABEL...|
|00002940| 6e 3f b8 1a 8b 20 54 59 | 50 45 50 52 49 4e 54 45 |n?... TY|PEPRINTE|
|00002950| 52 24 e7 22 45 50 53 4f | 4e 22 20 cd 20 9d 20 ff |R$."EPSO|N" . . .|
|00002960| 96 28 0f 1b 29 22 33 22 | 3b ff 96 28 0f 12 29 00 |.(..)"3"|;..(..).|
|00002970| 98 3f c2 1a 9d 3a 20 8b | 20 4c 41 42 45 4c 2e 53 |.?...: .| LABEL.S|
|00002980| 49 5a 45 e7 12 20 cd 20 | 9d 20 ff 96 28 0f 1b 29 |IZE.. . |. ..(..)|
|00002990| 22 33 22 3b ff 96 28 14 | 29 00 bb 3f cc 1a 8b 20 |"3";..(.|)..?... |
|000029a0| 54 59 50 45 50 52 49 4e | 54 45 52 24 e7 22 45 50 |TYPEPRIN|TER$."EP|
|000029b0| 53 4f 4e 22 20 cd 20 8d | 20 0e 3e 08 00 d2 3f d6 |SON" . .| .>...?.|
|000029c0| 1a 4c 49 4e 45 43 4f 55 | 4e 54 e7 11 3a 20 8d 20 |.LINECOU|NT..: . |
|000029d0| 0e 92 13 00 03 40 e0 1a | 8b 20 4a e6 43 4e 25 20 |.....@..|. J.CN% |
|000029e0| cd 20 8b 20 49 43 4f 4d | 4d 45 4e 54 53 e7 12 20 |. . ICOM|MENTS.. |
|000029f0| cd 20 8e 20 3a a1 20 8b | 20 4a e6 43 4e 25 20 89 |. . :. .| J.CN% .|
|00002a00| 20 0e 2a 03 00 09 40 ea | 1a 8e 00 44 40 58 1b 3a | .*...@.|...D@X.:|
|00002a10| 8f d9 20 20 20 20 20 20 | 20 20 20 20 2a 2a 2a 2a |.. | ****|
|00002a20| 2a 20 20 43 4f 4e 44 49 | 54 49 4f 4e 41 4c 20 50 |* CONDI|TIONAL P|
|00002a30| 41 47 45 20 53 55 42 52 | 4f 55 54 49 4e 45 20 20 |AGE SUBR|OUTINE |
|00002a40| 2a 2a 2a 2a 2a 00 8e 40 | 62 1b 8b 20 54 45 4d 50 |*****..@|b.. TEMP|
|00002a50| 2e 4b 4f 55 4e 54 ea 4c | 49 4e 45 43 4f 55 4e 54 |.KOUNT.L|INECOUNT|
|00002a60| e8 4b 4f 55 4e 54 20 cd | 20 8d 20 0e 80 1b 20 3a |.KOUNT .| . ... :|
|00002a70| a1 20 4c 41 42 45 4c 24 | e7 d1 20 42 24 28 4c 4c |. LABEL$|.. B$(LL|
|00002a80| 29 3a 20 8d 20 0e 92 13 | 3a 20 89 20 0e 76 1b 00 |): . ...|: . .v..|
|00002a90| 9f 40 6c 1b 8d 20 0e 6e | 19 3a 20 8d 20 0e 92 13 |.@l.. .n|.: . ...|
|00002aa0| 00 a5 40 76 1b 8e 00 ca | 40 80 1b 42 4c 41 4e 4b |..@v....|@..BLANK|
|00002ab0| 53 e7 4c 49 4e 45 53 2e | 50 45 52 2e 4c 41 42 45 |S.LINES.|PER.LABE|
|00002ac0| 4c ea 4c 49 4e 45 43 4f | 55 4e 54 00 dd 40 8a 1b |L.LINECO|UNT..@..|
|00002ad0| 82 20 49 e7 12 20 cc 20 | 42 4c 41 4e 4b 53 00 ed |. I.. . |BLANKS..|
|00002ae0| 40 94 1b 20 20 4c 41 42 | 45 4c 24 e7 22 22 00 f9 |@.. LAB|EL$.""..|
|00002af0| 40 9e 1b 20 20 8d 20 0e | 92 13 00 01 41 a8 1b 83 |@.. . .|....A...|
|00002b00| 20 49 00 07 41 b2 1b 8e | 00 3c 41 4c 1d 3a 8f d9 | I..A...|.<AL.:..|
|00002b10| 20 20 20 20 20 20 20 20 | 20 20 2a 2a 2a 2a 2a 20 | | ***** |
|00002b20| 20 67 65 6e 65 72 69 63 | 20 65 72 72 6f 72 20 68 | generic| error h|
|00002b30| 61 6e 64 6c 65 72 20 20 | 2a 2a 2a 2a 2a 00 54 41 |andler |*****.TA|
|00002b40| 56 1d 45 46 4c 41 47 e7 | d5 3a 45 4c 49 4e 45 e7 |V.EFLAG.|.:ELINE.|
|00002b50| d4 3a a8 20 83 00 87 41 | 60 1d 3a 8f d9 20 20 20 |.:. ...A|`.:.. |
|00002b60| 20 20 20 20 20 20 20 2a | 2a 2a 2a 2a 20 20 66 61 | *|**** fa|
|00002b70| 74 61 6c 20 65 72 72 6f | 72 20 68 61 6e 64 6c 65 |tal erro|r handle|
|00002b80| 72 20 20 2a 2a 2a 2a 2a | 00 bc 41 6a 1d 91 22 66 |r *****|..Aj.."f|
|00002b90| 61 74 61 6c 20 65 72 72 | 6f 72 20 22 3b 45 46 4c |atal err|or ";EFL|
|00002ba0| 41 47 3b 22 20 6f 63 63 | 75 72 72 65 64 20 61 74 |AG;" occ|urred at|
|00002bb0| 20 6c 69 6e 65 20 22 3b | 45 4c 49 4e 45 00 c2 41 | line ";|ELINE..A|
|00002bc0| 74 1d 90 00 06 42 40 1f | 3a 8f d9 20 20 20 20 20 |t....B@.|:.. |
|00002bd0| 20 20 20 20 20 2a 2a 2a | 2a 2a 20 20 53 55 42 52 | ***|** SUBR|
|00002be0| 4f 55 54 49 4e 45 20 54 | 4f 20 45 44 49 54 20 54 |OUTINE T|O EDIT T|
|00002bf0| 49 54 4c 45 20 4f 52 20 | 43 4f 4d 4d 45 4e 54 53 |ITLE OR |COMMENTS|
|00002c00| 20 20 2a 2a 2a 2a 2a 00 | 13 42 4a 1f c0 3a 20 8d | *****.|.BJ..: .|
|00002c10| 20 0e f2 03 00 3b 42 54 | 1f ca 20 16 2c 0f 14 3a | ....;BT|.. .,..:|
|00002c20| 20 91 20 22 44 6f 20 79 | 6f 75 20 77 61 6e 74 20 | . "Do y|ou want |
|00002c30| 74 6f 20 65 64 69 74 20 | 74 68 65 22 00 5a 42 5e |to edit |the".ZB^|
|00002c40| 1f ca 20 17 2c 0f 19 3a | 20 91 20 22 3c 54 3e 69 |.. .,..:| . "<T>i|
|00002c50| 74 6c 65 20 6f 72 20 74 | 68 65 22 00 76 42 68 1f |tle or t|he".vBh.|
|00002c60| ca 20 18 2c 0f 19 3a 20 | 91 20 22 3c 43 3e 6f 6d |. .,..: |. "<C>om|
|00002c70| 6d 65 6e 74 73 3f 22 00 | 97 42 72 1f 58 e7 0f 26 |ments?".|.Br.X..&|
|00002c80| 3a 20 59 e7 18 3a 20 ca | 20 59 2c 58 3a 20 8b 20 |: Y..: .| Y,X: . |
|00002c90| 4a 53 e7 12 20 cd 20 c5 | 00 a1 42 7c 1f 8d 20 0e |JS.. . .|..B|.. .|
|00002ca0| ee 0c 00 bf 42 86 1f 8b | 20 49 4e 24 e7 22 54 22 |....B...| IN$."T"|
|00002cb0| 20 ef 20 49 4e 24 e7 22 | 74 22 20 cd 20 0e 76 20 | . IN$."|t" . .v |
|00002cc0| 00 dd 42 90 1f 8b 20 49 | 4e 24 e7 22 43 22 20 ef |..B... I|N$."C" .|
|00002cd0| 20 49 4e 24 e7 22 63 22 | 20 cd 20 0e a2 21 00 e7 | IN$."c"| . ..!..|
|00002ce0| 42 9a 1f 89 20 0e 72 1f | 00 15 43 6c 20 3a 8f d9 |B... .r.|..Cl :..|
|00002cf0| 20 20 20 20 20 20 20 20 | 20 20 2a 2a 2a 2a 2a 20 | | ***** |
|00002d00| 20 45 44 49 54 20 54 48 | 45 20 54 49 54 4c 45 20 | EDIT TH|E TITLE |
|00002d10| 20 2a 2a 2a 2a 2a 00 2e | 43 76 20 4c 45 4e 47 54 | *****..|Cv LENGT|
|00002d20| 48 e7 ff 92 28 44 49 53 | 4b 4e 41 4d 45 24 29 00 |H...(DIS|KNAME$).|
|00002d30| 4d 43 80 20 49 4e 44 45 | 4e 54 20 e7 20 ff 85 28 |MC. INDE|NT . ..(|
|00002d40| 0f 28 ea 28 4c 45 4e 47 | 54 48 ec 13 29 29 00 69 |.(.(LENG|TH..)).i|
|00002d50| 43 8a 20 ca 20 1a 2c 49 | 4e 44 45 4e 54 3a 20 91 |C. . .,I|NDENT: .|
|00002d60| 20 44 49 53 4b 4e 41 4d | 45 24 00 99 43 94 20 ca | DISKNAM|E$..C. .|
|00002d70| 20 0f 0b 2c 0f 0a 3a 20 | 91 20 22 57 68 61 74 20 | ..,..: |. "What |
|00002d80| 69 73 20 74 68 65 20 6e | 61 6d 65 20 6f 66 20 74 |is the n|ame of t|
|00002d90| 68 65 20 64 69 73 6b 3f | 22 3b 00 c1 43 9e 20 46 |he disk?|";..C. F|
|00002da0| 4c e7 54 4c 3a 20 58 e7 | 0f 29 3a 20 59 e7 db 3a |L.TL: X.|.): Y..:|
|00002db0| 20 ca 20 59 2c 58 3a 20 | 8b 20 4a 53 e7 12 20 cd | . Y,X: |. JS.. .|
|00002dc0| 20 c5 00 cb 43 a8 20 8d | 20 0e c2 0b 00 e9 43 b2 | ...C. .| .....C.|
|00002dd0| 20 8b 20 49 4e 24 e7 22 | 20 22 20 cd 20 49 4e 24 | . IN$."| " . IN$|
|00002de0| e7 22 4e 4f 20 4e 41 4d | 45 22 00 fc 43 bc 20 8b |."NO NAM|E"..C. .|
|00002df0| 20 49 4e 24 e7 22 22 20 | cd 20 0e d0 20 00 2b 44 | IN$."" |. .. .+D|
|00002e00| c6 20 8b 20 43 46 e7 11 | 20 cd 20 44 49 53 4b 4e |. . CF..| . DISKN|
|00002e10| 41 4d 45 24 e7 49 4e 24 | 3a 20 44 53 4b 4e 41 4d |AME$.IN$|: DSKNAM|
|00002e20| 45 24 e7 44 49 53 4b 4e | 41 4d 45 24 00 44 44 d0 |E$.DISKN|AME$.DD.|
|00002e30| 20 4c 45 4e 47 54 48 e7 | ff 92 28 44 49 53 4b 4e | LENGTH.|..(DISKN|
|00002e40| 41 4d 45 24 29 00 63 44 | da 20 49 4e 44 45 4e 54 |AME$).cD|. INDENT|
|00002e50| 20 e7 20 ff 85 28 0f 28 | ea 28 4c 45 4e 47 54 48 | . ..(.(|.(LENGTH|
|00002e60| ec 13 29 29 00 7a 44 e4 | 20 53 50 41 43 45 53 e7 |..)).zD.| SPACES.|
|00002e70| 54 4c e9 12 ea 4c 45 4e | 47 54 48 00 a2 44 ee 20 |TL...LEN|GTH..D. |
|00002e80| 44 49 53 4b 4e 41 4d 45 | 24 e7 44 49 53 4b 4e 41 |DISKNAME|$.DISKNA|
|00002e90| 4d 45 24 20 e9 20 d6 28 | 53 50 41 43 45 53 2c 22 |ME$ . .(|SPACES,"|
|00002ea0| 20 22 29 00 e0 44 f8 20 | ca 20 0f 0d 2c 0f 14 3a | ")..D. |. ..,..:|
|00002eb0| 20 91 20 22 54 68 65 20 | 6e 65 77 20 64 69 73 6b | . "The |new disk|
|00002ec0| 20 6e 61 6d 65 20 69 73 | 3a 20 22 3a 20 ca 20 0f | name is|: ": . .|
|00002ed0| 0d 2c 0f 2a 3a 20 91 20 | 44 49 53 4b 4e 41 4d 45 |.,.*: . |DISKNAME|
|00002ee0| 24 00 1a 45 02 21 ca 20 | 0f 0f 2c 0f 0a 3a 20 91 |$..E.!. |..,..: .|
|00002ef0| 20 22 49 73 20 74 68 69 | 73 20 74 68 65 20 74 69 | "Is thi|s the ti|
|00002f00| 74 6c 65 20 79 6f 75 20 | 77 61 6e 74 20 74 6f 20 |tle you |want to |
|00002f10| 75 73 65 20 28 59 2f 4e | 29 3f 22 00 3c 45 0c 21 |use (Y/N|)?".<E.!|
|00002f20| 58 e7 0f 32 3a 20 59 e7 | 0f 0f 3a 20 ca 20 59 2c |X..2: Y.|..: . Y,|
|00002f30| 58 3a 20 8b 20 4a 53 e7 | 12 20 cd 20 c5 00 46 45 |X: . JS.|. . ..FE|
|00002f40| 16 21 8d 20 0e ee 0c 00 | 64 45 20 21 8b 20 49 4e |.!. ....|dE !. IN|
|00002f50| 24 e7 22 79 22 20 ef 20 | 49 4e 24 e7 22 59 22 20 |$."y" . |IN$."Y" |
|00002f60| cd 20 0e b6 0d 00 ae 45 | 2a 21 8b 20 49 4e 24 e7 |. .....E|*!. IN$.|
|00002f70| 22 6e 22 20 ef 20 49 4e | 24 e7 22 4e 22 20 cd 20 |"n" . IN|$."N" . |
|00002f80| ca 20 0f 0d 2c 12 3a 20 | 91 20 d6 28 0f 50 2c 22 |. ..,.: |. .(.P,"|
|00002f90| 20 22 29 3a 20 ca 20 0f | 0f 2c 12 3a 20 91 20 d6 | "): . .|.,.: . .|
|00002fa0| 28 0f 50 2c 22 20 22 29 | 3a 20 89 20 0e 76 20 00 |(.P," ")|: . .v .|
|00002fb0| b8 45 34 21 89 20 0e f8 | 20 00 e9 45 98 21 3a 8f |.E4!. ..| ..E.!:.|
|00002fc0| d9 20 20 20 20 20 20 20 | 20 20 20 2a 2a 2a 2a 2a |. | *****|
|00002fd0| 20 20 45 44 49 54 20 54 | 48 45 20 43 4f 4d 4d 45 | EDIT T|HE COMME|
|00002fe0| 4e 54 53 20 20 2a 2a 2a | 2a 2a 00 f6 45 a2 21 c0 |NTS ***|**..E.!.|
|00002ff0| 3a 20 8d 20 0e f2 03 00 | 1a 46 ac 21 56 24 e7 ff |: . ....|.F.!V$..|
|00003000| 82 28 ff 93 28 4b 4f 4d | 4d 45 4e 54 53 2e 50 45 |.(..(KOM|MENTS.PE|
|00003010| 52 2e 4c 41 42 45 4c 29 | 2c 12 29 00 32 46 b6 21 |R.LABEL)|,.).2F.!|
|00003020| ca 20 16 2c 0f 20 3a 20 | 91 20 44 49 53 4b 4e 41 |. .,. : |. DISKNA|
|00003030| 4d 45 24 00 4d 46 c0 21 | ca 20 18 2c 12 3a 20 91 |ME$.MF.!|. .,.: .|
|00003040| 20 22 43 4f 4d 4d 45 4e | 54 53 3a 20 22 3b 00 8e | "COMMEN|TS: ";..|
|00003050| 46 ca 21 82 20 4a e7 12 | 20 cc 20 4b 4f 4d 4d 45 |F.!. J..| . KOMME|
|00003060| 4e 54 53 2e 50 45 52 2e | 4c 41 42 45 4c 3a 20 ca |NTS.PER.|LABEL: .|
|00003070| 20 17 e9 4a 2c 0f 0b 3a | 20 91 20 4a 3b d6 28 4c | ..J,..:| . J;.(L|
|00003080| 4c 2c 20 ff 96 28 0f fe | 29 29 3a 20 83 20 4a 00 |L, ..(..|)): . J.|
|00003090| ce 46 d4 21 82 20 4a e7 | 12 20 cc 20 4b 4f 4d 4d |.F.!. J.|. . KOMM|
|000030a0| 45 4e 54 53 2e 50 45 52 | 2e 4c 41 42 45 4c 3a 20 |ENTS.PER|.LABEL: |
|000030b0| ca 20 17 e9 4a 2c 0f 0b | 3a 20 91 20 4a 3b 43 4f |. ..J,..|: . J;CO|
|000030c0| 4d 4d 45 4e 54 53 24 28 | 4a 29 3a 20 83 20 4a 00 |MMENTS$(|J): . J.|
|000030d0| 26 47 de 21 ca 20 18 e9 | 4b 4f 4d 4d 45 4e 54 53 |&G.!. ..|KOMMENTS|
|000030e0| 2e 50 45 52 2e 4c 41 42 | 45 4c 2c 16 3a 20 91 20 |.PER.LAB|EL,.: . |
|000030f0| 22 57 68 69 63 68 20 63 | 6f 6d 6d 65 6e 74 20 6c |"Which c|omment l|
|00003100| 69 6e 65 20 64 6f 20 79 | 6f 75 20 77 61 6e 74 20 |ine do y|ou want |
|00003110| 74 6f 20 65 64 69 74 20 | 28 30 20 74 6f 20 72 65 |to edit |(0 to re|
|00003120| 74 75 72 6e 29 3f 22 00 | 5a 47 e8 21 58 e7 0f 3c |turn)?".|ZG.!X..<|
|00003130| 3a 20 59 e7 18 e9 4b 4f | 4d 4d 45 4e 54 53 2e 50 |: Y...KO|MMENTS.P|
|00003140| 45 52 2e 4c 41 42 45 4c | 3a 20 ca 20 59 2c 58 3a |ER.LABEL|: . Y,X:|
|00003150| 20 8b 20 4a 53 e7 12 20 | cd 20 c5 00 64 47 f2 21 | . JS.. |. ..dG.!|
|00003160| 8d 20 0e ee 0c 00 a3 47 | fc 21 8b 20 49 4e 24 e8 |. .....G|.!. IN$.|
|00003170| 22 30 22 20 ef 20 49 4e | 24 e6 56 24 20 cd 20 0e |"0" . IN|$.V$ . .|
|00003180| e8 21 20 3a a1 20 4b e7 | ff 94 28 49 4e 24 29 3a |.! :. K.|..(IN$):|
|00003190| 20 8b 20 4b e6 4b 4f 55 | 4e 54 20 cd 20 4b 4f 55 | . K.KOU|NT . KOU|
|000031a0| 4e 54 e7 4b 00 b3 47 06 | 22 8b 20 4b e7 11 20 cd |NT.K..G.|". K.. .|
|000031b0| 20 0e 56 22 00 dd 47 10 | 22 ca 20 18 e9 4b 4f 4d | .V"..G.|". ..KOM|
|000031c0| 4d 45 4e 54 53 2e 50 45 | 52 2e 4c 41 42 45 4c 2c |MENTS.PE|R.LABEL,|
|000031d0| 12 3a 20 91 20 d6 28 0f | 50 2c 22 20 22 29 00 04 |.: . .(.|P," ")..|
|000031e0| 48 1a 22 ca 20 17 e9 4b | 2c 0f 0a 3a 20 91 20 ff |H.". ..K|,..: . .|
|000031f0| 96 28 0f 1a 29 3b 4b 3b | d6 28 4c 4c 2c 20 ff 96 |.(..);K;|.(LL, ..|
|00003200| 28 0f fe 29 29 00 2e 48 | 24 22 46 4c e7 4c 4c 3a |(..))..H|$"FL.LL:|
|00003210| 20 58 e7 0f 0e 3a 20 59 | e7 17 e9 4b 3a 20 ca 20 | X...: Y|...K: . |
|00003220| 59 2c 58 3a 20 8b 20 4a | 53 e7 12 20 cd 20 c5 00 |Y,X: . J|S.. . ..|
|00003230| 38 48 2e 22 8d 20 0e c2 | 0b 00 57 48 38 22 8b 20 |8H.". ..|..WH8". |
|00003240| 49 4e 24 e7 22 22 20 cd | 20 43 4f 4d 4d 45 4e 54 |IN$."" .| COMMENT|
|00003250| 53 24 28 4b 29 e7 22 22 | 00 75 48 42 22 8b 20 43 |S$(K).""|.uHB". C|
|00003260| 46 e7 11 20 cd 20 43 4f | 4d 4d 45 4e 54 53 24 28 |F.. . CO|MMENTS$(|
|00003270| 4b 29 e7 49 4e 24 00 7f | 48 4c 22 89 20 0e de 21 |K).IN$..|HL". ..!|
|00003280| 00 b7 48 56 22 82 20 4a | e7 4b 4f 55 4e 54 20 cc |..HV". J|.KOUNT .|
|00003290| 20 12 20 cf 20 ea 12 3a | 20 8b 20 43 4f 4d 4d 45 | . . ..:| . COMME|
|000032a0| 4e 54 53 24 28 4a 29 e8 | e6 22 22 20 cd 20 0e 60 |NTS$(J).|."" . .`|
|000032b0| 22 20 3a a1 20 83 20 4a | 00 c3 48 60 22 4b 4f 55 |" :. . J|..H`"KOU|
|000032c0| 4e 54 e7 4a 00 cd 48 6a | 22 89 20 0e b6 0d 00 fc |NT.J..Hj|". .....|
|000032d0| 48 28 23 20 20 20 20 20 | 20 20 20 20 20 20 eb eb |H(# | ..|
|000032e0| eb eb eb 20 20 fe 8a 20 | 53 49 5a 45 20 4f 46 20 |... .. |SIZE OF |
|000032f0| 4c 41 42 45 4c 53 20 20 | eb eb eb eb eb 00 02 49 |LABELS |.......I|
|00003300| 32 23 c0 00 43 49 3c 23 | 8d 20 0e f2 03 3a 20 bb |2#..CI<#|. ...: .|
|00003310| 20 23 13 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | #. | |
|00003320| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003330| 20 20 20 3a 8f d9 20 70 | 72 69 6e 74 20 68 65 61 | :.. p|rint hea|
|00003340| 64 69 6e 67 00 76 49 46 | 23 ca 20 16 2c 0f 0a 3a |ding.vIF|#. .,..:|
|00003350| 20 91 22 57 68 61 74 20 | 73 69 7a 65 20 6c 61 62 | ."What |size lab|
|00003360| 65 6c 73 20 77 69 6c 6c | 20 79 6f 75 20 62 65 20 |els will| you be |
|00003370| 75 73 69 6e 67 3f 22 00 | 98 49 50 23 ca 20 18 2c |using?".|.IP#. .,|
|00003380| 0f 0f 3a 20 91 20 22 3c | 31 3e 20 33 20 31 2f 32 |..: . "<|1> 3 1/2|
|00003390| 20 78 20 31 35 2f 31 36 | 22 00 b7 49 5a 23 ca 20 | x 15/16|"..IZ#. |
|000033a0| 19 2c 0f 0f 3a 20 91 20 | 22 3c 32 3e 20 34 20 78 |.,..: . |"<2> 4 x|
|000033b0| 20 31 20 37 2f 31 36 22 | 00 dc 49 64 23 ca 20 0f | 1 7/16"|..Id#. .|
|000033c0| 0b 2c 0f 0a 3a 20 91 20 | 22 3e 20 45 4e 54 45 52 |.,..: . |"> ENTER|
|000033d0| 20 53 45 4c 45 43 54 49 | 4f 4e 3a 20 22 00 fe 49 | SELECTI|ON: "..I|
|000033e0| 6e 23 59 e7 0f 0b 3a 20 | 58 e7 0f 1f 3a 20 ca 20 |n#Y...: |X...: . |
|000033f0| 59 2c 58 3a 20 8b 20 4a | 53 e7 12 20 cd 20 c5 00 |Y,X: . J|S.. . ..|
|00003400| 08 4a 78 23 8d 20 0e ee | 0c 00 1f 4a 82 23 4c 41 |.Jx#. ..|...J.#LA|
|00003410| 42 45 4c 2e 53 49 5a 45 | e7 ff 94 28 49 4e 24 29 |BEL.SIZE|...(IN$)|
|00003420| 00 3a 4a 8c 23 95 20 4c | 41 42 45 4c 2e 53 49 5a |.:J.#. L|ABEL.SIZ|
|00003430| 45 20 89 20 0e 18 01 2c | 0e 18 01 00 44 4a 96 23 |E . ...,|....DJ.#|
|00003440| 89 20 0e 6e 23 00 82 4a | 1c 25 3a 8f d9 20 20 20 |. .n#..J|.%:.. |
|00003450| 20 20 20 20 20 20 20 2a | 2a 2a 2a 2a 20 20 4d 45 | *|**** ME|
|00003460| 4e 55 20 4f 46 20 47 4f | 54 4f 27 53 20 41 4e 44 |NU OF GO|TO'S AND|
|00003470| 20 53 55 42 52 4f 55 54 | 49 4e 45 53 20 20 2a 2a | SUBROUT|INES **|
|00003480| 2a 2a 2a 00 c2 4a 26 25 | 89 20 0e 14 00 20 20 20 |***..J&%|. ... |
|00003490| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000034a0| 20 20 20 20 20 20 20 20 | 20 3a 8f d9 20 69 6e 69 | | :.. ini|
|000034b0| 74 69 61 6c 69 7a 65 20 | 74 68 65 20 70 72 6f 67 |tialize |the prog|
|000034c0| 72 61 6d 00 fb 4a 30 25 | 89 20 0e 64 00 20 20 20 |ram..J0%|. .d. |
|000034d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000034e0| 20 20 20 20 20 20 20 20 | 3a 8f d9 20 72 65 61 64 | |:.. read|
|000034f0| 20 69 6e 20 74 68 65 20 | 64 61 74 61 00 3e 4b 3a | in the |data.>K:|
|00003500| 25 89 20 0e 90 01 20 20 | 20 20 20 20 20 20 20 20 |%. ... | |
|00003510| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003520| 20 3a 8f d9 20 70 72 69 | 6e 74 20 6f 6e 20 73 63 | :.. pri|nt on sc|
|00003530| 72 65 65 6e 20 6f 72 20 | 70 72 69 6e 74 65 72 00 |reen or |printer.|
|00003540| 7f 4b 44 25 89 20 0e 58 | 02 20 20 20 20 20 20 20 |.KD%. .X|. |
|00003550| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003560| 20 20 20 20 3a 8f d9 20 | 73 65 74 20 75 70 20 6c | :.. |set up l|
|00003570| 69 6e 65 20 6f 66 20 66 | 69 6c 65 6e 61 6d 65 73 |ine of f|ilenames|
|00003580| 00 bf 4b 4e 25 89 20 0e | 20 03 20 20 20 20 20 20 |..KN%. .| . |
|00003590| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000035a0| 20 20 20 20 20 3a 8f d9 | 20 72 65 61 64 20 61 6e | :..| read an|
|000035b0| 64 20 70 72 69 6e 74 20 | 63 6f 6d 6d 65 6e 74 73 |d print |comments|
|000035c0| 00 fd 4b 58 25 8d 20 0e | e8 03 20 20 20 20 20 20 |..KX%. .|.. |
|000035d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000035e0| 20 20 20 3a 8f d9 20 70 | 72 69 6e 74 20 68 65 61 | :.. p|rint hea|
|000035f0| 64 69 6e 67 20 6f 6e 20 | 73 63 72 65 65 6e 00 39 |ding on |screen.9|
|00003600| 4c 62 25 8d 20 0e dc 05 | 20 20 20 20 20 20 20 20 |Lb%. ...| |
|00003610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003620| 20 3a 8f d9 20 73 65 74 | 20 70 72 69 6e 74 65 72 | :.. set| printer|
|00003630| 20 66 6f 72 20 74 69 74 | 6c 65 00 80 4c 6c 25 8d | for tit|le..Ll%.|
|00003640| 20 0e 40 06 20 20 20 20 | 20 20 20 20 20 20 20 20 | .@. | |
|00003650| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a 8f d9 | | :..|
|00003660| 20 72 65 69 6e 69 74 69 | 61 6c 69 7a 65 20 70 72 | reiniti|alize pr|
|00003670| 69 6e 74 65 72 20 61 66 | 74 65 72 20 74 69 74 6c |inter af|ter titl|
|00003680| 65 00 c1 4c 76 25 8d 20 | 0e d0 07 20 20 20 20 20 |e..Lv%. |... |
|00003690| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000036a0| 20 20 20 20 3a 8f d9 20 | 73 65 74 20 70 72 69 6e | :.. |set prin|
|000036b0| 74 65 72 20 66 6f 72 20 | 66 69 6c 65 20 6e 61 6d |ter for |file nam|
|000036c0| 65 73 00 0d 4d 80 25 8d | 20 0e 34 08 20 20 20 20 |es..M.%.| .4. |
|000036d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000036e0| 20 20 20 20 20 3a 8f d9 | 20 72 65 69 6e 69 74 69 | :..| reiniti|
|000036f0| 61 6c 69 7a 65 20 70 72 | 69 6e 74 65 72 20 61 66 |alize pr|inter af|
|00003700| 74 65 72 20 66 69 6c 65 | 20 6e 61 6d 65 73 00 45 |ter file| names.E|
|00003710| 4d 8a 25 8d 20 0e b8 0b | 20 20 20 20 20 20 20 20 |M.%. ...| |
|00003720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003730| 20 3a 8f d9 20 69 6e 6b | 65 79 24 20 73 75 62 72 | :.. ink|ey$ subr|
|00003740| 6f 75 74 69 6e 65 00 88 | 4d 94 25 8d 20 0e e4 0c |outine..|M.%. ...|
|00003750| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003760| 20 20 20 20 20 20 20 20 | 20 3a 8f d9 20 73 69 6e | | :.. sin|
|00003770| 67 6c 65 20 6b 65 79 20 | 69 6e 6b 65 79 24 20 73 |gle key |inkey$ s|
|00003780| 75 62 72 6f 75 74 69 6e | 65 00 cb 4d 9e 25 8d 20 |ubroutin|e..M.%. |
|00003790| 0e ac 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |... | |
|000037a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a 8f d9 20 | | :.. |
|000037b0| 70 72 6f 6d 70 74 20 73 | 75 62 72 6f 75 74 69 6e |prompt s|ubroutin|
|000037c0| 65 20 66 6f 72 20 6c 61 | 62 65 6c 73 00 0f 4e a8 |e for la|bels..N.|
|000037d0| 25 8d 20 0e a0 0f 20 20 | 20 20 20 20 20 20 20 20 |%. ... | |
|000037e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a | | :|
|000037f0| 8f d9 20 70 72 69 6e 74 | 20 74 69 74 6c 65 20 66 |.. print| title f|
|00003800| 6f 72 20 45 70 73 6f 6e | 20 70 72 69 6e 74 65 72 |or Epson| printer|
|00003810| 00 54 4e b2 25 8d 20 0e | 94 11 20 20 20 20 20 20 |.TN.%. .|.. |
|00003820| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003830| 20 20 20 3a 8f d9 20 70 | 72 69 6e 74 20 74 69 74 | :.. p|rint tit|
|00003840| 6c 65 20 66 6f 72 20 6f | 74 68 65 72 20 70 72 69 |le for o|ther pri|
|00003850| 6e 74 65 72 73 00 97 4e | bc 25 8d 20 0e 88 13 20 |nters..N|.%. ... |
|00003860| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003870| 20 20 20 20 20 20 20 20 | 3a 8f d9 20 70 72 69 6e | |:.. prin|
|00003880| 74 20 6c 69 6e 65 20 6f | 72 20 66 69 6c 65 73 20 |t line o|r files |
|00003890| 6f 6e 20 6c 61 62 65 6c | 00 d3 4e c6 25 8d 20 0e |on label|..N.%. .|
|000038a0| 7c 15 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 ||. | |
|000038b0| 20 20 20 20 20 20 20 20 | 20 20 20 3a 8f d9 20 61 | | :.. a|
|000038c0| 73 6b 20 61 62 6f 75 74 | 20 6d 6f 72 65 20 6c 61 |sk about| more la|
|000038d0| 62 65 6c 73 00 19 4f d0 | 25 8d 20 0e 44 16 20 20 |bels..O.|%. .D. |
|000038e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000038f0| 20 20 20 20 20 20 20 3a | 8f d9 20 73 74 61 72 74 | :|.. start|
|00003900| 20 6f 76 65 72 20 6f 72 | 20 74 65 72 6d 69 6e 61 | over or| termina|
|00003910| 74 65 20 70 72 6f 67 72 | 61 6d 00 54 4f da 25 8d |te progr|am.TO.%.|
|00003920| 20 0e 70 17 20 20 20 20 | 20 20 20 20 20 20 20 20 | .p. | |
|00003930| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a 8f d9 | | :..|
|00003940| 20 73 65 74 20 6d 61 73 | 74 65 72 20 64 69 73 6b | set mas|ter disk|
|00003950| 20 66 6c 61 67 00 8e 4f | e4 25 8d 20 0e 64 19 20 | flag..O|.%. .d. |
|00003960| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003970| 20 20 20 20 20 20 20 20 | 3a 8f d9 20 6e 65 77 20 | |:.. new |
|00003980| 70 61 67 65 20 73 75 62 | 72 6f 75 74 69 6e 65 00 |page sub|routine.|
|00003990| d0 4f ee 25 8d 20 0e 58 | 1b 20 20 20 20 20 20 20 |.O.%. .X|. |
|000039a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000039b0| 20 20 3a 8f d9 20 63 6f | 6e 64 69 74 69 6f 6e 61 | :.. co|nditiona|
|000039c0| 6c 20 70 61 67 65 20 73 | 75 62 72 6f 75 74 69 6e |l page s|ubroutin|
|000039d0| 65 00 07 50 f8 25 8d 20 | 0e 4c 1d 20 20 20 20 20 |e..P.%. |.L. |
|000039e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000039f0| 20 20 20 20 3a 8f d9 20 | 65 72 72 6f 72 20 73 75 | :.. |error su|
|00003a00| 62 72 6f 75 74 69 6e 65 | 00 44 50 02 26 8d 20 0e |broutine|.DP.&. .|
|00003a10| 6a 1d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |j. | |
|00003a20| 20 20 20 20 20 20 20 20 | 20 20 20 3a 8f d9 20 66 | | :.. f|
|00003a30| 61 74 61 6c 20 65 72 72 | 6f 72 20 73 75 62 72 6f |atal err|or subro|
|00003a40| 75 74 69 6e 65 00 85 50 | 0c 26 8d 20 0e 40 1f 20 |utine..P|.&. .@. |
|00003a50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003a60| 20 20 20 20 20 20 20 20 | 3a 8f d9 20 65 64 69 74 | |:.. edit|
|00003a70| 20 74 68 65 20 74 69 74 | 6c 65 20 6f 72 20 63 6f | the tit|le or co|
|00003a80| 6d 6d 65 6e 74 73 00 bb | 50 16 26 89 20 0e 6c 20 |mments..|P.&. .l |
|00003a90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003aa0| 20 20 20 20 20 20 20 20 | 20 20 3a 8f d9 20 65 64 | | :.. ed|
|00003ab0| 69 74 20 74 68 65 20 74 | 69 74 6c 65 00 f4 50 20 |it the t|itle..P |
|00003ac0| 26 89 20 0e 98 21 20 20 | 20 20 20 20 20 20 20 20 |&. ..! | |
|00003ad0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003ae0| 3a 8f d9 20 65 64 69 74 | 20 74 68 65 20 63 6f 6d |:.. edit| the com|
|00003af0| 6d 65 6e 74 73 00 2a 51 | 2a 26 8d 20 0e 1c 25 20 |ments.*Q|*&. ..% |
|00003b00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003b10| 20 20 20 20 20 20 20 20 | 3a 8f d9 20 72 6f 75 74 | |:.. rout|
|00003b20| 69 6e 65 20 6c 69 62 72 | 61 72 79 00 53 51 34 26 |ine libr|ary.SQ4&|
|00003b30| 3a 8f d9 20 20 20 20 20 | 20 20 20 20 20 2a 2a 2a |:.. | ***|
|00003b40| 2a 2a 20 20 4c 41 53 54 | 20 4c 49 4e 45 20 20 2a |** LAST| LINE *|
|00003b50| 2a 2a 2a 2a 00 00 00 1a | 24 28 38 30 2c 22 20 22 |****....|$(80," "|
|00003b60| 29 0d 0a 38 37 33 30 20 | 4c 4f 43 41 54 45 20 36 |)..8730 |LOCATE 6|
|00003b70| 2b 4b 2c 31 30 3a 20 50 | 52 49 4e 54 20 43 48 52 |+K,10: P|RINT CHR|
|00003b80| 24 28 32 36 29 3b 4b 3b | 53 54 52 49 4e 47 24 28 |$(26);K;|STRING$(|
|00003b90| 4c 4c 2c 20 43 48 52 24 | 28 32 35 34 29 29 0d 0a |LL, CHR$|(254))..|
|00003ba0| 38 37 34 30 20 46 4c 3d | 4c 4c 3a 20 58 3d 31 34 |8740 FL=|LL: X=14|
|00003bb0| 3a 20 59 3d 36 2b 4b 3a | 20 4c 4f 43 41 54 45 20 |: Y=6+K:| LOCATE |
|00003bc0| 59 2c 58 3a 20 49 46 20 | 4a 53 3d 31 20 54 48 45 |Y,X: IF |JS=1 THE|
|00003bd0| 4e 20 42 45 45 50 0d 0a | 38 37 35 30 20 47 4f 53 |N BEEP..|8750 GOS|
|00003be0| 55 42 20 33 30 31 30 0d | 0a 38 37 36 30 20 49 46 |UB 3010.|.8760 IF|
|00003bf0| 20 49 4e 24 3d 22 22 20 | 54 48 45 4e 20 43 4f 4d | IN$="" |THEN COM|
|00003c00| 4d 45 4e 54 53 24 28 4b | 29 3d 22 22 0d 0a 38 37 |MENTS$(K|)=""..87|
|00003c10| 37 30 20 49 46 20 43 46 | 3d 30 20 54 48 45 4e 20 |70 IF CF|=0 THEN |
|00003c20| 43 4f 4d 4d 45 4e 54 53 | 24 28 4b 29 3d 49 4e 24 |COMMENTS|$(K)=IN$|
|00003c30| 0d 0a 38 37 38 30 20 47 | 4f 54 4f 20 38 36 37 30 |..8780 G|OTO 8670|
|00003c40| 0d 0a 38 37 39 30 20 46 | 4f 52 20 4a 3d 4b 4f 55 |..8790 F|OR J=KOU|
|00003c50| 4e 54 20 54 4f 20 31 20 | 53 54 45 50 20 2d 31 3a |NT TO 1 |STEP -1:|
|00003c60| 20 49 46 20 43 4f 4d 4d | 45 4e 54 53 24 28 4a 29 | IF COMM|ENTS$(J)|
|00003c70| 3c 3e 22 22 20 54 48 45 | 4e 20 38 38 30 30 20 45 |<>"" THE|N 8800 E|
|00003c80| 4c 53 45 20 4e 45 58 54 | 20 4a 0d 0a 38 38 30 30 |LSE NEXT| J..8800|
|00003c90| 20 4b 4f 55 4e 54 3d 4a | 0d 0a 38 38 31 30 20 47 | KOUNT=J|..8810 G|
|00003ca0| 4f 54 4f 20 33 35 31 30 | 0d 0a 39 30 30 30 20 20 |OTO 3510|..9000 |
|00003cb0| 20 20 20 20 20 20 20 20 | 20 20 2a 2a 2a 2a 2a 20 | | ***** |
|00003cc0| 20 52 45 53 45 54 20 53 | 49 5a 45 20 4f 46 20 4c | RESET S|IZE OF L|
|00003cd0| 41 42 45 4c 53 20 20 2a | 2a 2a 2a 2a 0d 0a 39 30 |ABELS *|****..90|
|00003ce0| 31 30 20 43 4c 53 0d 0a | 39 30 32 30 20 47 4f 53 |10 CLS..|9020 GOS|
|00003cf0| 55 42 20 31 30 31 30 3a | 20 43 4c 4f 53 45 20 23 |UB 1010:| CLOSE #|
|00003d00| 32 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2 | |
|00003d10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003d20| 20 27 20 70 72 69 6e 74 | 20 68 65 61 64 69 6e 67 | ' print| heading|
|00003d30| 0d 0a 39 30 33 30 20 4c | 4f 43 41 54 45 20 35 2c |..9030 L|OCATE 5,|
|00003d40| 31 30 3a 20 50 52 49 4e | 54 22 57 68 61 74 20 73 |10: PRIN|T"What s|
|00003d50| 69 7a 65 20 6c 61 62 65 | 6c 73 20 77 69 6c 6c 20 |ize labe|ls will |
|00003d60| 79 6f 75 20 62 65 20 75 | 73 69 6e 67 3f 22 0d 0a |you be u|sing?"..|
|00003d70| 39 30 34 30 20 4c 4f 43 | 41 54 45 20 37 2c 31 35 |9040 LOC|ATE 7,15|
|00003d80| 3a 20 50 52 49 4e 54 20 | 22 3c 31 3e 20 33 20 31 |: PRINT |"<1> 3 1|
|00003d90| 2f 32 20 78 20 31 35 2f | 31 36 22 0d 0a 39 30 35 |/2 x 15/|16"..905|
|00003da0| 30 20 4c 4f 43 41 54 45 | 20 38 2c 31 35 3a 20 50 |0 LOCATE| 8,15: P|
|00003db0| 52 49 4e 54 20 22 3c 32 | 3e 20 34 20 78 20 31 20 |RINT "<2|> 4 x 1 |
|00003dc0| 37 2f 31 36 22 0d 0a 39 | 30 36 30 20 4c 4f 43 41 |7/16"..9|060 LOCA|
|00003dd0| 54 45 20 31 31 2c 31 30 | 3a 20 50 52 49 4e 54 20 |TE 11,10|: PRINT |
|00003de0| 22 3e 20 45 4e 54 45 52 | 20 53 45 4c 45 43 54 49 |"> ENTER| SELECTI|
|00003df0| 4f 4e 3a 20 22 0d 0a 39 | 30 37 30 20 59 3d 31 31 |ON: "..9|070 Y=11|
|00003e00| 3a 20 58 3d 33 31 3a 20 | 4c 4f 43 41 54 45 20 59 |: X=31: |LOCATE Y|
|00003e10| 2c 58 3a 20 49 46 20 4a | 53 3d 31 20 54 48 45 4e |,X: IF J|S=1 THEN|
|00003e20| 20 42 45 45 50 0d 0a 39 | 30 38 30 20 47 4f 53 55 | BEEP..9|080 GOSU|
|00003e30| 42 20 33 33 31 30 0d 0a | 39 30 39 30 20 4c 41 42 |B 3310..|9090 LAB|
|00003e40| 45 4c 2e 53 49 5a 45 3d | 56 41 4c 28 49 4e 24 29 |EL.SIZE=|VAL(IN$)|
|00003e50| 0d 0a 39 31 30 30 20 4f | 4e 20 4c 41 42 45 4c 2e |..9100 O|N LABEL.|
|00003e60| 53 49 5a 45 20 47 4f 54 | 4f 20 32 38 30 2c 32 38 |SIZE GOT|O 280,28|
|00003e70| 30 0d 0a 39 31 31 30 20 | 47 4f 54 4f 20 39 30 37 |0..9110 |GOTO 907|
|00003e80| 30 0d 0a 39 35 30 30 20 | 27 20 20 20 20 20 20 20 |0..9500 |' |
|00003e90| 20 20 20 2a 2a 2a 2a 2a | 20 20 4d 45 4e 55 20 4f | *****| MENU O|
|00003ea0| 46 20 47 4f 54 4f 27 53 | 20 41 4e 44 20 53 55 42 |F GOTO'S| AND SUB|
|00003eb0| 52 4f 55 54 49 4e 45 53 | 20 20 2a 2a 2a 2a 2a 0d |ROUTINES| *****.|
|00003ec0| 0a 39 35 31 30 20 47 4f | 54 4f 20 32 30 20 20 20 |.9510 GO|TO 20 |
|00003ed0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003ee0| 20 20 20 20 20 20 20 20 | 20 27 20 69 6e 69 74 69 | | ' initi|
|00003ef0| 61 6c 69 7a 65 20 74 68 | 65 20 70 72 6f 67 72 61 |alize th|e progra|
|00003f00| 6d 0d 0a 39 35 32 30 20 | 47 4f 54 4f 20 31 30 30 |m..9520 |GOTO 100|
|00003f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003f20| 20 20 20 20 20 20 20 20 | 20 20 20 27 20 72 65 61 | | ' rea|
|00003f30| 64 20 69 6e 20 74 68 65 | 20 64 61 74 61 0d 0a 39 |d in the| data..9|
|00003f40| 35 33 30 20 47 4f 54 4f | 20 34 30 30 20 20 20 20 |530 GOTO| 400 |
|00003f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003f60| 20 20 20 20 20 20 20 27 | 20 70 72 69 6e 74 20 6f | '| print o|
|00003f70| 6e 20 73 63 72 65 65 6e | 20 6f 72 20 70 72 69 6e |n screen| or prin|
|00003f80| 74 65 72 0d 0a 39 35 34 | 30 20 47 4f 54 4f 20 36 |ter..954|0 GOTO 6|
|00003f90| 30 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |00 | |
|00003fa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 27 20 73 | | ' s|
|00003fb0| 65 74 20 75 70 20 6c 69 | 6e 65 20 6f 66 20 66 69 |et up li|ne of fi|
|00003fc0| 6c 65 6e 61 6d 65 73 0d | 0a 39 35 35 30 20 47 4f |lenames.|.9550 GO|
|00003fd0| 54 4f 20 38 30 30 20 20 | 20 20 20 20 20 20 20 20 |TO 800 | |
|00003fe0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003ff0| 20 27 20 72 65 61 64 20 | 61 6e 64 20 70 72 69 6e | ' read |and prin|
|00004000| 74 20 63 6f 6d 6d 65 6e | 74 73 0d 0a 39 35 36 30 |t commen|ts..9560|
|00004010| 20 47 4f 53 55 42 20 31 | 30 30 30 20 20 20 20 20 | GOSUB 1|000 |
|00004020| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004030| 20 20 20 20 27 20 70 72 | 69 6e 74 20 68 65 61 64 | ' pr|int head|
|00004040| 69 6e 67 20 6f 6e 20 73 | 63 72 65 65 6e 0d 0a 39 |ing on s|creen..9|
|00004050| 35 37 30 20 47 4f 53 55 | 42 20 31 35 30 30 20 20 |570 GOSU|B 1500 |
|00004060| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004070| 20 20 20 20 20 20 20 27 | 20 73 65 74 20 70 72 69 | '| set pri|
|00004080| 6e 74 65 72 20 66 6f 72 | 20 74 69 74 6c 65 0d 0a |nter for| title..|
|00004090| 39 35 38 30 20 47 4f 53 | 55 42 20 31 36 30 30 20 |9580 GOS|UB 1600 |
|000040a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000040b0| 20 20 20 20 20 20 20 20 | 27 20 72 65 69 6e 69 74 | |' reinit|
|000040c0| 69 61 6c 69 7a 65 20 70 | 72 69 6e 74 65 72 20 61 |ialize p|rinter a|
|000040d0| 66 74 65 72 20 74 69 74 | 6c 65 0d 0a 39 35 39 30 |fter tit|le..9590|
|000040e0| 20 47 4f 53 55 42 20 32 | 30 30 30 20 20 20 20 20 | GOSUB 2|000 |
|000040f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004100| 20 20 20 20 27 20 73 65 | 74 20 70 72 69 6e 74 65 | ' se|t printe|
|00004110| 72 20 66 6f 72 20 66 69 | 6c 65 20 6e 61 6d 65 73 |r for fi|le names|
|00004120| 0d 0a 39 36 30 30 20 47 | 4f 53 55 42 20 32 31 30 |..9600 G|OSUB 210|
|00004130| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0 | |
|00004140| 20 20 20 20 20 20 20 20 | 20 20 27 20 72 65 69 6e | | ' rein|
|00004150| 69 74 69 61 6c 69 7a 65 | 20 70 72 69 6e 74 65 72 |itialize| printer|
|00004160| 20 61 66 74 65 72 20 66 | 69 6c 65 20 6e 61 6d 65 | after f|ile name|
|00004170| 73 0d 0a 39 36 31 30 20 | 47 4f 53 55 42 20 33 30 |s..9610 |GOSUB 30|
|00004180| 30 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |00 | |
|00004190| 20 20 20 20 20 20 20 20 | 20 20 20 27 20 69 6e 6b | | ' ink|
|000041a0| 65 79 24 20 73 75 62 72 | 6f 75 74 69 6e 65 0d 0a |ey$ subr|outine..|
|000041b0| 39 36 32 30 20 47 4f 53 | 55 42 20 33 33 30 30 20 |9620 GOS|UB 3300 |
|000041c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000041d0| 20 20 20 20 20 20 20 20 | 27 20 73 69 6e 67 6c 65 | |' single|
|000041e0| 20 6b 65 79 20 69 6e 6b | 65 79 24 20 73 75 62 72 | key ink|ey$ subr|
|000041f0| 6f 75 74 69 6e 65 0d 0a | 39 36 33 30 20 47 4f 53 |outine..|9630 GOS|
|00004200| 55 42 20 33 35 30 30 20 | 20 20 20 20 20 20 20 20 |UB 3500 | |
|00004210| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004220| 27 20 70 72 6f 6d 70 74 | 20 73 75 62 72 6f 75 74 |' prompt| subrout|
|00004230| 69 6e 65 20 66 6f 72 20 | 6c 61 62 65 6c 73 0d 0a |ine for |labels..|
|00004240| 39 36 34 30 20 47 4f 53 | 55 42 20 34 30 30 30 20 |9640 GOS|UB 4000 |
|00004250| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004260| 20 20 20 20 20 20 20 20 | 27 20 70 72 69 6e 74 20 | |' print |
|00004270| 74 69 74 6c 65 20 66 6f | 72 20 45 70 73 6f 6e 20 |title fo|r Epson |
|00004280| 70 72 69 6e 74 65 72 0d | 0a 39 36 35 30 20 47 4f |printer.|.9650 GO|
|00004290| 53 55 42 20 34 35 30 30 | 20 20 20 20 20 20 20 20 |SUB 4500| |
|000042a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000042b0| 20 27 20 70 72 69 6e 74 | 20 74 69 74 6c 65 20 66 | ' print| title f|
|000042c0| 6f 72 20 6f 74 68 65 72 | 20 70 72 69 6e 74 65 72 |or other| printer|
|000042d0| 73 0d 0a 39 36 36 30 20 | 47 4f 53 55 42 20 35 30 |s..9660 |GOSUB 50|
|000042e0| 30 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |00 | |
|000042f0| 20 20 20 20 20 20 20 20 | 20 20 20 27 20 70 72 69 | | ' pri|
|00004300| 6e 74 20 6c 69 6e 65 20 | 6f 72 20 66 69 6c 65 73 |nt line |or files|
|00004310| 20 6f 6e 20 6c 61 62 65 | 6c 0d 0a 39 36 37 30 20 | on labe|l..9670 |
|00004320| 47 4f 53 55 42 20 35 35 | 30 30 20 20 20 20 20 20 |GOSUB 55|00 |
|00004330| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004340| 20 20 20 27 20 61 73 6b | 20 61 62 6f 75 74 20 6d | ' ask| about m|
|00004350| 6f 72 65 20 6c 61 62 65 | 6c 73 0d 0a 39 36 38 30 |ore labe|ls..9680|
|00004360| 20 47 4f 53 55 42 20 35 | 37 30 30 20 20 20 20 20 | GOSUB 5|700 |
|00004370| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004380| 20 20 20 20 27 20 73 74 | 61 72 74 20 6f 76 65 72 | ' st|art over|
|00004390| 20 6f 72 20 74 65 72 6d | 69 6e 61 74 65 20 70 72 | or term|inate pr|
|000043a0| 6f 67 72 61 6d 0d 0a 39 | 36 39 30 20 47 4f 53 55 |ogram..9|690 GOSU|
|000043b0| 42 20 36 30 30 30 20 20 | 20 20 20 20 20 20 20 20 |B 6000 | |
|000043c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 27 | | '|
|000043d0| 20 73 65 74 20 6d 61 73 | 74 65 72 20 64 69 73 6b | set mas|ter disk|
|000043e0| 20 66 6c 61 67 0d 0a 39 | 37 30 30 20 47 4f 53 55 | flag..9|700 GOSU|
|000043f0| 42 20 36 35 30 30 20 20 | 20 20 20 20 20 20 20 20 |B 6500 | |
|00004400| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 27 | | '|
|00004410| 20 6e 65 77 20 70 61 67 | 65 20 73 75 62 72 6f 75 | new pag|e subrou|
|00004420| 74 69 6e 65 0d 0a 39 37 | 31 30 20 47 4f 53 55 42 |tine..97|10 GOSUB|
|00004430| 20 37 30 30 30 20 20 20 | 20 20 20 20 20 20 20 20 | 7000 | |
|00004440| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 27 20 | | ' |
|00004450| 63 6f 6e 64 69 74 69 6f | 6e 61 6c 20 70 61 67 65 |conditio|nal page|
|00004460| 20 73 75 62 72 6f 75 74 | 69 6e 65 0d 0a 39 37 32 | subrout|ine..972|
|00004470| 30 20 47 4f 53 55 42 20 | 37 35 30 30 20 20 20 20 |0 GOSUB |7500 |
|00004480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004490| 20 20 20 20 20 27 20 65 | 72 72 6f 72 20 73 75 62 | ' e|rror sub|
|000044a0| 72 6f 75 74 69 6e 65 0d | 0a 39 37 33 30 20 47 4f |routine.|.9730 GO|
|000044b0| 53 55 42 20 37 35 33 30 | 20 20 20 20 20 20 20 20 |SUB 7530| |
|000044c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000044d0| 20 27 20 66 61 74 61 6c | 20 65 72 72 6f 72 20 73 | ' fatal| error s|
|000044e0| 75 62 72 6f 75 74 69 6e | 65 0d 0a 39 37 34 30 20 |ubroutin|e..9740 |
|000044f0| 47 4f 53 55 42 20 38 30 | 30 30 20 20 20 20 20 20 |GOSUB 80|00 |
|00004500| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004510| 20 20 20 27 20 65 64 69 | 74 20 74 68 65 20 74 69 | ' edi|t the ti|
|00004520| 74 6c 65 20 6f 72 20 63 | 6f 6d 6d 65 6e 74 73 0d |tle or c|omments.|
|00004530| 0a 39 37 35 30 20 47 4f | 54 4f 20 38 33 30 30 20 |.9750 GO|TO 8300 |
|00004540| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004550| 20 20 20 20 20 20 20 20 | 20 27 20 65 64 69 74 20 | | ' edit |
|00004560| 74 68 65 20 74 69 74 6c | 65 0d 0a 39 37 36 30 20 |the titl|e..9760 |
|00004570| 47 4f 54 4f 20 38 36 30 | 30 20 20 20 20 20 20 20 |GOTO 860|0 |
|00004580| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004590| 20 20 20 27 20 65 64 69 | 74 20 74 68 65 20 63 6f | ' edi|t the co|
|000045a0| 6d 6d 65 6e 74 73 0d 0a | 39 37 37 30 20 47 4f 53 |mments..|9770 GOS|
|000045b0| 55 42 20 39 35 30 30 20 | 20 20 20 20 20 20 20 20 |UB 9500 | |
|000045c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000045d0| 27 20 72 6f 75 74 69 6e | 65 20 6c 69 62 72 61 72 |' routin|e librar|
|000045e0| 79 0d 0a 39 37 38 30 20 | 27 20 20 20 20 20 20 20 |y..9780 |' |
|000045f0| 20 20 20 2a 2a 2a 2a 2a | 20 20 4c 41 53 54 20 4c | *****| LAST L|
|00004600| 49 4e 45 20 20 2a 2a 2a | 2a 2a 0d 0a 1a |INE ***|**... |
+--------+-------------------------+-------------------------+--------+--------+
