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

FIGURE DRAW

FILE INFORMATION

FILENAME(S): FIGURE DRAW

FILE TYPE(S): PRG

FILE SIZE: 2.1K

FIRST SEEN: 2025-10-20 14:30:49

APPEARS ON: 1 disk(s)

FILE HASH

3dd0414373355da7c3051b68c0051975da10b248cda18b316965233c34fe68ab

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
STONYSOFT PD NR FIGURE DRAW PRG Treasure Chest - Klaus Der Suhler 24 14 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1B 08 01 00 8F 20  46 49 47 55 52 45 20 44  |....... FIGURE D|
00000010: 52 41 57 20 46 4F 52 20  43 41 44 00 39 08 02 00  |RAW FOR CAD.9...|
00000020: 99 22 93 9E 22 3A 97 35  33 32 38 30 2C 30 30 3A  |."..":.53280,00:|
00000030: 97 35 33 32 38 31 2C 30  30 00 51 08 03 00 9C 3A  |.53281,00.Q....:|
00000040: 86 41 25 28 32 35 35 2C  33 29 3A 45 4E B2 32 35  |.A%(255,3):EN.25|
00000050: 35 00 70 08 04 00 58 24  B2 22 13 1D 1D 1D 1D 1D  |5.p...X$."......|
00000060: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D D8 3A 22  |..............:"|
00000070: 00 99 08 05 00 59 24 B2  22 13 1D 1D 1D 1D 1D 1D  |.....Y$.".......|
00000080: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000090: 1D 1D 1D 1D 1D 1D D9 3A  22 00 BF 08 06 00 99 C7  |.......:".......|
000000A0: 28 31 34 29 22 93 11 D2  45 46 45 52 45 4E 43 45  |(14)"...EFERENCE|
000000B0: 20 28 4C 2C 52 2C 54 2C  42 29 22 3A 52 B2 31 00  | (L,R,T,B)":R.1.|
000000C0: D0 08 07 00 A1 41 24 3A  8B 41 24 B2 22 22 A7 37  |.....A$:.A$."".7|
000000D0: 00 E0 08 08 00 8B 41 24  B2 22 52 22 A7 52 B2 32  |......A$."R".R.2|
000000E0: 00 F0 08 09 00 8B 41 24  B2 22 54 22 A7 52 B2 33  |......A$."T".R.3|
000000F0: 00 00 09 0A 00 8B 41 24  B2 22 42 22 A7 52 B2 34  |......A$."B".R.4|
00000100: 00 13 09 0B 00 91 52 8D  33 34 2C 33 35 2C 33 36  |......R.34,35,36|
00000110: 2C 33 37 00 2C 09 0C 00  81 53 B2 31 30 32 34 A4  |,37.,....S.1024.|
00000120: 32 30 32 33 3A 97 53 2C  33 32 3A 82 00 41 09 0D  |2023:.S,32:..A..|
00000130: 00 99 22 13 22 3B 3A 99  A3 31 38 29 3B 22 D8 3A  |..".";:..18);".:|
00000140: 22 00 56 09 0E 00 99 22  13 22 3B 3A 99 A3 32 38  |".V....".";:..28|
00000150: 29 3B 22 D9 3A 22 00 68  09 0F 00 97 53 50 2C 39  |);".:".h....SP,9|
00000160: 31 3A 97 43 50 2C 30 38  00 85 09 10 00 99 58 24  |1:.CP,08......X$|
00000170: 3B 58 3B 22 9D 20 20 20  22 3B 59 24 3B 59 3B 22  |;X;".   ";Y$;Y;"|
00000180: 9D 20 20 20 22 00 98 09  11 00 A1 41 24 3A 8B 41  |.   "......A$:.A|
00000190: 24 B3 B1 22 22 A7 32 33  00 B8 09 12 00 97 53 50  |$.."".23......SP|
000001A0: AA 58 AA 34 30 AC 59 2C  C2 28 53 50 AA 58 AA 34  |.X.40.Y,.(SP.X.4|
000001B0: 30 AC 59 29 AF 31 32 37  00 DB 09 13 00 4A 56 B2  |0.Y).127.....JV.|
000001C0: C2 28 35 36 33 32 30 29  3A 46 52 B2 4A 56 AF 31  |.(56320):FR.JV.1|
000001D0: 36 3A 8B 46 52 B2 30 A7  8D 32 38 00 F7 09 14 00  |6:.FR.0..28.....|
000001E0: 4A 56 B2 31 35 AB 28 4A  56 AF 31 35 29 3A 8B 4A  |JV.15.(JV.15):.J|
000001F0: 56 B2 31 35 A7 31 37 00  0A 0A 15 00 91 52 8D 33  |V.15.17......R.3|
00000200: 38 2C 34 33 2C 34 38 2C  35 33 00 3C 0A 16 00 97  |8,43,48,53.<....|
00000210: 53 50 AA 58 AA 34 30 AC  59 2C C2 28 53 50 AA 58  |SP.X.40.Y,.(SP.X|
00000220: AA 34 30 AC 59 29 B0 31  32 38 3A 97 43 50 AA 58  |.40.Y).128:.CP.X|
00000230: AA 34 30 AC 59 2C 30 38  3A 89 31 36 00 4E 0A 17  |.40.Y,08:.16.N..|
00000240: 00 8B 41 24 B2 C7 28 32  30 29 A7 8D 33 30 00 61  |..A$..(20)..30.a|
00000250: 0A 18 00 8B 41 24 B2 C7  28 31 33 36 29 A7 8D 35  |....A$..(136)..5|
00000260: 38 00 76 0A 19 00 8B 41  24 B2 C7 28 31 34 30 29  |8.v....A$..(140)|
00000270: A7 8D 37 35 3A 8A 00 87  0A 1A 00 8B 41 24 B2 C7  |..75:.......A$..|
00000280: 28 31 34 37 29 A7 33 00  AB 0A 1B 00 97 53 50 AA  |(147).3......SP.|
00000290: 58 AA 34 30 AC 59 2C C2  28 53 50 AA 58 AA 34 30  |X.40.Y,.(SP.X.40|
000002A0: AC 59 29 B0 31 32 38 3A  89 31 37 00 F4 0A 1C 00  |.Y).128:.17.....|
000002B0: 50 B2 50 AA 31 3A 41 25  28 50 2C 31 29 B2 58 3A  |P.P.1:A%(P,1).X:|
000002C0: 41 25 28 50 2C 32 29 B2  59 3A 41 25 28 50 2C 33  |A%(P,2).Y:A%(P,3|
000002D0: 29 B2 31 3A 97 53 50 AA  58 AA 34 30 AC 59 2C 31  |).1:.SP.X.40.Y,1|
000002E0: 32 38 AA 31 30 32 3A 97  43 50 AA 58 AA 34 30 AC  |28.102:.CP.X.40.|
000002F0: 59 2C 30 38 00 FA 0A 1D  00 8E 00 08 0B 1E 00 81  |Y,08............|
00000300: 43 4C B2 31 A4 32 35 35  00 1D 0B 1F 00 8B 41 25  |CL.1.255......A%|
00000310: 28 43 4C 2C 31 29 B3 B1  58 A7 82 3A 8E 00 32 0B  |(CL,1)..X..:..2.|
00000320: 20 00 8B 41 25 28 43 4C  2C 32 29 B3 B1 59 A7 82  | ..A%(CL,2)..Y..|
00000330: 3A 8E 00 61 0B 21 00 97  53 50 AA 41 25 28 43 4C  |:..a.!..SP.A%(CL|
00000340: 2C 31 29 AA 41 25 28 43  4C 2C 32 29 AC 34 30 2C  |,1).A%(CL,2).40,|
00000350: 33 32 3A 41 25 28 43 4C  2C 33 29 B2 30 3A 82 3A  |32:A%(CL,3).0:.:|
00000360: 8E 00 78 0B 22 00 53 50  B2 31 35 30 34 3A 43 50  |..x.".SP.1504:CP|
00000370: B2 35 35 37 37 36 3A 8E  00 8F 0B 23 00 53 50 B2  |.55776:....#.SP.|
00000380: 31 35 34 33 3A 43 50 B2  35 35 38 31 35 3A 8E 00  |1543:CP.55815:..|
00000390: A6 0B 24 00 53 50 B2 31  30 38 33 3A 43 50 B2 35  |..$.SP.1083:CP.5|
000003A0: 35 33 35 35 3A 8E 00 BD  0B 25 00 53 50 B2 32 30  |5355:....%.SP.20|
000003B0: 30 33 3A 43 50 B2 35 36  32 37 35 3A 8E 00 DC 0B  |03:CP.56275:....|
000003C0: 26 00 8B 28 4A 56 AF 31  29 A7 59 B2 59 AB 31 3A  |&..(JV.1).Y.Y.1:|
000003D0: 8B 59 B3 AB 31 31 A7 59  B2 AB 31 31 00 F9 0B 27  |.Y..11.Y..11...'|
000003E0: 00 8B 28 4A 56 AF 32 29  A7 59 B2 59 AA 31 3A 8B  |..(JV.2).Y.Y.1:.|
000003F0: 59 B1 31 32 A7 59 B2 31  32 00 14 0C 28 00 8B 28  |Y.12.Y.12...(..(|
00000400: 4A 56 AF 34 29 A7 58 B2  58 AB 31 3A 8B 58 B3 30  |JV.4).X.X.1:.X.0|
00000410: A7 58 B2 30 00 31 0C 29  00 8B 28 4A 56 AF 38 29  |.X.0.1.)..(JV.8)|
00000420: A7 58 B2 58 AA 31 3A 8B  58 B1 33 39 A7 58 B2 33  |.X.X.1:.X.39.X.3|
00000430: 39 00 37 0C 2A 00 8E 00  56 0C 2B 00 8B 28 4A 56  |9.7.*...V.+..(JV|
00000440: AF 31 29 A7 59 B2 59 AB  31 3A 8B 59 B3 AB 31 31  |.1).Y.Y.1:.Y..11|
00000450: A7 59 B2 AB 31 31 00 73  0C 2C 00 8B 28 4A 56 AF  |.Y..11.s.,..(JV.|
00000460: 32 29 A7 59 B2 59 AA 31  3A 8B 59 B1 31 32 A7 59  |2).Y.Y.1:.Y.12.Y|
00000470: B2 31 32 00 92 0C 2D 00  8B 28 4A 56 AF 34 29 A7  |.12...-..(JV.4).|
00000480: 58 B2 58 AB 31 3A 8B 58  B3 AB 34 30 A7 58 B2 AB  |X.X.1:.X..40.X..|
00000490: 34 30 00 AD 0C 2E 00 8B  28 4A 56 AF 38 29 A7 58  |40......(JV.8).X|
000004A0: B2 58 AA 31 3A 8B 58 B1  30 A7 58 B2 30 00 B3 0C  |.X.1:.X.0.X.0...|
000004B0: 2F 00 8E 00 CE 0C 30 00  8B 28 4A 56 AF 31 29 A7  |/.....0..(JV.1).|
000004C0: 59 B2 59 AB 31 3A 8B 59  B3 30 A7 59 B2 30 00 EB  |Y.Y.1:.Y.0.Y.0..|
000004D0: 0C 31 00 8B 28 4A 56 AF  32 29 A7 59 B2 59 AA 31  |.1..(JV.2).Y.Y.1|
000004E0: 3A 8B 59 B1 32 33 A7 59  B2 32 33 00 0A 0D 32 00  |:.Y.23.Y.23...2.|
000004F0: 8B 28 4A 56 AF 34 29 A7  58 B2 58 AB 31 3A 8B 58  |.(JV.4).X.X.1:.X|
00000500: B3 AB 31 39 A7 58 B2 AB  31 39 00 27 0D 33 00 8B  |..19.X..19.'.3..|
00000510: 28 4A 56 AF 38 29 A7 58  B2 58 AA 31 3A 8B 58 B1  |(JV.8).X.X.1:.X.|
00000520: 32 30 A7 58 B2 32 30 00  2D 0D 34 00 8E 00 4C 0D  |20.X.20.-.4...L.|
00000530: 35 00 8B 28 4A 56 AF 31  29 A7 59 B2 59 AB 31 3A  |5..(JV.1).Y.Y.1:|
00000540: 8B 59 B3 AB 32 33 A7 59  B2 AB 32 33 00 67 0D 36  |.Y..23.Y..23.g.6|
00000550: 00 8B 28 4A 56 AF 32 29  A7 59 B2 59 AA 31 3A 8B  |..(JV.2).Y.Y.1:.|
00000560: 59 B1 30 A7 59 B2 30 00  86 0D 37 00 8B 28 4A 56  |Y.0.Y.0...7..(JV|
00000570: AF 34 29 A7 58 B2 58 AB  31 3A 8B 58 B3 AB 31 39  |.4).X.X.1:.X..19|
00000580: A7 58 B2 AB 31 39 00 A3  0D 38 00 8B 28 4A 56 AF  |.X..19...8..(JV.|
00000590: 38 29 A7 58 B2 58 AA 31  3A 8B 58 B1 32 30 A7 58  |8).X.X.1:.X.20.X|
000005A0: B2 32 30 00 A9 0D 39 00  8E 00 C1 0D 3A 00 99 22  |.20...9.....:.."|
000005B0: 93 CC CF C1 C4 20 46 49  4C 45 4E 41 4D 45 3A 22  |..... FILENAME:"|
000005C0: 3B 00 D3 0D 3B 00 A1 46  24 3A 8B 46 24 B2 22 22  |;...;..F$:.F$.""|
000005D0: A7 35 39 00 E3 0D 3C 00  8B 46 24 B2 C7 28 31 33  |.59...<..F$..(13|
000005E0: 29 A7 8E 00 01 0E 3D 00  9F 32 2C 38 2C 32 2C 46  |).....=..2,8,2,F|
000005F0: 24 AA 22 2E 46 49 47 2C  50 2C 52 22 3A 50 31 B2  |$.".FIG,P,R":P1.|
00000600: 30 00 0C 0E 3E 00 81 54  B2 31 A4 32 00 1A 0E 3F  |0...>..T.1.2...?|
00000610: 00 A1 23 32 2C 41 24 28  54 29 00 20 0E 40 00 82  |..#2,A$(T). .@..|
00000620: 00 33 0E 41 00 50 31 B2  50 31 AA 31 3A 81 54 B2  |.3.A.P1.P1.1:.T.|
00000630: 31 A4 32 00 4C 0E 42 00  A1 23 32 2C 41 24 3A 8B  |1.2.L.B..#2,A$:.|
00000640: 41 24 B2 C7 28 32 35 35  29 A7 37 31 00 60 0E 43  |A$..(255).71.`.C|
00000650: 00 8F 20 49 46 41 24 3D  22 22 54 48 45 4E 36 37  |.. IFA$=""THEN67|
00000660: 00 71 0E 44 00 41 B2 C6  28 41 24 AA C7 28 30 29  |.q.D.A..(A$..(0)|
00000670: 29 00 87 0E 45 00 8B 41  B1 31 32 37 A7 41 B2 AB  |)...E..A.127.A..|
00000680: 28 41 AF 31 32 37 29 00  A7 0E 46 00 41 25 28 50  |(A.127)...F.A%(P|
00000690: 31 2C 54 29 B2 41 3A 82  3A 41 25 28 50 31 2C 33  |1,T).A:.:A%(P1,3|
000006A0: 29 B2 31 3A 89 36 35 00  AE 0E 47 00 A0 32 00 D2  |).1:.65...G..2..|
000006B0: 0E 48 00 99 22 93 22 3A  81 54 B2 31 A4 50 31 AB  |.H..".":.T.1.P1.|
000006C0: 31 3A 8B 41 25 28 54 2C  33 29 B2 30 A7 82 3A 89  |1:.A%(T,3).0..:.|
000006D0: 37 34 00 13 0F 49 00 58  31 B2 41 25 28 54 2C 31  |74...I.X1.A%(T,1|
000006E0: 29 3A 59 31 B2 41 25 28  54 2C 32 29 3A 97 53 50  |):Y1.A%(T,2):.SP|
000006F0: AA 58 31 AA 34 30 AC 59  31 2C 31 32 38 AA 31 30  |.X1.40.Y1,128.10|
00000700: 32 3A 97 43 50 AA 58 31  AA 34 30 AC 59 31 2C 30  |2:.CP.X1.40.Y1,0|
00000710: 38 3A 82 00 20 0F 4A 00  50 B2 50 31 AB 31 3A 8E  |8:.. .J.P.P1.1:.|
00000720: 00 38 0F 4B 00 99 22 93  D3 C1 D6 C5 20 46 49 4C  |.8.K.."..... FIL|
00000730: 45 4E 41 4D 45 3A 22 3B  00 4A 0F 4C 00 A1 46 24  |ENAME:";.J.L..F$|
00000740: 3A 8B 46 24 B2 22 22 A7  37 36 00 5B 0F 4D 00 8B  |:.F$."".76.[.M..|
00000750: 46 24 B2 C7 28 31 33 29  A7 38 37 00 7F 0F 4E 00  |F$..(13).87...N.|
00000760: 9F 32 2C 38 2C 32 2C 22  40 30 3A 22 AA 46 24 AA  |.2,8,2,"@0:".F$.|
00000770: 22 2E 46 49 47 2C 50 2C  57 22 3A 50 31 B2 30 00  |".FIG,P,W":P1.0.|
00000780: 93 0F 4F 00 98 32 2C C7  28 30 29 3B C7 28 31 35  |..O..2,.(0);.(15|
00000790: 38 29 3B 00 AA 0F 50 00  50 31 B2 50 31 AA 31 3A  |8);...P.P1.P1.1:|
000007A0: 8B 50 31 B2 50 AA 31 A7  38 36 00 BD 0F 51 00 8B  |.P1.P.1.86...Q..|
000007B0: 41 25 28 50 31 2C 33 29  B2 30 A7 38 30 00 C8 0F  |A%(P1,3).0.80...|
000007C0: 52 00 81 54 B2 31 A4 32  00 F3 0F 53 00 8B 41 25  |R..T.1.2...S..A%|
000007D0: 28 50 31 2C 54 29 B3 30  A7 41 25 28 50 31 2C 54  |(P1,T).0.A%(P1,T|
000007E0: 29 B2 28 B6 28 41 25 28  50 31 2C 54 29 29 B0 31  |).(.(A%(P1,T)).1|
000007F0: 32 38 29 00 F9 0F 54 00  82 00 21 10 55 00 98 32  |28)...T...!.U..2|
00000800: 2C C7 28 41 25 28 50 31  2C 31 29 29 3B 3A 98 32  |,.(A%(P1,1));:.2|
00000810: 2C C7 28 41 25 28 50 31  2C 32 29 29 3B 3A 89 38  |,.(A%(P1,2));:.8|
00000820: 30 00 3F 10 56 00 98 32  2C C7 28 32 35 35 29 3B  |0.?.V..2,.(255);|
00000830: C7 28 32 35 35 29 3B 3A  A0 32 3A 99 22 93 22 00  |.(255);:.2:.".".|
00000840: 45 10 57 00 8E 00 00 00                           |E.W.....        |
....... FIGURE DRAW FOR CAD.9...."..":.5
3280,00:.53281,00.Q....:.A%(255,3):EN.25
5.P...X$."...................X:".....Y$.
".............................Y:"......G
(14)"..REFERENCE (L,R,T,B)":R.1.P....A$:
.A$."".7......A$."R".R.2......A$."T".R.3
......A$."B".R.4......R.34,35,36,37.,...
.S.1024.2023:.S,32:..A....".";:..18);"X:
".V....".";:..28);"Y:".H....SP,91:.CP,08
......X$;X;".   ";Y$;Y;".   "......A$:.A
$.."".23......SP.X.40.Y,B(SP.X.40.Y).127
.....JV.B(56320):FR.JV.16:.FR.0..28.....
JV.15.(JV.15):.JV.15.17......R.38,43,48,
53.<....SP.X.40.Y,B(SP.X.40.Y).128:.CP.X
.40.Y,08:.16.N....A$.G(20)..30.A....A$.G
(136)..58.V....A$.G(140)..75:.......A$.G
(147).3......SP.X.40.Y,B(SP.X.40.Y).128:
.17.....P.P.1:A%(P,1).X:A%(P,2).Y:A%(P,3
).1:.SP.X.40.Y,128.102:.CP.X.40.Y,08....
........CL.1.255......A%(CL,1)..X..:..2.
 ..A%(CL,2)..Y..:..A.!..SP.A%(CL,1).A%(C
L,2).40,32:A%(CL,3).0:.:..X.".SP.1504:CP
.55776:....#.SP.1543:CP.55815:....$.SP.1
083:CP.55355:....%.SP.2003:CP.56275:....
&..(JV.1).Y.Y.1:.Y..11.Y..11...'..(JV.2)
.Y.Y.1:.Y.12.Y.12...(..(JV.4).X.X.1:.X.0
.X.0.1.)..(JV.8).X.X.1:.X.39.X.39.7.*...
V.+..(JV.1).Y.Y.1:.Y..11.Y..11.S.,..(JV.
2).Y.Y.1:.Y.12.Y.12...-..(JV.4).X.X.1:.X
..40.X..40......(JV.8).X.X.1:.X.0.X.0...
/...N.0..(JV.1).Y.Y.1:.Y.0.Y.0...1..(JV.
2).Y.Y.1:.Y.23.Y.23...2..(JV.4).X.X.1:.X
..19.X..19.'.3..(JV.8).X.X.1:.X.20.X.20.
-.4...L.5..(JV.1).Y.Y.1:.Y..23.Y..23.G.6
..(JV.2).Y.Y.1:.Y.0.Y.0...7..(JV.4).X.X.
1:.X..19.X..19...8..(JV.8).X.X.1:.X.20.X
.20...9...A.:..".LOAD FILENAME:";.S.;..F
$:.F$."".59...<..F$.G(13).....=..2,8,2,F
$.".FIG,P,R":P1.0...>..T.1.2...?..#2,A$(
T). .@...3.A.P1.P1.1:.T.1.2.L.B..#2,A$:.
A$.G(255).71.`.C.. IFA$=""THEN67.Q.D.A.F
(A$.G(0))...E..A.127.A..(A.127)...F.A%(P
1,T).A:.:A%(P1,3).1:.65...G. 2.R.H..".":
.T.1.P1.1:.A%(T,3).0..:.74...I.X1.A%(T,1
):Y1.A%(T,2):.SP.X1.40.Y1,128.102:.CP.X1
.40.Y1,08:.. .J.P.P1.1:..8.K..".SAVE FIL
ENAME:";.J.L..F$:.F$."".76.[.M..F$.G(13)
.87..N..2,8,2,"@0:".F$.".FIG,P,W":P1.0.
..O..2,G(0);G(158);...P.P1.P1.1:.P1.P.1.
86...Q..A%(P1,3).0.80.H.R..T.1.2...S..A%
(P1,T).0.A%(P1,T).(.(A%(P1,T)).128)...T.
..!.U..2,G(A%(P1,1));:.2,G(A%(P1,2));:.8
0.?.V..2,G(255);G(255);: 2:.".".E.W.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL