_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

PRINT SELECT

FILE INFORMATION

FILENAME(S): PRINT SELECT

FILE TYPE(S): PRG

FILE SIZE: 2.4K

FIRST SEEN: 2025-11-30 18:12:20

APPEARS ON: 1 disk(s)

FILE HASH

800cbe631bd2807ad86d46e5a10d280112f69899fd1af1f58c6fa1c671afebb1

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOADSTAR 40 S 1 PRINT SELECT PRG Sailor, Ganheden 23 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 0C 08 03 00 8D 31  30 30 30 30 00 16 08 05  |.......10000....|
00000010: 00 42 B2 31 39 38 00 4F  08 06 00 42 4C 24 B2 22  |.B.198.O...BL$."|
00000020: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000040: 20 20 20 20 20 20 20 22  3A 8D 20 37 3A 89 39 00  |       ":. 7:.9.|
00000050: 82 08 07 00 9F 31 35 2C  38 2C 31 35 2C 22 49 30  |.....15,8,15,"I0|
00000060: 22 3A A0 31 35 3A 9F 32  2C 38 2C 32 2C 22 24 22  |":.15:.2,8,2,"$"|
00000070: 3A 81 58 B2 30 A4 31 35  36 3A A1 23 32 2C 41 24  |:.X.0.156:.#2,A$|
00000080: 3A 82 00 9B 08 08 00 A1  23 32 2C 41 24 3A 53 49  |:.......#2,A$:SI|
00000090: B2 C5 28 41 24 29 3A A0  32 3A 8E 00 B1 08 09 00  |..(A$):.2:......|
000000A0: 97 35 33 32 38 31 2C 2E  3A 97 35 33 32 38 30 2C  |.53281,.:.53280,|
000000B0: 35 00 E7 08 0A 00 99 22  93 08 0E 1E 12 20 20 20  |5......".....   |
000000C0: 20 20 20 20 20 CC CF C1  C4 D3 D4 C1 D2 A0 C8 41  |     ..........A|
000000D0: 52 44 43 4F 50 59 20 D3  45 54 55 50 20 20 20 20  |RDCOPY .ETUP    |
000000E0: 20 20 20 20 20 11 22 00  18 09 0F 00 99 22 11 11  |     ."......"..|
000000F0: 11 9E 20 20 D7 48 41 54  20 53 45 4C 45 43 54 49  |..  .HAT SELECTI|
00000100: 4F 4E 20 42 45 4C 4F 57  20 42 45 53 54 20 44 45  |ON BELOW BEST DE|
00000110: 53 43 52 49 42 45 53 22  00 2F 09 10 00 99 22 20  |SCRIBES"./...." |
00000120: 20 59 4F 55 52 20 50 52  49 4E 54 45 52 3F 22 00  | YOUR PRINTER?".|
00000130: 5F 09 14 00 99 22 11 11  20 20 20 20 20 05 31 9A  |_...."..     .1.|
00000140: 29 20 C3 4F 4D 4D 4F 44  4F 52 45 20 31 35 32 35  |) .OMMODORE 1525|
00000150: 20 4F 52 20 43 4F 4D 50  41 54 49 42 4C 45 22 00  | OR COMPATIBLE".|
00000160: 7F 09 1E 00 99 22 20 20  20 20 20 05 32 9A 29 20  |....."     .2.) |
00000170: C3 4F 4D 4D 4F 44 4F 52  45 20 31 35 32 30 22 00  |.OMMODORE 1520".|
00000180: A3 09 28 00 99 22 20 20  20 20 20 05 33 9A 29 20  |..(.."     .3.) |
00000190: CF 4C 44 20 C3 4F 4D 4D  4F 44 4F 52 45 20 31 35  |.LD .OMMODORE 15|
000001A0: 31 35 22 00 C2 09 2A 00  99 22 20 20 20 20 20 05  |15"...*.."     .|
000001B0: 34 9A 29 20 CF 54 48 45  52 20 50 52 49 4E 54 45  |4.) .THER PRINTE|
000001C0: 52 22 00 D9 09 2D 00 99  22 20 20 20 20 20 05 D1  |R"...-.."     ..|
000001D0: 9A 29 20 D1 55 49 54 11  22 00 09 0A 32 00 99 22  |.) .UIT."...2.."|
000001E0: 20 20 20 20 20 D0 52 45  53 53 20 05 31 9A 2C 20  |     .RESS .1., |
000001F0: 05 32 9A 2C 20 05 33 9A  2C 20 4F 52 20 05 D1 9A  |.2., .3., OR ...|
00000200: 2E 22 3A 97 31 39 38 2C  2E 00 37 0A 3C 00 41 B2  |.":.198,..7.<.A.|
00000210: C2 28 32 30 33 29 3A 8B  41 B3 B1 35 36 AF 41 B3  |.(203):.A..56.A.|
00000220: B1 35 39 AF 41 B3 B1 38  AF 41 B3 B1 36 32 AF 41  |.59.A..8.A..62.A|
00000230: B3 B1 31 31 A7 36 30 00  57 0A 41 00 8B 41 B2 35  |..11.60.W.A..A.5|
00000240: 36 A7 50 41 B2 34 3A 53  41 B2 37 3A 43 38 25 B2  |6.PA.4:SA.7:C8%.|
00000250: AB 31 3A 89 33 30 30 00  6C 0A 46 00 8B 41 B2 36  |.1:.300.l.F..A.6|
00000260: 32 A7 8D 36 30 30 30 30  3A 89 35 30 00 85 0A 50  |2..60000:.50...P|
00000270: 00 8B 41 B2 35 39 A7 50  41 B2 36 3A 53 41 B2 30  |..A.59.PA.6:SA.0|
00000280: 3A 89 33 30 30 00 A3 0A  5A 00 8B 41 B2 38 A7 50  |:.300...Z..A.8.P|
00000290: 41 B2 34 3A 53 41 B2 37  3A 43 38 25 B2 30 3A 89  |A.4:SA.7:C8%.0:.|
000002A0: 33 30 30 00 D4 0A C8 00  99 22 13 11 11 11 05 CF  |300......"......|
000002B0: 2E CB 2E 9A 2C 20 50 4C  45 41 53 45 20 45 4E 54  |...., PLEASE ENT|
000002C0: 45 52 20 54 48 45 20 43  4F 52 52 45 43 54 20 44  |ER THE CORRECT D|
000002D0: 41 54 41 22 00 EE 0A CA  00 99 22 11 46 4F 52 20  |ATA"......".FOR |
000002E0: 59 4F 55 52 20 50 52 49  4E 54 45 52 3A 22 00 01  |YOUR PRINTER:"..|
000002F0: 0B CB 00 81 58 B2 30 A4  31 30 3A 99 42 4C 24 3A  |....X.0.10:.BL$:|
00000300: 82 00 3D 0B CC 00 99 22  13 11 11 11 11 11 11 11  |..=...."........|
00000310: 11 C5 4E 54 45 52 20 50  52 49 4D 41 52 59 20 20  |..NTER PRIMARY  |
00000320: 20 41 44 44 52 45 53 53  20 2D 2D 05 22 3B 3A 85  | ADDRESS --.";:.|
00000330: 50 41 24 3A 50 41 B2 C5  28 50 41 24 29 00 75 0B  |PA$:PA..(PA$).u.|
00000340: CE 00 99 3A 99 3A 99 22  9A C5 4E 54 45 52 20 53  |...:.:."..NTER S|
00000350: 45 43 4F 4E 44 41 52 59  20 41 44 44 52 45 53 53  |ECONDARY ADDRESS|
00000360: 20 2D 2D 05 22 3B 3A 85  53 41 24 3A 53 41 B2 C5  | --.";:.SA$:SA..|
00000370: 28 53 41 24 29 00 7B 0B  2C 01 3A 00 93 0B 2D 01  |(SA$).{.,.:...-.|
00000380: 99 22 13 22 3A 81 58 B2  30 A4 32 30 3A 99 42 4C  |.".":.X.0.20:.BL|
00000390: 24 3A 82 00 BB 0B 2E 01  99 22 13 11 11 11 11 9A  |$:......."......|
000003A0: D0 52 49 4D 41 52 59 20  41 44 44 52 45 53 53 20  |.RIMARY ADDRESS |
000003B0: 4F 46 05 22 50 41 22 9D  9A 2E 22 00 E1 0B 30 01  |OF."PA"..."...0.|
000003C0: 99 22 11 11 D3 45 43 4F  4E 44 41 52 59 20 41 44  |."...ECONDARY AD|
000003D0: 44 52 45 53 53 20 4F 46  05 22 53 41 22 9D 9A 2E  |DRESS OF."SA"...|
000003E0: 22 00 E7 0B 31 01 3A 00  0E 0C 36 01 99 22 11 11  |"...1.:...6.."..|
000003F0: C1 52 45 20 54 48 45 53  45 20 53 45 4C 45 43 54  |.RE THESE SELECT|
00000400: 49 4F 4E 53 20 43 4F 52  52 45 43 54 3F 22 00 38  |IONS CORRECT?".8|
00000410: 0C 38 01 99 22 20 20 20  20 20 20 20 20 20 20 5B  |.8.."          [|
00000420: 05 D9 9A 2F 05 CE 9A 5D  20 4F 52 20 05 D1 20 9A  |.../...] OR .. .|
00000430: 54 4F 20 D1 55 49 54 22  00 4A 0C 3B 01 97 42 2C  |TO .UIT".J.;..B,|
00000440: 30 3A 92 42 2C 31 3A A1  41 24 00 6B 0C 40 01 8B  |0:.B,1:.A$.k.@..|
00000450: 41 24 B3 B1 22 59 22 AF  41 24 B3 B1 22 4E 22 AF  |A$.."Y".A$.."N".|
00000460: 41 24 B3 B1 22 51 22 A7  33 31 35 00 71 0C 45 01  |A$.."Q".315.q.E.|
00000470: 3A 00 81 0C 4A 01 8B 41  24 B2 22 51 22 A7 35 34  |:...J..A$."Q".54|
00000480: 30 00 90 0C 54 01 8B 41  24 B2 22 4E 22 A7 31 30  |0...T..A$."N".10|
00000490: 00 99 0C 59 01 89 35 30  30 00 9F 0C 5E 01 3A 00  |...Y..500...^.:.|
000004A0: B7 0C 68 01 99 22 13 22  3A 81 58 B2 30 A4 32 30  |..h..".":.X.0.20|
000004B0: 3A 99 42 4C 24 3A 82 00  E9 0C 72 01 99 22 13 11  |:.BL$:....r.."..|
000004C0: 11 11 20 20 20 9A D0 4C  45 41 53 45 20 4D 41 4B  |..   ..LEASE MAK|
000004D0: 45 20 53 55 52 45 20 53  49 44 45 05 22 41 47 22  |E SURE SIDE."AG"|
000004E0: 9A 4F 46 20 59 4F 55 52  22 00 14 0D 77 01 99 22  |.OF YOUR"...w.."|
000004F0: 11 20 20 20 CC CF C1 C4  D3 D4 C1 D2 20 44 49 53  |.   ........ DIS|
00000500: 4B 20 49 53 20 49 4E 20  59 4F 55 52 20 44 52 49  |K IS IN YOUR DRI|
00000510: 56 45 2E 22 00 45 0D 7C  01 99 22 11 11 20 D0 4C  |VE.".E.|..".. .L|
00000520: 45 41 53 45 20 50 52 45  53 53 20 41 20 4B 45 59  |EASE PRESS A KEY|
00000530: 20 57 48 45 4E 20 59 4F  55 20 41 52 45 20 52 45  | WHEN YOU ARE RE|
00000540: 41 44 59 2E 22 00 6C 0D  7D 01 99 22 11 11 20 20  |ADY.".l.}.."..  |
00000550: 20 20 20 20 20 20 20 20  28 D0 52 45 53 53 20 05  |        (.RESS .|
00000560: D1 20 9A 54 4F 20 D1 55  49 54 29 22 00 8B 0D 7E  |. .TO .UIT)"...~|
00000570: 01 97 42 2C 30 3A 92 42  2C 31 3A A1 41 24 3A 8B  |..B,0:.B,1:.A$:.|
00000580: 41 24 B2 22 51 22 A7 31  30 30 30 00 9E 0D 90 01  |A$."Q".1000.....|
00000590: 8D 20 37 3A 8B 41 47 B2  53 49 A7 34 30 35 00 B6  |. 7:.AG.SI.405..|
000005A0: 0D 91 01 99 22 13 22 3A  81 58 B2 31 A4 32 30 3A  |....".":.X.1.20:|
000005B0: 99 42 4C 24 3A 82 00 F6  0D 92 01 99 22 13 11 11  |.BL$:......."...|
000005C0: 11 11 11 11 11 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D D3  |................|
000005D0: 49 44 45 22 41 47 22 4E  4F 54 20 46 4F 55 4E 44  |IDE"AG"NOT FOUND|
000005E0: 2E 2E 2E 22 3A 81 44 4C  B2 31 A4 32 30 30 30 3A  |...":.DL.1.2000:|
000005F0: 82 3A 89 33 36 30 00 01  0E 95 01 8D 32 30 30 30  |.:.360......2000|
00000600: 30 00 2C 0E 9A 01 99 22  11 11 20 20 20 D0 52 49  |0.,...."..   .RI|
00000610: 4E 54 20 46 49 4C 45 20  49 53 20 4E 4F 57 20 4F  |NT FILE IS NOW O|
00000620: 4E 20 54 48 49 53 20 53  49 44 45 22 00 4D 0E 9C  |N THIS SIDE".M..|
00000630: 01 99 22 11 20 20 20 20  20 20 20 20 20 20 20 20  |..".            |
00000640: 4F 46 20 54 48 45 20 44  49 53 4B 2E 22 00 5E 0E  |OF THE DISK.".^.|
00000650: 9F 01 81 44 4C B2 31 A4  32 30 30 30 3A 82 00 64  |...DL.1.2000:..d|
00000660: 0E A0 01 8E 00 6A 0E C2  01 3A 00 7C 0E F4 01 4E  |.....j...:.|...N|
00000670: 53 B2 33 3A 81 41 47 B2  31 A4 4E 53 00 85 0E FE  |S.3:.AG.1.NS....|
00000680: 01 8D 33 36 30 00 8E 0E  08 02 82 20 41 47 00 94  |..360...... AG..|
00000690: 0E 12 02 3A 00 AC 0E 1C  02 99 22 13 22 3A 81 58  |...:......".":.X|
000006A0: B2 30 A4 32 30 3A 99 42  4C 24 3A 82 00 B8 0E 1E  |.0.20:.BL$:.....|
000006B0: 02 99 22 13 11 11 11 22  00 E9 0E 58 02 99 22 11  |.."...."...X..".|
000006C0: 11 D0 4C 41 43 45 20 05  CC CF C1 C4 D3 D4 C1 D2  |..LACE .........|
000006D0: 20 D3 49 44 45 20 CF 4E  45 20 9A 49 4E 20 59 4F  | .IDE .NE .IN YO|
000006E0: 55 52 20 44 52 49 56 45  22 00 15 0F 62 02 99 22  |UR DRIVE"...b.."|
000006F0: 41 4E 44 20 50 52 45 53  53 20 41 4E 59 20 4B 45  |AND PRESS ANY KE|
00000700: 59 20 54 4F 20 52 45 54  55 52 4E 20 54 4F 20 4D  |Y TO RETURN TO M|
00000710: 45 4E 55 2E 22 00 28 0F  6C 02 A1 41 24 3A 8B 41  |ENU.".(.l..A$:.A|
00000720: 24 B2 22 22 A7 36 32 30  00 63 0F BC 02 9F 31 35  |$."".620.c....15|
00000730: 2C 38 2C 31 35 2C 22 52  30 3A 43 55 53 54 4F 4D  |,8,15,"R0:CUSTOM|
00000740: 20 4C 53 20 42 4F 4F 54  3D 43 55 53 54 4F 4D 20  | LS BOOT=CUSTOM |
00000750: 4C 53 20 42 4F 4F 54 22  3A 84 31 35 2C 45 52 3A  |LS BOOT":.15,ER:|
00000760: A0 31 35 00 73 0F C6 02  8B 45 52 B3 B1 36 33 A7  |.15.s....ER..63.|
00000770: 35 34 30 00 8B 0F E8 03  93 22 43 55 53 54 4F 4D  |540......"CUSTOM|
00000780: 20 4C 53 20 42 4F 4F 54  22 2C 38 00 99 0F 10 27  | LS BOOT",8....'|
00000790: 43 52 24 B2 C7 28 31 33  29 00 A6 0F 15 27 9F 31  |CR$..(13)....'.1|
000007A0: 35 2C 38 2C 31 35 00 B9  0F 1A 27 9F 33 2C 38 2C  |5,8,15....'.3,8,|
000007B0: 34 2C 22 53 45 54 55 50  22 00 EA 0F 24 27 84 33  |4,"SETUP"...$'.3|
000007C0: 2C 44 24 28 31 29 2C 44  24 28 32 29 2C 44 24 28  |,D$(1),D$(2),D$(|
000007D0: 33 29 2C 44 24 28 34 29  2C 44 24 28 35 29 2C 44  |3),D$(4),D$(5),D|
000007E0: 24 28 36 29 2C 44 24 28  37 29 00 F1 0F 2E 27 A0  |$(6),D$(7)....'.|
000007F0: 33 00 F9 0F 38 27 A0 31  35 00 15 10 42 27 50 41  |3...8'.15...B'PA|
00000800: B2 C5 28 44 24 28 34 29  29 3A 53 41 B2 C5 28 44  |..(D$(4)):SA..(D|
00000810: 24 28 35 29 29 00 1B 10  4C 27 8E 00 2C 10 20 4E  |$(5))...L'..,. N|
00000820: A0 31 35 3A 9F 31 35 2C  38 2C 31 35 00 41 10 2A  |.15:.15,8,15.A.*|
00000830: 4E 44 24 28 34 29 B2 CA  28 C4 28 50 41 29 2C 32  |ND$(4)..(.(PA),2|
00000840: 29 00 56 10 2C 4E 44 24  28 35 29 B2 CA 28 C4 28  |).V.,ND$(5)..(.(|
00000850: 53 41 29 2C 32 29 00 73  10 66 4E 9F 33 2C 38 2C  |SA),2).s.fN.3,8,|
00000860: 34 2C 22 53 45 54 55 50  22 3A 43 52 24 B2 C7 28  |4,"SETUP":CR$..(|
00000870: 31 33 29 00 89 10 70 4E  98 31 35 2C 22 50 04 01  |13)...pN.15,"P..|
00000880: 22 C7 28 30 29 22 01 22  3B 00 C9 10 72 4E 98 33  |".(0)".";...rN.3|
00000890: 2C 44 24 28 31 29 43 52  24 44 24 28 32 29 43 52  |,D$(1)CR$D$(2)CR|
000008A0: 24 44 24 28 33 29 43 52  24 44 24 28 34 29 43 52  |$D$(3)CR$D$(4)CR|
000008B0: 24 44 24 28 35 29 43 52  24 44 24 28 36 29 43 52  |$D$(5)CR$D$(6)CR|
000008C0: 24 44 24 28 37 29 43 52  24 00 D0 10 84 4E A0 33  |$D$(7)CR$....N.3|
000008D0: 00 D8 10 8E 4E A0 31 35  00 DE 10 98 4E 8E 00 19  |....N.15....N...|
000008E0: 11 60 EA 99 22 91 20 20  9A C1 52 45 20 59 4F 55  |.`..".  ..RE YOU|
000008F0: 20 53 55 52 45 20 59 4F  55 20 57 41 4E 54 20 54  | SURE YOU WANT T|
00000900: 4F 20 51 55 49 54 3F 20  28 05 D9 9A 2F 05 CE 9A  |O QUIT? (.../...|
00000910: 29 22 3A 97 31 39 38 2C  2E 00 39 11 6A EA 41 B2  |)":.198,..9.j.A.|
00000920: C2 28 32 30 33 29 3A 8B  41 B3 B1 32 35 AF 41 B3  |.(203):.A..25.A.|
00000930: B1 33 39 A7 36 30 30 31  30 00 71 11 74 EA 8B 41  |.39.60010.q.t..A|
00000940: B2 33 39 A7 99 22 91 20  20 20 20 20 20 20 20 20  |.39..".         |
00000950: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000960: 20 20 20 20 20 20 20 20  20 20 20 20 20 91 22 3A  |             .":|
00000970: 8E 00 7A 11 7E EA 89 35  34 30 00 00 00           |..z.~..540...   |
.......10000.....B.198.O...BL$."        
                               ":. 7:.9.
.....15,8,15,"I0": 15:.2,8,2,"$":.X.0.15
6:.#2,A$:.......#2,A$:SI.E(A$): 2:......
.53281,.:.53280,5......".....        LOA
DSTAR HARDCOPY SETUP         ."......"..
..  WHAT SELECTION BELOW BEST DESCRIBES"
./...."  YOUR PRINTER?"._...."..     .1.
) COMMODORE 1525 OR COMPATIBLE"....."  
   .2.) COMMODORE 1520"...(.."     .3.) 
OLD COMMODORE 1515".B.*.."     .4.) OTHE
R PRINTER".Y.-.."     .Q.) QUIT."...2.."
     PRESS .1., .2., .3., OR .Q..":.198,
..7.<.A.B(203):.A..56.A..59.A..8.A..62.A
..11.60.W.A..A.56.PA.4:SA.7:C8%..1:.300.
L.F..A.62..60000:.50...P..A.59.PA.6:SA.0
:.300...Z..A.8.PA.4:SA.7:C8%.0:.300.T.H.
.".....O.K.., PLEASE ENTER THE CORRECT D
ATA"...J..".FOR YOUR PRINTER:"...K..X.0.
10:.BL$:..=.L..".........ENTER PRIMARY  
 ADDRESS --.";:.PA$:PA.E(PA$).U.N..:.:."
.ENTER SECONDARY ADDRESS --.";:.SA$:SA.E
(SA$).{.,.:...-..".":.X.0.20:.BL$:......
."......PRIMARY ADDRESS OF."PA"..."...0.
."..SECONDARY ADDRESS OF."SA"..."...1.:.
..6.."..ARE THESE SELECTIONS CORRECT?".8
.8.."          [.Y./.N.] OR .Q .TO QUIT"
.J.;..B,0:.B,1:.A$.K.@..A$.."Y".A$.."N".
A$.."Q".315.Q.E.:...J..A$."Q".540...T..A
$."N".10...Y..500...^.:...H..".":.X.0.20
:.BL$:....R.."....   .PLEASE MAKE SURE S
IDE."AG".OF YOUR"...W..".   LOADSTAR DIS
K IS IN YOUR DRIVE.".E.|..".. PLEASE PRE
SS A KEY WHEN YOU ARE READY.".L.}.."..  
        (PRESS .Q .TO QUIT)"...~..B,0:.B
,1:.A$:.A$."Q".1000...... 7:.AG.SI.405..
....".":.X.1.20:.BL$:......."...........
.......SIDE"AG"NOT FOUND...":.DL.1.2000:
.:.360......20000.,...."..   PRINT FILE 
IS NOW ON THIS SIDE".M....".            
OF THE DISK.".^....DL.1.2000:..D. ...J.B
.:.|...NS.3:.AG.1.NS......360...... AG..
...:......".":.X.0.20:.BL$:......."...."
...X.."..PLACE .LOADSTAR SIDE ONE .IN YO
UR DRIVE"...B.."AND PRESS ANY KEY TO RET
URN TO MENU.".(.L..A$:.A$."".620.C....15
,8,15,"R0:CUSTOM LS BOOT=CUSTOM LS BOOT"
:.15,ER: 15.S.F..ER..63.540......"CUSTOM
 LS BOOT",8....'CR$.G(13)....'.15,8,15..
..'.3,8,4,"SETUP"...$'.3,D$(1),D$(2),D$(
3),D$(4),D$(5),D$(6),D$(7)....' 3...8' 1
5...B'PA.E(D$(4)):SA.E(D$(5))...L'..,. N
 15:.15,8,15.A.*ND$(4).J(D(PA),2).V.,ND$
(5).J(D(SA),2).S.FN.3,8,4,"SETUP":CR$.G(
13)...PN.15,"P.."G(0)".";.I.RN.3,D$(1)CR
$D$(2)CR$D$(3)CR$D$(4)CR$D$(5)CR$D$(6)CR
$D$(7)CR$.P..N 3.X..N 15....N....`..".  
.ARE YOU SURE YOU WANT TO QUIT? (.Y./.N.
)":.198,..9.J.A.B(203):.A..25.A..39.6001
0.Q.T..A.39..".                         
             .":..Z.~..540...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL