ADDRESS LABELER
FILE INFORMATION
FILENAME(S): ADDRESS LABELER
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-10-19 22:48:31
APPEARS ON: 1 disk(s)
FILE HASH
ae7c7c976dc2ece2c1a6cdcfa0b64cb97de553ea4a5e3203a52208c5947b750a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES U38 | ADDRESS LABELER | PRG | Radd Maxx | 19 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 00 00 8F 20 4C 41 42 45 4C 20 4D 41 |....... LABEL MA|
00000010: 4B 45 52 20 55 54 49 4C 49 54 59 00 36 08 01 00 |KER UTILITY.6...|
00000020: 8F 20 42 59 20 20 4A 4F 53 45 50 48 20 53 54 45 |. BY JOSEPH STE|
00000030: 49 4E 20 4A 52 2E 00 55 08 02 00 8F 20 20 20 20 |IN JR..U.... |
00000040: 20 38 35 39 20 4D 49 41 4D 49 20 53 54 2E 2C 41 | 859 MIAMI ST.,A|
00000050: 50 54 2E 33 35 00 70 08 03 00 8F 20 20 20 20 20 |PT.35.p.... |
00000060: 54 49 46 46 49 4E 2C 20 4F 48 20 34 34 38 38 33 |TIFFIN, OH 44883|
00000070: 00 8D 08 04 00 8F 20 20 20 20 20 50 48 2E 20 28 |...... PH. (|
00000080: 34 31 39 29 20 34 34 37 2D 37 39 30 38 00 A1 08 |419) 447-7908...|
00000090: 05 00 8F 20 4E 4F 56 45 4D 42 45 52 20 31 39 38 |... NOVEMBER 198|
000000A0: 34 00 BF 08 50 00 8F 20 45 4E 54 45 52 20 54 45 |4...P.. ENTER TE|
000000B0: 58 54 20 46 4F 52 20 4C 41 42 45 4C 28 53 29 00 |XT FOR LABEL(S).|
000000C0: DC 08 64 00 97 35 33 32 38 30 2C 31 32 3A 97 35 |..d..53280,12:.5|
000000D0: 33 32 38 31 2C 39 3A 99 22 93 9E 22 00 E6 08 6B |3281,9:.".."...k|
000000E0: 00 8D 32 30 30 30 00 09 09 6E 00 41 59 24 B2 22 |..2000...n.AY$."|
000000F0: 41 52 45 20 59 4F 55 20 53 55 52 45 3F 20 28 59 |ARE YOU SURE? (Y|
00000100: 2F 4E 29 22 3A 57 4C B2 2E 00 31 09 78 00 4D 41 |/N)":WL...1.x.MA|
00000110: 24 B2 22 93 11 11 11 11 1D 4D 41 58 2E 20 33 32 |$."......MAX. 32|
00000120: 20 4B 45 59 53 54 52 4F 4B 45 53 2F 4C 49 4E 45 | KEYSTROKES/LINE|
00000130: 22 00 74 09 C8 00 99 4D 41 24 3A 85 22 91 91 91 |".t....MA$:."...|
00000140: 91 91 11 1D 45 4E 54 45 52 20 4E 41 4D 45 2C 20 |....ENTER NAME, |
00000150: 52 45 54 55 52 4E 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |RETURN..........|
00000160: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 52 41 |............";RA|
00000170: 24 28 31 29 00 B1 09 D2 00 99 22 11 20 20 20 20 |$(1)......". |
00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000190: 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ...........|
000001A0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 41 59 |............."AY|
000001B0: 24 00 C4 09 E1 00 A1 59 24 3A 8B 59 24 B2 22 22 |$......Y$:.Y$.""|
000001C0: A7 32 32 35 00 D4 09 F0 00 8B 59 24 B2 22 4E 22 |.225......Y$."N"|
000001D0: A7 32 30 30 00 E5 09 FA 00 8B 59 24 B3 B1 22 59 |.200......Y$.."Y|
000001E0: 22 A7 32 32 35 00 FA 09 0E 01 8B 57 4C B2 31 AF |".225......WL.1.|
000001F0: 59 24 B2 22 59 22 A7 37 30 30 00 3D 0A 2C 01 99 |Y$."Y".700.=.,..|
00000200: 4D 41 24 3A 85 22 91 91 91 91 91 11 1D 45 4E 54 |MA$:.".......ENT|
00000210: 45 52 20 41 44 44 52 45 53 53 20 28 4E 4F 20 43 |ER ADDRESS (NO C|
00000220: 4F 4D 4D 41 53 29 2C 20 52 45 54 55 52 4E 1D 1D |OMMAS), RETURN..|
00000230: 1D 1D 1D 1D 1D 22 3B 52 41 24 28 32 29 00 7A 0A |.....";RA$(2).z.|
00000240: 36 01 99 22 11 20 20 20 20 20 20 20 20 20 20 20 |6..". |
00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 9D 9D | ..|
00000260: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000270: 9D 9D 9D 9D 9D 9D 22 41 59 24 00 8D 0A 45 01 A1 |......"AY$...E..|
00000280: 59 24 3A 8B 59 24 B2 22 22 A7 33 32 35 00 9D 0A |Y$:.Y$."".325...|
00000290: 54 01 8B 59 24 B2 22 4E 22 A7 33 30 30 00 AE 0A |T..Y$."N".300...|
000002A0: 5E 01 8B 59 24 B3 B1 22 59 22 A7 33 32 35 00 C3 |^..Y$.."Y".325..|
000002B0: 0A 72 01 8B 57 4C B2 32 AF 59 24 B2 22 59 22 A7 |.r..WL.2.Y$."Y".|
000002C0: 37 30 30 00 0E 0B 90 01 99 4D 41 24 3A 85 22 91 |700......MA$:.".|
000002D0: 91 91 91 91 11 45 4E 54 45 52 20 43 49 54 59 2C |.....ENTER CITY,|
000002E0: 53 54 41 54 45 20 28 45 2E 47 2E 20 54 49 46 46 |STATE (E.G. TIFF|
000002F0: 49 4E 2C 4F 48 49 4F 29 1D 1D 1D 1D 1D 1D 1D 22 |IN,OHIO)......."|
00000300: 3B 52 41 24 28 33 29 2C 52 41 24 28 34 29 00 24 |;RA$(3),RA$(4).$|
00000310: 0B 95 01 52 41 24 28 34 29 B2 22 20 22 AA 52 41 |...RA$(4)." ".RA|
00000320: 24 28 34 29 00 61 0B 9A 01 99 22 11 20 20 20 20 |$(4).a....". |
00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000340: 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ...........|
00000350: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 41 59 |............."AY|
00000360: 24 00 74 0B A9 01 A1 59 24 3A 8B 59 24 B2 22 22 |$.t....Y$:.Y$.""|
00000370: A7 34 32 35 00 84 0B B8 01 8B 59 24 B2 22 4E 22 |.425......Y$."N"|
00000380: A7 34 30 30 00 95 0B C2 01 8B 59 24 B3 B1 22 59 |.400......Y$.."Y|
00000390: 22 A7 34 32 35 00 AA 0B D6 01 8B 57 4C B2 33 AF |".425......WL.3.|
000003A0: 59 24 B2 22 59 22 A7 37 30 30 00 DF 0B F4 01 99 |Y$."Y".700......|
000003B0: 4D 41 24 3A 85 22 91 91 91 91 91 11 1D 45 4E 54 |MA$:.".......ENT|
000003C0: 45 52 20 5A 49 50 20 43 4F 44 45 11 9D 9D 9D 9D |ER ZIP CODE.....|
000003D0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 52 5A 24 00 |..........";RZ$.|
000003E0: 1C 0C FE 01 99 22 11 20 20 20 20 20 20 20 20 20 |.....". |
000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000400: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000410: 9D 9D 9D 9D 9D 9D 9D 9D 22 41 59 24 00 2F 0C 0D |........"AY$./..|
00000420: 02 A1 59 24 3A 8B 59 24 B2 22 22 A7 35 32 35 00 |..Y$:.Y$."".525.|
00000430: 3F 0C 1C 02 8B 59 24 B2 22 4E 22 A7 35 30 30 00 |?....Y$."N".500.|
00000440: 50 0C 26 02 8B 59 24 B3 B1 22 59 22 A7 35 32 35 |P.&..Y$.."Y".525|
00000450: 00 90 0C 58 02 99 4D 41 24 3A 85 22 91 91 91 91 |...X..MA$:."....|
00000460: 91 11 1D 4F 50 54 49 4F 4E 41 4C 20 4C 49 4E 45 |...OPTIONAL LINE|
00000470: 20 28 45 2E 47 2E 20 59 4F 55 52 20 50 48 4F 4E | (E.G. YOUR PHON|
00000480: 45 20 23 29 1D 1D 1D 1D 1D 1D 1D 22 3B 4F 4C 24 |E #).......";OL$|
00000490: 00 CD 0C 62 02 99 22 11 20 20 20 20 20 20 20 20 |...b..". |
000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004B0: 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ...............|
000004C0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 41 59 24 00 E0 0C |........."AY$...|
000004D0: 6C 02 A1 59 24 3A 8B 59 24 B2 22 22 A7 36 32 30 |l..Y$:.Y$."".620|
000004E0: 00 F0 0C 76 02 8B 59 24 B2 22 4E 22 A7 36 30 30 |...v..Y$."N".600|
000004F0: 00 01 0D 80 02 8B 59 24 B3 B1 22 59 22 A7 36 32 |......Y$.."Y".62|
00000500: 30 00 16 0D 9E 02 8B 57 4C B2 34 AF 59 24 B2 22 |0......WL.4.Y$."|
00000510: 59 22 A7 37 30 30 00 2F 0D BC 02 8F 20 50 52 45 |Y".700./.... PRE|
00000520: 56 49 45 57 20 49 4E 20 47 52 41 50 48 49 58 00 |VIEW IN GRAPHIX.|
00000530: 5D 0D D0 02 99 22 93 11 1D 1D 1D 48 45 52 45 27 |]....".....HERE'|
00000540: 53 20 41 20 50 52 45 56 49 45 57 20 4F 46 20 59 |S A PREVIEW OF Y|
00000550: 4F 55 52 20 4C 41 42 45 4C 28 53 29 22 00 90 0D |OUR LABEL(S)"...|
00000560: F8 02 99 22 11 11 11 11 11 1D 1D D5 C0 C0 C0 C0 |..."............|
00000570: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000580: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 22 |..............."|
00000590: 00 BE 0D F9 02 99 22 1D 1D C2 20 20 20 20 20 20 |......"... |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 00 EC | ."..|
000005C0: 0D FA 02 99 22 1D 1D C2 20 20 20 20 20 20 20 20 |...."... |
000005D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005E0: 20 20 20 20 20 20 20 20 20 20 C2 22 00 1A 0E FB | ."....|
000005F0: 02 99 22 1D 1D C2 20 20 20 20 20 20 20 20 20 20 |.."... |
00000600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000610: 20 20 20 20 20 20 20 20 C2 22 00 48 0E FC 02 99 | .".H....|
00000620: 22 1D 1D C2 20 20 20 20 20 20 20 20 20 20 20 20 |"... |
00000630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000640: 20 20 20 20 20 20 C2 22 00 76 0E FD 02 99 22 1D | .".v....".|
00000650: 1D CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000660: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000670: C0 C0 C0 C0 CB 22 00 B9 0E 20 03 99 22 1D 1D 1D |....."... .."...|
00000680: 1D 91 91 91 91 91 22 52 41 24 28 31 29 3A 99 22 |......"RA$(1):."|
00000690: 1D 1D 1D 1D 22 52 41 24 28 32 29 3A 99 22 1D 1D |...."RA$(2):."..|
000006A0: 1D 1D 22 52 41 24 28 33 29 22 2C 22 52 41 24 28 |.."RA$(3)","RA$(|
000006B0: 34 29 22 20 20 22 52 5A 24 00 C8 0E 2A 03 99 22 |4)" "RZ$...*.."|
000006C0: 1D 1D 1D 1D 22 4F 4C 24 00 F0 0E 3E 03 99 22 11 |...."OL$...>..".|
000006D0: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000006E0: 1D 4C 49 4B 45 20 49 54 3F 20 28 59 2F 4E 29 22 |.LIKE IT? (Y/N)"|
000006F0: 00 05 0F 52 03 A1 59 4E 24 3A 8B 59 4E 24 B2 22 |...R..YN$:.YN$."|
00000700: 22 A7 38 35 30 00 17 0F 5C 03 8B 59 4E 24 B2 22 |".850...\..YN$."|
00000710: 59 22 A7 31 32 30 30 00 29 0F 66 03 8B 59 4E 24 |Y".1200.).f..YN$|
00000720: B3 B1 22 4E 22 A7 38 35 30 00 55 0F 84 03 99 22 |.."N".850.U...."|
00000730: 11 1D 1D 1D 1D 1D 1D 43 48 41 4E 47 45 20 4F 4E |.......CHANGE ON|
00000740: 45 20 4C 49 4E 45 20 4F 52 20 41 4C 4C 20 28 4F |E LINE OR ALL (O|
00000750: 2F 41 29 3F 22 00 6A 0F 8E 03 A1 4F 41 24 3A 8B |/A)?".j....OA$:.|
00000760: 4F 41 24 B2 22 22 A7 39 31 30 00 7B 0F 98 03 8B |OA$."".910.{....|
00000770: 4F 41 24 B2 22 41 22 A7 31 31 30 00 8D 0F A2 03 |OA$."A".110.....|
00000780: 8B 4F 41 24 B3 B1 22 4F 22 A7 39 31 30 00 BA 0F |.OA$.."O".910...|
00000790: B6 03 99 22 1D 1D 1D 1D 1D 11 43 48 41 4E 47 45 |..."......CHANGE|
000007A0: 20 57 48 49 43 48 20 4C 49 4E 45 20 28 31 2C 32 | WHICH LINE (1,2|
000007B0: 2C 33 20 4F 52 20 34 29 3F 22 00 D1 0F C0 03 A1 |,3 OR 4)?"......|
000007C0: 57 4C 3A 8B 57 4C B3 31 B0 57 4C B1 34 A7 39 36 |WL:.WL.1.WL.4.96|
000007D0: 30 00 E9 0F CA 03 91 57 4C 89 31 32 30 2C 33 30 |0......WL.120,30|
000007E0: 30 2C 34 30 30 2C 36 30 30 00 FF 0F B0 04 8F 20 |0,400,600...... |
000007F0: 50 52 49 4E 54 45 52 20 52 4F 55 54 49 4E 45 00 |PRINTER ROUTINE.|
00000800: 28 10 BA 04 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |(...."..........|
00000810: 57 41 4E 54 20 54 4F 20 50 52 49 4E 54 20 49 54 |WANT TO PRINT IT|
00000820: 3F 20 28 59 2F 4E 29 22 00 3E 10 C4 04 A1 50 52 |? (Y/N)".>....PR|
00000830: 24 3A 8B 50 52 24 B2 22 22 A7 31 32 32 30 00 50 |$:.PR$."".1220.P|
00000840: 10 CE 04 8B 50 52 24 B2 22 4E 22 A7 31 36 30 30 |....PR$."N".1600|
00000850: 00 63 10 D8 04 8B 50 52 24 B3 B1 22 59 22 A7 31 |.c....PR$.."Y".1|
00000860: 32 32 30 00 94 10 1E 05 99 22 93 11 11 1D 1D D5 |220......"......|
00000870: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000880: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000890: C0 C0 C9 22 00 C2 10 28 05 99 22 1D 1D C2 20 20 |..."...(.."... |
000008A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008C0: C2 22 00 F0 10 32 05 99 22 1D 1D C2 20 20 20 20 |."...2.."... |
000008D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 | ."|
000008F0: 00 1E 11 3C 05 99 22 1D 1D C2 20 20 20 20 20 20 |...<.."... |
00000900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000910: 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 00 4C | .".L|
00000920: 11 46 05 99 22 1D 1D C2 20 20 20 20 20 20 20 20 |.F.."... |
00000930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000940: 20 20 20 20 20 20 20 20 20 20 C2 22 00 7A 11 50 | .".z.P|
00000950: 05 99 22 1D 1D CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..".............|
00000960: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000970: C0 C0 C0 C0 C0 C0 C0 C0 CB 22 00 BD 11 5A 05 99 |........."...Z..|
00000980: 22 1D 1D 1D 1D 91 91 91 91 91 22 52 41 24 28 31 |"........."RA$(1|
00000990: 29 3A 99 22 1D 1D 1D 1D 22 52 41 24 28 32 29 3A |):."...."RA$(2):|
000009A0: 99 22 1D 1D 1D 1D 22 52 41 24 28 33 29 22 2C 22 |."...."RA$(3)","|
000009B0: 52 41 24 28 34 29 22 20 20 22 52 5A 24 00 CC 11 |RA$(4)" "RZ$...|
000009C0: 64 05 99 22 1D 1D 1D 1D 22 4F 4C 24 00 05 12 78 |d.."...."OL$...x|
000009D0: 05 85 22 11 11 11 11 1D 1D 1D 1D 1D 1D 48 4F 57 |.."..........HOW|
000009E0: 20 4D 41 4E 59 20 4C 41 42 45 4C 53 20 41 52 45 | MANY LABELS ARE|
000009F0: 20 4E 45 45 44 45 44 3F 11 1D 1D 1D 1D 1D 1D 1D | NEEDED?........|
00000A00: 1D 22 3B 4C 41 00 2D 12 82 05 99 22 11 11 11 11 |.";LA.-...."....|
00000A10: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 41 44 |..............AD|
00000A20: 4A 55 53 54 20 50 52 49 4E 54 45 52 22 00 73 12 |JUST PRINTER".s.|
00000A30: 8C 05 99 22 1D 1D 1D 1D 1D 1D 1D 50 52 45 53 53 |...".......PRESS|
00000A40: 20 53 50 41 43 45 20 42 41 52 20 57 48 45 4E 20 | SPACE BAR WHEN |
00000A50: 52 45 41 44 59 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D |READY":.".......|
00000A60: 1D 1D 1D 1D 1D 1D 1D 1D 46 37 20 54 4F 20 45 58 |........F7 TO EX|
00000A70: 49 54 22 00 99 12 91 05 99 22 1D 1D 1D 1D 1D 1D |IT"......"......|
00000A80: 1D 1D 1D 1D 1D 46 35 20 54 4F 20 53 54 4F 50 20 |.....F5 TO STOP |
00000A90: 50 52 49 4E 54 49 4E 47 22 00 AF 12 AA 05 A1 53 |PRINTING"......S|
00000AA0: 42 24 3A 8B 53 42 24 B2 22 22 A7 31 34 35 30 00 |B$:.SB$."".1450.|
00000AB0: C0 12 B4 05 8B 53 42 24 B2 22 88 22 A7 37 30 30 |.....SB$.".".700|
00000AC0: 00 D3 12 BE 05 8B 53 42 24 B3 B1 22 20 22 A7 31 |......SB$.." ".1|
00000AD0: 34 35 30 00 DF 12 DC 05 A0 34 3A 9F 34 2C 34 00 |450......4:.4,4.|
00000AE0: EC 12 E6 05 81 41 4D B2 31 A4 4C 41 00 FA 12 F0 |.....AM.1.LA....|
00000AF0: 05 98 34 2C 52 41 24 28 31 29 00 08 13 FA 05 98 |..4,RA$(1)......|
00000B00: 34 2C 52 41 24 28 32 29 00 26 13 04 06 98 34 2C |4,RA$(2).&....4,|
00000B10: 52 41 24 28 33 29 22 2C 22 52 41 24 28 34 29 22 |RA$(3)","RA$(4)"|
00000B20: 20 20 22 52 5A 24 00 3F 13 0E 06 98 34 2C 4F 4C | "RZ$.?....4,OL|
00000B30: 24 3A 81 55 B2 31 A4 32 3A 98 34 2C 3A 82 55 00 |$:.U.1.2:.4,:.U.|
00000B40: 61 13 18 06 A1 51 50 24 3A 8B 51 50 24 B2 22 87 |a....QP$:.QP$.".|
00000B50: 22 A7 98 34 3A A0 34 3A 89 37 30 30 3A 8F 20 46 |"..4:.4:.700:. F|
00000B60: 35 00 67 13 22 06 82 00 97 13 40 06 99 22 93 11 |5.g.".....@.."..|
00000B70: 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D |................|
00000B80: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 41 47 41 49 4E 3F |..........AGAIN?|
00000B90: 20 28 59 2F 4E 29 22 00 AD 13 4A 06 A1 41 47 24 | (Y/N)"...J..AG$|
00000BA0: 3A 8B 41 47 24 B2 22 22 A7 31 36 31 30 00 C0 13 |:.AG$."".1610...|
00000BB0: 54 06 8B 41 47 24 B2 22 4E 22 A7 36 33 30 30 30 |T..AG$."N".63000|
00000BC0: 00 D3 13 5E 06 8B 41 47 24 B3 B1 22 59 22 A7 31 |...^..AG$.."Y".1|
00000BD0: 36 31 30 00 DC 13 68 06 89 31 31 30 00 08 14 D0 |610...h..110....|
00000BE0: 07 99 22 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |..".............|
00000BF0: 1D 1D 1D 1D D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000C00: C0 C0 C0 C0 C0 C0 C9 22 00 2E 14 D5 07 99 22 1D |......."......".|
00000C10: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C2 20 41 44 44 52 |........... ADDR|
00000C20: 45 53 53 20 4C 41 42 45 4C 45 52 20 C2 22 00 54 |ESS LABELER .".T|
00000C30: 14 DA 07 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |...."...........|
00000C40: CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000C50: C0 C0 CB 22 00 7B 14 E4 07 99 22 11 1D 1D 1D 1D |...".{....".....|
00000C60: 1D 1D 1D 1D 1D 1D 1D 42 59 20 4A 4F 53 45 50 48 |.......BY JOSEPH|
00000C70: 20 53 54 45 49 4E 20 4A 52 2E 22 00 AD 14 EE 07 | STEIN JR.".....|
00000C80: 99 22 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D |."..............|
00000C90: 1D 1D 1D 1D 50 52 45 53 53 20 53 50 41 43 45 20 |....PRESS SPACE |
00000CA0: 42 41 52 20 54 4F 20 53 54 41 52 54 22 00 C5 14 |BAR TO START"...|
00000CB0: F8 07 A1 53 54 24 3A 8B 53 54 24 B3 B1 22 20 22 |...ST$:.ST$.." "|
00000CC0: A7 32 30 34 30 00 CB 14 02 08 8E 00 E9 14 18 F6 |.2040...........|
00000CD0: 8F 20 20 20 20 43 4F 4E 4E 45 43 54 20 42 41 43 |. CONNECT BAC|
00000CE0: 4B 20 54 4F 20 4C 2E 53 2E 00 1C 15 1A F6 99 22 |K TO L.S......."|
00000CF0: 93 11 11 11 4C 4F 41 44 22 C7 28 33 34 29 22 50 |....LOAD".(34)"P|
00000D00: 41 59 4C 4F 41 44 22 C7 28 33 34 29 22 2C 38 22 |AYLOAD".(34)",8"|
00000D10: 3A 99 22 11 11 11 11 52 55 4E 13 22 00 40 15 1C |:."....RUN.".@..|
00000D20: F6 97 31 39 38 2C 30 3A 97 36 33 31 2C 31 33 3A |..198,0:.631,13:|
00000D30: 97 36 33 32 2C 31 33 3A 97 31 39 38 2C 32 3A 80 |.632,13:.198,2:.|
00000D40: 00 00 00 |... |
....... LABEL MAKER UTILITY.6.... BY JO
SEPH STEIN JR..U.... 859 MIAMI ST.,A
PT.35.P.... TIFFIN, OH 44883......
PH. (419) 447-7908...... NOVEMBER 198
4...P.. ENTER TEXT FOR LABEL(S)...D..532
80,12:.53281,9:.".."...K..2000...N.AY$."
ARE YOU SURE? (Y/N)":WL...1.X.MA$.".....
.MAX. 32 KEYSTROKES/LINE".T.H..MA$:."...
....ENTER NAME, RETURN..................
....";RA$(1)...R..".
........................"AY$.D....Y
$:.Y$."".225.T....Y$."N".200......Y$.."Y
".225......WL.1.Y$."Y".700.=.,..MA$:."..
.....ENTER ADDRESS (NO COMMAS), RETURN..
.....";RA$(2).Z.6..".
........................"AY$...E..
Y$:.Y$."".325...T..Y$."N".300...^..Y$.."
Y".325.C.R..WL.2.Y$."Y".700......MA$:.".
.....ENTER CITY,STATE (E.G. TIFFIN,OHIO)
.......";RA$(3),RA$(4).$...RA$(4)." ".RA
$(4).A....". ...
....................."AY$.T....Y$:.Y$.""
.425......Y$."N".400...B..Y$.."Y".425...
V..WL.3.Y$."Y".700......MA$:.".......ENT
ER ZIP CODE...............";RZ$......".
................
........"AY$./....Y$:.Y$."".525.?....Y$.
"N".500.P.&..Y$.."Y".525...X..MA$:."....
...OPTIONAL LINE (E.G. YOUR PHONE #)....
...";OL$.M.B..".
........................"AY$...L..Y$:.Y
$."".620...V..Y$."N".600......Y$.."Y".62
0......WL.4.Y$."Y".700./.... PREVIEW IN
GRAPHIX.].P..".....HERE'S A PREVIEW OF Y
OUR LABEL(S)"......".......U............
......................I"......"..B
B"......"..B
B"....
.."..B
B".H...."..B
B".V...."..J......................
............K"... .."........."RA$(1):."
...."RA$(2):."...."RA$(3)","RA$(4)" "RZ
$.H.*.."...."OL$...>..".................
.LIKE IT? (Y/N)"...R..YN$:.YN$."".850...
\..YN$."Y".1200.).F..YN$.."N".850.U...."
.......CHANGE ONE LINE OR ALL (O/A)?".J.
...OA$:.OA$."".910.{....OA$."A".110.....
.OA$.."O".910......"......CHANGE WHICH L
INE (1,2,3 OR 4)?".Q....WL:.WL.1.WL.4.96
0...J..WL.120,300,400,600...... PRINTER
ROUTINE.(...."..........WANT TO PRINT IT
? (Y/N)".>.D..PR$:.PR$."".1220.P.N..PR$.
"N".1600.C.X..PR$.."Y".1220......".....U
..................................I".B.(
.."..B
B"...2.."..B
B"...<.."..B
B".L.F.."..B
B".Z.P.."..J..........
........................K"...Z..".......
.."RA$(1):."...."RA$(2):."...."RA$(3)","
RA$(4)" "RZ$.L.D.."...."OL$...X..".....
.....HOW MANY LABELS ARE NEEDED?........
.";LA.-...."..................ADJUST PRI
NTER".S....".......PRESS SPACE BAR WHEN
READY":."...............F7 TO EXIT".....
."...........F5 TO STOP PRINTING"......S
B$:.SB$."".1450......SB$.".".700.S....SB
$.." ".1450..... 4:.4,4......AM.1.LA....
..4,RA$(1)......4,RA$(2).&....4,RA$(3)",
"RA$(4)" "RZ$.?....4,OL$:.U.1.2:.4,:.U.
A....QP$:.QP$."."..4: 4:.700:. F5.G."...
..@.."............................AGAIN?
(Y/N)"...J..AG$:.AG$."".1610...T..AG$."
N".63000.S.^..AG$.."Y".1610...H..110...P
..".................U.................I"
...U.."...........B ADDRESS LABELER B".T
.Z.."...........J.................K".{..
.."............BY JOSEPH STEIN JR.".....
."..................PRESS SPACE BAR TO S
TART".E....ST$:.ST$.." ".2040.K.........
. CONNECT BACK TO L.S......."....LOAD
"G(34)"PAYLOAD"G(34)",8":."....RUN.".@..
..198,0:.631,13:.632,13:.198,2:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL