PATTY LABEL
FILE INFORMATION
FILENAME(S): PATTY LABEL
FILE TYPE(S): PRG
FILE SIZE: 768b
FIRST SEEN: 2025-11-30 18:12:49
APPEARS ON: 1 disk(s)
FILE HASH
aec1d95b6d46ba414bfd964fa07d45a5621b54f7c7f8898727d622b6af0bc9d7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 128 64 WORK DISK | PATTY LABEL | PRG | Sailor, Ganheden | 16 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 0B 1C 64 00 99 22 93 05 22 00 28 1C C8 00 |....d.."..".(...| 00000010: 8F 20 49 4E 50 55 54 22 45 4E 54 45 52 20 4E 41 |. INPUT"ENTER NA| 00000020: 4D 45 3A 20 22 3B 41 24 00 45 1C C9 00 8F 20 49 |ME: ";A$.E.... I| 00000030: 4E 50 55 54 22 45 4E 54 45 52 20 4E 41 4D 45 3A |NPUT"ENTER NAME:| 00000040: 20 22 3B 47 24 00 5F 1C CD 00 8F 20 20 49 46 20 | ";G$._.... IF | 00000050: 41 24 3D 22 20 22 20 54 48 45 4E 20 32 30 30 00 |A$=" " THEN 200.| 00000060: 78 1C D2 00 8F 20 49 4E 50 55 54 22 43 4F 44 45 |x.... INPUT"CODE| 00000070: 20 23 3A 20 22 3B 42 24 00 91 1C D7 00 8F 20 49 | #: ";B$...... I| 00000080: 46 20 42 24 3D 22 20 22 20 54 48 45 4E 20 32 31 |F B$=" " THEN 21| 00000090: 30 00 A8 1C DC 00 8F 20 49 4E 50 55 54 22 43 49 |0...... INPUT"CI| 000000A0: 54 59 3A 20 22 3B 43 24 00 C1 1C E1 00 8F 20 49 |TY: ";C$...... I| 000000B0: 46 20 43 24 3D 22 20 22 20 54 48 45 4E 20 32 32 |F C$=" " THEN 22| 000000C0: 30 00 D9 1C E2 00 8F 20 49 4E 50 55 54 22 53 54 |0...... INPUT"ST| 000000D0: 41 54 45 3A 20 22 3B 46 24 00 F4 1C E6 00 8F 20 |ATE: ";F$...... | 000000E0: 49 4E 50 55 54 22 5A 49 50 20 43 4F 44 45 3A 20 |INPUT"ZIP CODE: | 000000F0: 22 3B 44 24 00 0D 1D EB 00 8F 20 49 46 20 44 24 |";D$...... IF D$| 00000100: 3D 22 20 22 20 54 48 45 4E 20 32 33 30 00 2B 1D |=" " THEN 230.+.| 00000110: F0 00 85 22 23 20 4F 46 20 4C 41 42 45 4C 53 3A |..."# OF LABELS:| 00000120: 20 22 3B 20 20 20 20 20 20 20 45 00 3C 1D F5 00 | "; E.<...| 00000130: 8B 20 45 B2 30 20 20 A7 20 32 34 30 00 46 1D FA |. E.0 . 240.F..| 00000140: 00 9F 20 31 2C 34 00 4E 1D 04 01 9D 20 31 00 56 |.. 1,4.N.... 1.V| 00000150: 1D 09 01 54 B2 30 00 60 1D 0E 01 54 B2 54 AA 31 |...T.0.`...T.T.1| 00000160: 00 67 1D 18 01 98 31 00 78 1D 2C 01 8F 20 50 52 |.g....1.x.,.. PR| 00000170: 49 4E 54 23 31 2C 41 24 00 91 1D 2D 01 98 31 2C |INT#1,A$...-..1,| 00000180: 22 50 41 54 52 49 43 49 41 20 41 42 42 4F 54 54 |"PATRICIA ABBOTT| 00000190: 22 00 AE 1D 36 01 98 31 2C 22 34 32 35 20 4D 49 |"...6..1,"425 MI| 000001A0: 43 48 49 47 41 4E 20 41 56 45 4E 55 45 22 00 CB |CHIGAN AVENUE"..| 000001B0: 1D 3B 01 98 31 2C 22 4D 4F 4E 54 49 43 45 4C 4C |.;..1,"MONTICELL| 000001C0: 4F 2C 20 4B 45 4E 54 55 43 4B 59 00 DC 1D 90 01 |O, KENTUCKY.....| 000001D0: 8F 20 50 52 49 4E 54 23 31 2C 42 24 00 F9 1D 58 |. PRINT#1,B$...X| 000001E0: 02 98 31 2C 22 20 20 20 20 20 20 20 20 20 20 20 |..1," | 000001F0: 20 20 20 34 32 36 33 33 22 00 00 1E 62 02 98 31 | 42633"...b..1| 00000200: 00 07 1E 63 02 98 31 00 17 1E 8A 02 8B 20 54 B2 |...c..1...... T.| 00000210: 45 20 A7 20 37 30 30 00 24 1E 8F 02 98 31 2C C7 |E . 700.$....1,.| 00000220: 28 31 30 29 00 2E 1E 9E 02 89 20 32 37 30 00 35 |(10)...... 270.5| 00000230: 1E BC 02 A0 31 00 5E 1E C6 02 A0 31 3A 99 22 44 |....1.^....1:."D| 00000240: 4F 20 59 4F 55 20 57 49 53 48 20 54 4F 20 43 4F |O YOU WISH TO CO| 00000250: 4E 54 49 4E 55 45 3F 20 28 59 2F 4E 29 22 00 67 |NTINUE? (Y/N)".g| 00000260: 1E CB 02 A1 20 51 24 00 7C 1E D0 02 8B 20 51 24 |.... Q$.|.... Q$| 00000270: B2 C7 28 38 39 29 20 A7 20 38 30 30 00 92 1E DA |..(89) . 800....| 00000280: 02 8B 20 51 24 B3 B1 C7 28 37 38 29 20 A7 20 37 |.. Q$...(78) . 7| 00000290: 31 35 00 98 1E E4 02 80 00 A1 1E 20 03 99 22 93 |15......... ..".| 000002A0: 22 00 AF 1E 22 03 81 20 44 B2 30 A4 35 3A 99 00 |"...".. D.0.5:..| 000002B0: DF 1E 25 03 99 22 20 9E 20 20 20 50 4C 45 41 53 |..%.." . PLEAS| 000002C0: 45 20 45 4E 53 55 52 45 20 50 52 49 4E 54 45 52 |E ENSURE PRINTER| 000002D0: 20 49 53 20 52 45 41 44 59 21 21 22 3A 82 44 00 | IS READY!!":.D.| 000002E0: F3 1E 26 03 81 20 49 B2 31 20 A4 20 33 30 30 30 |..&.. I.1 . 3000| 000002F0: 3A 82 49 00 FC 1E 2A 03 89 31 30 30 00 00 00 22 |:.I...*..100..."|
....D.."..".(.H.. INPUT"ENTER NAME: ";A$ .E.I.. INPUT"ENTER NAME: ";G$._.M.. IF A$=" " THEN 200.X.R.. INPUT"CODE #: ";B$ ...W.. IF B$=" " THEN 210...... INPUT"CI TY: ";C$.A.... IF C$=" " THEN 220.Y.... INPUT"STATE: ";F$...... INPUT"ZIP CODE: ";D$...... IF D$=" " THEN 230.+...."# OF LABELS: "; E.<.... E.0 . 240.F.. .. 1,4.N.... 1.V...T.0.`...T.T.1.G....1. X.,.. PRINT#1,A$...-..1,"PATRICIA ABBOTT "...6..1,"425 MICHIGAN AVENUE".K.;..1,"M ONTICELLO, KENTUCKY...... PRINT#1,B$...X ..1," 42633"...B..1...C..1. ..... T.E . 700.$....1,G(10)...... 270.5 ... 1.^.F. 1:."DO YOU WISH TO CONTINUE? (Y/N)".G.K.. Q$.|.P.. Q$.G(89) . 800...Z .. Q$..G(78) . 715......... .."."...".. D.0.5:....%.." . PLEASE ENSURE PRINTER IS READY!!":.D...&.. I.1 . 3000:.I...*. .100..."
> CLICK IMAGE PREVIEW FOR FULL MODAL