[PD-cvs] SF.net SVN: pure-data: [9810] trunk/externals/hcs/examples/move_pd_window. pd

eighthave at users.sourceforge.net eighthave at users.sourceforge.net
Thu May 15 16:22:00 CEST 2008


Revision: 9810
          http://pure-data.svn.sourceforge.net/pure-data/?rev=9810&view=rev
Author:   eighthave
Date:     2008-05-15 07:22:00 -0700 (Thu, 15 May 2008)

Log Message:
-----------
created example using [sys_gui] and [window_name] to move the windows around, including the Pd window

Added Paths:
-----------
    trunk/externals/hcs/examples/move_pd_window.pd

Added: trunk/externals/hcs/examples/move_pd_window.pd
===================================================================
--- trunk/externals/hcs/examples/move_pd_window.pd	                        (rev 0)
+++ trunk/externals/hcs/examples/move_pd_window.pd	2008-05-15 14:22:00 UTC (rev 9810)
@@ -0,0 +1,39 @@
+#N canvas 532 145 637 496 10;
+#X symbolatom 247 208 0 0 0 0 - - -;
+#X obj 232 155 pack 0 0;
+#X text 72 -108 move the Pd window around;
+#X text 29 337 You can do lots of things using Tcl/Tk commands:;
+#X obj 328 338 pddp/pddplink http://tcl.tk/man/tcl8.4/TkCmd/wm.htm
+;
+#X obj 246 130 trigger bang float;
+#X obj 53 -76 unauthorized/grid pdwin 200 0 800 150 0 600 0 4 5 10
+10 65 -53;
+#X obj 232 186 zexy/makesymbol +%s+%s;
+#X obj 246 109 -;
+#X msg 246 86 600 \$1;
+#X text 412 234 "." means the Pd window;
+#X obj 232 259 pack symbol symbol;
+#X msg 232 281 wm geometry \$2 \$1;
+#X obj 337 238 symbol;
+#X msg 395 206 .;
+#X obj 395 182 loadbang;
+#X obj 471 205 hcs/window_name;
+#X obj 231 308 hcs/sys_gui;
+#X msg 471 181 bang;
+#X text 503 178 current window;
+#X connect 1 0 7 0;
+#X connect 5 0 1 0;
+#X connect 5 1 1 1;
+#X connect 6 0 1 0;
+#X connect 6 1 9 0;
+#X connect 7 0 0 0;
+#X connect 7 0 11 0;
+#X connect 8 0 5 0;
+#X connect 9 0 8 0;
+#X connect 11 0 12 0;
+#X connect 12 0 17 0;
+#X connect 13 0 11 1;
+#X connect 14 0 13 0;
+#X connect 15 0 14 0;
+#X connect 16 0 13 0;
+#X connect 18 0 16 0;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.




More information about the Pd-cvs mailing list