blob: 5ed5a05b1c88734098646e40250ab73831423bc5 (
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
|
#N canvas 291 154 710 345 10;
#X declare -lib Gem;
#X text 33 14 Synopsis: [circle];
#X text 54 30 Class: geometric object;
#X text 525 29 Example:;
#X obj 7 65 cnv 15 450 90 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 7 69 Description: Renders a circle.;
#X text 16 86 The circle object renders a circle flat disc at the current
position with current color. The look of the circle can be changed
with the draw message \, its size can be changed via the second inlet.
;
#X obj 8 216 cnv 15 450 100 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 9 221 Inlets:;
#X obj 8 166 cnv 15 450 40 empty empty empty 20 12 0 14 -195568 -66577
0;
#X text 17 165 Arguments:;
#X text 27 261 Inlet 2: float: size;
#X text 452 8 GEM object;
#X text 27 233 Inlet 1: gemlist;
#X text 9 280 Outlets:;
#X text 21 293 Outlet 1: gemlist;
#X text 63 177 size of the circle;
#X obj 519 47 cnv 15 170 250 empty empty empty 20 12 0 14 -228992 -66577
0;
#X obj 584 224 cnv 15 100 60 empty empty empty 20 12 0 14 -195568 -66577
0;
#N canvas 0 0 450 300 gemwin 0;
#X obj 132 136 gemwin;
#X obj 67 89 outlet;
#X obj 67 10 inlet;
#X obj 67 41 route create;
#X msg 67 70 set destroy;
#X msg 142 68 set create;
#X msg 198 112 destroy;
#X msg 132 112 create \, 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 7 0;
#X connect 3 1 5 0;
#X connect 3 1 6 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X restore 589 263 pd gemwin;
#X msg 589 244 create;
#X text 585 223 Create window:;
#X obj 525 80 cnv 15 150 100 empty empty empty 20 12 0 14 -24198 -66577
0;
#X obj 593 159 circle;
#X msg 535 95 draw line;
#X msg 535 116 draw fill;
#X msg 535 138 draw point;
#X obj 593 54 gemhead;
#X floatatom 626 130 5 0 0 2 size - -;
#X text 64 191 default:1;
#X text 27 247 Inlet 1: message: draw [line|fill|point|default];
#X obj 588 8 declare -lib Gem;
#X connect 18 0 19 0;
#X connect 19 0 18 0;
#X connect 23 0 22 0;
#X connect 24 0 22 0;
#X connect 25 0 22 0;
#X connect 26 0 22 0;
#X connect 27 0 22 1;
|
