groworld/bamboo/llink.pd

#N canvas 845 227 566 540 10;
#X obj 101 405 sendOSC;
#X msg 204 361 disconnect;
#X msg 204 342 connect localhost 88008;
#X obj 492 251 freadln;
#X obj 494 281 fwriteln;
#X obj 495 315 textfile;
#N canvas 891 74 194 300 colouric 1;
#X obj 59 29 vsl 15 128 0 255 0 0 empty empty R 0 -9 0 10 -258113 -1
-1 4700 1;
#X obj 59 175 / 255;
#X obj 80 29 vsl 15 128 0 255 0 0 empty empty G 0 -9 0 10 -4034 -1
-1 4300 1;
#X obj 80 175 / 255;
#X obj 101 29 vsl 15 128 0 255 0 0 empty empty B 0 -9 0 10 -4160 -1
-1 12000 1;
#X obj 101 175 / 255;
#X obj 122 29 vsl 15 128 0 255 0 0 empty empty A 0 -9 0 10 -228856
-1 -1 0 1;
#X obj 122 175 / 255;
#X obj 59 233 outlet;
#X obj 31 176 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 59 205 pack 0 0 0;
#X connect 0 0 1 0;
#X connect 1 0 10 0;
#X connect 2 0 3 0;
#X connect 2 0 9 0;
#X connect 3 0 10 1;
#X connect 4 0 5 0;
#X connect 4 0 9 0;
#X connect 5 0 10 2;
#X connect 6 0 7 0;
#X connect 6 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X restore 192 123 pd colouric;
#N canvas 772 366 491 425 file-selector 0;
#X symbolatom -331 49 50 0 0 0 - - -;
#X obj -332 -171 playlist all 400 200 {Monaco 10 normal} #a2a9ff yellow
black red;
#X symbolatom -330 72 50 0 0 0 - - -;
#X symbolatom -329 96 50 0 0 0 - - -;
#X obj -555 -157 loadbang;
#X msg -404 -69 scroll 200;
#X msg -408 -45 scroll -200;
#X obj -453 -104 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1
1 1;
#X msg -543 -104 graphics \$1;
#X msg -430 -105 1;
#X obj -397 -104 loadbang;
#X msg -555 -128 font Monaco normal 10;
#N canvas 0 22 450 300 | 0;
#X obj 198 67 inlet;
#X obj 187 127 outlet;
#X connect 0 0 1 0;
#X restore -377 -194 pd |;
#X obj -416 133 outlet;
#X msg -340 -257 location /Users/zzk/code/groworld;
#X obj -371 133 outlet;
#X msg -512 -182 sort \$1;
#X obj 11 -192 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X obj 30 -193 s sort;
#X obj -554 -181 r sort;
#X text -124 -316 comment;
#X msg -339 -236 location /Users/zzk/Desktop;
#X connect 0 0 13 0;
#X connect 1 0 0 0;
#X connect 1 1 2 0;
#X connect 1 2 3 0;
#X connect 2 0 15 0;
#X connect 4 0 11 0;
#X connect 5 0 12 0;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 12 0;
#X connect 9 0 7 0;
#X connect 10 0 9 0;
#X connect 11 0 12 0;
#X connect 12 0 1 0;
#X connect 14 0 12 0;
#X connect 16 0 12 0;
#X connect 17 0 18 0;
#X connect 19 0 16 0;
#X connect 21 0 12 0;
#X coords 0 0 1 1 200 100 0;
#X restore 60 128 pd file-selector;
#N canvas 846 285 450 300 rndd 0;
#X obj 121 42 struct rgbox float r float g float b;
#X obj 123 83 drawpolygon;
#X restore 499 212 pd rndd;
#N canvas 270 173 450 300 send-texture 0;
#X obj 39 76 inlet;
#X obj 36 210 outlet;
#X symbolatom 162 89 20 0 0 0 - - -;
#X obj 162 37 inlet;
#X obj 20 133 sprintf send /code (set-texture_"%s");
#X connect 0 0 4 0;
#X connect 3 0 2 0;
#X connect 4 0 1 0;
#X coords 0 0 1 1 85 60 0;
#X restore 59 152 pd send-texture;
#X obj 71 182 print;
#X msg 203 297 send /ping;
#X msg 204 321 connect localhost 88009;
#X text 356 342 < fluxus;
#X text 355 321 < test;
#N canvas 270 173 450 300 send-colour 0;
#X obj 86 76 inlet;
#X obj 36 165 outlet;
#X symbolatom 231 57 20 0 0 0 - - -;
#X obj 231 32 inlet;
#X obj 84 101 unpack 0 0 0;
#X obj 20 133 sprintf send /code (set-colour_%s_%s_%s);
#X connect 0 0 4 0;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 4 1 5 1;
#X connect 4 2 5 2;
#X connect 5 0 1 0;
#X coords 0 0 1 1 85 60 0;
#X restore 193 149 pd send-colour;
#X obj 101 405 sendOSC;
#X obj 493 170 dumpOSC;
#X obj 69 360 r sosc;
#X obj 60 208 s sosc;
#X obj 193 176 s sosc;
#X obj 313 187 s sosc;
#N canvas 771 56 171 283 rotor 0;
#X obj 56 24 vsl 15 128 0 255 0 0 empty empty X 0 -9 0 10 -228856 -1
-1 1600 1;
#X obj 77 24 vsl 15 128 0 255 0 0 empty empty Y 0 -9 0 10 -228856 -1
-1 2500 1;
#X obj 98 24 vsl 15 128 0 255 0 0 empty empty Z 0 -9 0 10 -228856 -1
-1 2900 1;
#X obj 56 228 outlet;
#X obj 28 171 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 56 200 pack 0 0 0;
#X obj 97 170 / 1;
#X obj 77 170 / 1;
#X obj 56 170 / 1;
#X text 85 4;
#X connect 0 0 8 0;
#X connect 1 0 4 0;
#X connect 1 0 7 0;
#X connect 2 0 4 0;
#X connect 2 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X connect 6 0 5 2;
#X connect 7 0 5 1;
#X connect 8 0 5 0;
#X restore 312 134 pd rotor;
#N canvas 305 439 450 300 send-rotor 0;
#X obj 86 76 inlet;
#X obj 36 165 outlet;
#X symbolatom 231 57 20 0 0 0 - - -;
#X obj 231 32 inlet;
#X obj 84 101 unpack 0 0 0;
#X obj 20 133 sprintf send /code (set-rotor_%s_%s_%s);
#X connect 0 0 4 0;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 4 1 5 1;
#X connect 4 2 5 2;
#X connect 5 0 1 0;
#X coords 0 0 1 1 85 60 0;
#X restore 313 160 pd send-rotor;
#X text 71 451 simple example of setting texture \, colour and rotation
of an object in fluxus. requires llink.scm to be running in fluxus
;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 6 0 15 0;
#X connect 7 0 9 0;
#X connect 7 1 9 1;
#X connect 9 0 10 0;
#X connect 9 0 19 0;
#X connect 11 0 0 0;
#X connect 12 0 0 0;
#X connect 15 0 20 0;
#X connect 18 0 0 0;
#X connect 22 0 23 0;
#X connect 23 0 21 0;