blob: ef43340c4cac8125bcc6d6a21ecc420ce0d54a0a (
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
|
#N canvas 289 160 683 363 10;
#X declare -lib Gem;
#X text 54 30 Class: geometric object;
#X obj 499 77 cnv 15 170 250 empty empty empty 20 12 0 14 -228992 -66577
0;
#X obj 564 254 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 569 293 pd gemwin;
#X msg 569 274 create;
#X text 565 253 Create window:;
#X text 505 59 Example:;
#X obj 7 65 cnv 15 450 80 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 8 216 cnv 15 450 130 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 9 221 Inlets:;
#X obj 8 156 cnv 15 450 50 empty empty empty 20 12 0 14 -195568 -66577
0;
#X text 17 155 Arguments:;
#X text 27 247 Inlet 1: message: draw [line|fill|point];
#X text 502 8 GEM object;
#X text 27 233 Inlet 1: gemlist;
#X text 9 310 Outlets:;
#X text 21 323 Outlet 1: gemlist;
#X obj 502 112 cnv 15 160 120 empty empty empty 20 12 0 14 -24198 -66577
0;
#X obj 513 84 gemhead;
#X floatatom 566 134 5 0 0 0 - - -;
#X floatatom 620 165 5 0 0 0 - - -;
#X text 620 149 height;
#X text 27 275 Inlet 3: float: height (dimY);
#X text 566 118 width;
#X text 33 14 Synopsis: [slideSquares];
#X text 7 69 Description: Renders sliding rectangles.;
#X text 16 86 The slideSquares object renders a number of sliding rectangles
at the current position with current color. The dimensions of the sliding
rectangles can be changed via the inlet2 and inlet3.;
#X text 63 167 dimensions of the sliding rectangles (width height)
;
#X text 65 181 default: 1 1;
#X text 27 260 Inlet 2: float: width (dimX);
#X obj 513 209 slideSquares 1 1;
#X obj 568 8 declare -lib Gem;
#X connect 3 0 4 0;
#X connect 4 0 3 0;
#X connect 18 0 30 0;
#X connect 19 0 30 1;
#X connect 20 0 30 2;
|
