Skip to content

Commit

Permalink
optimize scope3d
Browse files Browse the repository at this point in the history
  • Loading branch information
ben-wes committed Jun 24, 2024
1 parent 91ac060 commit 6b11c89
Show file tree
Hide file tree
Showing 3 changed files with 131 additions and 173 deletions.
58 changes: 0 additions & 58 deletions x/rotate_2d.pd

This file was deleted.

42 changes: 42 additions & 0 deletions x/rotate_2d~.pd
Original file line number Diff line number Diff line change
@@ -0,0 +1,42 @@
#N canvas 214 86 516 357 10;
#X text 48 67 coordinate input;
#X text 310 68 rotation angles in radians;
#X text 369 292 Ben Wesch \, 2024;
#X obj 74 90 inlet~;
#X obj 196 90 inlet~;
#X obj 278 46 loadbang;
#X obj 278 68 f \$1;
#X obj 278 90 inlet~;
#X text 118 91 x;
#X text 242 91 y;
#X text 323 89 z-rotation;
#X obj 89 172 cos~;
#X obj 196 222 *~;
#X obj 164 291 outlet~;
#X obj 106 222 *~;
#X obj 164 222 *~;
#X obj 74 222 *~;
#X obj 74 253 -~;
#X obj 164 253 +~;
#X obj 74 291 outlet~;
#X obj 179 172 cos~;
#X obj 179 151 -~ 0.25;
#X connect 3 0 15 0;
#X connect 3 0 16 0;
#X connect 4 0 12 0;
#X connect 4 0 14 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 11 0;
#X connect 7 0 21 0;
#X connect 11 0 12 1;
#X connect 11 0 16 1;
#X connect 12 0 18 1;
#X connect 14 0 17 1;
#X connect 15 0 18 0;
#X connect 16 0 17 0;
#X connect 17 0 19 0;
#X connect 18 0 13 0;
#X connect 20 0 14 1;
#X connect 20 0 15 1;
#X connect 21 0 20 0;
204 changes: 89 additions & 115 deletions x/scope3d.pd
Original file line number Diff line number Diff line change
@@ -1,153 +1,127 @@
#N canvas 476 163 852 793 10;
#N canvas 476 163 787 666 10;
#X obj 367 247 bang~;
#X obj 100 467 inlet~;
#X obj 134 300 inlet~;
#X obj 547 332 pointer;
#X msg 586 263 clear;
#X msg 513 312 0 0;
#X obj 367 360 until;
#X obj 367 339 t f b;
#X obj 367 381 f;
#X obj 394 381 + 1;
#X msg 405 360 0;
#X obj 513 95 loadbang;
#X obj 540 138 f \$1;
#X obj 540 159 sel 0;
#X obj 367 318 f;
#X obj 482 312 f;
#X obj 99 655 array define \$0-data-x 64;
#X obj 99 676 array define \$0-data-y 64;
#X obj 501 556 array define \$0-data-x 64;
#X obj 501 577 array define \$0-data-y 64;
#X obj 513 116 t b b;
#X obj 540 201 s \$0-blocksize;
#X obj 682 95 r \$0-blocksize;
#X obj 641 95 r \$0-blocksize;
#X obj 382 95 r \$0-blocksize;
#X obj 367 140 array size \$0-data-x;
#X obj 367 161 array size \$0-data-y;
#X obj 682 137 block~;
#X obj 641 137 block~;
#X obj 513 241 t b b b b;
#N canvas 647 566 604 202 \$0-path-template 0;
#X obj 67 105 struct \$0-path-template float x float y array \$0-data \$0-data-template, f 70;
#X obj 68 135 plot -e 0 \$0-data 0 1 0 0;
#X restore 100 598 pd \$0-path-template;
#X restore 348 557 pd \$0-path-template;
#N canvas 706 152 450 300 \$0-data-template 0;
#X obj 60 46 struct \$0-data-template float x float y;
#X restore 99 619 pd \$0-data-template;
#X restore 347 578 pd \$0-data-template;
#X obj 513 363 append \$0-path-template x y;
#X obj 586 284 s pd-\$0-display;
#X obj 547 284 f \$0;
#X msg 547 311 traverse pd-\$1-display \, bang;
#X obj 482 402 setsize \$0-path-template \$0-data;
#X obj 508 685 element \$0-path-template \$0-data;
#X obj 99 696 array define \$0-data-z 64;
#X obj 367 706 set \$0-data-template x y;
#X obj 367 402 t f f f f;
#X obj 367 181 array size \$0-data-z;
#X obj 418 657 /;
#X obj 392 686 *;
#X obj 367 686 *;
#X msg 540 180 1024;
#X obj 418 615 + 6;
#X msg 418 636 6 \$1;
#N canvas 92 117 450 300 rotate 0;
#X obj 38 85 f;
#X obj 38 223 outlet;
#X obj 79 85 + 1;
#X obj 38 151 * 6.28319;
#X obj 38 59 inlet;
#X obj 110 85 mod 2000;
#X obj 38 111 / 2000;
#X connect 0 0 2 0;
#X connect 0 0 6 0;
#X connect 2 0 5 0;
#X connect 3 0 1 0;
#X connect 4 0 0 0;
#X connect 5 0 0 1;
#X connect 6 0 3 0;
#X restore 513 453 pd rotate;
#X text 423 556 y <--> x;
#X connect 0 0 5 0;
#X connect 2 0 4 0;
#X connect 3 0 0 0;
#X connect 4 0 0 1;
#X connect 5 0 1 0;
#X restore 394 318 pd rotate;
#X obj 367 283 t b b;
#X text 429 522 rotate y (order of input is y x z);
#X obj 100 102 vsl 140 135 -1.5708 1.5708 0 0 \$0-vsl-s \$0-vsl-r x/scope3d 2 6 0 10 #ffffff #ffffff #000000 0 1;
#X obj 668 534 loadbang;
#X msg 668 555 -0.6;
#X obj 668 576 s \$0-vsl-r;
#X text 428 592 rotate x;
#X obj 599 576 r \$0-vsl-s;
#X text 553 596 mouse rotation around x-axis with slider;
#X obj 100 102 vsl 140 135 -0.25 0.25 0 0 \$0-vsl-s \$0-vsl-r x/scope3d 2 6 0 10 #ffffff #ffffff #000000 0 1;
#X obj 289 262 loadbang;
#X obj 289 304 s \$0-vsl-r;
#X obj 220 304 r \$0-vsl-s;
#X text 40 261 mouse rotation around x-axis with slider;
#N canvas 92 117 513 497 \$0-display 0;
#X coords -1 1 1 -1 140 140 2 100 100;
#X restore 100 100 pd \$0-display;
#X msg 682 116 set \$1 2 0.5;
#X obj 100 495 *~ 1.04;
#X obj 367 453 array get \$0-data-y 0 1;
#X obj 384 474 array get \$0-data-x 0 1;
#X obj 401 495 array get \$0-data-z 0 1;
#X obj 100 525 tabsend~ \$0-data-x \$0-data-y \$0-data-z;
#X obj 367 522 rotate_2d;
#X obj 367 592 rotate_2d;
#X obj 367 555 swap;
#X connect 0 0 45 0;
#X connect 1 0 56 0;
#X connect 2 0 27 2;
#X connect 3 0 28 0;
#X connect 4 0 27 0;
#X connect 5 0 7 0;
#X connect 6 0 5 0;
#X connect 6 1 9 0;
#X connect 7 0 8 0;
#X connect 7 0 35 0;
#X connect 8 0 7 1;
#X connect 9 0 7 1;
#X connect 10 0 17 0;
#X connect 11 0 12 0;
#X connect 12 0 40 0;
#X connect 12 1 18 0;
#X connect 13 0 6 0;
#X connect 14 0 31 0;
#X connect 17 0 24 0;
#X connect 17 1 11 0;
#X connect 19 0 55 0;
#X connect 20 0 14 1;
#X connect 20 0 13 1;
#X connect 20 0 21 0;
#X connect 20 0 22 0;
#X connect 20 0 36 0;
#X connect 24 0 14 0;
#X connect 24 1 4 0;
#X connect 24 2 29 0;
#X connect 24 3 3 0;
#X connect 27 0 31 1;
#X connect 27 0 32 1;
#X connect 29 0 30 0;
#X connect 30 0 2 0;
#X connect 32 0 34 2;
#X connect 35 0 57 0;
#X connect 35 1 58 0;
#X connect 35 2 59 0;
#X connect 35 3 32 0;
#X connect 37 0 38 1;
#X connect 37 0 39 1;
#X connect 38 0 34 1;
#X connect 39 0 34 0;
#X connect 40 0 18 0;
#X connect 41 0 42 0;
#X connect 42 0 37 0;
#X connect 43 0 61 3;
#X connect 45 0 13 0;
#X connect 45 1 43 0;
#X connect 48 0 49 0;
#X connect 49 0 50 0;
#X connect 52 0 62 3;
#X connect 55 0 23 0;
#X connect 56 0 60 0;
#X connect 57 0 61 0;
#X connect 58 0 61 1;
#X connect 59 0 61 2;
#X connect 61 0 63 0;
#X connect 61 1 63 1;
#X connect 61 2 62 2;
#X connect 62 0 39 0;
#X connect 62 1 38 0;
#X connect 62 2 41 0;
#X connect 63 0 62 0;
#X connect 63 1 62 1;
#X msg 641 116 set \$1 2 0.5;
#X obj 134 328 *~ 1.04;
#X text 77 397 y <--> x;
#X text 203 372 rotate y (order of input is y x z);
#X text 231 442 rotate x;
#X obj 134 372 rotate_2d~;
#X obj 163 442 rotate_2d~;
#X obj 134 349 snake~ out 3;
#X obj 220 465 +~ 6;
#X obj 220 485 pow~ -1;
#X obj 220 506 *~ 6;
#X obj 163 536 *~;
#X obj 134 536 *~;
#X obj 134 557 tabsend~ \$0-data-x;
#X obj 163 578 tabsend~ \$0-data-y;
#X obj 347 436 array get \$0-data-x;
#X obj 366 457 array get \$0-data-y;
#X obj 366 478 array set -s \$0-path-template \$0-data -f \$0-data-template y;
#X obj 347 499 array set -s \$0-path-template \$0-data -f \$0-data-template x;
#X msg 289 283 -0.1;
#X connect 0 0 28 0;
#X connect 1 0 36 0;
#X connect 2 0 21 2;
#X connect 3 0 22 0;
#X connect 4 0 21 0;
#X connect 5 0 11 0;
#X connect 6 0 7 0;
#X connect 7 0 26 0;
#X connect 7 1 12 0;
#X connect 8 0 25 0;
#X connect 11 0 18 0;
#X connect 11 1 6 0;
#X connect 13 0 35 0;
#X connect 14 0 8 1;
#X connect 14 0 15 0;
#X connect 14 0 16 0;
#X connect 18 0 8 0;
#X connect 18 1 4 0;
#X connect 18 2 23 0;
#X connect 18 3 3 0;
#X connect 21 0 25 1;
#X connect 21 0 52 2;
#X connect 21 0 53 2;
#X connect 23 0 24 0;
#X connect 24 0 2 0;
#X connect 26 0 12 0;
#X connect 27 0 40 2;
#X connect 28 0 50 0;
#X connect 28 0 51 0;
#X connect 28 1 27 0;
#X connect 30 0 54 0;
#X connect 32 0 41 2;
#X connect 35 0 17 0;
#X connect 36 0 42 0;
#X connect 40 0 47 0;
#X connect 40 1 41 1;
#X connect 41 0 46 0;
#X connect 41 1 43 0;
#X connect 42 0 40 0;
#X connect 42 1 41 0;
#X connect 42 2 40 1;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 45 0 46 1;
#X connect 45 0 47 1;
#X connect 46 0 49 0;
#X connect 47 0 48 0;
#X connect 50 0 53 0;
#X connect 51 0 52 0;
#X connect 54 0 31 0;
#X coords 0 -1 1 1 140 140 1 100 100;

0 comments on commit 6b11c89

Please sign in to comment.