blob: 5ad2827e6583b5a71a2c36cf9079e5c23c1a09ae (
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
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
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
|
#N canvas 78 51 576 362 10;
#X obj 124 207 sys_gui;
#X symbolatom 239 101 0 0 0 0 - - -;
#X obj 223 32 loadbang;
#X obj 124 148 pack float symbol;
#X obj 59 88 hsl 128 15 0.1 1 1 1 empty empty window_alpha -2 -8 0
10 -204800 -1 -1 12700 1;
#X floatatom 56 123 5 0 0 0 - - -;
#X msg 124 177 wm attributes \$2 -alpha \$1;
#X text 210 274 for more options:;
#X obj 241 292 pddp/pddplink http://tcl.tk/man/tcl8.4/TkCmd/wm.htm
;
#X text 113 234 alpha does not work with X11 :(;
#X obj 223 69 window_name;
#X obj 375 248 sys_gui;
#X text 13 37 change alpha of this window:;
#N canvas 83 292 729 228 Mac 0;
#X obj 25 163 sys_gui;
#X obj 124 74 window_name;
#X obj 25 102 pack float symbol;
#X msg 25 133 wm attributes \$2 -transparent \$1;
#X obj 124 49 loadbang;
#X obj 25 60 tgl 30 0 empty empty empty 17 7 0 10 -204786 -1 -1 0 1
;
#X text 43 13 turn off window shadow;
#X obj 265 163 sys_gui;
#X obj 364 74 window_name;
#X obj 265 102 pack float symbol;
#X obj 364 49 loadbang;
#X obj 265 60 tgl 30 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
1;
#X msg 265 133 wm attributes \$2 -fullscreen \$1;
#X text 263 13 make this window fullscreen;
#X obj 495 163 sys_gui;
#X obj 594 74 window_name;
#X obj 495 102 pack float symbol;
#X obj 594 49 loadbang;
#X obj 495 60 tgl 30 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
1;
#X text 479 15 make this window on top of all others;
#X msg 495 133 wm attributes \$2 -topmost \$1;
#X connect 1 0 2 1;
#X connect 2 0 3 0;
#X connect 3 0 0 0;
#X connect 4 0 1 0;
#X connect 5 0 2 0;
#X connect 8 0 9 1;
#X connect 9 0 12 0;
#X connect 10 0 8 0;
#X connect 11 0 9 0;
#X connect 12 0 7 0;
#X connect 15 0 16 1;
#X connect 16 0 20 0;
#X connect 17 0 15 0;
#X connect 18 0 16 0;
#X connect 20 0 14 0;
#X restore 60 277 pd Mac OS X tricks;
#N canvas 67 329 729 228 Windows 0;
#X obj 25 163 sys_gui;
#X obj 124 74 window_name;
#X obj 25 102 pack float symbol;
#X obj 124 49 loadbang;
#X obj 25 60 tgl 30 0 empty empty empty 17 7 0 10 -204786 -1 -1 0 1
;
#X obj 265 163 sys_gui;
#X obj 364 74 window_name;
#X obj 265 102 pack float symbol;
#X obj 364 49 loadbang;
#X obj 265 60 tgl 30 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
1;
#X obj 495 163 sys_gui;
#X obj 594 74 window_name;
#X obj 495 102 pack float symbol;
#X obj 594 49 loadbang;
#X obj 495 60 tgl 30 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
1;
#X text 479 15 make this window on top of all others;
#X msg 495 133 wm attributes \$2 -topmost \$1;
#X msg 265 133 wm attributes \$2 -toolwindow \$1;
#X text 263 13 make this window a "toolwindow";
#X text 23 13 make this a "disabled" window;
#X msg 25 133 wm attributes \$2 -disabled \$1;
#X connect 1 0 2 1;
#X connect 2 0 20 0;
#X connect 3 0 1 0;
#X connect 4 0 2 0;
#X connect 6 0 7 1;
#X connect 7 0 17 0;
#X connect 8 0 6 0;
#X connect 9 0 7 0;
#X connect 11 0 12 1;
#X connect 12 0 16 0;
#X connect 13 0 11 0;
#X connect 14 0 12 0;
#X connect 16 0 10 0;
#X connect 17 0 5 0;
#X connect 20 0 0 0;
#X restore 60 297 pd Windows tricks;
#N canvas 809 137 450 300 get 0;
#X symbolatom 42 235 0 0 0 0 - - -;
#X obj 42 191 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X symbolatom 126 235 0 0 0 0 - - -;
#X obj 126 191 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#N canvas 0 22 450 300 subname 0;
#X obj 117 21 inlet;
#X obj 119 265 outlet;
#X obj 107 137 window_name;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 126 214 pd subname;
#X symbolatom 209 235 0 0 0 0 - - -;
#X obj 209 191 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#N canvas 496 269 450 300 get 0;
#X obj 117 21 inlet;
#X obj 119 265 outlet;
#X obj 109 137 window_name 1;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 209 214 pd get parent;
#X symbolatom 73 128 0 0 0 0 - - -;
#X obj 73 84 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X text 47 36 You can get the canvas name of other patches that this
one is embedded in by setting the argument to the level:;
#X text 78 147 ^-- this is the same as the top level of this help patch
;
#X symbolatom 299 235 0 0 0 0 - - -;
#X obj 299 191 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#N canvas 496 269 450 300 get 0;
#X obj 117 21 inlet;
#X obj 119 265 outlet;
#X obj 109 137 window_name 2;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 299 214 pd get parent of parent;
#X obj 73 107 window_name 1;
#X obj 42 214 window_name;
#X connect 1 0 16 0;
#X connect 3 0 4 0;
#X connect 4 0 2 0;
#X connect 6 0 7 0;
#X connect 7 0 5 0;
#X connect 9 0 15 0;
#X connect 13 0 14 0;
#X connect 14 0 12 0;
#X connect 15 0 8 0;
#X connect 16 0 0 0;
#X restore 336 39 pd get from different levels;
#N canvas 1197 96 450 300 get 0;
#X symbolatom 73 259 0 0 0 0 - - -;
#X obj 73 215 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X symbolatom 72 176 0 0 0 0 - - -;
#X obj 72 132 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#N canvas 0 22 450 300 test 0;
#X symbolatom 188 150 0 0 0 0 - - -;
#X obj 188 106 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 188 129 window_name;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X restore 221 155 pd test;
#X obj 220 77 namecanvas myname;
#X symbolatom 73 99 0 0 0 0 - - -;
#X obj 73 55 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X text 53 14 You can also use the canvas receive symbol to get the
canvas_name:;
#X obj 72 155 window_name pd-test;
#X obj 73 78 window_name myname;
#X obj 73 238 window_name pd-window_name-help.pd;
#X connect 1 0 11 0;
#X connect 3 0 9 0;
#X connect 7 0 10 0;
#X connect 9 0 2 0;
#X connect 10 0 6 0;
#X connect 11 0 0 0;
#X restore 336 64 pd get by canvas receive symbol;
#X text 341 114 turn on/off resizing of this window:;
#X obj 474 177 window_name;
#X obj 375 197 pack float symbol;
#X obj 474 157 loadbang;
#X obj 375 155 tgl 30 0 empty empty empty 17 7 0 10 -204786 -1 -1 1
1;
#X msg 375 222 wm resizable \$2 \$1 \$1;
#X connect 2 0 10 0;
#X connect 3 0 6 0;
#X connect 4 0 3 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 10 0 3 1;
#X connect 10 0 1 0;
#X connect 18 0 19 1;
#X connect 19 0 22 0;
#X connect 20 0 18 0;
#X connect 21 0 19 0;
#X connect 22 0 11 0;
|