Home » Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_199201.adf » January92 » !AWJan92/Goodies/ProgTheARM/Showpath

!AWJan92/Goodies/ProgTheARM/Showpath

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_199201.adf » January92
Filename: !AWJan92/Goodies/ProgTheARM/Showpath
Read OK:
File size: 087D bytes
Load address: 0000
Exec address: 0000
File contents
   10REM > $.Showpath
   20
   30MODE 12
   40FORI%=0TO15
   50COLOUR I%,I%<<4,I%<<4,I%<<4
   60NEXT
   70
   80x= 200000
   90y= 200000
  100
  110scalex% = 1280 / x * &01000000
  120scaley% = 1024 / y * &01000000
  130
  140DIM matrix% 24
  150
  160matrix%! 0 = scalex%
  170matrix%! 4 = 0
  180matrix%! 8 = 0
  190matrix%!12 = scaley%
  200matrix%!16 = 0
  210matrix%!20 = 0
  220matrix%! 0 = scalex%
  230
  240DIM js% 16
  250
  260js%!0 =&010100:REM rounded start & end caps
  270js%!4 =0
  280js%!8 =0
  290js%!12=0
  300
  310js%?0 = 1:REM Rounded joints
  320js%?0 = 2:REM beveled joints
  330
  340
  350fillstyle% =     0
  360flatness%  =     0 :REM Use the default flatness
  370thickness% = 15000 :REM Very thick!
  380ds%        =     0
  390
  400REM === Start creating some objects ===
  410
  420limit%=256
  430DIM pathobject% limit%
  440pp%=0
  450
  460
  470PROCpath_rectangle(80000,80000,120000,170000)
  480
  490PROCpath_move(50000,50000)
  500PROCpath_curve(70000,20000,130000,70000,150000,50000)
  510
  520
  530PROCpath_endpath
  540
  550REM === Now draw the object
  560
  580FOR I%=0 TO 15
  581
  582  REM Rotate clockwise
  583
  590  matrix%!4 = I%*-&400
  600  matrix%!8 = I%* &400
  601
  602  REM Translate to the right and up
  603
  610  matrix%!16 = I% << 10
  620  matrix%!20 = I% << 10
  621
  630  GCOL I% AND 15
  640  PROCshowpath(pathobject%,fillstyle%,matrix%,flatness%,thickness%,js%,ds%)
  650NEXT
  660
  670REPEAT
  671UNTIL.
  680
  690END
  700
  710DEFPROCpath_rectangle(x0%,y0%,x1%,y1%)
  720PROCpath_move(x0%,y0%)
  730PROCpath_draw(x0%,y1%)
  740PROCpath_draw(x1%,y1%)
  750PROCpath_draw(x1%,y0%)
  760PROCpath_close
  770ENDPROC
  780
  790
  800DEFPROCpath_endpath
  810PROCout(0,pp%):PROCout(limit%-pp%-4,pp%)
  820ENDPROC
  830
  840DEFPROCpath_move(x%,y%)
  850PROCout(2,pp%):PROCout(x%,pp%):PROCout(y%,pp%)
  860ENDPROC
  870
  880DEFPROCpath_close_gap
  890PROCout(4,pp%)
  900ENDPROC
  910
  920DEFPROCpath_close
  930PROCout(5,pp%)
  940ENDPROC
  950
  960DEFPROCpath_curve(x2%,y2%,x3%,y3%,x4%,y4%)
  970PROCout(6,pp%)
  980PROCout(x2%,pp%):PROCout(y2%,pp%)
  990PROCout(x3%,pp%):PROCout(y3%,pp%)
 1000PROCout(x4%,pp%):PROCout(y4%,pp%)
 1010ENDPROC
 1020
 1030DEFPROCpath_draw(x%,y%)
 1040PROCout(8,pp%):PROCout(x%,pp%):PROCout(y%,pp%)
 1050ENDPROC
 1060
 1070DEFPROCout(value%,RETURN ptr%)
 1080IF ptr%+4 > limit% ERROR1,"Path full"
 1090pathobject%!ptr%=value%
 1100ptr%+=4
 1110ENDPROC
 1120
 1130REM ======================================================
 1140
 1150DEFPROCshowpath(path%,style%,mat%,flat%,thick%,join%,ds%)
 1160SYS "Draw_Stroke",path%,style%,mat%,flat%,thick%,join%,ds%
 1170ENDPROC

� > $.Showpath

� 12
(�I%=0�15
2� I%,I%<<4,I%<<4,I%<<4
<�
F
P
x= 200000
Z
y= 200000
d
n"scalex% = 1280 / x * &01000000
x"scaley% = 1024 / y * &01000000
�
�� matrix% 24
�
�matrix%! 0 = scalex%
�matrix%! 4 = 0
�matrix%! 8 = 0
�matrix%!12 = scaley%
�matrix%!16 = 0
�matrix%!20 = 0
�matrix%! 0 = scalex%
�
�� js% 16
�
-js%!0 =&010100:� rounded start & end caps
js%!4 =0
js%!8 =0
"js%!12=0
,
6js%?0 = 1:� Rounded joints
@js%?0 = 2:� beveled joints
J
T
^fillstyle% =     0
h2flatness%  =     0 :� Use the default flatness
r%thickness% = 15000 :� Very thick!
|ds%        =     0
�
�)� === Start creating some objects ===
�
�limit%=256
�� pathobject% limit%
�	pp%=0
�
�
�.�path_rectangle(80000,80000,120000,170000)
�
��path_move(50000,50000)
�6�path_curve(70000,20000,130000,70000,150000,50000)
�

�path_endpath

&� === Now draw the object
0
D� I%=0 � 15
E
F  � Rotate clockwise
G
N  matrix%!4 = I%*-&400
X  matrix%!8 = I%* &400
Y
Z%  � Translate to the right and up
[
b  matrix%!16 = I% << 10
l  matrix%!20 = I% << 10
m
v  � I% � 15
�L  �showpath(pathobject%,fillstyle%,matrix%,flatness%,thickness%,js%,ds%)
��
�
��
��.
�
��
�
�%��path_rectangle(x0%,y0%,x1%,y1%)
��path_move(x0%,y0%)
��path_draw(x0%,y1%)
��path_draw(x1%,y1%)
��path_draw(x1%,y0%)
��path_close
�


 ��path_endpath
*&�out(0,pp%):�out(limit%-pp%-4,pp%)
4�
>
H��path_move(x%,y%)
R)�out(2,pp%):�out(x%,pp%):�out(y%,pp%)
\�
f
p��path_close_gap
z�out(4,pp%)
��
�
���path_close
��out(5,pp%)
��
�
�)��path_curve(x2%,y2%,x3%,y3%,x4%,y4%)
��out(6,pp%)
��out(x2%,pp%):�out(y2%,pp%)
��out(x3%,pp%):�out(y3%,pp%)
��out(x4%,pp%):�out(y4%,pp%)
��
�
��path_draw(x%,y%)
)�out(8,pp%):�out(x%,pp%):�out(y%,pp%)
�
$
.��out(value%,� ptr%)
8$� ptr%+4 > limit% �1,"Path full"
Bpathobject%!ptr%=value%
Lptr%+=4
V�
`
j<� ======================================================
t
~8��showpath(path%,style%,mat%,flat%,thick%,join%,ds%)
�=ș "Draw_Stroke",path%,style%,mat%,flat%,thick%,join%,ds%
��
�
00000000  0d 00 0a 12 f4 20 3e 20  24 2e 53 68 6f 77 70 61  |..... > $.Showpa|
00000010  74 68 0d 00 14 04 0d 00  1e 08 eb 20 31 32 0d 00  |th......... 12..|
00000020  28 0c e3 49 25 3d 30 b8  31 35 0d 00 32 1a fb 20  |(..I%=0.15..2.. |
00000030  49 25 2c 49 25 3c 3c 34  2c 49 25 3c 3c 34 2c 49  |I%,I%<<4,I%<<4,I|
00000040  25 3c 3c 34 0d 00 3c 05  ed 0d 00 46 04 0d 00 50  |%<<4..<....F...P|
00000050  0d 78 3d 20 32 30 30 30  30 30 0d 00 5a 0d 79 3d  |.x= 200000..Z.y=|
00000060  20 32 30 30 30 30 30 0d  00 64 04 0d 00 6e 22 73  | 200000..d...n"s|
00000070  63 61 6c 65 78 25 20 3d  20 31 32 38 30 20 2f 20  |calex% = 1280 / |
00000080  78 20 2a 20 26 30 31 30  30 30 30 30 30 0d 00 78  |x * &01000000..x|
00000090  22 73 63 61 6c 65 79 25  20 3d 20 31 30 32 34 20  |"scaley% = 1024 |
000000a0  2f 20 79 20 2a 20 26 30  31 30 30 30 30 30 30 0d  |/ y * &01000000.|
000000b0  00 82 04 0d 00 8c 10 de  20 6d 61 74 72 69 78 25  |........ matrix%|
000000c0  20 32 34 0d 00 96 04 0d  00 a0 18 6d 61 74 72 69  | 24........matri|
000000d0  78 25 21 20 30 20 3d 20  73 63 61 6c 65 78 25 0d  |x%! 0 = scalex%.|
000000e0  00 aa 12 6d 61 74 72 69  78 25 21 20 34 20 3d 20  |...matrix%! 4 = |
000000f0  30 0d 00 b4 12 6d 61 74  72 69 78 25 21 20 38 20  |0....matrix%! 8 |
00000100  3d 20 30 0d 00 be 18 6d  61 74 72 69 78 25 21 31  |= 0....matrix%!1|
00000110  32 20 3d 20 73 63 61 6c  65 79 25 0d 00 c8 12 6d  |2 = scaley%....m|
00000120  61 74 72 69 78 25 21 31  36 20 3d 20 30 0d 00 d2  |atrix%!16 = 0...|
00000130  12 6d 61 74 72 69 78 25  21 32 30 20 3d 20 30 0d  |.matrix%!20 = 0.|
00000140  00 dc 18 6d 61 74 72 69  78 25 21 20 30 20 3d 20  |...matrix%! 0 = |
00000150  73 63 61 6c 65 78 25 0d  00 e6 04 0d 00 f0 0c de  |scalex%.........|
00000160  20 6a 73 25 20 31 36 0d  00 fa 04 0d 01 04 2d 6a  | js% 16.......-j|
00000170  73 25 21 30 20 3d 26 30  31 30 31 30 30 3a f4 20  |s%!0 =&010100:. |
00000180  72 6f 75 6e 64 65 64 20  73 74 61 72 74 20 26 20  |rounded start & |
00000190  65 6e 64 20 63 61 70 73  0d 01 0e 0c 6a 73 25 21  |end caps....js%!|
000001a0  34 20 3d 30 0d 01 18 0c  6a 73 25 21 38 20 3d 30  |4 =0....js%!8 =0|
000001b0  0d 01 22 0c 6a 73 25 21  31 32 3d 30 0d 01 2c 04  |..".js%!12=0..,.|
000001c0  0d 01 36 1e 6a 73 25 3f  30 20 3d 20 31 3a f4 20  |..6.js%?0 = 1:. |
000001d0  52 6f 75 6e 64 65 64 20  6a 6f 69 6e 74 73 0d 01  |Rounded joints..|
000001e0  40 1e 6a 73 25 3f 30 20  3d 20 32 3a f4 20 62 65  |@.js%?0 = 2:. be|
000001f0  76 65 6c 65 64 20 6a 6f  69 6e 74 73 0d 01 4a 04  |veled joints..J.|
00000200  0d 01 54 04 0d 01 5e 16  66 69 6c 6c 73 74 79 6c  |..T...^.fillstyl|
00000210  65 25 20 3d 20 20 20 20  20 30 0d 01 68 32 66 6c  |e% =     0..h2fl|
00000220  61 74 6e 65 73 73 25 20  20 3d 20 20 20 20 20 30  |atness%  =     0|
00000230  20 3a f4 20 55 73 65 20  74 68 65 20 64 65 66 61  | :. Use the defa|
00000240  75 6c 74 20 66 6c 61 74  6e 65 73 73 0d 01 72 25  |ult flatness..r%|
00000250  74 68 69 63 6b 6e 65 73  73 25 20 3d 20 31 35 30  |thickness% = 150|
00000260  30 30 20 3a f4 20 56 65  72 79 20 74 68 69 63 6b  |00 :. Very thick|
00000270  21 0d 01 7c 16 64 73 25  20 20 20 20 20 20 20 20  |!..|.ds%        |
00000280  3d 20 20 20 20 20 30 0d  01 86 04 0d 01 90 29 f4  |=     0.......).|
00000290  20 3d 3d 3d 20 53 74 61  72 74 20 63 72 65 61 74  | === Start creat|
000002a0  69 6e 67 20 73 6f 6d 65  20 6f 62 6a 65 63 74 73  |ing some objects|
000002b0  20 3d 3d 3d 0d 01 9a 04  0d 01 a4 0e 6c 69 6d 69  | ===........limi|
000002c0  74 25 3d 32 35 36 0d 01  ae 18 de 20 70 61 74 68  |t%=256..... path|
000002d0  6f 62 6a 65 63 74 25 20  6c 69 6d 69 74 25 0d 01  |object% limit%..|
000002e0  b8 09 70 70 25 3d 30 0d  01 c2 04 0d 01 cc 04 0d  |..pp%=0.........|
000002f0  01 d6 2e f2 70 61 74 68  5f 72 65 63 74 61 6e 67  |....path_rectang|
00000300  6c 65 28 38 30 30 30 30  2c 38 30 30 30 30 2c 31  |le(80000,80000,1|
00000310  32 30 30 30 30 2c 31 37  30 30 30 30 29 0d 01 e0  |20000,170000)...|
00000320  04 0d 01 ea 1b f2 70 61  74 68 5f 6d 6f 76 65 28  |......path_move(|
00000330  35 30 30 30 30 2c 35 30  30 30 30 29 0d 01 f4 36  |50000,50000)...6|
00000340  f2 70 61 74 68 5f 63 75  72 76 65 28 37 30 30 30  |.path_curve(7000|
00000350  30 2c 32 30 30 30 30 2c  31 33 30 30 30 30 2c 37  |0,20000,130000,7|
00000360  30 30 30 30 2c 31 35 30  30 30 30 2c 35 30 30 30  |0000,150000,5000|
00000370  30 29 0d 01 fe 04 0d 02  08 04 0d 02 12 11 f2 70  |0).............p|
00000380  61 74 68 5f 65 6e 64 70  61 74 68 0d 02 1c 04 0d  |ath_endpath.....|
00000390  02 26 1d f4 20 3d 3d 3d  20 4e 6f 77 20 64 72 61  |.&.. === Now dra|
000003a0  77 20 74 68 65 20 6f 62  6a 65 63 74 0d 02 30 04  |w the object..0.|
000003b0  0d 02 44 0f e3 20 49 25  3d 30 20 b8 20 31 35 0d  |..D.. I%=0 . 15.|
000003c0  02 45 04 0d 02 46 18 20  20 f4 20 52 6f 74 61 74  |.E...F.  . Rotat|
000003d0  65 20 63 6c 6f 63 6b 77  69 73 65 0d 02 47 04 0d  |e clockwise..G..|
000003e0  02 4e 1a 20 20 6d 61 74  72 69 78 25 21 34 20 3d  |.N.  matrix%!4 =|
000003f0  20 49 25 2a 2d 26 34 30  30 0d 02 58 1a 20 20 6d  | I%*-&400..X.  m|
00000400  61 74 72 69 78 25 21 38  20 3d 20 49 25 2a 20 26  |atrix%!8 = I%* &|
00000410  34 30 30 0d 02 59 04 0d  02 5a 25 20 20 f4 20 54  |400..Y...Z%  . T|
00000420  72 61 6e 73 6c 61 74 65  20 74 6f 20 74 68 65 20  |ranslate to the |
00000430  72 69 67 68 74 20 61 6e  64 20 75 70 0d 02 5b 04  |right and up..[.|
00000440  0d 02 62 1b 20 20 6d 61  74 72 69 78 25 21 31 36  |..b.  matrix%!16|
00000450  20 3d 20 49 25 20 3c 3c  20 31 30 0d 02 6c 1b 20  | = I% << 10..l. |
00000460  20 6d 61 74 72 69 78 25  21 32 30 20 3d 20 49 25  | matrix%!20 = I%|
00000470  20 3c 3c 20 31 30 0d 02  6d 04 0d 02 76 0f 20 20  | << 10..m...v.  |
00000480  e6 20 49 25 20 80 20 31  35 0d 02 80 4c 20 20 f2  |. I% . 15...L  .|
00000490  73 68 6f 77 70 61 74 68  28 70 61 74 68 6f 62 6a  |showpath(pathobj|
000004a0  65 63 74 25 2c 66 69 6c  6c 73 74 79 6c 65 25 2c  |ect%,fillstyle%,|
000004b0  6d 61 74 72 69 78 25 2c  66 6c 61 74 6e 65 73 73  |matrix%,flatness|
000004c0  25 2c 74 68 69 63 6b 6e  65 73 73 25 2c 6a 73 25  |%,thickness%,js%|
000004d0  2c 64 73 25 29 0d 02 8a  05 ed 0d 02 94 04 0d 02  |,ds%)...........|
000004e0  9e 05 f5 0d 02 9f 06 fd  2e 0d 02 a8 04 0d 02 b2  |................|
000004f0  05 e0 0d 02 bc 04 0d 02  c6 25 dd f2 70 61 74 68  |.........%..path|
00000500  5f 72 65 63 74 61 6e 67  6c 65 28 78 30 25 2c 79  |_rectangle(x0%,y|
00000510  30 25 2c 78 31 25 2c 79  31 25 29 0d 02 d0 17 f2  |0%,x1%,y1%).....|
00000520  70 61 74 68 5f 6d 6f 76  65 28 78 30 25 2c 79 30  |path_move(x0%,y0|
00000530  25 29 0d 02 da 17 f2 70  61 74 68 5f 64 72 61 77  |%).....path_draw|
00000540  28 78 30 25 2c 79 31 25  29 0d 02 e4 17 f2 70 61  |(x0%,y1%).....pa|
00000550  74 68 5f 64 72 61 77 28  78 31 25 2c 79 31 25 29  |th_draw(x1%,y1%)|
00000560  0d 02 ee 17 f2 70 61 74  68 5f 64 72 61 77 28 78  |.....path_draw(x|
00000570  31 25 2c 79 30 25 29 0d  02 f8 0f f2 70 61 74 68  |1%,y0%).....path|
00000580  5f 63 6c 6f 73 65 0d 03  02 05 e1 0d 03 0c 04 0d  |_close..........|
00000590  03 16 04 0d 03 20 12 dd  f2 70 61 74 68 5f 65 6e  |..... ...path_en|
000005a0  64 70 61 74 68 0d 03 2a  26 f2 6f 75 74 28 30 2c  |dpath..*&.out(0,|
000005b0  70 70 25 29 3a f2 6f 75  74 28 6c 69 6d 69 74 25  |pp%):.out(limit%|
000005c0  2d 70 70 25 2d 34 2c 70  70 25 29 0d 03 34 05 e1  |-pp%-4,pp%)..4..|
000005d0  0d 03 3e 04 0d 03 48 16  dd f2 70 61 74 68 5f 6d  |..>...H...path_m|
000005e0  6f 76 65 28 78 25 2c 79  25 29 0d 03 52 29 f2 6f  |ove(x%,y%)..R).o|
000005f0  75 74 28 32 2c 70 70 25  29 3a f2 6f 75 74 28 78  |ut(2,pp%):.out(x|
00000600  25 2c 70 70 25 29 3a f2  6f 75 74 28 79 25 2c 70  |%,pp%):.out(y%,p|
00000610  70 25 29 0d 03 5c 05 e1  0d 03 66 04 0d 03 70 14  |p%)..\....f...p.|
00000620  dd f2 70 61 74 68 5f 63  6c 6f 73 65 5f 67 61 70  |..path_close_gap|
00000630  0d 03 7a 0f f2 6f 75 74  28 34 2c 70 70 25 29 0d  |..z..out(4,pp%).|
00000640  03 84 05 e1 0d 03 8e 04  0d 03 98 10 dd f2 70 61  |..............pa|
00000650  74 68 5f 63 6c 6f 73 65  0d 03 a2 0f f2 6f 75 74  |th_close.....out|
00000660  28 35 2c 70 70 25 29 0d  03 ac 05 e1 0d 03 b6 04  |(5,pp%).........|
00000670  0d 03 c0 29 dd f2 70 61  74 68 5f 63 75 72 76 65  |...)..path_curve|
00000680  28 78 32 25 2c 79 32 25  2c 78 33 25 2c 79 33 25  |(x2%,y2%,x3%,y3%|
00000690  2c 78 34 25 2c 79 34 25  29 0d 03 ca 0f f2 6f 75  |,x4%,y4%).....ou|
000006a0  74 28 36 2c 70 70 25 29  0d 03 d4 1f f2 6f 75 74  |t(6,pp%).....out|
000006b0  28 78 32 25 2c 70 70 25  29 3a f2 6f 75 74 28 79  |(x2%,pp%):.out(y|
000006c0  32 25 2c 70 70 25 29 0d  03 de 1f f2 6f 75 74 28  |2%,pp%).....out(|
000006d0  78 33 25 2c 70 70 25 29  3a f2 6f 75 74 28 79 33  |x3%,pp%):.out(y3|
000006e0  25 2c 70 70 25 29 0d 03  e8 1f f2 6f 75 74 28 78  |%,pp%).....out(x|
000006f0  34 25 2c 70 70 25 29 3a  f2 6f 75 74 28 79 34 25  |4%,pp%):.out(y4%|
00000700  2c 70 70 25 29 0d 03 f2  05 e1 0d 03 fc 04 0d 04  |,pp%)...........|
00000710  06 16 dd f2 70 61 74 68  5f 64 72 61 77 28 78 25  |....path_draw(x%|
00000720  2c 79 25 29 0d 04 10 29  f2 6f 75 74 28 38 2c 70  |,y%)...).out(8,p|
00000730  70 25 29 3a f2 6f 75 74  28 78 25 2c 70 70 25 29  |p%):.out(x%,pp%)|
00000740  3a f2 6f 75 74 28 79 25  2c 70 70 25 29 0d 04 1a  |:.out(y%,pp%)...|
00000750  05 e1 0d 04 24 04 0d 04  2e 18 dd f2 6f 75 74 28  |....$.......out(|
00000760  76 61 6c 75 65 25 2c f8  20 70 74 72 25 29 0d 04  |value%,. ptr%)..|
00000770  38 24 e7 20 70 74 72 25  2b 34 20 3e 20 6c 69 6d  |8$. ptr%+4 > lim|
00000780  69 74 25 20 85 31 2c 22  50 61 74 68 20 66 75 6c  |it% .1,"Path ful|
00000790  6c 22 0d 04 42 1b 70 61  74 68 6f 62 6a 65 63 74  |l"..B.pathobject|
000007a0  25 21 70 74 72 25 3d 76  61 6c 75 65 25 0d 04 4c  |%!ptr%=value%..L|
000007b0  0b 70 74 72 25 2b 3d 34  0d 04 56 05 e1 0d 04 60  |.ptr%+=4..V....`|
000007c0  04 0d 04 6a 3c f4 20 3d  3d 3d 3d 3d 3d 3d 3d 3d  |...j<. =========|
000007d0  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |================|
*
000007f0  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 0d 04 74  |=============..t|
00000800  04 0d 04 7e 38 dd f2 73  68 6f 77 70 61 74 68 28  |...~8..showpath(|
00000810  70 61 74 68 25 2c 73 74  79 6c 65 25 2c 6d 61 74  |path%,style%,mat|
00000820  25 2c 66 6c 61 74 25 2c  74 68 69 63 6b 25 2c 6a  |%,flat%,thick%,j|
00000830  6f 69 6e 25 2c 64 73 25  29 0d 04 88 3d c8 99 20  |oin%,ds%)...=.. |
00000840  22 44 72 61 77 5f 53 74  72 6f 6b 65 22 2c 70 61  |"Draw_Stroke",pa|
00000850  74 68 25 2c 73 74 79 6c  65 25 2c 6d 61 74 25 2c  |th%,style%,mat%,|
00000860  66 6c 61 74 25 2c 74 68  69 63 6b 25 2c 6a 6f 69  |flat%,thick%,joi|
00000870  6e 25 2c 64 73 25 0d 04  92 05 e1 0d ff           |n%,ds%.......|
0000087d