CHANGE SETUP
FILE INFORMATION
FILENAME(S): CHANGE SETUP
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-11-30 15:52:00
APPEARS ON: 2 disk(s)
FILE HASH
6c98e65ad965f79fd26e41c9cac40c9e8ddffca05510749d4a66e12031267a0d
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ACOM | CHANGE SETUP | PRG | Belgium | 19 | 1 | DOWNLOAD FILE |
| 0145A | CHANGE SETUP | PRG | Curtcool, Frank | 4 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 43 08 05 00 97 35 33 32 38 30 2C 36 3A 97 |..C....53280,6:.|
00000010: 35 33 32 38 31 2C 36 3A 99 22 93 05 11 11 11 20 |53281,6:."..... |
00000020: 20 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 43 | THIS PROGRAM C|
00000030: 48 41 4E 47 45 53 20 54 48 45 20 50 52 49 4E 54 |HANGES THE PRINT|
00000040: 45 52 22 00 7A 08 06 00 99 22 20 20 20 53 45 54 |ER".z...." SET|
00000050: 55 50 20 46 49 4C 45 20 46 4F 52 20 22 C7 28 33 |UP FILE FOR ".(3|
00000060: 34 29 22 51 55 49 43 4B 2D 43 41 54 20 36 34 22 |4)"QUICK-CAT 64"|
00000070: C7 28 33 34 29 22 11 11 11 22 00 91 08 0A 00 9F |.(34)"..."......|
00000080: 32 2C 38 2C 32 2C 22 53 45 54 55 50 2C 50 2C 52 |2,8,2,"SETUP,P,R|
00000090: 22 00 9D 08 14 00 86 20 42 28 34 37 29 00 C2 08 |"...... B(47)...|
000000A0: 1E 00 81 58 B2 30 A4 34 37 3A A1 23 32 2C 42 24 |...X.0.47:.#2,B$|
000000B0: 3A 42 28 58 29 B2 C6 28 42 24 AA C7 28 30 29 29 |:B(X)..(B$..(0))|
000000C0: 3A 82 00 FD 08 28 00 A0 32 3A 52 24 B2 C7 28 31 |:....(..2:R$..(1|
000000D0: 33 29 3A 99 22 9F 50 52 45 53 53 20 27 52 45 54 |3):.".PRESS 'RET|
000000E0: 55 52 4E 27 20 54 4F 20 4B 45 45 50 20 56 41 4C |URN' TO KEEP VAL|
000000F0: 55 45 53 20 54 48 45 20 53 41 4D 45 22 00 2B 09 |UES THE SAME".+.|
00000100: 2D 00 41 24 B2 52 24 3A 99 22 11 11 44 45 56 49 |-.A$.R$:."..DEVI|
00000110: 43 45 20 4E 55 4D 42 45 52 20 28 57 41 53 22 42 |CE NUMBER (WAS"B|
00000120: 28 33 29 22 29 22 3B 3A 85 41 24 00 42 09 2F 00 |(3)")";:.A$.B./.|
00000130: 8B 41 24 B3 B1 52 24 A7 42 28 33 29 B2 C5 28 41 |.A$..R$.B(3)..(A|
00000140: 24 29 00 70 09 32 00 41 24 B2 52 24 3A 99 22 11 |$).p.2.A$.R$:.".|
00000150: 53 45 43 4F 4E 44 41 52 59 20 41 44 44 52 45 53 |SECONDARY ADDRES|
00000160: 53 20 28 22 42 28 32 29 22 29 22 3B 3A 85 41 24 |S ("B(2)")";:.A$|
00000170: 00 87 09 3C 00 8B 41 24 B3 B1 52 24 A7 42 28 32 |...<..A$..R$.B(2|
00000180: 29 B2 C5 28 41 24 29 00 AF 09 46 00 41 24 B2 52 |)..(A$)...F.A$.R|
00000190: 24 3A 99 22 11 4C 45 46 54 20 4D 41 52 47 49 4E |$:.".LEFT MARGIN|
000001A0: 20 28 22 42 28 34 29 22 29 22 3B 3A 85 41 24 00 | ("B(4)")";:.A$.|
000001B0: C6 09 50 00 8B 41 24 B3 B1 52 24 A7 42 28 34 29 |..P..A$..R$.B(4)|
000001C0: B2 C5 28 41 24 29 00 F9 09 5A 00 41 24 B2 52 24 |..(A$)...Z.A$.R$|
000001D0: 3A 99 22 11 53 50 41 43 45 53 20 42 45 54 57 45 |:.".SPACES BETWE|
000001E0: 45 4E 20 45 4E 54 52 49 45 53 20 28 22 42 28 35 |EN ENTRIES ("B(5|
000001F0: 29 22 29 22 3B 3A 85 41 24 00 10 0A 64 00 8B 41 |)")";:.A$...d..A|
00000200: 24 B3 B1 52 24 A7 42 28 35 29 B2 C5 28 41 24 29 |$..R$.B(5)..(A$)|
00000210: 00 3F 0A 6E 00 41 24 B2 52 24 3A 99 22 11 43 4F |.?.n.A$.R$:.".CO|
00000220: 4C 55 4D 4E 53 20 4F 46 20 45 4E 54 52 49 45 53 |LUMNS OF ENTRIES|
00000230: 20 28 22 42 28 36 29 22 29 22 3B 3A 85 41 24 00 | ("B(6)")";:.A$.|
00000240: 56 0A 78 00 8B 41 24 B3 B1 52 24 A7 42 28 36 29 |V.x..A$..R$.B(6)|
00000250: B2 C5 28 41 24 29 00 83 0A 82 00 99 22 11 11 54 |..(A$)......"..T|
00000260: 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 53 45 43 |HE FOLLOWING SEC|
00000270: 54 49 4F 4E 20 41 4C 4C 4F 57 53 20 59 4F 55 20 |TION ALLOWS YOU |
00000280: 54 4F 22 00 B2 0A 84 00 99 22 53 45 4E 44 20 43 |TO"......"SEND C|
00000290: 4F 4E 54 52 4F 4C 20 43 48 41 52 41 43 54 45 52 |ONTROL CHARACTER|
000002A0: 53 20 54 4F 20 59 4F 55 52 20 50 52 49 4E 54 45 |S TO YOUR PRINTE|
000002B0: 52 22 00 DC 0A 86 00 99 22 54 48 45 53 45 20 57 |R"......"THESE W|
000002C0: 49 4C 4C 20 42 45 20 53 45 4E 54 20 4A 55 53 54 |ILL BE SENT JUST|
000002D0: 20 42 45 46 4F 52 45 20 54 48 45 22 00 04 0B 88 | BEFORE THE"....|
000002E0: 00 99 22 4C 49 53 54 20 49 53 20 50 52 49 4E 54 |.."LIST IS PRINT|
000002F0: 45 44 20 4F 55 54 2E 20 28 4D 41 58 20 4F 46 20 |ED OUT. (MAX OF |
00000300: 34 30 29 22 00 25 0B 8A 00 99 22 11 54 59 50 45 |40)".%....".TYPE|
00000310: 20 27 51 27 20 57 48 45 4E 20 46 49 4E 49 53 48 | 'Q' WHEN FINISH|
00000320: 45 44 11 11 22 00 2D 0B 8B 00 58 B2 38 00 68 0B |ED..".-...X.8.h.|
00000330: 8C 00 8B 58 AB 38 B2 42 28 37 29 A7 99 22 43 48 |...X.8.B(7).."CH|
00000340: 41 52 41 43 54 45 52 22 58 AB 37 22 3D 20 51 22 |ARACTER"X.7"= Q"|
00000350: 3B 3A 85 41 24 3A 8B 41 24 B2 52 24 A7 41 24 B2 |;:.A$:.A$.R$.A$.|
00000360: 22 51 22 3A 89 31 35 30 00 7A 0B 8E 00 8B 58 AB |"Q":.150.z....X.|
00000370: 38 B2 42 28 37 29 A7 31 35 30 00 A0 0B 91 00 41 |8.B(7).150.....A|
00000380: 24 B2 52 24 3A 99 22 43 48 41 52 41 43 54 45 52 |$.R$:."CHARACTER|
00000390: 22 58 AB 37 22 3D 22 42 28 58 29 3B 3A 85 41 24 |"X.7"="B(X);:.A$|
000003A0: 00 BA 0B 96 00 8B 41 24 B2 22 51 22 A7 42 28 37 |......A$."Q".B(7|
000003B0: 29 B2 58 AB 38 3A 89 31 38 30 00 D1 0B A0 00 8B |).X.8:.180......|
000003C0: 41 24 B3 B1 52 24 A7 42 28 58 29 B2 C5 28 41 24 |A$..R$.B(X)..(A$|
000003D0: 29 00 E6 0B AA 00 8B 58 B3 34 37 A7 58 B2 58 AA |)......X.47.X.X.|
000003E0: 31 3A 89 31 34 30 00 01 0C B4 00 9F 31 35 2C 38 |1:.140......15,8|
000003F0: 2C 31 35 2C 22 53 3A 53 45 54 55 50 22 3A A0 31 |,15,"S:SETUP":.1|
00000400: 35 00 18 0C BE 00 9F 32 2C 38 2C 32 2C 22 53 45 |5......2,8,2,"SE|
00000410: 54 55 50 2C 50 2C 57 22 00 32 0C C8 00 81 58 B2 |TUP,P,W".2....X.|
00000420: 30 A4 34 37 3A 98 32 2C C7 28 42 28 58 29 29 3B |0.47:.2,.(B(X));|
00000430: 3A 82 00 39 0C D2 00 A0 32 00 00 00 |:..9....2... |
..C....53280,6:.53281,6:."..... THIS P
ROGRAM CHANGES THE PRINTER".Z...." SET
UP FILE FOR "G(34)"QUICK-CAT 64"G(34)"..
."......2,8,2,"SETUP,P,R"...... B(47).B.
...X.0.47:.#2,B$:B(X).F(B$.G(0)):....(.
2:R$.G(13):.".PRESS 'RETURN' TO KEEP VAL
UES THE SAME".+.-.A$.R$:."..DEVICE NUMBE
R (WAS"B(3)")";:.A$.B./..A$..R$.B(3).E(A
$).P.2.A$.R$:.".SECONDARY ADDRESS ("B(2)
")";:.A$...<..A$..R$.B(2).E(A$)...F.A$.R
$:.".LEFT MARGIN ("B(4)")";:.A$.F.P..A$.
.R$.B(4).E(A$)...Z.A$.R$:.".SPACES BETWE
EN ENTRIES ("B(5)")";:.A$...D..A$..R$.B(
5).E(A$).?.N.A$.R$:.".COLUMNS OF ENTRIES
("B(6)")";:.A$.V.X..A$..R$.B(6).E(A$)..
...."..THE FOLLOWING SECTION ALLOWS YOU
TO"......"SEND CONTROL CHARACTERS TO YOU
R PRINTER"......"THESE WILL BE SENT JUST
BEFORE THE"......"LIST IS PRINTED OUT.
(MAX OF 40)".%....".TYPE 'Q' WHEN FINISH
ED..".-...X.8.H....X.8.B(7).."CHARACTER"
X.7"= Q";:.A$:.A$.R$.A$."Q":.150.Z....X.
8.B(7).150. ...A$.R$:."CHARACTER"X.7"="B
(X);:.A$......A$."Q".B(7).X.8:.180.Q. ..
A$..R$.B(X).E(A$)......X.47.X.X.1:.140..
....15,8,15,"S:SETUP": 15......2,8,2,"SE
TUP,P,W".2.H..X.0.47:.2,G(B(X));:..9.R.
2...
> CLICK IMAGE PREVIEW FOR FULL MODAL