Revision 61820aa5 patches/widget-spinConnect.pd
| b/patches/widget-spinConnect.pd | ||
|---|---|---|
| 1 | 1 |
#N canvas 0 68 1500 815 10; |
| 2 | 2 |
#X obj 1 1 cnv 15 325 38 empty empty SPIN.Connect: 2 9 1 11 -228856 |
| 3 | 3 |
-16662 0; |
| 4 |
#X obj 76 588 dynload1;
|
|
| 5 |
#X obj 129 570 bng 15 250 50 0 empty empty <-open-patch 17 7 0 10 -262144
|
|
| 4 |
#X obj 76 598 dynload1;
|
|
| 5 |
#X obj 129 580 bng 15 250 50 0 empty empty <-open-patch 17 7 0 10 -262144
|
|
| 6 | 6 |
-1 -1; |
| 7 | 7 |
#X symbolatom 50 66 16 0 0 0 SPIN_Rx: #0-rxAddr-set #0-rxAddr; |
| 8 | 8 |
#X obj 308 6 tgl 15 0 \$0-connect \$0-connect-set empty -60 9 1 11 |
| 9 |
-233017 -128992 -1 12456 12456;
|
|
| 9 |
-233017 -128992 -1 0 19703;
|
|
| 10 | 10 |
#X floatatom 199 64 5 0 0 0 udp: #0-rxPort-set #0-rxPort; |
| 11 | 11 |
#X symbolatom 50 81 16 0 0 0 SPIN_Tx: #0-txAddr-set #0-txAddr; |
| 12 | 12 |
#X floatatom 199 81 5 0 0 0 udp: #0-txPort-set #0-txPort; |
| 13 |
#X obj 124 377 t b s;
|
|
| 14 |
#X obj 167 396 t b f;
|
|
| 15 |
#X obj 124 357 r \$0-txAddr;
|
|
| 16 |
#X obj 167 377 r \$0-txPort;
|
|
| 17 |
#X obj 88 484 spigot;
|
|
| 18 |
#X obj -7 416 sel 1 0;
|
|
| 19 |
#X obj -7 373 r \$0-connect;
|
|
| 20 |
#X obj -7 394 t f f;
|
|
| 21 |
#X obj 106 514 pack 0 s 0 s;
|
|
| 22 |
#X obj 200 450 loadbang;
|
|
| 23 |
#X msg 106 536 dynamicOSCrx \$2 \$3 \$4;
|
|
| 24 |
#X obj 200 472 symbol \$0-SPIN-RX;
|
|
| 13 |
#X obj 124 387 t b s;
|
|
| 14 |
#X obj 167 406 t b f;
|
|
| 15 |
#X obj 124 367 r \$0-txAddr;
|
|
| 16 |
#X obj 167 387 r \$0-txPort;
|
|
| 17 |
#X obj 88 494 spigot;
|
|
| 18 |
#X obj -7 426 sel 1 0;
|
|
| 19 |
#X obj -7 383 r \$0-connect;
|
|
| 20 |
#X obj -7 404 t f f;
|
|
| 21 |
#X obj 106 524 pack 0 s 0 s;
|
|
| 22 |
#X obj 200 460 loadbang;
|
|
| 23 |
#X msg 106 546 dynamicOSCrx \$2 \$3 \$4;
|
|
| 24 |
#X obj 200 482 symbol \$0-SPIN-RX;
|
|
| 25 | 25 |
#X obj -44 692 cnv 15 475 50 empty empty empty 20 12 0 14 -257985 -66577 |
| 26 | 26 |
0; |
| 27 | 27 |
#X obj -38 668 OSCparse /SPIN/*; |
| ... | ... | |
| 33 | 33 |
#X text 70 696 <- This represents the receive. The dynamic patch above |
| 34 | 34 |
receives messages for SPIN. We route based on the sceneID and send |
| 35 | 35 |
to the global symbol \$1-from-SPIN; |
| 36 |
#X text 107 244 <sym> sceneID;
|
|
| 37 |
#X obj 57 240 outlet;
|
|
| 38 |
#X obj 219 237 outlet;
|
|
| 39 |
#X text 271 238 on-line status;
|
|
| 40 |
#X obj 89 460 delay 0;
|
|
| 36 |
#X text 107 234 <sym> sceneID;
|
|
| 37 |
#X obj 57 230 outlet;
|
|
| 38 |
#X obj 219 227 outlet;
|
|
| 39 |
#X text 271 228 on-line status;
|
|
| 40 |
#X obj 89 470 delay 0;
|
|
| 41 | 41 |
#X obj 164 5 r \$0-server-popup; |
| 42 | 42 |
#X symbolatom 50 47 20 0 0 0 sceneID: #0-id-set #0-id; |
| 43 | 43 |
#X obj 927 131 anyreg global-posReg; |
| 44 | 44 |
#X text 861 113 need one of these for copy/paste to work:; |
| 45 |
#X obj 405 594 dynload1;
|
|
| 46 |
#X obj 458 576 bng 15 250 50 0 empty empty <-open-patch 17 7 0 10 -262144
|
|
| 45 |
#X obj 405 604 dynload1;
|
|
| 46 |
#X obj 458 586 bng 15 250 50 0 empty empty <-open-patch 17 7 0 10 -262144
|
|
| 47 | 47 |
-1 -1; |
| 48 |
#X obj 453 383 t b s;
|
|
| 49 |
#X obj 496 402 t b f;
|
|
| 50 |
#X obj 453 363 r \$0-txAddr;
|
|
| 51 |
#X obj 417 490 spigot;
|
|
| 52 |
#X obj 322 422 sel 1 0;
|
|
| 53 |
#X obj 322 379 r \$0-connect;
|
|
| 54 |
#X obj 322 400 t f f;
|
|
| 55 |
#X obj 435 520 pack 0 s 0 s;
|
|
| 56 |
#X obj 515 475 loadbang;
|
|
| 57 |
#X msg 435 542 dynamicOSCrx \$2 \$3 \$4;
|
|
| 58 |
#X obj 418 466 delay 0;
|
|
| 59 |
#X obj 496 383 r \$0-syncPort;
|
|
| 60 |
#X obj 515 497 symbol \$0-SPIN-sync-RX;
|
|
| 48 |
#X obj 453 393 t b s;
|
|
| 49 |
#X obj 496 412 t b f;
|
|
| 50 |
#X obj 453 373 r \$0-txAddr;
|
|
| 51 |
#X obj 417 500 spigot;
|
|
| 52 |
#X obj 322 432 sel 1 0;
|
|
| 53 |
#X obj 322 389 r \$0-connect;
|
|
| 54 |
#X obj 322 410 t f f;
|
|
| 55 |
#X obj 435 530 pack 0 s 0 s;
|
|
| 56 |
#X obj 515 485 loadbang;
|
|
| 57 |
#X msg 435 552 dynamicOSCrx \$2 \$3 \$4;
|
|
| 58 |
#X obj 418 476 delay 0;
|
|
| 59 |
#X obj 496 393 r \$0-syncPort;
|
|
| 60 |
#X obj 515 507 symbol \$0-SPIN-sync-RX;
|
|
| 61 | 61 |
#X floatatom 277 81 5 0 0 0 sync: #0-syncPort-set #0-syncPort; |
| 62 | 62 |
#X obj 481 691 cnv 15 475 50 empty empty empty 20 12 0 14 -257985 -66577 |
| 63 | 63 |
0; |
| ... | ... | |
| 69 | 69 |
#X text 632 701 (same thing here) We route based on the sceneID and |
| 70 | 70 |
send to the global symbol \$1-from-SPIN-sync; |
| 71 | 71 |
#X obj 312 28 tgl 10 0 \$0-db-print \$0-db-print-set msg-print: -49 |
| 72 |
5 1 10 -228856 -162280 -162280 0 1;
|
|
| 72 |
5 1 10 -228856 -162280 -162280 1 1;
|
|
| 73 | 73 |
#X obj 987 442 r \$1-from-SPIN; |
| 74 | 74 |
#X obj 987 484 spigot; |
| 75 | 75 |
#X obj 1024 462 r \$0-db-print; |
| ... | ... | |
| 86 | 86 |
#X msg 999 307 refresh; |
| 87 | 87 |
#X msg 1059 307 userRefresh; |
| 88 | 88 |
#X obj 244 28 tgl 10 0 \$0-grid \$0-grid-set grid: -24 5 1 10 -228856 |
| 89 |
-162280 -162280 1 1;
|
|
| 89 |
-162280 -162280 0 1;
|
|
| 90 | 90 |
#X obj 1057 335 r \$0-grid; |
| 91 | 91 |
#X msg 1057 395 createNode grid GridNode; |
| 92 | 92 |
#X msg 1076 375 deleteNode grid; |
| ... | ... | |
| 228 | 228 |
#X connect 58 0 49 1; |
| 229 | 229 |
#X connect 59 0 51 0; |
| 230 | 230 |
#X restore 335 137 pd INFOPORT-STUFF; |
| 231 |
#X obj 140 147 r \$0-connect;
|
|
| 231 |
#X obj 140 137 r \$0-connect;
|
|
| 232 | 232 |
#X obj 503 182 s \$0-server-popup; |
| 233 | 233 |
#X obj 503 144 symbol; |
| 234 | 234 |
#X msg 503 163 name \$1; |
| 235 |
#X text 187 170 (Send something from outlets after initial connect)
|
|
| 235 |
#X text 187 160 (Send something from outlets after initial connect)
|
|
| 236 | 236 |
; |
| 237 |
#X obj 140 167 change;
|
|
| 238 |
#X obj 94 204 r \$0-id-set;
|
|
| 239 |
#X obj 57 222 symbol;
|
|
| 237 |
#X obj 140 157 change;
|
|
| 238 |
#X obj 94 194 r \$0-id-set;
|
|
| 239 |
#X obj 57 212 symbol;
|
|
| 240 | 240 |
#X obj 183 100 tgl 15 0 \$0-connect-tcp \$0-connect-tcp-set empty -60 |
| 241 |
9 1 11 -233017 -128992 -1 1 1;
|
|
| 241 |
9 1 11 -233017 -128992 -1 0 1;
|
|
| 242 | 242 |
#X text 23 101 TCP connection status:; |
| 243 | 243 |
#X obj 391 62 route sceneID; |
| 244 | 244 |
#X obj 391 96 t b a; |
| 245 |
#X obj 57 195 sel 1;
|
|
| 245 |
#X obj 57 185 sel 1;
|
|
| 246 | 246 |
#X obj 688 395 pack s s s; |
| 247 | 247 |
#X obj 739 294 loadbang; |
| 248 | 248 |
#X obj 653 118 r \$0-connect-tcp-rx; |
| ... | ... | |
| 257 | 257 |
0; |
| 258 | 258 |
#X text 896 621 (same thing here) We route based on the sceneID and |
| 259 | 259 |
send to the global symbol \$1-from-SPIN-TCP; |
| 260 |
#X obj 32 266 cnv 15 550 75 empty empty empty 20 12 0 14 -257985 -66577
|
|
| 260 |
#X obj 32 286 cnv 15 550 75 empty empty empty 20 12 0 14 -257985 -66577
|
|
| 261 | 261 |
0; |
| 262 |
#X obj 42 276 r \$1-to-SPIN;
|
|
| 263 |
#X text 139 275 <- This is a global send that everything uses!;
|
|
| 264 |
#X text 149 287 (the parent needs to send the \$1 arg for everything
|
|
| 262 |
#X obj 42 296 r \$1-to-SPIN;
|
|
| 263 |
#X text 139 295 <- This is a global send that everything uses!;
|
|
| 264 |
#X text 149 307 (the parent needs to send the \$1 arg for everything
|
|
| 265 | 265 |
to sync); |
| 266 | 266 |
#N canvas 284 115 1035 678 send-to-spin 0; |
| 267 | 267 |
#X floatatom 192 447 5 0 0 0 - - -; |
| ... | ... | |
| 391 | 391 |
#X connect 51 0 49 0; |
| 392 | 392 |
#X connect 52 0 32 0; |
| 393 | 393 |
#X connect 54 0 52 0; |
| 394 |
#X restore 42 322 pd send-to-spin;
|
|
| 395 |
#X obj 130 303 r \$1-to-SPIN-TCP;
|
|
| 394 |
#X restore 42 342 pd send-to-spin;
|
|
| 395 |
#X obj 130 323 r \$1-to-SPIN-TCP;
|
|
| 396 | 396 |
#X obj 492 665 OSCparse /SPIN/*; |
| 397 | 397 |
#X obj 628 649 OSCsymbol; |
| 398 | 398 |
#X msg 629 629 /SPIN \$1; |
| ... | ... | |
| 407 | 407 |
#X text 889 591 tCP MESSAGES PASSED TO "from-SPIN"; |
| 408 | 408 |
#X obj 823 299 uniquesym; |
| 409 | 409 |
#X obj 735 336 myIP; |
| 410 |
#X obj 153 2 popup 150 20 #dce4fc default mikes centor;
|
|
| 410 |
#X obj 153 2 popup 150 20 #dce4fc default; |
|
| 411 | 411 |
#X obj 769 -19 inlet; |
| 412 | 412 |
#X obj 798 352 shell; |
| 413 | 413 |
#X obj 811 51 anyreg LAST-SPIN-TCPrx-PORT 54327; |
| ... | ... | |
| 425 | 425 |
#X msg 688 416 subscribe \$3 \$2 \$1; |
| 426 | 426 |
#X obj 391 33 r PD_COMMANDLINE_MESS; |
| 427 | 427 |
#X obj 999 279 t b b; |
| 428 |
#X obj -6 255 s g_refresh_SPIN_typelist; |
|
| 428 | 429 |
#X connect 2 0 1 2; |
| 429 | 430 |
#X connect 8 0 32 0; |
| 430 | 431 |
#X connect 8 1 16 1; |
| ... | ... | |
| 500 | 501 |
#X connect 96 1 84 0; |
| 501 | 502 |
#X connect 96 1 87 0; |
| 502 | 503 |
#X connect 97 0 92 0; |
| 504 |
#X connect 97 0 148 0; |
|
| 503 | 505 |
#X connect 98 0 145 0; |
| 504 | 506 |
#X connect 99 0 128 0; |
| 505 | 507 |
#X connect 99 0 129 0; |
Also available in: Unified diff