1520 SETUP

FILE INFORMATION

FILENAME(S): 1520 SETUP

FILE TYPE(S): PRG

FILE SIZE: 1.8K

FIRST SEEN: 2025-10-19 22:48:39

APPEARS ON: 2 disk(s)

FILE HASH

960907145b8b9da02d20a3e51e09e2c8b2394dbd2cde01b54e97324317ddcb59

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
BBS DOWNLOADS	1520 SETUP	PRG	Radd Maxx	26	4	DOWNLOAD FILE
PB DOMAIN 0054GR	1520 SETUP	PRG	Treasure Chest - Klaus Der Suhler	17	3	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 25 08 00 00 8F 20  31 35 32 30 20 50 52 49  |..%.... 1520 PRI|
00000010: 4E 54 45 52 2F 50 4C 4F  54 54 45 52 20 53 45 54  |NTER/PLOTTER SET|
00000020: 55 50 20 42 59 00 44 08  05 00 8F 20 53 54 45 56  |UP BY.D.... STEV|
00000030: 45 4E 20 44 5A 49 41 44  49 4B 20 20 37 35 32 30  |EN DZIADIK  7520|
00000040: 35 2C 35 35 00 6C 08 0A  00 99 22 93 22 3A 97 35  |5,55.l....".":.5|
00000050: 33 32 38 30 2C 32 3A 97  35 33 32 38 31 2C 37 3A  |3280,2:.53281,7:|
00000060: 97 36 34 36 2C 30 3A 89  34 30 30 30 00 9F 08 14  |.646,0:.4000....|
00000070: 00 99 22 93 11 11 11 11  1D 1D 1D 1D 1D 31 35 32  |.."..........152|
00000080: 30 20 50 52 49 4E 54 45  52 2F 50 4C 4F 54 54 45  |0 PRINTER/PLOTTE|
00000090: 52 20 53 45 54 20 55 50  22 3A 99 3A 99 3A 99 00  |R SET UP":.:.:..|
000000A0: B2 08 1E 00 99 22 50 45  4E 20 43 4F 4C 4F 52 22  |....."PEN COLOR"|
000000B0: 3A 99 00 E1 08 28 00 99  22 30 3D 42 4C 41 43 4B  |:....(.."0=BLACK|
000000C0: 22 3A 99 22 31 3D 42 4C  55 45 22 3A 99 22 32 3D  |":."1=BLUE":."2=|
000000D0: 47 52 45 45 4E 22 3A 99  22 33 3D 52 45 44 22 3A  |GREEN":."3=RED":|
000000E0: 99 00 F8 08 32 00 85 22  59 4F 55 52 20 43 48 4F  |....2.."YOUR CHO|
000000F0: 49 43 45 20 22 3B 50 43  00 10 09 37 00 8B 50 43  |ICE ";PC...7..PC|
00000100: B3 30 B0 50 43 B1 33 A7  99 22 93 22 3A 89 31 30  |.0.PC.3..".":.10|
00000110: 00 16 09 3C 00 99 00 2F  09 46 00 8B 50 43 B2 30  |...<.../.F..PC.0|
00000120: A7 41 24 B2 22 42 4C 41  43 4B 20 50 45 4E 22 00  |.A$."BLACK PEN".|
00000130: 47 09 50 00 8B 50 43 B2  31 A7 41 24 B2 22 42 4C  |G.P..PC.1.A$."BL|
00000140: 55 45 20 50 45 4E 22 00  60 09 5A 00 8B 50 43 B2  |UE PEN".`.Z..PC.|
00000150: 32 A7 41 24 B2 22 47 52  45 45 4E 20 50 45 4E 22  |2.A$."GREEN PEN"|
00000160: 00 77 09 64 00 8B 50 43  B2 33 A7 41 24 B2 22 52  |.w.d..PC.3.A$."R|
00000170: 45 44 20 50 45 4E 22 00  90 09 6E 00 99 22 59 4F  |ED PEN"...n.."YO|
00000180: 55 20 43 48 4F 53 45 20  54 48 45 20 22 3B 41 24  |U CHOSE THE ";A$|
00000190: 00 AB 09 78 00 81 58 B2  31 A4 31 35 30 30 3A 82  |...x..X.1.1500:.|
000001A0: 3A 8D 31 30 30 30 3A 99  22 93 22 00 CD 09 82 00  |:.1000:.".".....|
000001B0: 99 22 11 11 11 11 55 50  50 45 52 2F 4C 4F 57 45  |."....UPPER/LOWE|
000001C0: 52 20 43 41 53 45 22 3A  99 3A 99 3A 99 00 F4 09  |R CASE":.:.:....|
000001D0: 8C 00 99 22 30 3D 55 50  50 45 52 20 43 41 53 45  |..."0=UPPER CASE|
000001E0: 2F 53 48 49 46 54 45 44  20 4C 4F 57 45 52 20 43  |/SHIFTED LOWER C|
000001F0: 41 53 45 22 00 1B 0A 96  00 99 22 31 3D 4C 4F 57  |ASE"......"1=LOW|
00000200: 45 52 20 43 41 53 45 2F  53 48 49 46 54 45 44 20  |ER CASE/SHIFTED |
00000210: 55 50 50 45 52 20 43 41  53 45 22 00 21 0A A0 00  |UPPER CASE".!...|
00000220: 99 00 38 0A AA 00 85 22  59 4F 55 52 20 43 48 4F  |..8...."YOUR CHO|
00000230: 49 43 45 20 22 3B 43 41  00 51 0A AF 00 8B 43 41  |ICE ";CA.Q....CA|
00000240: B3 30 B0 43 41 B1 31 A7  99 22 93 22 3A 89 31 33  |.0.CA.1..".":.13|
00000250: 30 00 57 0A B4 00 99 00  84 0A BE 00 8B 43 41 B2  |0.W..........CA.|
00000260: 30 A7 42 24 B2 22 55 50  50 45 52 20 43 41 53 45  |0.B$."UPPER CASE|
00000270: 2F 53 48 49 46 54 45 44  20 4C 4F 57 45 52 20 43  |/SHIFTED LOWER C|
00000280: 41 53 45 22 00 B1 0A C8  00 8B 43 41 B2 31 A7 42  |ASE"......CA.1.B|
00000290: 24 B2 22 4C 4F 57 45 52  20 43 41 53 45 2F 53 48  |$."LOWER CASE/SH|
000002A0: 49 46 54 45 44 20 55 50  50 45 52 20 43 41 53 45  |IFTED UPPER CASE|
000002B0: 22 00 C6 0A D2 00 99 22  59 4F 55 20 43 48 4F 53  |"......"YOU CHOS|
000002C0: 45 20 22 3B 42 24 00 E1  0A DC 00 81 58 B2 31 A4  |E ";B$......X.1.|
000002D0: 31 35 30 30 3A 82 3A 8D  32 30 30 30 3A 99 22 93  |1500:.:.2000:.".|
000002E0: 22 00 FA 0A E6 00 99 22  11 11 11 11 4C 49 4E 45  |"......"....LINE|
000002F0: 20 4C 45 4E 47 54 48 22  3A 99 00 40 0B F0 00 99  | LENGTH":..@....|
00000300: 22 30 3D 38 30 20 43 4F  4C 55 4D 4E 53 22 3A 99  |"0=80 COLUMNS":.|
00000310: 22 31 3D 34 30 20 43 4F  4C 55 4D 4E 53 22 3A 99  |"1=40 COLUMNS":.|
00000320: 22 32 3D 32 30 20 43 4F  4C 55 4D 4E 53 22 3A 99  |"2=20 COLUMNS":.|
00000330: 22 33 3D 31 30 20 43 4F  4C 55 4D 4E 53 22 3A 99  |"3=10 COLUMNS":.|
00000340: 00 57 0B FA 00 85 22 59  4F 55 52 20 43 48 4F 49  |.W...."YOUR CHOI|
00000350: 43 45 20 22 3B 4C 4C 00  70 0B 04 01 8B 4C 4C B3  |CE ";LL.p....LL.|
00000360: 30 B0 4C 4C B1 33 A7 99  22 93 22 3A 89 32 33 30  |0.LL.3..".":.230|
00000370: 00 8A 0B 0E 01 8B 4C 4C  B2 30 A7 43 24 B2 22 38  |......LL.0.C$."8|
00000380: 30 20 43 4F 4C 55 4D 4E  53 22 00 A4 0B 18 01 8B  |0 COLUMNS"......|
00000390: 4C 4C B2 31 A7 43 24 B2  22 34 30 20 43 4F 4C 55  |LL.1.C$."40 COLU|
000003A0: 4D 4E 53 22 00 BE 0B 22  01 8B 4C 4C B2 32 A7 43  |MNS"..."..LL.2.C|
000003B0: 24 B2 22 32 30 20 43 4F  4C 55 4D 4E 53 22 00 D8  |$."20 COLUMNS"..|
000003C0: 0B 2C 01 8B 4C 4C B2 33  A7 43 24 B2 22 31 30 20  |.,..LL.3.C$."10 |
000003D0: 43 4F 4C 55 4D 4E 53 22  00 EF 0B 36 01 99 3A 99  |COLUMNS"...6..:.|
000003E0: 22 59 4F 55 20 43 48 4F  53 45 20 22 3B 43 24 00  |"YOU CHOSE ";C$.|
000003F0: 0A 0C 40 01 81 58 B2 31  A4 31 35 30 30 3A 82 3A  |..@..X.1.1500:.:|
00000400: 8D 33 30 30 30 3A 99 22  93 22 00 1E 0C 4A 01 99  |.3000:."."...J..|
00000410: 22 11 11 11 11 52 45 56  49 45 57 22 3A 99 00 42  |"....REVIEW":..B|
00000420: 0C 54 01 99 22 52 45 56  49 45 57 20 59 4F 55 52  |.T.."REVIEW YOUR|
00000430: 20 43 48 4F 49 43 45 53  3F 20 28 59 2F 4E 29 22  | CHOICES? (Y/N)"|
00000440: 3A 99 00 59 0C 5E 01 85  22 59 4F 55 52 20 43 48  |:..Y.^.."YOUR CH|
00000450: 4F 49 43 45 20 22 3B 52  24 00 79 0C 68 01 8B 52  |OICE ";R$.y.h..R|
00000460: 24 B3 B1 22 59 22 A7 8B  52 24 B3 B1 22 4E 22 A7  |$.."Y"..R$.."N".|
00000470: 99 22 93 22 3A 89 33 33  30 00 A2 0C 72 01 8B 52  |.".":.330...r..R|
00000480: 24 B2 22 4E 22 A7 99 22  93 11 11 11 11 53 45 54  |$."N"..".....SET|
00000490: 20 55 50 20 43 4F 4D 50  4C 45 54 45 22 3A 89 34  | UP COMPLETE":.4|
000004A0: 37 30 00 AE 0C 7C 01 99  22 93 11 11 11 22 00 D0  |70...|.."...."..|
000004B0: 0C 86 01 99 22 50 52 49  4E 54 20 57 49 4C 4C 20  |...."PRINT WILL |
000004C0: 42 45 20 42 59 20 54 48  45 20 22 3B 41 24 3A 99  |BE BY THE ";A$:.|
000004D0: 00 E6 0C 90 01 99 42 24  3B 22 20 53 45 4C 45 43  |......B$;" SELEC|
000004E0: 54 45 44 22 3A 99 00 09  0D 9A 01 99 22 4C 49 4E  |TED":......."LIN|
000004F0: 45 20 4C 45 4E 47 54 48  20 49 53 20 53 45 54 20  |E LENGTH IS SET |
00000500: 54 4F 20 22 3B 43 24 3A  99 00 26 0D A4 01 99 22  |TO ";C$:..&...."|
00000510: 4D 41 4B 45 20 43 48 41  4E 47 45 53 3F 20 28 59  |MAKE CHANGES? (Y|
00000520: 2F 4E 29 22 3A 99 00 3D  0D AE 01 85 22 59 4F 55  |/N)":..=...."YOU|
00000530: 52 20 43 48 4F 49 43 45  20 22 3B 44 24 00 5D 0D  |R CHOICE ";D$.].|
00000540: B8 01 8B 44 24 B3 B1 22  59 22 A7 8B 44 24 B3 B1  |...D$.."Y"..D$..|
00000550: 22 4E 22 A7 99 22 93 22  3A 89 33 38 30 00 86 0D  |"N"..".":.380...|
00000560: C2 01 8B 44 24 B2 22 4E  22 A7 99 22 93 11 11 11  |...D$."N".."....|
00000570: 11 53 45 54 20 55 50 20  43 4F 4D 50 4C 45 54 45  |.SET UP COMPLETE|
00000580: 22 3A 89 34 37 30 00 90  0D CC 01 89 34 30 30 30  |":.470......4000|
00000590: 00 99 0D D6 01 9F 34 2C  36 00 A9 0D E0 01 81 58  |......4,6......X|
000005A0: B2 31 A4 35 3A 98 34 3A  82 00 B0 0D EA 01 A0 34  |.1.5:.4:.......4|
000005B0: 00 B6 0D F4 01 9C 00 BC  0D FE 01 80 00 C5 0D E8  |................|
000005C0: 03 9F 34 2C 36 00 D0 0D  F2 03 9F 32 2C 36 2C 32  |..4,6......2,6,2|
000005D0: 00 DA 0D FC 03 98 32 2C  50 43 00 05 0E 06 04 98  |......2,PC......|
000005E0: 34 2C 22 43 48 41 52 41  43 54 45 52 53 20 57 49  |4,"CHARACTERS WI|
000005F0: 4C 4C 20 42 45 20 50 52  49 4E 54 45 44 20 42 59  |LL BE PRINTED BY|
00000600: 20 22 3B 41 24 00 0C 0E  10 04 A0 32 00 13 0E 1A  | ";A$......2....|
00000610: 04 A0 34 00 19 0E 24 04  8E 00 22 0E D0 07 9F 34  |..4...$..."....4|
00000620: 2C 36 00 2D 0E DA 07 9F  36 2C 36 2C 36 00 37 0E  |,6.-....6,6,6.7.|
00000630: E4 07 98 36 2C 43 41 00  4D 0E EE 07 98 34 2C 22  |...6,CA.M....4,"|
00000640: 50 52 49 4E 54 20 49 53  20 22 3B 42 24 00 54 0E  |PRINT IS ";B$.T.|
00000650: F8 07 A0 34 00 5B 0E 02  08 A0 36 00 61 0E 0C 08  |...4.[....6.a...|
00000660: 8E 00 6A 0E B8 0B 9F 34  2C 36 00 75 0E C2 0B 9F  |..j....4,6.u....|
00000670: 33 2C 36 2C 33 00 7F 0E  CC 0B 98 33 2C 4C 4C 00  |3,6,3......3,LL.|
00000680: 8D 0E D1 0B 8B 4C 4C B1  B2 32 A7 98 34 00 AE 0E  |.....LL..2..4...|
00000690: D6 0B 98 34 2C 22 4C 49  4E 45 20 4C 45 4E 47 54  |...4,"LINE LENGT|
000006A0: 48 20 57 49 4C 4C 20 42  45 20 22 3B 43 24 00 B5  |H WILL BE ";C$..|
000006B0: 0E E0 0B A0 33 00 BC 0E  EA 0B A0 34 00 C2 0E F4  |....3......4....|
000006C0: 0B 8E 00 CB 0E A0 0F 9F  34 2C 36 00 DB 0E AA 0F  |........4,6.....|
000006D0: 81 58 B2 31 A4 35 3A 98  34 3A 82 00 E2 0E B4 0F  |.X.1.5:.4:......|
000006E0: A0 34 00 ED 0E BE 0F 9F  37 2C 36 2C 37 00 F4 0E  |.4......7,6,7...|
000006F0: C8 0F 98 37 00 0F 0F D2  0F 99 3A 99 22 4F 4E 45  |...7......:."ONE|
00000700: 20 4D 4F 4D 45 4E 54 20  50 4C 45 41 53 45 22 00  | MOMENT PLEASE".|
00000710: 20 0F DC 0F 81 58 B2 31  A4 31 32 35 30 30 3A 82  | ....X.1.12500:.|
00000720: 00 27 0F E6 0F A0 37 00  2D 0F F0 0F 9C 00 36 0F  |.'....7.-.....6.|
00000730: FA 0F 9F 34 2C 36 00 46  0F 04 10 81 58 B2 31 A4  |...4,6.F....X.1.|
00000740: 35 3A 98 34 3A 82 00 4D  0F 0E 10 A0 34 00 55 0F  |5:.4:..M....4.U.|
00000750: 18 10 89 32 30 00 00 00  0D                       |...20....       |

..%.... 1520 PRINTER/PLOTTER SETUP BY.D.
... STEVEN DZIADIK  75205,55.L....".":.5
3280,2:.53281,7:.646,0:.4000......".....
.....1520 PRINTER/PLOTTER SET UP":.:.:..
....."PEN COLOR":....(.."0=BLACK":."1=BL
UE":."2=GREEN":."3=RED":....2.."YOUR CHO
ICE ";PC...7..PC.0.PC.3..".":.10...<.../
.F..PC.0.A$."BLACK PEN".G.P..PC.1.A$."BL
UE PEN".`.Z..PC.2.A$."GREEN PEN".W.D..PC
.3.A$."RED PEN"...N.."YOU CHOSE THE ";A$
...X..X.1.1500:.:.1000:.".".M...."....UP
PER/LOWER CASE":.:.:......."0=UPPER CASE
/SHIFTED LOWER CASE"......"1=LOWER CASE/
SHIFTED UPPER CASE".!. ...8...."YOUR CHO
ICE ";CA.Q....CA.0.CA.1..".":.130.W.....
.....CA.0.B$."UPPER CASE/SHIFTED LOWER C
ASE"...H..CA.1.B$."LOWER CASE/SHIFTED UP
PER CASE".F.R.."YOU CHOSE ";B$......X.1.
1500:.:.2000:."."......"....LINE LENGTH"
:..@...."0=80 COLUMNS":."1=40 COLUMNS":.
"2=20 COLUMNS":."3=10 COLUMNS":..W...."Y
OUR CHOICE ";LL.P....LL.0.LL.3..".":.230
......LL.0.C$."80 COLUMNS"......LL.1.C$.
"40 COLUMNS"..."..LL.2.C$."20 COLUMNS".X
.,..LL.3.C$."10 COLUMNS"...6..:."YOU CHO
SE ";C$...@..X.1.1500:.:.3000:."."...J..
"....REVIEW":..B.T.."REVIEW YOUR CHOICES
? (Y/N)":..Y.^.."YOUR CHOICE ";R$.Y.H..R
$.."Y"..R$.."N"..".":.330...R..R$."N".."
.....SET UP COMPLETE":.470...|.."....".P
...."PRINT WILL BE BY THE ";A$:.......B$
;" SELECTED":......."LINE LENGTH IS SET 
TO ";C$:..&...."MAKE CHANGES? (Y/N)":..=
...."YOUR CHOICE ";D$.]....D$.."Y"..D$..
"N"..".":.380...B..D$."N"..".....SET UP 
COMPLETE":.470...L..4000...V..4,6......X
.1.5:.4:...... 4.............E....4,6.P.
...2,6,2.Z....2,PC......4,"CHARACTERS WI
LL BE PRINTED BY ";A$..... 2..... 4...$.
..".P..4,6.-.Z..6,6,6.7....6,CA.M....4,"
PRINT IS ";B$.T... 4.[... 6.A.....J....4
,6.U.B..3,6,3..L..3,LL...Q..LL..2..4...
V..4,"LINE LENGTH WILL BE ";C$..... 3...
.. 4.B.....K. ..4,6......X.1.5:.4:......
 4......7,6,7...H..7...R..:."ONE MOMENT 
PLEASE". ....X.1.12500:..'... 7.-.....6.
...4,6.F....X.1.5:.4:..M... 4.U....20...
.

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL