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

PAINTER.SIM

FILE INFORMATION

FILENAME(S): PAINTER.SIM

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-11-30 21:11:34

APPEARS ON: 1 disk(s)

FILE HASH

774b3f24118ab039c65122149300a83685e707fbd1bb3b79c17870e9f69dbb30

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
BASIC UITBR 2 PAINTER.SIM PRG DuncanTwain 11 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 0D 08 0A 00 64 33  20 49 4E 49 54 00 1B 08  |......d3 INIT...|
00000010: 14 00 64 33 20 48 45 4C  50 64 6F 00 39 08 1E 00  |..d3 HELPdo.9...|
00000020: 4C 58 B2 31 30 30 3A 4C  59 B2 31 30 30 3A 58 B2  |LX.100:LY.100:X.|
00000030: 31 30 30 3A 59 B2 31 30  30 00 40 08 28 00 64 3A  |100:Y.100.@.(.d:|
00000040: 00 4A 08 32 00 4A 52 B2  64 51 00 5E 08 3C 00 46  |.J.2.JR.dQ.^.<.F|
00000050: 49 52 45 B2 64 53 28 4A  52 2C 31 32 38 29 00 70  |IRE.dS(JR,128).p|
00000060: 08 46 00 4A 52 B2 64 52  28 4A 52 2C 31 32 38 29  |.F.JR.dR(JR,128)|
00000070: 00 85 08 50 00 8B 20 4A  52 B2 30 20 A7 20 53 50  |...P.. JR.0 . SP|
00000080: 45 45 44 B2 31 00 A6 08  5A 00 8B 20 4A 52 20 B3  |EED.1...Z.. JR .|
00000090: B1 20 30 20 A7 20 53 50  45 45 44 B2 53 50 45 45  |. 0 . SPEED.SPEE|
000000A0: 44 AC 31 2E 30 34 00 C4  08 64 00 58 B2 58 AA 53  |D.1.04...d.X.X.S|
000000B0: 50 45 45 44 AC 44 58 28  4A 52 29 3A 8B 58 B3 30  |PEED.DX(JR):.X.0|
000000C0: A7 58 B2 30 00 D4 08 6E  00 58 B2 64 52 28 58 2C  |.X.0...n.X.dR(X,|
000000D0: 33 32 30 29 00 F2 08 78  00 59 B2 59 AA 53 50 45  |320)...x.Y.Y.SPE|
000000E0: 45 44 AC 44 59 28 4A 52  29 3A 8B 59 B3 30 A7 59  |ED.DY(JR):.Y.0.Y|
000000F0: B2 30 00 02 09 82 00 59  B2 64 52 28 59 2C 32 30  |.0.....Y.dR(Y,20|
00000100: 30 29 00 19 09 8C 00 64  63 20 31 2C 58 AA 31 33  |0).....dc 1,X.13|
00000110: 2C 59 AA 34 31 2C 30 2C  30 00 42 09 96 00 8B 20  |,Y.41,0,0.B.... |
00000120: 46 49 52 45 20 A7 20 64  03 20 4C 58 2C 4C 59 2C  |FIRE . d. LX,LY,|
00000130: 58 2C 59 2C 49 4E 4B 3A  20 4C 58 B2 58 3A 4C 59  |X,Y,INK: LX.X:LY|
00000140: B2 59 00 59 09 A0 00 8B  20 64 56 B2 31 20 A7 20  |.Y.Y.... dV.1 . |
00000150: 64 33 20 48 45 4C 50 64  6F 00 8C 09 AA 00 8B 20  |d3 HELPdo...... |
00000160: 64 56 B2 33 20 A7 20 49  4E 4B B2 31 AB 49 4E 4B  |dV.3 . INK.1.INK|
00000170: 3A 64 1D 31 2C 31 36 2C  31 AB 49 4E 4B 2C 30 2C  |:d.1,16,1.INK,0,|
00000180: 30 3A 64 20 3A 64 29 20  64 56 B2 30 00 A4 09 B4  |0:d :d) dV.0....|
00000190: 00 8B 20 64 56 B2 35 20  A7 20 4C 58 B2 58 3A 20  |.. dV.5 . LX.X: |
000001A0: 4C 59 B2 59 00 BC 09 BE  00 8B 20 64 56 B2 37 20  |LY.Y...... dV.7 |
000001B0: A7 20 64 75 20 58 2C 59  2C 49 4E 4B 00 C3 09 C8  |. du X,Y,INK....|
000001C0: 00 64 36 00 CF 09 D2 00  64 31 20 49 4E 49 54 00  |.d6.....d1 INIT.|
000001D0: DB 09 DC 00 53 50 45 45  44 B2 31 00 F3 09 E6 00  |....SPEED.1.....|
000001E0: 81 58 B2 30 20 A4 20 38  3A 87 20 44 58 28 58 29  |.X.0 . 8:. DX(X)|
000001F0: 3A 20 82 00 0E 0A 04 01  83 20 30 2C 30 2C 31 2C  |: ....... 0,0,1,|
00000200: 31 2C 31 2C 30 2C 2D 31  2C 2D 31 2C 2D 31 00 27  |1,1,0,-1,-1,-1.'|
00000210: 0A 0E 01 81 20 59 B2 30  A4 38 3A 20 87 20 44 59  |.... Y.0.8: . DY|
00000220: 28 59 29 20 3A 20 82 00  42 0A 2C 01 83 20 30 2C  |(Y) : ..B.,.. 0,|
00000230: 2D 31 2C 2D 31 2C 30 2C  31 2C 31 2C 31 2C 30 2C  |-1,-1,0,1,1,1,0,|
00000240: 2D 31 00 53 0A 36 01 64  62 20 30 20 2C 20 24 43  |-1.S.6.db 0 , $C|
00000250: 34 30 30 00 71 0A 40 01  40 42 42 42 42 42 42 42  |400.q.@.@BBBBBBB|
00000260: 42 2E 2E 2E 2E 2E 2E 2E  42 42 42 42 42 42 42 42  |B.......BBBBBBBB|
00000270: 2E 00 8F 0A 4A 01 40 42  42 2E 2E 2E 2E 2E 2E 2E  |....J.@BB.......|
00000280: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 42 42 2E 00  |............BB..|
00000290: AD 0A 54 01 40 42 42 2E  2E 2E 2E 2E 2E 2E 2E 2E  |..T.@BB.........|
000002A0: 42 2E 2E 2E 2E 2E 2E 2E  2E 2E 42 42 2E 00 CB 0A  |B.........BB....|
000002B0: 5E 01 40 42 42 2E 2E 2E  2E 2E 2E 2E 2E 2E 42 2E  |^.@BB.........B.|
000002C0: 2E 2E 2E 2E 2E 2E 2E 2E  42 42 2E 00 E9 0A 68 01  |........BB....h.|
000002D0: 40 42 42 2E 2E 2E 2E 2E  2E 2E 2E 2E 42 2E 2E 2E  |@BB.........B...|
000002E0: 2E 2E 2E 2E 2E 2E 42 42  2E 00 07 0B 72 01 40 42  |......BB....r.@B|
000002F0: 42 2E 2E 2E 2E 2E 2E 2E  2E 2E 42 2E 2E 2E 2E 2E  |B.........B.....|
00000300: 2E 2E 2E 2E 42 42 2E 00  25 0B 7C 01 40 2E 2E 2E  |....BB..%.|.@...|
00000310: 2E 2E 2E 2E 2E 2E 2E 2E  42 2E 2E 2E 2E 2E 2E 2E  |........B.......|
00000320: 2E 2E 2E 2E 2E 00 43 0B  86 01 40 2E 2E 2E 2E 2E  |......C...@.....|
00000330: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |................|
00000340: 2E 2E 2E 00 61 0B 90 01  40 2E 2E 2E 2E 2E 2E 2E  |....a...@.......|
00000350: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |................|
00000360: 2E 00 7F 0B 9A 01 40 2E  2E 42 42 42 42 42 2E 2E  |......@..BBBBB..|
00000370: 2E 2E 2E 2E 2E 2E 2E 42  42 42 42 42 2E 2E 2E 00  |.......BBBBB....|
00000380: 9D 0B A4 01 40 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |....@...........|
00000390: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 00 BB 0B  |................|
000003A0: AE 01 40 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |..@.............|
000003B0: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 00 D9 0B B8 01  |................|
000003C0: 40 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 42 2E 2E 2E  |@...........B...|
000003D0: 2E 2E 2E 2E 2E 2E 2E 2E  2E 00 F7 0B C2 01 40 42  |..............@B|
000003E0: 42 2E 2E 2E 2E 2E 2E 2E  2E 2E 42 2E 2E 2E 2E 2E  |B.........B.....|
000003F0: 2E 2E 2E 2E 42 42 2E 00  15 0C CC 01 40 42 42 2E  |....BB......@BB.|
00000400: 2E 2E 2E 2E 2E 2E 2E 2E  42 2E 2E 2E 2E 2E 2E 2E  |........B.......|
00000410: 2E 2E 42 42 2E 00 33 0C  D6 01 40 42 42 2E 2E 2E  |..BB..3...@BB...|
00000420: 2E 2E 2E 2E 2E 2E 42 2E  2E 2E 2E 2E 2E 2E 2E 2E  |......B.........|
00000430: 42 42 2E 00 51 0C E0 01  40 42 42 2E 2E 2E 2E 2E  |BB..Q...@BB.....|
00000440: 2E 2E 2E 2E 42 2E 2E 2E  2E 2E 2E 2E 2E 2E 42 42  |....B.........BB|
00000450: 2E 00 6F 0C EA 01 40 42  42 2E 2E 2E 2E 2E 2E 2E  |..o...@BB.......|
00000460: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 42 42 2E 00  |............BB..|
00000470: 8D 0C F4 01 40 42 42 42  42 42 42 42 42 2E 2E 2E  |....@BBBBBBBB...|
00000480: 2E 2E 2E 2E 42 42 42 42  42 42 42 42 2E 00 AB 0C  |....BBBBBBBB....|
00000490: FE 01 40 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |..@.............|
000004A0: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 00 C9 0C 08 02  |................|
000004B0: 40 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |@...............|
000004C0: 2E 2E 2E 2E 2E 2E 2E 2E  2E 00 DB 0C 12 02 49 4E  |..............IN|
000004D0: 4B B2 31 3A 20 64 01 20  30 2C 31 00 E2 0C 1C 02  |K.1: d. 0,1.....|
000004E0: 64 34 00 F0 0C 26 02 64  31 20 48 45 4C 50 64 6F  |d4...&.d1 HELPdo|
000004F0: 00 FD 0C 30 02 64 68 20  31 3A 64 70 31 00 14 0D  |...0.dh 1:dp1...|
00000500: 35 02 64 20 3A 20 A1 20  41 24 3A 20 64 29 20 41  |5.d : . A$: d) A|
00000510: 24 B2 22 22 00 2B 0D 3A  02 99 22 93 22 3A 64 23  |$."".+.:..".":d#|
00000520: 22 50 41 49 4E 54 20 42  4F 58 22 00 4F 0D 44 02  |"PAINT BOX".O.D.|
00000530: 99 3A 64 23 22 46 4F 52  20 55 53 45 20 57 49 54  |.:d#"FOR USE WIT|
00000540: 48 20 53 49 4D 4F 4E 53  20 42 41 53 49 43 22 00  |H SIMONS BASIC".|
00000550: 70 0D 4E 02 99 3A 99 3A  99 22 46 31 20 50 52 49  |p.N..:.:."F1 PRI|
00000560: 4E 54 53 20 54 48 49 53  20 4D 45 53 53 41 47 45  |NTS THIS MESSAGE|
00000570: 00 8C 0D 58 02 99 22 46  33 20 54 4F 47 47 4C 45  |...X.."F3 TOGGLE|
00000580: 53 20 49 4E 4B 20 43 4F  4C 4F 55 52 00 AF 0D 62  |S INK COLOUR...b|
00000590: 02 99 22 46 35 20 53 54  41 52 54 53 20 4E 45 57  |.."F5 STARTS NEW|
000005A0: 20 4C 49 4E 45 20 41 54  20 43 55 52 53 4F 52 00  | LINE AT CURSOR.|
000005B0: DB 0D 6C 02 99 22 46 37  20 50 41 49 4E 54 53 20  |..l.."F7 PAINTS |
000005C0: 4F 42 4A 45 43 54 20 44  45 53 49 47 4E 41 54 45  |OBJECT DESIGNATE|
000005D0: 44 20 42 59 20 43 55 52  53 4F 52 00 FB 0D 76 02  |D BY CURSOR...v.|
000005E0: 99 22 46 49 52 45 20 44  52 41 57 53 20 4C 49 4E  |."FIRE DRAWS LIN|
000005F0: 45 20 54 4F 20 43 55 52  53 4F 52 00 01 0E 80 02  |E TO CURSOR.....|
00000600: 99 00 13 0E 8A 02 99 22  12 45 92 20 54 4F 20 45  |.......".E. TO E|
00000610: 58 49 54 00 30 0E 94 02  99 22 12 4E 92 20 54 4F  |XIT.0....".N. TO|
00000620: 20 45 44 49 54 20 4E 45  57 20 53 43 52 45 45 4E  | EDIT NEW SCREEN|
00000630: 00 4D 0E 9E 02 99 22 12  43 92 20 54 4F 20 45 44  |.M....".C. TO ED|
00000640: 49 54 20 4F 4C 44 20 53  43 52 45 45 4E 00 64 0E  |IT OLD SCREEN.d.|
00000650: A8 02 64 20 3A 20 A1 41  24 3A 20 64 29 20 41 24  |..d : .A$: d) A$|
00000660: B3 B1 22 22 00 74 0E B2  02 8B 20 41 24 B2 22 45  |.."".t.... A$."E|
00000670: 22 A7 20 80 00 89 0E BC  02 8B 20 41 24 B2 22 4E  |". ....... A$."N|
00000680: 22 20 A7 20 64 01 30 2C  31 00 A4 0E C6 02 64 70  |" . d.0,1.....dp|
00000690: 32 3A 20 64 1D 20 31 2C  31 36 2C 31 AB 49 4E 4B  |2: d. 1,16,1.INK|
000006A0: 2C 30 2C 30 00 AB 0E D0  02 64 34 00 00 00 01     |,0,0.....d4.... |
......D3 INIT.....D3 HELPDO.9...LX.100:L
Y.100:X.100:Y.100.@.(.D:.J.2.JR.DQ.^.<.F
IRE.DS(JR,128).P.F.JR.DR(JR,128)...P.. J
R.0 . SPEED.1...Z.. JR .. 0 . SPEED.SPEE
D.1.04.D.D.X.X.SPEED.DX(JR):.X.0.X.0.T.N
.X.DR(X,320)...X.Y.Y.SPEED.DY(JR):.Y.0.Y
.0.....Y.DR(Y,200).....DC 1,X.13,Y.41,0,
0.B.... FIRE . D. LX,LY,X,Y,INK: LX.X:LY
.Y.Y. .. DV.1 . D3 HELPDO...... DV.3 . I
NK.1.INK:D.1,16,1.INK,0,0:D :D) DV.0....
.. DV.5 . LX.X: LY.Y...... DV.7 . DU X,Y
,INK.C.H.D6.O.R.D1 INIT.....SPEED.1.....
.X.0 . 8:. DX(X): ....... 0,0,1,1,1,0,-1
,-1,-1.'.... Y.0.8: . DY(Y) : ..B.,.. 0,
-1,-1,0,1,1,1,0,-1.S.6.DB 0 , $C400.Q.@.
@BBBBBBBB.......BBBBBBBB....J.@BB.......
............BB....T.@BB.........B.......
..BB..K.^.@BB.........B.........BB....H.
@BB.........B.........BB....R.@BB.......
..B.........BB..%.|.@...........B.......
......C...@.........................A...
@............................@..BBBBB..
.......BBBBB........@...................
..........@.........................Y...
@...........B...............B.@BB.......
..B.........BB....L.@BB.........B.......
..BB..3.V.@BB.........B.........BB..Q...
@BB.........B.........BB..O...@BB.......
............BB......@BBBBBBBB.......BBBB
BBBB......@.........................I...
@.............................INK.1: D. 
0,1.....D4...&.D1 HELPDO...0.DH 1:DP1...
5.D : . A$: D) A$."".+.:..".":D#"PAINT B
OX".O.D..:D#"FOR USE WITH SIMONS BASIC".
P.N..:.:."F1 PRINTS THIS MESSAGE...X.."F
3 TOGGLES INK COLOUR...B.."F5 STARTS NEW
 LINE AT CURSOR...L.."F7 PAINTS OBJECT D
ESIGNATED BY CURSOR...V.."FIRE DRAWS LIN
E TO CURSOR............".E. TO EXIT.0...
.".N. TO EDIT NEW SCREEN.M....".C. TO ED
IT OLD SCREEN.D...D : .A$: D) A$.."".T..
.. A$."E". ....... A$."N" . D.0,1...F.DP
2: D. 1,16,1.INK,0,0...P.D4....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL