[PD] GUI to control [gemwin]

Sun Apr 2 15:25:56 CEST 2006

Hallo,
Hans-Christoph Steiner hat gesagt: // Hans-Christoph Steiner wrote:

> I made a GUI object to control the [gemwin] object that also displays  
> its status.  When a new instance is created, it queries existing  
> instances to get the status.  That way all instances will show the  
> same status.  I am planning on using this in the intro to Gem  
> tutorial/workshop that I am currently working on.  So feedback would  
> be appreciated.

I attached a similar patch that I often use, which includes a kind of
mouse control to view the scene from different angles, which I ripped
from a patch by Cyrille Henry. Mouse button 1 rotates the view and
button 2 zooms.  Maybe this all could be combined somehow? 

It's also a graph on parent patch but should still work with pd <
0.39, as it's an older patch.

ciao
-- 
 Frank Barknecht                 _ ______footils.org_ __goto10.org__
-------------- next part --------------
#N canvas 0 0 162 149 10;
#X msg 238 110 0 \, destroy;
#X obj 9 48 hsl 128 15 0 127 0 0 empty \$0-rotate_Z rotate_Z -2 -6
0 8 -262144 -1 -1 0 1;
#X obj 8 83 hsl 128 15 0 127 0 0 empty \$0-rotate_X rotate_X -2 -6
0 8 -262144 -1 -1 0 1;
#X obj 9 116 hsl 128 15 0 127 0 0 empty \$0-zoom zoom -2 -6 0 8 -262144
-1 -1 0 1;
#X obj 116 16 tgl 24 0 empty empty GEMWIN 0 -6 0 8 -262144 -1 -1 0
1;
#N canvas 0 0 717 719 chgem 0;
#X obj 285 171 f;
#X obj 206 152 spigot;
#X obj 267 143 sel 0 1;
#X obj 237 124 t f f;
#X obj 206 200 -;
#X obj 206 249 +;
#X obj 267 213 f;
#X obj 159 168 f;
#X obj 80 149 spigot;
#X obj 141 140 sel 0 1;
#X obj 111 121 t f f;
#X obj 80 200 -;
#X obj 80 249 +;
#X obj 141 210 f;
#X obj 406 162 f;
#X obj 327 146 spigot;
#X obj 388 137 sel 0 1;
#X obj 358 118 t f f;
#X obj 327 197 -;
#X obj 388 207 f;
#X obj 80 465 * 4;
#X obj 135 467 * 4;
#X obj 156 308 t b f;
#X obj 94 372 cos;
#X obj 106 430 * 1;
#X obj 80 430 * 1;
#X obj 132 373 sin;
#X obj 107 466 * 4;
#X obj 94 394 t b f;
#X obj 94 348 / 200;
#X obj 80 491 pack f f f;
#X obj 316 29 gemmouse;
#X obj 515 135 t b f;
#X obj 515 164 |;
#X obj 487 240 gemhead;
#X obj 491 193 loadbang;
#X msg 487 215 0;
#X obj 487 315 curve 2;
#X obj 487 266 color 1 0 0;
#X obj 571 240 gemhead;
#X obj 571 315 curve 2;
#X obj 651 242 gemhead;
#X obj 651 317 curve 2;
#X msg 524 289 3 0 0;
#X msg 608 289 0 3 0;
#X msg 688 291 0 0 3;
#X msg 80 516 view \$1 \$2 \$3 0 0 0 0 1 0;
#X obj 571 266 color 0 1 0;
#X obj 651 268 color 0 0 1;
#X obj 80 308 sin;
#X obj 106 309 cos;
#X obj 327 246 + 200;
#X obj 157 282 / 50;
#X obj 80 283 / -200;
#X obj 18 12 inlet;
#X obj 20 579 outlet;
#X obj 60 14 inlet;
#X obj 215 19 inlet;
#X obj 132 15 inlet;
#X obj 213 44 * 5;
#X obj 59 82 / 127;
#X obj 60 61 * 400;
#X obj 131 82 / 127;
#X obj 131 58 * 200;
#X obj 131 36 * -3.14;
#X obj 60 37 * 3.14;
#X text 435 34 This part: build by cyrilly henry;
#X obj 21 551 gemwin;
#X connect 0 0 4 1;
#X connect 1 0 4 0;
#X connect 2 0 6 0;
#X connect 2 1 0 0;
#X connect 3 0 1 1;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 5 0 6 1;
#X connect 5 0 29 0;
#X connect 6 0 5 1;
#X connect 7 0 11 1;
#X connect 8 0 11 0;
#X connect 9 0 13 0;
#X connect 9 1 7 0;
#X connect 10 0 8 1;
#X connect 10 1 9 0;
#X connect 11 0 12 0;
#X connect 12 0 13 1;
#X connect 12 0 53 0;
#X connect 13 0 12 1;
#X connect 14 0 18 1;
#X connect 15 0 18 0;
#X connect 16 0 19 0;
#X connect 16 1 14 0;
#X connect 17 0 15 1;
#X connect 17 1 16 0;
#X connect 18 0 51 0;
#X connect 19 0 51 1;
#X connect 20 0 30 0;
#X connect 21 0 30 2;
#X connect 22 0 21 0;
#X connect 22 0 20 0;
#X connect 22 0 27 0;
#X connect 22 1 21 1;
#X connect 22 1 20 1;
#X connect 22 1 27 1;
#X connect 23 0 28 0;
#X connect 24 0 21 0;
#X connect 25 0 20 0;
#X connect 26 0 27 0;
#X connect 27 0 30 1;
#X connect 28 0 24 0;
#X connect 28 0 25 0;
#X connect 28 1 24 1;
#X connect 28 1 25 1;
#X connect 29 0 23 0;
#X connect 29 0 26 0;
#X connect 30 0 46 0;
#X connect 31 0 8 0;
#X connect 31 0 7 1;
#X connect 31 1 1 0;
#X connect 31 1 0 1;
#X connect 31 1 14 1;
#X connect 31 1 15 0;
#X connect 31 2 3 0;
#X connect 31 2 10 0;
#X connect 31 2 33 0;
#X connect 31 3 17 0;
#X connect 31 3 32 0;
#X connect 32 0 33 0;
#X connect 32 1 33 1;
#X connect 33 0 34 0;
#X connect 33 0 39 0;
#X connect 33 0 41 0;
#X connect 34 0 38 0;
#X connect 35 0 36 0;
#X connect 35 0 43 0;
#X connect 35 0 44 0;
#X connect 35 0 45 0;
#X connect 35 0 53 0;
#X connect 35 0 51 0;
#X connect 36 0 34 0;
#X connect 36 0 39 0;
#X connect 36 0 41 0;
#X connect 38 0 37 0;
#X connect 39 0 47 0;
#X connect 41 0 48 0;
#X connect 43 0 37 2;
#X connect 44 0 40 2;
#X connect 45 0 42 2;
#X connect 46 0 67 0;
#X connect 47 0 40 0;
#X connect 48 0 42 0;
#X connect 49 0 25 0;
#X connect 50 0 24 0;
#X connect 51 0 19 1;
#X connect 51 0 52 0;
#X connect 52 0 22 0;
#X connect 53 0 49 0;
#X connect 53 0 50 0;
#X connect 54 0 67 0;
#X connect 56 0 65 0;
#X connect 57 0 59 0;
#X connect 58 0 64 0;
#X connect 59 0 52 0;
#X connect 60 0 53 0;
#X connect 61 0 60 0;
#X connect 62 0 29 0;
#X connect 63 0 62 0;
#X connect 64 0 63 0;
#X connect 65 0 61 0;
#X connect 67 0 55 0;
#X restore 181 147 pd chgem;
#X obj 301 20 gemhead;
#X obj 306 41 spigot;
#X obj 80 17 tgl 15 0 empty empty full 0 -6 0 8 -262144 -1 -1 0 1;
#X obj 297 64 world_light;
#X obj 136 68 f 0;
#X obj 167 31 select 0 1;
#X msg 165 91 create \, lighting 1 \, fullscreen \$1 \, 1;
#X connect 0 0 5 0;
#X connect 1 0 5 1;
#X connect 2 0 5 2;
#X connect 3 0 5 3;
#X connect 4 0 11 0;
#X connect 6 0 9 0;
#X connect 8 0 10 1;
#X connect 10 0 12 0;
#X connect 11 0 0 0;
#X connect 11 1 10 0;
#X connect 12 0 5 0;
#X coords 0 0 1 1 150 120 1;