SORT.PRINT
FILE INFORMATION
FILENAME(S): SORT.PRINT
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 19:47:21
APPEARS ON: 1 disk(s)
FILE HASH
adb0a69cf3179b4654e6da17e3453d81e7eab0fe051912ec5cc344f0d50cf2b4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK B1 2 | SORT.PRINT | PRG | Curtcool, Frank | 22 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 0A 00 53 50 24 B2 22 20 20 20 20 20 |..&...SP$." |
00000010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000020: 20 20 20 20 20 22 00 45 08 14 00 4D 41 B2 32 3A | ".E...MA.2:|
00000030: 53 43 B2 32 36 3A 4D 42 B2 34 31 3A 54 42 24 B2 |SC.26:MB.41:TB$.|
00000040: C7 28 31 36 29 00 69 08 1E 00 99 22 93 11 11 20 |.(16).i...."... |
00000050: 20 20 20 20 20 20 20 20 20 50 52 49 4E 54 45 52 | PRINTER|
00000060: 20 4F 50 54 49 4F 4E 53 22 00 9D 08 28 00 99 22 | OPTIONS"...(.."|
00000070: 11 20 53 49 4E 47 4C 45 20 4F 52 20 44 4F 55 42 |. SINGLE OR DOUB|
00000080: 4C 45 20 43 4F 4C 55 4D 4E 20 20 28 53 2F 44 29 |LE COLUMN (S/D)|
00000090: 20 20 53 9D 9D 9D 22 3B 3A 85 53 31 24 00 BF 08 | S...";:.S1$...|
000000A0: 32 00 8B 53 31 24 B3 B1 22 53 22 AF 53 31 24 B3 |2..S1$.."S".S1$.|
000000B0: B1 22 44 22 A7 99 22 91 91 91 22 3A 89 34 30 00 |."D".."...":.40.|
000000C0: E1 08 3C 00 99 22 11 20 48 45 41 44 45 52 20 28 |..<..". HEADER (|
000000D0: 59 2F 4E 29 20 20 59 9D 9D 9D 22 3B 3A 85 53 33 |Y/N) Y...";:.S3|
000000E0: 24 00 03 09 46 00 8B 53 33 24 B3 B1 22 59 22 AF |$...F..S3$.."Y".|
000000F0: 53 33 24 B3 B1 22 4E 22 A7 99 22 91 91 91 22 3A |S3$.."N".."...":|
00000100: 89 36 30 00 32 09 50 00 99 22 11 20 43 48 41 4E |.60.2.P..". CHAN|
00000110: 47 45 20 52 49 47 48 54 20 4D 41 52 47 49 4E 20 |GE RIGHT MARGIN |
00000120: 28 59 2F 4E 29 20 20 59 9D 9D 9D 22 3B 3A 85 53 |(Y/N) Y...";:.S|
00000130: 35 24 00 54 09 5A 00 8B 53 35 24 B3 B1 22 59 22 |5$.T.Z..S5$.."Y"|
00000140: AF 53 35 24 B3 B1 22 4E 22 A7 99 22 91 91 91 22 |.S5$.."N".."..."|
00000150: 3A 89 38 30 00 7B 09 64 00 99 22 11 20 41 4E 59 |:.80.{.d..". ANY|
00000160: 20 43 48 41 4E 47 45 53 20 28 59 2F 4E 29 20 20 | CHANGES (Y/N) |
00000170: 4E 9D 9D 9D 22 3B 3A 85 53 32 24 00 9E 09 6E 00 |N...";:.S2$...n.|
00000180: 8B 53 32 24 B3 B1 22 59 22 AF 53 32 24 B3 B1 22 |.S2$.."Y".S2$.."|
00000190: 4E 22 A7 99 22 91 91 91 22 3A 89 31 30 30 00 B6 |N".."...":.100..|
000001A0: 09 78 00 8B 53 32 24 B2 22 59 22 A7 99 22 13 11 |.x..S2$."Y".."..|
000001B0: 11 22 3A 89 34 30 00 E5 09 82 00 99 22 11 20 52 |.":.40......". R|
000001C0: 45 54 55 52 4E 20 54 4F 20 4D 41 49 4E 20 4D 45 |ETURN TO MAIN ME|
000001D0: 4E 55 20 28 59 2F 4E 29 20 20 4E 9D 9D 9D 22 3B |NU (Y/N) N...";|
000001E0: 3A 85 53 36 24 00 08 0A 8C 00 8B 53 36 24 B3 B1 |:.S6$......S6$..|
000001F0: 22 59 22 AF 53 36 24 B3 B1 22 4E 22 A7 99 22 91 |"Y".S6$.."N"..".|
00000200: 91 91 22 3A 89 31 33 30 00 19 0A 96 00 8B 53 36 |..":.130......S6|
00000210: 24 B2 22 59 22 A7 38 37 30 00 2A 0A A0 00 8B 53 |$."Y".870.*....S|
00000220: 35 24 B2 22 4E 22 A7 32 37 30 00 4F 0A AA 00 99 |5$."N".270.O....|
00000230: 22 93 11 11 20 20 20 20 20 20 20 20 52 49 47 48 |"... RIGH|
00000240: 54 20 4D 41 52 47 49 4E 20 53 45 54 55 50 22 00 |T MARGIN SETUP".|
00000250: 78 0A B4 00 99 22 11 20 54 48 45 20 43 55 52 52 |x....". THE CURR|
00000260: 45 4E 54 20 52 49 47 48 54 20 4D 41 52 47 49 4E |ENT RIGHT MARGIN|
00000270: 20 49 53 20 31 20 2E 22 00 A6 0A BE 00 99 22 11 | IS 1 ."......".|
00000280: 11 57 48 41 54 20 4D 41 52 47 49 4E 20 53 45 54 |.WHAT MARGIN SET|
00000290: 54 49 4E 47 20 44 4F 20 59 4F 55 20 44 45 53 49 |TING DO YOU DESI|
000002A0: 52 45 3A 2D 11 22 00 D9 0A C8 00 99 22 20 20 20 |RE:-."......" |
000002B0: 31 2C 20 35 2C 20 31 30 2C 20 31 35 2C 20 4F 52 |1, 5, 10, 15, OR|
000002C0: 20 32 30 20 20 31 9D 9D 9D 22 3B 3A 85 4D 41 3A | 20 1...";:.MA:|
000002D0: 8B 4D 41 B2 31 A7 32 37 30 00 F4 0A D2 00 8B 4D |.MA.1.270......M|
000002E0: 41 B3 35 B0 4D 41 B1 32 30 A7 99 22 91 91 22 3A |A.5.MA.20.."..":|
000002F0: 89 32 30 30 00 12 0B DC 00 8B 4D 41 AD 35 B3 B1 |.200......MA.5..|
00000300: B5 28 4D 41 AD 35 29 A7 99 22 91 91 22 3A 89 32 |.(MA.5).."..":.2|
00000310: 30 30 00 28 0B E6 00 8B 4D 41 B2 35 A7 53 43 B2 |00.(....MA.5.SC.|
00000320: 32 35 3A 4D 42 B2 34 32 00 45 0B F0 00 8B 4D 41 |25:MB.42.E....MA|
00000330: B2 31 30 A7 4D 41 B2 31 31 3A 53 43 B2 32 33 3A |.10.MA.11:SC.23:|
00000340: 4D 42 B2 34 35 00 62 0B FA 00 8B 4D 41 B2 31 35 |MB.45.b....MA.15|
00000350: A7 4D 41 B2 31 37 3A 53 43 B2 32 31 3A 4D 42 B2 |.MA.17:SC.21:MB.|
00000360: 34 38 00 79 0B 04 01 8B 4D 41 B2 32 30 A7 53 43 |48.y....MA.20.SC|
00000370: B2 32 30 3A 4D 42 B2 35 30 00 A1 0B 0E 01 99 22 |.20:MB.50......"|
00000380: 93 11 11 20 20 20 20 20 20 20 20 20 20 20 20 50 |... P|
00000390: 52 45 50 41 52 49 4E 47 20 48 45 41 44 45 52 11 |REPARING HEADER.|
000003A0: 22 00 F0 0B 18 01 99 22 59 4F 55 20 4D 41 59 20 |"......"YOU MAY |
000003B0: 48 41 56 45 20 55 50 20 54 4F 20 33 20 53 45 50 |HAVE UP TO 3 SEP|
000003C0: 41 52 41 54 45 20 48 45 41 44 45 52 53 20 4F 4E |ARATE HEADERS ON|
000003D0: 54 48 45 20 20 46 49 52 53 54 20 4C 49 4E 45 20 |THE FIRST LINE |
000003E0: 4F 46 20 45 41 43 48 20 50 41 47 45 20 3A 2D 22 |OF EACH PAGE :-"|
000003F0: 00 21 0C 22 01 99 22 11 52 49 47 48 54 20 20 20 |.!."..".RIGHT |
00000400: 20 20 20 20 20 20 20 20 20 43 45 4E 54 45 52 20 | CENTER |
00000410: 20 20 20 20 20 20 20 20 20 20 20 20 4C 45 46 54 | LEFT|
00000420: 22 00 44 0C 2C 01 99 22 11 44 4F 20 59 4F 55 20 |".D.,..".DO YOU |
00000430: 57 41 4E 54 20 3A 2D 20 28 4D 41 58 22 3B 53 43 |WANT :- (MAX";SC|
00000440: 3B 22 29 22 00 6D 0C 36 01 99 22 11 20 52 49 47 |;")".m.6..". RIG|
00000450: 48 54 20 20 48 45 41 44 45 52 20 28 59 2F 4E 29 |HT HEADER (Y/N)|
00000460: 20 20 59 9D 9D 9D 22 3B 3A 85 48 31 24 00 90 0C | Y...";:.H1$...|
00000470: 40 01 8B 48 31 24 B3 B1 22 59 22 AF 48 31 24 B3 |@..H1$.."Y".H1$.|
00000480: B1 22 4E 22 A7 99 22 91 91 91 22 3A 89 33 31 30 |."N".."...":.310|
00000490: 00 B8 0C 4A 01 99 22 20 43 45 4E 54 45 52 20 48 |...J.." CENTER H|
000004A0: 45 41 44 45 52 20 28 59 2F 4E 29 20 20 59 9D 9D |EADER (Y/N) Y..|
000004B0: 9D 22 3B 3A 85 48 32 24 00 DA 0C 54 01 8B 48 32 |.";:.H2$...T..H2|
000004C0: 24 B3 B1 22 59 22 AF 48 32 24 B3 B1 22 4E 22 A7 |$.."Y".H2$.."N".|
000004D0: 99 22 91 91 22 3A 89 33 33 30 00 02 0D 5E 01 99 |."..":.330...^..|
000004E0: 22 20 4C 45 46 54 20 20 20 48 45 41 44 45 52 20 |" LEFT HEADER |
000004F0: 28 59 2F 4E 29 20 20 59 9D 9D 9D 22 3B 3A 85 48 |(Y/N) Y...";:.H|
00000500: 33 24 00 24 0D 68 01 8B 48 33 24 B3 B1 22 59 22 |3$.$.h..H3$.."Y"|
00000510: AF 48 33 24 B3 B1 22 4E 22 A7 99 22 91 91 22 3A |.H3$.."N".."..":|
00000520: 89 33 36 30 00 54 0D 72 01 8B 48 31 24 B2 22 59 |.360.T.r..H1$."Y|
00000530: 22 A7 48 31 24 B2 22 22 3A 85 22 11 45 4E 54 45 |".H1$."":.".ENTE|
00000540: 52 20 52 49 47 48 54 20 20 48 45 41 44 45 52 22 |R RIGHT HEADER"|
00000550: 3B 48 31 24 00 78 0D 7C 01 8B C3 28 48 31 24 29 |;H1$.x.|...(H1$)|
00000560: B1 53 43 A7 48 31 24 B2 22 59 22 3A 99 22 91 91 |.SC.H1$."Y":."..|
00000570: 91 91 22 3A 89 33 37 30 00 A8 0D 86 01 8B 48 32 |..":.370......H2|
00000580: 24 B2 22 59 22 A7 48 32 24 B2 22 22 3A 85 22 11 |$."Y".H2$."":.".|
00000590: 45 4E 54 45 52 20 43 45 4E 54 45 52 20 48 45 41 |ENTER CENTER HEA|
000005A0: 44 45 52 22 3B 48 32 24 00 CC 0D 90 01 8B C3 28 |DER";H2$.......(|
000005B0: 48 32 24 29 B1 53 43 A7 48 32 24 B2 22 59 22 3A |H2$).SC.H2$."Y":|
000005C0: 99 22 91 91 91 91 22 3A 89 33 39 30 00 FC 0D 9A |."....":.390....|
000005D0: 01 8B 48 33 24 B2 22 59 22 A7 48 33 24 B2 22 22 |..H3$."Y".H3$.""|
000005E0: 3A 85 22 11 45 4E 54 45 52 20 4C 45 46 54 20 20 |:.".ENTER LEFT |
000005F0: 20 48 45 41 44 45 52 22 3B 48 33 24 00 20 0E A4 | HEADER";H3$. ..|
00000600: 01 8B C3 28 48 33 24 29 B1 53 43 A7 48 33 24 B2 |...(H3$).SC.H3$.|
00000610: 22 59 22 3A 99 22 91 91 91 91 22 3A 89 34 31 30 |"Y":."....":.410|
00000620: 00 3B 0E AE 01 8B 48 31 24 B2 22 4E 22 A7 48 31 |.;....H1$."N".H1|
00000630: 24 B2 C8 28 53 50 24 2C 53 43 29 00 4F 0E B8 01 |$..(SP$,SC).O...|
00000640: 8B 48 32 24 B2 22 4E 22 A7 48 32 24 B2 22 22 00 |.H2$."N".H2$."".|
00000650: 6A 0E C2 01 8B 48 33 24 B2 22 4E 22 A7 48 33 24 |j....H3$."N".H3$|
00000660: B2 C8 28 53 50 24 2C 53 43 29 00 87 0E CC 01 48 |..(SP$,SC).....H|
00000670: 31 24 B2 48 31 24 AA C8 28 53 50 24 2C 53 43 AB |1$.H1$..(SP$,SC.|
00000680: C3 28 48 31 24 29 29 00 A4 0E D6 01 48 33 24 B2 |.(H1$)).....H3$.|
00000690: C8 28 53 50 24 2C 53 43 AB C3 28 48 33 24 29 29 |.(SP$,SC..(H3$))|
000006A0: AA 48 33 24 00 C3 0E E0 01 8B 48 32 24 B2 22 22 |.H3$......H2$.""|
000006B0: A7 48 32 24 B2 C8 28 53 50 24 2C 53 43 29 3A 89 |.H2$..(SP$,SC):.|
000006C0: 35 31 30 00 E1 0E EA 01 48 32 B2 B5 28 C3 28 48 |510.....H2..(.(H|
000006D0: 32 24 29 AD 32 29 3A 53 42 B2 B5 28 53 43 AD 32 |2$).2):SB..(SC.2|
000006E0: 29 00 13 0F F4 01 48 32 24 B2 C8 28 53 50 24 2C |).....H2$..(SP$,|
000006F0: 53 42 AB 48 32 29 AA 48 32 24 3A 48 32 24 B2 48 |SB.H2).H2$:H2$.H|
00000700: 32 24 AA C8 28 53 50 24 2C 53 43 AB C3 28 48 32 |2$..(SP$,SC..(H2|
00000710: 24 29 29 00 27 0F FE 01 48 45 24 B2 48 31 24 AA |$)).'...HE$.H1$.|
00000720: 48 32 24 AA 48 33 24 00 55 0F 08 02 99 22 93 50 |H2$.H3$.U....".P|
00000730: 52 49 4E 54 20 48 45 41 44 45 52 20 4F 4E 20 41 |RINT HEADER ON A|
00000740: 4C 4C 20 50 41 47 45 53 20 20 59 9D 9D 9D 22 3B |LL PAGES Y...";|
00000750: 3A 85 48 32 24 00 77 0F 12 02 8B 48 32 24 B3 B1 |:.H2$.w....H2$..|
00000760: 22 59 22 AF 48 32 24 B3 B1 22 4E 22 A7 99 22 91 |"Y".H2$.."N"..".|
00000770: 91 22 3A 89 35 32 30 00 BA 0F 1C 02 8B 48 32 24 |.":.520......H2$|
00000780: B2 22 4E 22 A7 99 22 11 54 48 45 20 48 45 41 44 |."N"..".THE HEAD|
00000790: 45 52 20 57 49 4C 4C 20 42 45 20 50 52 49 4E 54 |ER WILL BE PRINT|
000007A0: 45 44 20 4F 4E 20 54 48 45 20 46 49 52 53 54 20 |ED ON THE FIRST |
000007B0: 50 41 47 45 20 4F 4E 4C 59 22 00 F1 0F 26 02 9F |PAGE ONLY"...&..|
000007C0: 34 2C 34 3A 4D 41 24 B2 C4 28 4D 41 29 3A 4D 41 |4,4:MA$..(MA):MA|
000007D0: 24 B2 C9 28 4D 41 24 2C 32 29 3A 4D 42 24 B2 C4 |$..(MA$,2):MB$..|
000007E0: 28 4D 42 29 3A 4D 42 24 B2 C9 28 4D 42 24 2C 32 |(MB):MB$..(MB$,2|
000007F0: 29 00 1D 10 30 02 99 22 93 11 11 11 54 4F 20 41 |)...0.."....TO A|
00000800: 42 4F 52 54 20 50 52 49 4E 54 49 4E 47 2C 20 45 |BORT PRINTING, E|
00000810: 4E 54 45 52 20 12 20 58 20 92 11 11 22 00 34 10 |NTER . X ...".4.|
00000820: 3A 02 8B 4E B3 31 32 31 AF 53 31 24 B2 22 44 22 |:..N.121.S1$."D"|
00000830: A7 37 37 30 00 62 10 44 02 4E B2 4E AA 31 3A 41 |.770.b.D.N.N.1:A|
00000840: 41 24 28 4E 29 B2 45 44 24 3A 59 B2 B5 28 4E AD |A$(N).ED$:Y..(N.|
00000850: 31 32 30 29 3A 8B 59 AC 32 B3 B1 4E A7 59 B2 59 |120):.Y.2..N.Y.Y|
00000860: AA 31 00 7B 10 4E 02 59 59 B2 AB 31 31 39 3A 8B |.1.{.N.YY..119:.|
00000870: 53 31 24 B2 22 53 22 A7 37 32 30 00 9B 10 58 02 |S1$."S".720...X.|
00000880: 81 4A B2 31 A4 59 AB 31 3A 59 59 B2 59 59 AA 31 |.J.1.Y.1:YY.YY.1|
00000890: 32 30 3A 58 58 B2 59 59 AA 35 39 00 B4 10 62 02 |20:XX.YY.59...b.|
000008A0: 98 34 3A 98 34 2C 54 42 24 3B 4D 41 24 3B 48 45 |.4:.4,TB$;MA$;HE|
000008B0: 24 3A 98 34 00 D6 10 6C 02 81 49 B2 59 59 A4 58 |$:.4...l..I.YY.X|
000008C0: 58 3A A1 58 24 3A 8B 58 24 B2 22 58 22 A7 4A B2 |X:.X$:.X$."X".J.|
000008D0: 59 3A 89 36 38 30 00 EF 10 76 02 8B 41 41 24 28 |Y:.680...v..AA$(|
000008E0: 49 29 B2 45 44 24 A7 4A B2 59 3A 89 36 38 30 00 |I).ED$.J.Y:.680.|
000008F0: 06 11 80 02 98 34 2C 54 42 24 3B 4D 41 24 3B 41 |.....4,TB$;MA$;A|
00000900: 41 24 28 49 29 3B 00 22 11 8A 02 8B 41 41 24 28 |A$(I);."....AA$(|
00000910: 49 AA 36 30 29 B2 45 44 24 A7 59 B2 58 3A 89 36 |I.60).ED$.Y.X:.6|
00000920: 38 30 00 3B 11 94 02 98 34 2C 54 42 24 3B 4D 42 |80.;....4,TB$;MB|
00000930: 24 3B 41 41 24 28 49 AA 36 30 29 00 4A 11 9E 02 |$;AA$(I.60).J...|
00000940: 82 3A 98 34 3A 98 34 3A 98 34 00 5C 11 A8 02 82 |.:.4:.4:.4.\....|
00000950: 3A 8B 58 24 B2 22 58 22 A7 38 35 30 00 7C 11 B2 |:.X$."X".850.|..|
00000960: 02 8B 41 41 24 28 4E 29 B2 45 44 24 A7 41 41 24 |..AA$(N).ED$.AA$|
00000970: 28 4E 29 B2 22 22 3A 4E B2 4E AB 31 00 C5 11 BC |(N)."":N.N.1....|
00000980: 02 58 58 B2 31 32 30 AC 28 4A AB 31 29 3A 58 B2 |.XX.120.(J.1):X.|
00000990: B5 28 28 4E AB 58 58 29 AD 32 29 3A 8B 58 AC 32 |.((N.XX).2):.X.2|
000009A0: B3 B1 4E AB 58 58 A7 4E B2 4E AA 31 3A 41 41 24 |..N.XX.N.N.1:AA$|
000009B0: 28 4E 29 B2 45 44 24 3A 58 B2 B5 28 28 4E AB 58 |(N).ED$:X..((N.X|
000009C0: 58 29 AD 32 29 00 E3 11 C6 02 59 59 B2 58 58 AA |X).2).....YY.XX.|
000009D0: 58 3A 58 58 B2 58 58 AA 31 3A 5A 5A B2 58 3A 89 |X:XX.XX.1:ZZ.X:.|
000009E0: 37 39 30 00 16 12 D0 02 4D 43 B2 B5 28 4E AD 36 |790.....MC..(N.6|
000009F0: 30 29 AA 31 3A 41 50 B2 31 3A 81 4A B2 31 A4 4D |0).1:AP.1:.J.1.M|
00000A00: 43 3A 98 34 3A 98 34 2C 54 42 24 3B 4D 41 24 3B |C:.4:.4,TB$;MA$;|
00000A10: 48 45 24 3A 98 34 00 3B 12 DA 02 81 49 B2 41 50 |HE$:.4.;....I.AP|
00000A20: A4 41 50 AA 35 39 3A A1 58 24 3A 8B 58 24 B2 22 |.AP.59:.X$:.X$."|
00000A30: 58 22 A7 49 B2 4E 3A 89 37 36 30 00 4F 12 E4 02 |X".I.N:.760.O...|
00000A40: 8B 41 41 24 28 49 29 B2 45 44 24 A7 38 35 30 00 |.AA$(I).ED$.850.|
00000A50: 65 12 EE 02 98 34 2C 54 42 24 3B 4D 41 24 3B 41 |e....4,TB$;MA$;A|
00000A60: 41 24 28 49 29 00 84 12 F8 02 82 3A 98 34 3A 98 |A$(I)......:.4:.|
00000A70: 34 3A 98 34 3A 41 50 B2 41 50 AA 36 30 3A 82 3A |4:.4:AP.AP.60:.:|
00000A80: 89 38 35 30 00 B3 12 02 03 58 B2 B5 28 4E AD 32 |.850.....X..(N.2|
00000A90: 29 3A 8B 58 AC 32 B3 B1 4E A7 4E B2 4E AA 31 3A |):.X.2..N.N.N.1:|
00000AA0: 41 41 24 28 4E 29 B2 45 44 24 3A 58 B2 B5 28 4E |AA$(N).ED$:X..(N|
00000AB0: AD 32 29 00 C6 12 0C 03 58 58 B2 31 3A 59 59 B2 |.2).....XX.1:YY.|
00000AC0: 58 3A 5A 5A B2 58 00 DF 12 16 03 98 34 3A 98 34 |X:ZZ.X......4:.4|
00000AD0: 2C 54 42 24 3B 4D 41 24 3B 48 45 24 3A 98 34 00 |,TB$;MA$;HE$:.4.|
00000AE0: FC 12 20 03 81 49 B2 58 58 A4 59 59 3A 8B 41 41 |.. ..I.XX.YY:.AA|
00000AF0: 24 28 49 29 B2 45 44 24 A7 38 34 30 00 13 13 2A |$(I).ED$.840...*|
00000B00: 03 98 34 2C 54 42 24 3B 4D 41 24 3B 41 41 24 28 |..4,TB$;MA$;AA$(|
00000B10: 49 29 3B 00 2A 13 34 03 8B 41 41 24 28 49 AA 5A |I);.*.4..AA$(I.Z|
00000B20: 5A 29 B2 45 44 24 A7 38 34 30 00 43 13 3E 03 98 |Z).ED$.840.C.>..|
00000B30: 34 2C 54 42 24 3B 4D 42 24 3B 41 41 24 28 49 AA |4,TB$;MB$;AA$(I.|
00000B40: 5A 5A 29 00 49 13 48 03 82 00 6A 13 52 03 8B 41 |ZZ).I.H...j.R..A|
00000B50: 41 24 28 4E 29 B2 45 44 24 A7 41 41 24 28 4E 29 |A$(N).ED$.AA$(N)|
00000B60: B2 22 22 3A 4E B2 4E AB 31 3A 00 74 13 5C 03 98 |."":N.N.1:.t.\..|
00000B70: 34 3A A0 34 00 86 13 66 03 93 22 4E 45 57 2E 53 |4:.4...f.."NEW.S|
00000B80: 4F 52 54 22 2C 38 00 00 00 |ORT",8... |
..&...SP$." ".E
...MA.2:SC.26:MB.41:TB$.G(16).I...."...
PRINTER OPTIONS"...(..". SINGLE
OR DOUBLE COLUMN (S/D) S...";:.S1$...
2..S1$.."S".S1$.."D".."...":.40...<..".
HEADER (Y/N) Y...";:.S3$...F..S3$.."Y".
S3$.."N".."...":.60.2.P..". CHANGE RIGHT
MARGIN (Y/N) Y...";:.S5$.T.Z..S5$.."Y"
.S5$.."N".."...":.80.{.D..". ANY CHANGES
(Y/N) N...";:.S2$...N..S2$.."Y".S2$.."
N".."...":.100...X..S2$."Y".."...":.40..
....". RETURN TO MAIN MENU (Y/N) N...";
:.S6$......S6$.."Y".S6$.."N".."...":.130
......S6$."Y".870.*. ..S5$."N".270.O....
"... RIGHT MARGIN SETUP".X....".
THE CURRENT RIGHT MARGIN IS 1 ."......".
.WHAT MARGIN SETTING DO YOU DESIRE:-.".Y
.H.." 1, 5, 10, 15, OR 20 1...";:.MA:
.MA.1.270...R..MA.5.MA.20.."..":.200....
..MA.5...(MA.5).."..":.200.(....MA.5.SC.
25:MB.42.E....MA.10.MA.11:SC.23:MB.45.B.
...MA.15.MA.17:SC.21:MB.48.Y....MA.20.SC
.20:MB.50......"... PREPARING
HEADER."......"YOU MAY HAVE UP TO 3 SEP
ARATE HEADERS ONTHE FIRST LINE OF EACH
PAGE :-".!."..".RIGHT CENTER
LEFT".D.,..".DO YOU WANT :-
(MAX";SC;")".M.6..". RIGHT HEADER (Y/N)
Y...";:.H1$...@..H1$.."Y".H1$.."N"..".
..":.310...J.." CENTER HEADER (Y/N) Y..
.";:.H2$.Z.T..H2$.."Y".H2$.."N".."..":.3
30...^.." LEFT HEADER (Y/N) Y...";:.H
3$.$.H..H3$.."Y".H3$.."N".."..":.360.T.R
..H1$."Y".H1$."":.".ENTER RIGHT HEADER"
;H1$.X.|..C(H1$).SC.H1$."Y":."....":.370
......H2$."Y".H2$."":.".ENTER CENTER HEA
DER";H2$.L....C(H2$).SC.H2$."Y":."....":
.390......H3$."Y".H3$."":.".ENTER LEFT
HEADER";H3$. ....C(H3$).SC.H3$."Y":."..
..":.410.;....H1$."N".H1$.H(SP$,SC).O...
.H2$."N".H2$."".J.B..H3$."N".H3$.H(SP$,S
C)...L.H1$.H1$.H(SP$,SC.C(H1$))...V.H3$.
H(SP$,SC.C(H3$)).H3$.C....H2$."".H2$.H(S
P$,SC):.510.....H2..(C(H2$).2):SB..(SC.2
).....H2$.H(SP$,SB.H2).H2$:H2$.H2$.H(SP$
,SC.C(H2$)).'...HE$.H1$.H2$.H3$.U....".P
RINT HEADER ON ALL PAGES Y...";:.H2$.W.
...H2$.."Y".H2$.."N".."..":.520......H2$
."N"..".THE HEADER WILL BE PRINTED ON TH
E FIRST PAGE ONLY"...&..4,4:MA$.D(MA):MA
$.I(MA$,2):MB$.D(MB):MB$.I(MB$,2)...0.."
....TO ABORT PRINTING, ENTER . X ...".4.
:..N.121.S1$."D".770.B.D.N.N.1:AA$(N).ED
$:Y..(N.120):.Y.2..N.Y.Y.1.{.N.YY..119:.
S1$."S".720...X..J.1.Y.1:YY.YY.120:XX.YY
.59...B..4:.4,TB$;MA$;HE$:.4.V.L..I.YY.X
X:.X$:.X$."X".J.Y:.680...V..AA$(I).ED$.J
.Y:.680......4,TB$;MA$;AA$(I);."....AA$(
I.60).ED$.Y.X:.680.;....4,TB$;MB$;AA$(I.
60).J....:.4:.4:.4.\....:.X$."X".850.|..
..AA$(N).ED$.AA$(N)."":N.N.1.E...XX.120.
(J.1):X..((N.XX).2):.X.2..N.XX.N.N.1:AA$
(N).ED$:X..((N.XX).2)...F.YY.XX.X:XX.XX.
1:ZZ.X:.790...P.MC..(N.60).1:AP.1:.J.1.M
C:.4:.4,TB$;MA$;HE$:.4.;.Z..I.AP.AP.59:.
X$:.X$."X".I.N:.760.O....AA$(I).ED$.850.
E....4,TB$;MA$;AA$(I)......:.4:.4:.4:AP.
AP.60:.:.850.....X..(N.2):.X.2..N.N.N.1:
AA$(N).ED$:X..(N.2).F...XX.1:YY.X:ZZ.X..
....4:.4,TB$;MA$;HE$:.4... ..I.XX.YY:.AA
$(I).ED$.840...*..4,TB$;MA$;AA$(I);.*.4.
.AA$(I.ZZ).ED$.840.C.>..4,TB$;MB$;AA$(I.
ZZ).I.H...J.R..AA$(N).ED$.AA$(N)."":N.N.
1:.T.\..4: 4...F.."NEW.SORT",8...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL