blob: e73b15f9829e659dcc75dfef6c680927b89c25ed (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
translate 10 10
begin_block penstyles
setPen black 0 solidline flatcap
drawLine 0 0 100 0
setPen black 0 dashline flatcap
drawLine 100 0 100 40
setPen black 0 dotline flatcap
drawLine 100 40 200 0
setPen black 0 dashdotline flatcap
drawLine 200 0 300 0
setPen black 0 dashdotdotline flatcap
drawLine 300 0 400 40
translate 0 50
setPen blue 2 solidline flatcap
drawLine 0 0 100 0
setPen blue 2 dashline flatcap
drawLine 100 0 100 40
setPen blue 2 dotline flatcap
drawLine 100 40 200 0
setPen blue 2 dashdotline flatcap
drawLine 200 0 300 0
setPen blue 2 dashdotdotline flatcap
drawLine 300 0 400 40
translate 0 50
setPen red 5 solidline flatcap
drawLine 0 0 100 0
setPen red 5 dashline flatcap
drawLine 100 0 100 40
setPen red 5 dotline flatcap
drawLine 100 40 200 0
setPen red 5 dashdotline flatcap
drawLine 200 0 300 0
setPen red 5 dashdotdotline flatcap
drawLine 300 0 400 40
end_block
translate 0 50
scale 1 2
repeat_block penstyles
# Test cap styles
resetMatrix
translate 420 10
setPen green 5 dashdotline flatcap
drawLine 0 0 200 0
setPen green 5 dashdotline roundcap
drawLine 0 20 200 20
setPen green 5 dashdotline squarecap
drawLine 0 40 200 40
# Test join styles
resetMatrix
translate 420 80
setBrush nobrush
begin_block joinstyles
setPen orange 10 solidline flatcap miterjoin
drawPolyline [ 0 0 80 0 80 80 0 80 ]
translate 0 100
setPen aquamarine 10 solidline squarecap beveljoin
drawPolyline [ 0 0 80 0 80 80 0 80 ]
translate 0 100
setPen purple 10 solidline roundcap roundjoin
drawPolyline [ 0 0 80 0 80 80 0 80 ]
end_block
translate 130 -200
scale 2 1
rotate 1
repeat_block joinstyles
# transparent lines
resetMatrix
translate 10 400
setPen #7f000000
drawLine 0 0 50 0
setPen #7f000000 1 SolidLine
drawLine 0 10 50 10
setPen #7f000000 5 SolidLine
drawLine 0 20 50 20
setPen #7f000000 10 SolidLine
drawLine 0 30 50 30
setPen #7f000000
drawLine 0 0 0 50
setPen #7f000000 1 SolidLine
drawLine 10 0 10 50
setPen #7f000000 5 SolidLine
drawLine 20 0 20 50
setPen #7f000000 10 SolidLine
drawLine 30 0 30 50
|
