LABELMAKER
FILE INFORMATION
FILENAME(S): LABELMAKER
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-11-30 18:13:01
APPEARS ON: 1 disk(s)
FILE HASH
0d9c3a39001619287035c213b2b0b4ac81928e3f0ea23a633a4b8b1a3fd8197b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WORKING DISK | LABELMAKER | PRG | Sailor, Ganheden | 17 | 13 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 01 00 8F 53 41 56 45 22 4C 41 42 45 |.......SAVE"LABE|
00000010: 4C 20 4D 41 4B 45 52 20 31 39 38 35 22 00 45 08 |L MAKER 1985".E.|
00000020: 02 00 8F 2A 2A 20 43 4F 50 59 52 49 47 48 54 20 |...** COPYRIGHT |
00000030: 51 55 45 53 54 20 54 45 43 48 4E 4F 4C 4F 47 49 |QUEST TECHNOLOGI|
00000040: 45 53 20 2A 2A 00 6D 08 05 00 8F 2A 2A 20 54 4F |ES **.m....** TO|
00000050: 20 43 48 41 4E 47 45 20 4E 41 4D 45 2C 20 4C 49 | CHANGE NAME, LI|
00000060: 53 54 20 31 37 35 2D 32 31 30 20 2A 2A 00 9A 08 |ST 175-210 **...|
00000070: 0A 00 53 50 24 B2 22 20 20 20 20 20 20 20 20 20 |..SP$." |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 20 22 00 AD 08 0B 00 97 | "......|
000000A0: 35 33 32 38 31 2C 30 3A 99 22 93 11 22 00 DE 08 |53281,0:.".."...|
000000B0: 0E 00 99 22 05 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...".***********|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 0D |*************"..|
000000E0: 09 0F 00 99 22 1E 20 54 48 45 20 4C 41 42 45 4C |....". THE LABEL|
000000F0: 20 4D 41 4B 45 52 20 42 59 20 51 55 45 53 54 20 | MAKER BY QUEST |
00000100: 54 45 43 48 4E 4F 4C 4F 47 49 45 53 22 00 3F 09 |TECHNOLOGIES".?.|
00000110: 10 00 99 22 05 11 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..."..**********|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 |**************".|
00000140: 48 09 12 00 99 22 1E 22 00 62 09 14 00 99 22 9F |H....".".b....".|
00000150: 11 1D 3C 31 3E 20 20 44 49 53 4B 20 4C 41 42 45 |..<1> DISK LABE|
00000160: 4C 22 00 81 09 19 00 99 22 9C 11 1D 3C 32 3E 20 |L"......"...<2> |
00000170: 20 59 4F 55 52 20 4E 41 4D 45 20 4C 41 42 45 4C | YOUR NAME LABEL|
00000180: 22 00 9D 09 1E 00 99 22 1E 11 1D 3C 33 3E 20 20 |"......"...<3> |
00000190: 43 52 45 41 54 45 20 4C 41 42 45 4C 22 00 C0 09 |CREATE LABEL"...|
000001A0: 23 00 99 22 1F 11 1D 3C 34 3E 20 20 47 45 54 20 |#.."...<4> GET |
000001B0: 4C 41 42 45 4C 20 46 52 4F 4D 20 44 49 53 4B 22 |LABEL FROM DISK"|
000001C0: 00 E3 09 28 00 99 22 9E 11 1D 3C 35 3E 20 20 4C |...(.."...<5> L|
000001D0: 41 42 45 4C 20 46 52 4F 4D 20 54 52 41 43 4B 20 |ABEL FROM TRACK |
000001E0: 31 38 22 00 F7 09 2D 00 99 22 1C 11 1D 3C 30 3E |18"...-.."...<0>|
000001F0: 20 20 51 55 49 54 22 00 23 0A 32 00 99 22 1E 11 | QUIT".#.2.."..|
00000200: 11 11 1D 1D 1D 1D 1D 1D 45 4E 54 45 52 20 59 4F |........ENTER YO|
00000210: 55 52 20 53 45 4C 45 43 54 49 4F 4E 20 3F 20 2E |UR SELECTION ? .|
00000220: 2E 2E 22 00 35 0A 37 00 A1 5A 24 3A 8B 5A 24 B2 |..".5.7..Z$:.Z$.|
00000230: 22 22 A7 35 35 00 48 0A 3C 00 8B 5A 24 B2 22 30 |"".55.H.<..Z$."0|
00000240: 22 A7 99 22 93 22 3A 80 00 60 0A 41 00 8B C5 28 |"..".":..`.A...(|
00000250: 5A 24 29 B3 30 B0 C5 28 5A 24 29 B1 35 A7 35 35 |Z$).0..(Z$).5.55|
00000260: 00 7E 0A 46 00 91 C5 28 5A 24 29 89 39 30 2C 31 |.~.F...(Z$).90,1|
00000270: 37 35 2C 32 31 35 2C 32 39 35 2C 35 38 35 00 AC |75,215,295,585..|
00000280: 0A 4B 00 41 24 28 31 29 B2 22 C6 4D 54 3A A4 A4 |.K.A$(1).".MT:..|
00000290: A4 A4 C4 41 54 45 3A A4 A4 A4 A4 A4 D6 4F 4C 3A |...ATE:......OL:|
000002A0: A4 A4 A4 A4 A4 C9 C4 3A A4 A4 A4 22 00 DA 0A 50 |.......:..."...P|
000002B0: 00 41 24 28 32 29 B2 22 44 49 53 4B 20 4E 41 4D |.A$(2)."DISK NAM|
000002C0: 45 3A A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |E:..............|
000002D0: A4 A4 A4 A4 A4 A4 A4 A4 A4 22 00 08 0B 55 00 41 |........."...U.A|
000002E0: 24 28 33 29 B2 22 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |$(3)."..........|
000002F0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000300: A4 A4 A4 A4 A4 A4 A4 22 00 3D 0B 5A 00 41 24 28 |.......".=.Z.A$(|
00000310: 31 29 B2 22 C6 4D 54 3A A4 A4 A4 A4 C4 41 54 45 |1).".MT:.....ATE|
00000320: 3A A4 A4 A4 A4 A4 D6 4F 4C 3A A4 A4 A4 A4 A4 C9 |:......OL:......|
00000330: C4 3A A4 A4 A4 22 3A 53 50 24 B2 22 22 00 6B 0B |.:...":SP$."".k.|
00000340: 5F 00 41 24 28 32 29 B2 22 C4 49 53 4B 20 CE 41 |_.A$(2).".ISK .A|
00000350: 4D 45 3A A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |ME:.............|
00000360: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 00 99 0B 64 00 |.........."...d.|
00000370: 41 24 28 33 29 B2 22 A4 A4 A4 A4 A4 A4 A4 A4 A4 |A$(3).".........|
00000380: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000390: A4 A4 A4 A4 A4 A4 A4 A4 22 00 C7 0B 69 00 41 24 |........"...i.A$|
000003A0: 28 34 29 B2 22 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |(4)."...........|
000003B0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000003C0: A4 A4 A4 A4 A4 A4 22 00 FF 0B 6E 00 41 24 28 35 |......"...n.A$(5|
000003D0: 29 B2 22 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |).".............|
000003E0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000003F0: A4 A4 A4 A4 22 3A 41 24 28 36 29 B2 22 20 22 00 |....":A$(6)." ".|
00000400: 29 0C 73 00 99 22 93 11 11 11 1D 45 4E 54 45 52 |).s..".....ENTER|
00000410: 20 4E 55 4D 42 45 52 20 4F 46 20 4C 41 42 45 4C | NUMBER OF LABEL|
00000420: 53 20 57 41 4E 54 45 44 22 00 31 0C 74 00 85 59 |S WANTED".1.t..Y|
00000430: 24 00 63 0C 76 00 99 3A 99 A3 31 30 29 22 93 11 |$.c.v..:..10)"..|
00000440: 11 11 20 20 20 44 4F 20 45 58 50 41 4E 44 45 44 |.. DO EXPANDED|
00000450: 20 50 52 49 4E 54 20 59 2F 4E 20 3F 22 3A 85 20 | PRINT Y/N ?":. |
00000460: 45 58 24 00 94 0C 77 00 99 22 05 11 20 2A 2A 2A |EX$...w..".. ***|
00000470: 2A 1D 57 41 52 4E 49 4E 47 20 59 4F 55 52 20 4C |*.WARNING YOUR L|
00000480: 41 42 45 4C 53 20 4D 41 59 20 4F 4E 4C 59 1D 2A |ABELS MAY ONLY.*|
00000490: 2A 2A 2A 22 00 C4 0C 78 00 99 22 2A 2A 2A 2A 20 |***"...x.."**** |
000004A0: 42 45 20 31 36 20 43 48 41 52 20 4C 4F 4E 47 20 |BE 16 CHAR LONG |
000004B0: 49 4E 20 45 58 50 41 4E 44 20 4D 4F 44 45 20 2A |IN EXPAND MODE *|
000004C0: 2A 2A 2A 22 00 CD 0C 79 00 99 22 1E 22 00 DD 0C |***"...y.."."...|
000004D0: 7D 00 8B C5 28 59 24 29 B2 30 A7 31 35 00 EE 0C |}...(Y$).0.15...|
000004E0: 82 00 8B C5 28 59 24 29 B3 31 A7 31 32 30 00 32 |....(Y$).1.120.2|
000004F0: 0D 87 00 99 22 11 1D 41 54 20 54 48 49 53 20 54 |...."..AT THIS T|
00000500: 49 4D 45 2C 20 50 52 49 4E 54 45 52 20 53 48 4F |IME, PRINTER SHO|
00000510: 55 4C 44 20 42 45 20 53 45 54 20 55 50 20 20 46 |ULD BE SET UP F|
00000520: 4F 52 20 22 3B 59 24 3B 22 20 4C 41 42 45 4C 53 |OR ";Y$;" LABELS|
00000530: 2E 22 00 56 0D 8C 00 99 22 11 1D 57 48 45 4E 20 |.".V...."..WHEN |
00000540: 52 45 41 44 59 2C 20 50 52 45 53 53 20 41 4E 59 |READY, PRESS ANY|
00000550: 20 4B 45 59 2E 22 00 69 0D 91 00 A1 58 24 3A 8B | KEY.".i....X$:.|
00000560: 58 24 B2 22 22 A7 31 34 35 00 85 0D 96 00 9F 34 |X$."".145......4|
00000570: 2C 34 3A 81 50 52 B2 31 A4 C5 28 59 24 29 3A 81 |,4:.PR.1..(Y$):.|
00000580: 5A B2 31 A4 36 00 91 0D 9B 00 98 34 2C 53 53 24 |Z.1.6......4,SS$|
00000590: 3B 00 B4 0D A0 00 8B 45 58 24 B3 B1 22 59 22 A7 |;......EX$.."Y".|
000005A0: 20 98 34 2C C7 28 31 35 29 C7 28 31 37 29 3B 41 | .4,.(15).(17);A|
000005B0: 24 28 5A 29 00 D6 0D A1 00 8B 45 58 24 B2 22 59 |$(Z)......EX$."Y|
000005C0: 22 A7 20 98 34 2C C7 28 31 34 29 C7 28 31 37 29 |". .4,.(14).(17)|
000005D0: 3B 41 24 28 5A 29 00 E0 0D A2 00 82 5A 2C 50 52 |;A$(Z)......Z,PR|
000005E0: 00 E7 0D A5 00 A0 34 00 F0 0D AA 00 89 34 37 30 |......4......470|
000005F0: 00 FE 0D AF 00 41 24 28 31 29 B2 22 20 22 00 1B |.....A$(1)." "..|
00000600: 0E B4 00 41 24 28 32 29 B2 22 50 55 54 20 59 4F |...A$(2)."PUT YO|
00000610: 55 52 20 52 45 54 55 52 4E 20 22 00 38 0E B9 00 |UR RETURN ".8...|
00000620: 41 24 28 33 29 B2 22 41 44 44 52 45 53 53 20 48 |A$(3)."ADDRESS H|
00000630: 45 52 45 20 20 20 20 22 00 55 0E BE 00 41 24 28 |ERE ".U...A$(|
00000640: 34 29 B2 22 43 49 54 59 2C 53 54 2C 5A 49 50 20 |4)."CITY,ST,ZIP |
00000650: 20 20 20 20 22 00 63 0E C3 00 41 24 28 35 29 B2 | ".c...A$(5).|
00000660: 22 20 22 00 B0 0E C8 00 41 24 28 36 29 B2 22 20 |" ".....A$(6)." |
00000670: 22 3A 8F 2A 2A 2A 2A 2A 44 4F 20 4E 4F 54 20 43 |":.*****DO NOT C|
00000680: 48 41 4E 47 45 21 21 21 21 20 20 53 50 41 43 45 |HANGE!!!! SPACE|
00000690: 52 20 46 4F 52 20 42 45 54 57 45 45 4E 20 4C 41 |R FOR BETWEEN LA|
000006A0: 42 45 4C 53 21 21 21 21 21 21 2A 2A 2A 2A 2A 2A |BELS!!!!!!******|
000006B0: 00 FE 0E CD 00 53 53 24 B2 22 20 20 20 20 20 20 |.....SS$." |
000006C0: 20 22 3A 89 31 31 35 3A 8F 2A 2A 20 53 53 24 20 | ":.115:.** SS$ |
000006D0: 43 45 4E 54 45 52 53 20 50 52 49 4E 54 49 4E 47 |CENTERS PRINTING|
000006E0: 20 4F 4E 20 4C 41 42 45 4C 20 20 41 44 4A 55 53 | ON LABEL ADJUS|
000006F0: 54 20 46 4F 52 20 59 4F 55 52 20 55 53 45 00 1F |T FOR YOUR USE..|
00000700: 0F D2 00 8F 2A 2A 2A 20 4D 41 58 2E 20 33 33 20 |....*** MAX. 33 |
00000710: 43 48 41 52 53 2E 20 50 45 52 20 4C 49 4E 45 00 |CHARS. PER LINE.|
00000720: 51 0F D7 00 99 22 93 11 11 11 1D 20 4C 41 42 45 |Q...."..... LABE|
00000730: 4C 53 20 41 52 45 20 35 20 4C 49 4E 45 53 20 42 |LS ARE 5 LINES B|
00000740: 59 20 33 33 20 43 48 41 52 41 43 54 45 52 53 2E |Y 33 CHARACTERS.|
00000750: 22 00 82 0F D8 00 99 22 1C 2A 2A 20 4F 52 20 35 |"......".** OR 5|
00000760: 20 4C 49 4E 45 53 20 42 59 20 31 36 20 43 48 41 | LINES BY 16 CHA|
00000770: 52 20 49 4E 20 45 58 50 41 4E 44 20 54 59 50 45 |R IN EXPAND TYPE|
00000780: 2A 22 00 B8 0F D9 00 99 22 05 2A 2A 2A 2A 2A 20 |*"......".***** |
00000790: 20 42 45 20 43 41 52 45 46 55 4C 20 44 4F 20 4E | BE CAREFUL DO N|
000007A0: 4F 54 20 42 41 43 4B 53 50 41 43 45 20 20 2A 2A |OT BACKSPACE **|
000007B0: 2A 2A 22 3A 99 22 1C 22 00 CC 0F DC 00 81 4C B2 |**":."."......L.|
000007C0: 31 A4 35 3A 41 24 28 4C 29 B2 22 22 00 07 10 E1 |1.5:A$(L).""....|
000007D0: 00 99 22 11 11 1D 4C 49 4E 45 20 22 3B 4C 3A 99 |.."...LINE ";L:.|
000007E0: 22 11 1D 1D 12 20 20 20 20 20 20 20 20 20 20 20 |".... |
000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000800: 20 20 20 20 20 20 22 00 12 10 E6 00 8D 33 34 35 | "......345|
00000810: 3A 82 00 1B 10 EB 00 99 22 93 22 00 51 10 F0 00 |:.......".".Q...|
00000820: 99 22 20 20 20 12 20 20 20 20 20 20 20 20 20 20 |." . |
00000830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000840: 20 20 20 20 20 20 20 20 20 22 3A 81 4C B2 31 A4 | ":.L.1.|
00000850: 35 00 9B 10 F5 00 99 4C 3B 22 12 20 92 22 3B 41 |5......L;". .";A|
00000860: 24 28 4C 29 3B A3 33 37 29 22 12 20 92 22 3A 82 |$(L);.37)". .":.|
00000870: 3A 99 22 20 20 20 12 20 20 20 20 20 20 20 20 20 |:." . |
00000880: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000890: 20 20 20 20 20 20 20 20 20 20 22 00 BC 10 FA 00 | ".....|
000008A0: 99 22 05 11 11 1D 49 53 20 54 48 49 53 20 43 4F |."....IS THIS CO|
000008B0: 52 52 45 43 54 3F 22 3A 99 22 1E 22 00 CF 10 FF |RRECT?":."."....|
000008C0: 00 A1 58 24 3A 8B 58 24 B2 22 22 A7 32 35 35 00 |..X$:.X$."".255.|
000008D0: DF 10 04 01 8B 58 24 B2 22 4E 22 A7 34 30 30 00 |.....X$."N".400.|
000008E0: 14 11 09 01 8B 58 24 B2 22 59 22 A7 99 22 11 11 |.....X$."Y".."..|
000008F0: 1D 44 4F 20 59 4F 55 20 57 49 53 48 20 54 4F 20 |.DO YOU WISH TO |
00000900: 53 54 4F 52 45 20 54 48 49 53 20 4F 4E 20 44 49 |STORE THIS ON DI|
00000910: 53 4B 3F 22 00 27 11 0E 01 A1 58 24 3A 8B 58 24 |SK?".'....X$:.X$|
00000920: B2 22 22 A7 32 37 30 00 37 11 13 01 8B 58 24 B2 |."".270.7....X$.|
00000930: 22 4E 22 A7 31 31 35 00 48 11 18 01 8B 58 24 B3 |"N".115.H....X$.|
00000940: B1 22 59 22 A7 32 37 30 00 51 11 1D 01 8D 33 37 |."Y".270.Q....37|
00000950: 35 00 5A 11 22 01 89 31 31 35 00 8D 11 27 01 99 |5.Z."..115...'..|
00000960: 22 93 11 11 11 1D 45 4E 54 45 52 20 4E 41 4D 45 |".....ENTER NAME|
00000970: 20 4F 46 20 4C 41 42 45 4C 20 46 49 4C 45 20 59 | OF LABEL FILE Y|
00000980: 4F 55 20 57 49 53 48 22 3A 85 4C 46 24 00 A8 11 |OU WISH":.LF$...|
00000990: 2C 01 9F 32 2C 38 2C 32 2C 22 30 3A 22 AA 4C 46 |,..2,8,2,"0:".LF|
000009A0: 24 AA 22 2C 53 2C 52 22 00 E1 11 31 01 84 32 2C |$.",S,R"...1..2,|
000009B0: 41 24 28 31 29 2C 41 24 28 32 29 2C 41 24 28 33 |A$(1),A$(2),A$(3|
000009C0: 29 2C 41 24 28 34 29 2C 41 24 28 35 29 3A 5A 24 |),A$(4),A$(5):Z$|
000009D0: B2 22 5C 22 3A 5A 5A 24 B2 22 2C 22 3A 8D 37 32 |."\":ZZ$.",":.72|
000009E0: 30 00 2B 12 36 01 99 22 20 20 20 12 20 20 20 20 |0.+.6.." . |
000009F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000A10: 3A 81 4C B2 31 A4 35 3A 41 24 28 4C 29 B2 CA 28 |:.L.1.5:A$(L)..(|
00000A20: 41 24 28 4C 29 2C 32 2C 33 33 29 00 75 12 3B 01 |A$(L),2,33).u.;.|
00000A30: 99 4C 3B 22 12 20 92 22 3B 41 24 28 4C 29 3B A3 |.L;". .";A$(L);.|
00000A40: 33 37 29 22 12 20 92 22 3A 82 3A 99 22 1D 1D 20 |37)". .":.:.".. |
00000A50: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000A60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A70: 20 20 20 20 22 00 9C 12 40 01 A0 32 3A 99 22 11 | "...@..2:.".|
00000A80: 11 1D 49 53 20 54 48 49 53 20 54 48 45 20 43 4F |..IS THIS THE CO|
00000A90: 52 52 45 43 54 20 46 49 4C 45 3F 22 00 AF 12 45 |RRECT FILE?"...E|
00000AA0: 01 A1 58 24 3A 8B 58 24 B2 22 22 A7 33 32 35 00 |..X$:.X$."".325.|
00000AB0: BF 12 4A 01 8B 58 24 B2 22 4E 22 A7 32 39 35 00 |..J..X$."N".295.|
00000AC0: D0 12 4F 01 8B 58 24 B3 B1 22 59 22 A7 33 32 35 |..O..X$.."Y".325|
00000AD0: 00 D9 12 54 01 89 31 31 35 00 EC 12 59 01 A1 41 |...T..115...Y..A|
00000AE0: 24 3A 8B 41 24 B2 22 22 A7 33 34 35 00 FE 12 5E |$:.A$."".345...^|
00000AF0: 01 8B 41 24 B2 C7 28 31 33 29 A7 33 36 30 00 32 |..A$..(13).360.2|
00000B00: 13 63 01 41 24 28 4C 29 B2 41 24 28 4C 29 AA 41 |.c.A$(L).A$(L).A|
00000B10: 24 3A 41 24 B2 22 22 3A 99 22 20 20 22 41 24 28 |$:A$."":." "A$(|
00000B20: 4C 29 AA C7 28 31 36 36 29 AA 22 91 22 3A 89 33 |L)..(166).".":.3|
00000B30: 34 35 00 5E 13 68 01 8B C3 28 41 24 28 4C 29 29 |45.^.h...(A$(L))|
00000B40: B1 33 33 A7 99 22 54 4F 4F 20 4C 4F 4E 47 21 22 |.33.."TOO LONG!"|
00000B50: 3A 41 24 28 4C 29 B2 22 22 3A 89 33 34 35 00 A9 |:A$(L)."":.345..|
00000B60: 13 6D 01 44 24 B2 22 20 20 20 20 20 20 20 20 20 |.m.D$." |
00000B70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B80: 20 20 20 20 20 20 20 20 22 3A 41 24 28 4C 29 B2 | ":A$(L).|
00000B90: 41 24 28 4C 29 AA C9 28 44 24 2C 33 33 AB 28 C3 |A$(L)..(D$,33.(.|
00000BA0: 28 41 24 28 4C 29 29 29 29 00 AF 13 72 01 8E 00 |(A$(L))))...r...|
00000BB0: ED 13 77 01 99 22 93 11 11 11 1D 49 4E 50 55 54 |..w..".....INPUT|
00000BC0: 20 4E 41 4D 45 20 4F 46 20 4C 41 42 45 4C 20 46 | NAME OF LABEL F|
00000BD0: 49 4C 45 22 3A 85 4C 46 24 3A 5A 24 B2 22 2C 22 |ILE":.LF$:Z$.","|
00000BE0: 3A 5A 5A 24 B2 22 5C 22 3A 8D 37 32 30 00 08 14 |:ZZ$."\":.720...|
00000BF0: 7C 01 9F 32 2C 38 2C 32 2C 22 30 3A 22 AA 4C 46 ||..2,8,2,"0:".LF|
00000C00: 24 AA 22 2C 53 2C 57 22 00 29 14 81 01 81 4C B2 |$.",S,W".)....L.|
00000C10: 31 A4 35 3A 42 24 28 4C 29 B2 22 5C 22 AA 41 24 |1.5:B$(L)."\".A$|
00000C20: 28 4C 29 AA 22 5C 22 3A 82 00 5A 14 86 01 98 32 |(L)."\":..Z....2|
00000C30: 2C 42 24 28 31 29 3A 98 32 2C 42 24 28 32 29 3A |,B$(1):.2,B$(2):|
00000C40: 98 32 2C 42 24 28 33 29 3A 98 32 2C 42 24 28 34 |.2,B$(3):.2,B$(4|
00000C50: 29 3A 98 32 2C 42 24 28 35 29 00 63 14 8B 01 A0 |):.2,B$(5).c....|
00000C60: 32 3A 8E 00 9C 14 90 01 99 22 93 11 11 20 20 20 |2:......."... |
00000C70: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000C80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C90: 20 20 20 20 22 3A 81 4C B2 31 A4 35 00 E6 14 95 | ":.L.1.5....|
00000CA0: 01 99 4C 3B 22 12 20 92 22 3B 41 24 28 4C 29 3B |..L;". .";A$(L);|
00000CB0: A3 33 37 29 22 12 20 92 22 3A 82 3A 99 22 20 20 |.37)". .":.:." |
00000CC0: 20 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000CD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CE0: 20 20 20 20 20 22 00 13 15 9A 01 99 22 11 11 11 | "......"...|
00000CF0: 1D 57 48 49 43 48 20 4C 49 4E 45 20 44 4F 20 59 |.WHICH LINE DO Y|
00000D00: 4F 55 20 57 49 53 48 20 54 4F 20 43 48 41 4E 47 |OU WISH TO CHANG|
00000D10: 45 3F 22 00 26 15 9F 01 A1 4C 24 3A 8B 4C 24 B2 |E?".&....L$:.L$.|
00000D20: 22 22 A7 34 31 35 00 3F 15 A4 01 4C B2 C5 28 4C |"".415.?...L..(L|
00000D30: 24 29 3A 8B 4C B3 31 B0 4C B1 35 A7 34 31 35 00 |$):.L.1.L.5.415.|
00000D40: 56 15 A9 01 99 22 11 45 4E 54 45 52 20 4E 45 57 |V....".ENTER NEW|
00000D50: 20 4C 49 4E 45 22 00 84 15 AE 01 99 22 11 11 1D | LINE"......"...|
00000D60: 1D 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D80: 20 20 20 22 00 8F 15 B3 01 85 41 24 28 4C 29 00 | "......A$(L).|
00000D90: 98 15 B8 01 89 32 33 35 00 B2 15 BD 01 99 22 11 |.....235......".|
00000DA0: 11 1D 49 53 20 54 48 49 53 20 43 4F 52 52 45 43 |..IS THIS CORREC|
00000DB0: 54 3F 00 C5 15 C2 01 A1 58 24 3A 8B 58 24 B2 22 |T?......X$:.X$."|
00000DC0: 22 A7 34 35 30 00 D3 15 C7 01 8B 58 24 B2 22 59 |".450......X$."Y|
00000DD0: 22 A7 8E 00 E3 15 CC 01 8B 58 24 B2 22 4E 22 A7 |"........X$."N".|
00000DE0: 34 30 30 00 EC 15 D1 01 89 34 35 30 00 03 16 D6 |400......450....|
00000DF0: 01 99 22 11 11 11 1D 4D 4F 52 45 3F 20 28 59 2F |.."....MORE? (Y/|
00000E00: 4E 29 22 00 16 16 DB 01 A1 58 24 3A 8B 58 24 B2 |N)"......X$:.X$.|
00000E10: 22 22 A7 34 37 35 00 26 16 E0 01 8B 58 24 B2 22 |"".475.&....X$."|
00000E20: 59 22 A7 31 31 35 00 35 16 E5 01 8B 58 24 B2 22 |Y".115.5....X$."|
00000E30: 4E 22 A7 31 35 00 3E 16 EA 01 89 34 37 35 00 6B |N".15.>....475.k|
00000E40: 16 EF 01 9F 31 35 2C 38 2C 31 35 3A 9F 32 2C 38 |....15,8,15:.2,8|
00000E50: 2C 32 2C 22 23 22 3A 98 31 35 2C 22 55 31 3A 32 |,2,"#":.15,"U1:2|
00000E60: 22 3B 44 56 3B 22 31 38 2C 30 22 00 8A 16 F4 01 |";DV;"18,0".....|
00000E70: 98 31 35 2C 22 42 2D 50 3A 32 2C 31 36 32 22 3A |.15,"B-P:2,162":|
00000E80: 49 44 24 B2 22 22 3A 4C B2 30 00 AA 16 F9 01 81 |ID$."":L.0......|
00000E90: 49 B2 31 A4 31 36 3A A1 23 32 2C 41 24 3A 49 44 |I.1.16:.#2,A$:ID|
00000EA0: 24 B2 49 44 24 AA 41 24 3A 82 00 C5 16 FE 01 98 |$.ID$.A$:.......|
00000EB0: 31 35 2C 22 42 2D 50 3A 32 2C 31 34 34 22 3A 44 |15,"B-P:2,144":D|
00000EC0: 4E 24 B2 22 22 00 E5 16 03 02 81 49 B2 31 A4 31 |N$.""......I.1.1|
00000ED0: 37 3A A1 23 32 2C 41 24 3A 44 4E 24 B2 44 4E 24 |7:.#2,A$:DN$.DN$|
00000EE0: AA 41 24 3A 82 00 FF 16 08 02 A0 31 35 3A A0 32 |.A$:.......15:.2|
00000EF0: 3A 49 44 24 B2 CA 28 49 44 24 2C 31 2C 32 29 00 |:ID$..(ID$,1,2).|
00000F00: 23 17 0D 02 81 49 B2 31 A4 31 36 3A 8B CA 28 44 |#....I.1.16:..(D|
00000F10: 4E 24 2C 49 2C 31 29 B3 B1 C7 28 31 36 30 29 A7 |N$,I,1)...(160).|
00000F20: 35 34 30 00 30 17 12 02 8B 4C B1 30 A7 35 34 35 |540.0....L.0.545|
00000F30: 00 38 17 17 02 4C B2 31 00 3F 17 1C 02 82 49 00 |.8...L.1.?....I.|
00000F40: 58 17 21 02 49 B2 49 AB 32 3A 44 4E 24 B2 C8 28 |X.!.I.I.2:DN$..(|
00000F50: 44 4E 24 2C 49 29 3A 8E 00 6A 17 26 02 81 4C B2 |DN$,I):..j.&..L.|
00000F60: 30 A4 4A 3A A1 23 31 2C 41 24 00 8E 17 2B 02 8B |0.J:.#1,A$...+..|
00000F70: 41 24 B3 B1 C7 28 39 36 29 A7 8B 41 24 B3 B1 C7 |A$...(96)..A$...|
00000F80: 28 31 36 30 29 A7 42 24 B2 42 24 AA 41 24 00 96 |(160).B$.B$.A$..|
00000F90: 17 30 02 82 3A 8E 00 A9 17 35 02 A1 5A 24 3A 8B |.0..:....5..Z$:.|
00000FA0: 5A 24 B2 22 22 A7 35 36 35 00 C6 17 3A 02 8B 5A |Z$."".565...:..Z|
00000FB0: 24 B2 22 59 22 A7 4E 24 B2 22 22 3A 49 24 B2 22 |$."Y".N$."":I$."|
00000FC0: 22 3A 89 35 38 35 00 D5 17 3F 02 8B 5A 24 B2 22 |":.585...?..Z$."|
00000FD0: 4E 22 A7 31 35 00 DE 17 44 02 89 35 36 35 00 1F |N".15...D..565..|
00000FE0: 18 49 02 99 22 93 11 1D 44 4F 20 59 4F 55 20 57 |.I.."...DO YOU W|
00000FF0: 49 53 48 20 12 44 92 4F 55 42 4C 45 2D 57 49 44 |ISH .D.OUBLE-WID|
00001000: 45 20 4F 52 20 12 4E 92 4F 52 4D 41 4C 20 20 20 |E OR .N.ORMAL |
00001010: 20 20 20 20 4C 45 54 54 45 52 49 4E 47 3F 22 00 | LETTERING?".|
00001020: 49 18 4E 02 53 50 24 B2 22 20 20 20 20 20 20 20 |I.N.SP$." |
00001030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001040: 20 20 20 20 20 20 20 20 22 00 5C 18 53 02 A1 5A | ".\.S..Z|
00001050: 24 3A 8B 5A 24 B2 22 22 A7 35 39 35 00 71 18 58 |$:.Z$."".595.q.X|
00001060: 02 8B 5A 24 B2 22 44 22 A7 57 B2 31 3A 89 36 31 |..Z$."D".W.1:.61|
00001070: 35 00 86 18 5D 02 8B 5A 24 B2 22 4E 22 A7 57 B2 |5...]..Z$."N".W.|
00001080: 32 3A 89 36 31 35 00 8F 18 62 02 89 35 39 35 00 |2:.615...b..595.|
00001090: B9 18 67 02 99 22 93 22 3A 99 22 11 11 11 11 1D |..g..".":.".....|
000010A0: 1D 1D 1D 1D 49 44 22 3A 99 22 1D 31 22 3A 99 22 |....ID":.".1":."|
000010B0: 1D 1D 1D 1D 4E 41 4D 45 22 00 DE 18 6C 02 99 22 |....NAME"...l.."|
000010C0: 11 11 11 11 1D 1D 1D 1D 4E 41 4D 45 22 3A 99 22 |........NAME":."|
000010D0: 1D 32 22 3A 99 22 1D 1D 1D 1D 1D 49 44 22 00 04 |.2":.".....ID"..|
000010E0: 19 71 02 99 22 11 11 44 4F 20 59 4F 55 20 57 49 |.q.."..DO YOU WI|
000010F0: 53 48 20 54 59 50 45 20 12 31 92 20 4F 52 20 12 |SH TYPE .1. OR .|
00001100: 32 92 3F 22 00 17 19 76 02 A1 5A 24 3A 8B 5A 24 |2.?"...v..Z$:.Z$|
00001110: B2 22 22 A7 36 33 30 00 30 19 7B 02 5A B2 C5 28 |."".630.0.{.Z..(|
00001120: 5A 24 29 3A 8B 5A B3 31 B0 5A B1 32 A7 36 33 30 |Z$):.Z.1.Z.2.630|
00001130: 00 7C 19 80 02 99 22 93 11 1D 49 4E 53 45 52 54 |.|...."...INSERT|
00001140: 20 54 48 45 20 44 49 53 4B 20 54 48 45 20 4C 41 | THE DISK THE LA|
00001150: 42 45 4C 20 49 53 20 46 4F 52 2E 20 20 20 20 20 |BEL IS FOR. |
00001160: 20 20 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 | PRESS ANY KEY |
00001170: 57 48 45 4E 20 52 45 41 44 59 2E 22 00 8F 19 85 |WHEN READY."....|
00001180: 02 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 36 34 35 00 |..Z$:.Z$."".645.|
00001190: 98 19 8A 02 8D 34 39 35 00 C2 19 8F 02 9F 34 2C |.....495......4,|
000011A0: 34 3A 8D 36 38 35 3A 44 24 B2 22 43 48 52 24 28 |4:.685:D$."CHR$(|
000011B0: 31 34 29 22 3A 4E 24 B2 22 43 48 52 24 28 31 35 |14)":N$."CHR$(15|
000011C0: 29 22 00 CF 19 94 02 8B 57 B2 32 A7 37 30 30 00 |)"......W.2.700.|
000011D0: DC 19 99 02 8B 5A B2 31 A7 36 37 35 00 04 1A 9E |.....Z.1.675....|
000011E0: 02 98 34 3A 98 34 3A 98 34 2C C7 28 31 34 29 44 |..4:.4:.4,.(14)D|
000011F0: 53 24 3A 98 34 3A 98 34 2C 49 44 24 3A 98 34 3A |S$:.4:.4,ID$:.4:|
00001200: 89 36 38 30 00 27 1A A3 02 98 34 3A 98 34 3A 98 |.680.'....4:.4:.|
00001210: 34 2C C7 28 31 34 29 49 44 24 3A 98 34 3A 98 34 |4,.(14)ID$:.4:.4|
00001220: 2C 44 4E 24 3A 98 34 00 62 1A A8 02 98 34 2C C7 |,DN$:.4.b....4,.|
00001230: 28 31 35 29 3A A0 34 3A 99 22 93 1D 44 4F 20 59 |(15):.4:."..DO Y|
00001240: 4F 55 20 57 49 53 48 20 41 4E 4F 54 48 45 52 20 |OU WISH ANOTHER |
00001250: 4C 41 42 45 4C 3F 20 28 59 2F 4E 29 22 3A 89 35 |LABEL? (Y/N)":.5|
00001260: 36 35 00 93 1A AD 02 8B 57 B2 31 A7 58 B2 C3 28 |65......W.1.X..(|
00001270: 44 4E 24 29 3A 59 B2 B5 28 28 31 36 AB 58 29 AD |DN$):Y..((16.X).|
00001280: 32 29 3A 44 53 24 B2 C8 28 53 50 24 2C 59 29 AA |2):DS$..(SP$,Y).|
00001290: 44 4E 24 00 AF 1A B2 02 8B 57 B2 31 A7 49 44 24 |DN$......W.1.ID$|
000012A0: B2 C8 28 53 50 24 2C 37 29 AA 49 44 24 3A 8E 00 |..(SP$,7).ID$:..|
000012B0: EF 1A B7 02 58 B2 C3 28 44 4E 24 29 3A 59 B2 B5 |....X..(DN$):Y..|
000012C0: 28 28 33 33 AB 58 29 AD 32 29 3A 44 4E 24 B2 C8 |((33.X).2):DN$..|
000012D0: 28 53 50 24 2C 59 29 AA 44 4E 24 3A 49 44 24 B2 |(SP$,Y).DN$:ID$.|
000012E0: C8 28 53 50 24 2C 31 35 29 AA 49 44 24 3A 8E 00 |.(SP$,15).ID$:..|
000012F0: FC 1A BC 02 8B 5A B2 31 A7 37 31 30 00 24 1B C1 |.....Z.1.710.$..|
00001300: 02 98 34 3A 98 34 3A 98 34 2C C7 28 31 35 29 49 |..4:.4:.4,.(15)I|
00001310: 44 24 3A 98 34 3A 98 34 2C 44 4E 24 3A 98 34 3A |D$:.4:.4,DN$:.4:|
00001320: 89 37 31 35 00 47 1B C6 02 98 34 3A 98 34 3A 98 |.715.G....4:.4:.|
00001330: 34 2C C7 28 31 35 29 44 4E 24 3A 98 34 3A 98 34 |4,.(15)DN$:.4:.4|
00001340: 2C 49 44 24 3A 98 34 00 82 1B CB 02 98 34 2C C7 |,ID$:.4......4,.|
00001350: 28 31 35 29 3A A0 34 3A 99 22 93 1D 44 4F 20 59 |(15):.4:."..DO Y|
00001360: 4F 55 20 57 49 53 48 20 41 4E 4F 54 48 45 52 20 |OU WISH ANOTHER |
00001370: 4C 41 42 45 4C 3F 20 28 59 2F 4E 29 22 3A 89 35 |LABEL? (Y/N)":.5|
00001380: 36 35 00 8D 1B D0 02 81 4D B2 31 A4 35 00 A7 1B |65......M.1.5...|
00001390: D5 02 4C 45 B2 C3 28 41 24 28 4D 29 29 3A 8B 4C |..LE..(A$(M)):.L|
000013A0: 45 B2 30 A7 37 34 30 00 C9 1B DA 02 81 51 B2 31 |E.0.740......Q.1|
000013B0: A4 4C 45 3A 8B CA 28 41 24 28 4D 29 2C 51 2C 31 |.LE:..(A$(M),Q,1|
000013C0: 29 B2 5A 24 A7 8D 37 34 35 00 D0 1B DF 02 82 51 |).Z$..745......Q|
000013D0: 00 D9 1B E4 02 82 4D 3A 8E 00 FE 1B E9 02 58 24 |......M:......X$|
000013E0: B2 C8 28 41 24 28 4D 29 2C 51 AB 31 29 3A 59 24 |..(A$(M),Q.1):Y$|
000013F0: B2 C9 28 41 24 28 4D 29 2C 4C 45 AB 51 29 00 12 |..(A$(M),LE.Q)..|
00001400: 1C EE 02 41 24 28 4D 29 B2 58 24 AA 5A 5A 24 AA |...A$(M).X$.ZZ$.|
00001410: 59 24 00 18 1C F3 02 8E 00 00 00 |Y$......... |
.......SAVE"LABEL MAKER 1985".E....** CO
PYRIGHT QUEST TECHNOLOGIES **.M....** TO
CHANGE NAME, LIST 175-210 **.....SP$."
"......
53281,0:.".."......".*******************
*********************"......". THE LABEL
MAKER BY QUEST TECHNOLOGIES".?...."..**
**************************************".
H....".".B...."...<1> DISK LABEL"......
"...<2> YOUR NAME LABEL"......"...<3>
CREATE LABEL"...#.."...<4> GET LABEL FR
OM DISK"...(.."...<5> LABEL FROM TRACK
18"...-.."...<0> QUIT".#.2.."..........
ENTER YOUR SELECTION ? ...".5.7..Z$:.Z$.
"".55.H.<..Z$."0"..".":..`.A..E(Z$).0.E(
Z$).5.55.~.F..E(Z$).90,175,215,295,585..
.K.A$(1)."FMT:....DATE:.....VOL:.....ID:
...".Z.P.A$(2)."DISK NAME:..............
........."...U.A$(3)."..................
...............".=.Z.A$(1)."FMT:....DATE
:.....VOL:.....ID:...":SP$."".K._.A$(2).
"DISK NAME:......................."...D.
A$(3).".................................
".G.I.A$(4)."...........................
......"...N.A$(5).".....................
............":A$(6)." ".).S..".....ENTER
NUMBER OF LABELS WANTED".1.T..Y$.C.V..:
..10)".... DO EXPANDED PRINT Y/N ?":.
EX$...W..".. ****.WARNING YOUR LABELS MA
Y ONLY.****".D.X.."**** BE 16 CHAR LONG
IN EXPAND MODE ****".M.Y.."."...}..E(Y$)
.0.15......E(Y$).1.120.2...."..AT THIS T
IME, PRINTER SHOULD BE SET UP FOR ";Y$;
" LABELS.".V...."..WHEN READY, PRESS ANY
KEY.".I....X$:.X$."".145......4,4:.PR.1
.E(Y$):.Z.1.6......4,SS$;... ..EX$.."Y".
.4,G(15)G(17);A$(Z).V....EX$."Y". .4,G(
14)G(17);A$(Z)......Z,PR..... 4......470
.....A$(1)." ".....A$(2)."PUT YOUR RETUR
N ".8...A$(3)."ADDRESS HERE ".U...A$(
4)."CITY,ST,ZIP ".C.C.A$(5)." "...H.
A$(6)." ":.*****DO NOT CHANGE!!!! SPACE
R FOR BETWEEN LABELS!!!!!!******...M.SS$
." ":.115:.** SS$ CENTERS PRINTING
ON LABEL ADJUST FOR YOUR USE...R..***
MAX. 33 CHARS. PER LINE.Q.W.."..... LABE
LS ARE 5 LINES BY 33 CHARACTERS."...X.."
.** OR 5 LINES BY 16 CHAR IN EXPAND TYPE
*"...Y..".***** BE CAREFUL DO NOT BACKS
PACE ****":.".".L....L.1.5:A$(L).""....
.."...LINE ";L:."....
"......345:.......".".Q...
." .
":.L.1.5......L;". .";A$(L);.37)". .":.
:." .
"......"....IS THIS CORRECT?":.".".O..
..X$:.X$."".255......X$."N".400......X$.
"Y".."...DO YOU WISH TO STORE THIS ON DI
SK?".'....X$:.X$."".270.7....X$."N".115.
H....X$.."Y".270.Q....375.Z."..115...'..
".....ENTER NAME OF LABEL FILE YOU WISH"
:.LF$...,..2,8,2,"0:".LF$.",S,R"...1..2,
A$(1),A$(2),A$(3),A$(4),A$(5):Z$."\":ZZ$
.",":.720.+.6.." .
":.L.1.5:A$(L).J(A$(L),2,
33).U.;..L;". .";A$(L);.37)". .":.:."..
. "...
@. 2:."...IS THIS THE CORRECT FILE?"...E
..X$:.X$."".325...J..X$."N".295.P.O..X$.
."Y".325.Y.T..115...Y..A$:.A$."".345...^
..A$.G(13).360.2.C.A$(L).A$(L).A$:A$."":
." "A$(L).G(166).".":.345.^.H..C(A$(L))
.33.."TOO LONG!":A$(L)."":.345...M.D$."
":A$(L).
A$(L).I(D$,33.(C(A$(L))))...R.....W.."..
...INPUT NAME OF LABEL FILE":.LF$:Z$.","
:ZZ$."\":.720...|..2,8,2,"0:".LF$.",S,W"
.)....L.1.5:B$(L)."\".A$(L)."\":..Z....2
,B$(1):.2,B$(2):.2,B$(3):.2,B$(4):.2,B$(
5).C... 2:......."... .
":.L.1.5......L;". .
";A$(L);.37)". .":.:." .
"......"....WHICH L
INE DO YOU WISH TO CHANGE?".&....L$:.L$.
"".415.?...L.E(L$):.L.1.L.5.415.V....".E
NTER NEW LINE"......".....
"......A$(L)......235
......"...IS THIS CORRECT?.E.B..X$:.X$."
".450.S.G..X$."Y".....L..X$."N".400...Q.
.450...V.."....MORE? (Y/N)"......X$:.X$.
"".475.&....X$."Y".115.5....X$."N".15.>.
...475.K....15,8,15:.2,8,2,"#":.15,"U1:2
";DV;"18,0"......15,"B-P:2,162":ID$."":L
.0......I.1.16:.#2,A$:ID$.ID$.A$:..E....
15,"B-P:2,144":DN$.""......I.1.17:.#2,A$
:DN$.DN$.A$:...... 15: 2:ID$.J(ID$,1,2).
#....I.1.16:.J(DN$,I,1)..G(160).540.0...
.L.0.545.8...L.1.?....I.X.!.I.I.2:DN$.H(
DN$,I):..J.&..L.0.J:.#1,A$...+..A$..G(96
)..A$..G(160).B$.B$.A$...0..:....5..Z$:.
Z$."".565.F.:..Z$."Y".N$."":I$."":.585.U
.?..Z$."N".15...D..565...I.."...DO YOU W
ISH .D.OUBLE-WIDE OR .N.ORMAL LETT
ERING?".I.N.SP$."
".\.S..Z$:.Z$."".595.Q.X..Z$."D"
.W.1:.615...]..Z$."N".W.2:.615...B..595.
..G..".":.".........ID":.".1":."....NAME
"...L.."........NAME":.".2":.".....ID"..
.Q.."..DO YOU WISH TYPE .1. OR .2.?"...V
..Z$:.Z$."".630.0.{.Z.E(Z$):.Z.1.Z.2.630
.|...."...INSERT THE DISK THE LABEL IS F
OR. PRESS ANY KEY WHEN READY."....
..Z$:.Z$."".645......495.B....4,4:.685:D
$."CHR$(14)":N$."CHR$(15)".O....W.2.700.
.....Z.1.675......4:.4:.4,G(14)DS$:.4:.4
,ID$:.4:.680.'....4:.4:.4,G(14)ID$:.4:.4
,DN$:.4.B....4,G(15): 4:."..DO YOU WISH
ANOTHER LABEL? (Y/N)":.565......W.1.X.C(
DN$):Y..((16.X).2):DS$.H(SP$,Y).DN$.....
.W.1.ID$.H(SP$,7).ID$:......X.C(DN$):Y..
((33.X).2):DN$.H(SP$,Y).DN$:ID$.H(SP$,15
).ID$:.......Z.1.710.$.A..4:.4:.4,G(15)I
D$:.4:.4,DN$:.4:.715.G.F..4:.4:.4,G(15)D
N$:.4:.4,ID$:.4...K..4,G(15): 4:."..DO Y
OU WISH ANOTHER LABEL? (Y/N)":.565...P..
M.1.5...U.LE.C(A$(M)):.LE.0.740.I.Z..Q.1
.LE:.J(A$(M),Q,1).Z$..745.P....Q.Y....M:
......X$.H(A$(M),Q.1):Y$.I(A$(M),LE.Q)..
...A$(M).X$.ZZ$.Y$.........
> CLICK IMAGE PREVIEW FOR FULL MODAL