-
Notifications
You must be signed in to change notification settings - Fork 3
/
gemwin_control.pd
149 lines (149 loc) · 3.86 KB
/
gemwin_control.pd
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
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
#N canvas 225 125 721 590 10;
#X obj 18 17 inlet;
#X text 66 16 options pass-thru;
#X obj 16 528 outlet;
#X text 72 528 pass-thru;
#X obj 17 503 ch_gemwin \$1;
#X obj 386 467 send GLOBAL_GEMWIN_CONTROL;
#X obj 101 103 cnv 15 128 22 empty GLOBAL_GEMWIN_CONTROL_CANVAS gemwin
3 5 0 14 -233017 -33289 0;
#X obj 200 102 tgl 17 0 \$0-render_toggle THIS_IS_TO_MAKE_THE_INLET_DISAPPEAR
render -6 21 1 9 -233017 -33289 -33289 0 1;
#X obj 159 102 tgl 17 0 \$0-window_toggle THIS_IS_TO_MAKE_THE_INLET_DISAPPEAR
window -6 21 1 9 -233017 -33289 -33289 0 1;
#X obj 155 49 receive GLOBAL_GEMWIN_CONTROL;
#N canvas 77 396 766 363 window 0;
#X obj 56 126 select 0;
#X obj 107 146 bang;
#X msg 107 166 reset \, create;
#X msg 228 164 window set \$1;
#X obj 321 115 select 0 1;
#X msg 354 136 76;
#X msg 321 136 10;
#X msg 331 163 window color \$1 12 12;
#X obj 93 235 outlet;
#X obj 460 273 outlet;
#X obj 58 6 inlet;
#X text 106 7 window status;
#X msg 527 164 render 0;
#X obj 557 3 inlet;
#X text 602 3 render status;
#X obj 527 92 float;
#X obj 58 47 trigger float bang;
#X obj 58 28 route float;
#X obj 527 143 select 1;
#X text 488 66 turn off rendering \, if on;
#X msg 27 166 destroy;
#X text 146 26 TODO: don't receive message if status is the same;
#X obj 527 118 change;
#X connect 0 0 20 0;
#X connect 0 1 1 0;
#X connect 1 0 2 0;
#X connect 2 0 8 0;
#X connect 3 0 9 0;
#X connect 4 0 6 0;
#X connect 4 1 5 0;
#X connect 5 0 7 0;
#X connect 6 0 7 0;
#X connect 7 0 9 0;
#X connect 10 0 17 0;
#X connect 12 0 9 0;
#X connect 13 0 15 1;
#X connect 15 0 22 0;
#X connect 16 0 0 0;
#X connect 16 0 4 0;
#X connect 16 0 3 0;
#X connect 16 1 15 0;
#X connect 17 0 16 0;
#X connect 18 0 12 0;
#X connect 20 0 8 0;
#X connect 22 0 18 0;
#X restore 76 369 pd window logic;
#X obj 41 153 receive \$0-window_toggle;
#N canvas 472 123 678 374 render 0;
#X obj 253 118 select 0 1;
#X msg 286 149 76;
#X msg 253 149 10;
#X msg 138 187 render set \$1;
#X msg 291 187 render color \$1 12 12;
#X obj 23 286 outlet;
#X text 75 288 to gemwin;
#X obj 377 280 outlet;
#X obj 160 10 inlet;
#X text 206 10 render status;
#X text 545 8 window status;
#X obj 498 8 inlet;
#X msg 468 184 window 1;
#X obj 469 101 float;
#X text 430 75 create window \, if not created;
#X obj 469 152 select 0;
#X obj 160 30 route float;
#X obj 161 58 trigger float bang;
#X msg 223 307 \; GLOBAL_GEMWIN_CONTROL_CANVAS color \$1 12 12;
#X obj 469 128 change;
#X obj 381 128 purepd/once;
#X connect 0 0 2 0;
#X connect 0 1 1 0;
#X connect 1 0 4 0;
#X connect 1 0 18 0;
#X connect 2 0 4 0;
#X connect 2 0 18 0;
#X connect 3 0 7 0;
#X connect 4 0 7 0;
#X connect 8 0 16 0;
#X connect 11 0 13 1;
#X connect 12 0 7 0;
#X connect 13 0 19 0;
#X connect 15 0 12 0;
#X connect 16 0 17 0;
#X connect 17 0 3 0;
#X connect 17 0 0 0;
#X connect 17 0 5 0;
#X connect 17 1 13 0;
#X connect 17 1 20 0;
#X connect 19 0 15 0;
#X connect 20 0 12 0;
#X restore 300 369 pd render logic;
#X obj 313 153 receive \$0-render_toggle;
#X obj 155 72 route window render status;
#X obj 301 230 float;
#X obj 76 233 float;
#X obj 263 153 bang;
#X msg 529 250 status;
#X obj 414 203 loadbang;
#X obj 300 296 spigot 0;
#X obj 77 296 spigot 0;
#X obj 414 224 trigger bang bang;
#X msg 414 250 1;
#X text 354 187 first get status from existing objects;
#X obj 76 255 change;
#X obj 301 251 change;
#X connect 0 0 4 0;
#X connect 4 0 2 0;
#X connect 9 0 14 0;
#X connect 10 0 4 0;
#X connect 10 1 5 0;
#X connect 11 0 16 0;
#X connect 12 0 4 0;
#X connect 12 1 5 0;
#X connect 13 0 15 0;
#X connect 14 0 8 0;
#X connect 14 1 7 0;
#X connect 14 2 17 0;
#X connect 15 0 26 0;
#X connect 16 0 25 0;
#X connect 17 0 15 0;
#X connect 17 0 16 0;
#X connect 18 0 5 0;
#X connect 19 0 22 0;
#X connect 20 0 12 0;
#X connect 20 0 10 1;
#X connect 21 0 10 0;
#X connect 21 0 12 1;
#X connect 22 0 23 0;
#X connect 22 1 18 0;
#X connect 23 0 20 1;
#X connect 23 0 21 1;
#X connect 25 0 21 0;
#X connect 26 0 20 0;
#X coords 0 -1 1 1 130 28 1 100 100;