144 lines
3.8 KiB
Text
144 lines
3.8 KiB
Text
#N canvas 1102 89 337 730 12;
|
|
#X declare -path ofelia/abs;
|
|
#X obj 17 61 loadbang;
|
|
#X obj 17 111 ofWindow;
|
|
#X obj 104 496 ofDraw;
|
|
#X obj 121 36 declare -path ofelia/abs;
|
|
#X text 7 10 <<<;
|
|
#X text 307 10 >>>;
|
|
#X text 7 690 <<<;
|
|
#X text 307 690 >>>;
|
|
#X floatatom 136 598 5 0 0 0 delta - -;
|
|
#X obj 147 577 hsl 128 15 0 0.03 0 0 empty empty empty -2 -8 0 10 -262144
|
|
-1 -1 0 1;
|
|
#X obj 55 553 loadbang;
|
|
#X msg 55 578 0.01;
|
|
#X obj 104 521 t b a;
|
|
#X obj 145 551 bng 15 250 50 0 \$0-ondraw empty s:0-ondraw 17 7 0 10
|
|
-262144 -1 -1;
|
|
#N canvas 386 529 1053 366 graph 0;
|
|
#N canvas 0 50 450 250 (subpatch) 0;
|
|
#X array \$0-graph 1000 float 2;
|
|
#X coords 0 300 1000 -300 1000 140 1 0 0;
|
|
#X restore 19 38 graph;
|
|
#N canvas 487 89 613 228 probe 0;
|
|
#X obj 234 108 f;
|
|
#X obj 264 108 + 1;
|
|
#X obj 202 18 bng 15 250 50 0 empty \$0-ondraw r:0-ondraw 17 7 0 10
|
|
-262144 -1 -1;
|
|
#X floatatom 234 158 5 0 0 0 - - -;
|
|
#X obj 118 182 tabwrite \$0-graph;
|
|
#X obj 234 133 mod 1000;
|
|
#X obj 202 48 t b b;
|
|
#X floatatom 18 92 5 0 0 0 - - -;
|
|
#X obj 18 23 loadbang;
|
|
#X msg 18 48 1;
|
|
#X obj 534 108 f;
|
|
#X obj 564 108 + 1;
|
|
#X obj 502 18 bng 15 250 50 0 empty \$0-ondraw r:0-ondraw 17 7 0 10
|
|
-262144 -1 -1;
|
|
#X floatatom 534 158 5 0 0 0 - - -;
|
|
#X obj 534 133 mod 1000;
|
|
#X obj 502 48 t b b;
|
|
#X floatatom 318 92 5 0 0 0 - - -;
|
|
#X obj 318 23 loadbang;
|
|
#X obj 418 182 tabwrite \$0-graph1;
|
|
#X msg 318 48 2;
|
|
#X obj 18 118 ofelia f \; return _bin.planets[a].pos.x;
|
|
#X obj 318 118 ofelia f \; return _bin.planets[a].pos.x;
|
|
#X connect 0 0 1 0;
|
|
#X connect 0 0 5 0;
|
|
#X connect 1 0 0 1;
|
|
#X connect 2 0 6 0;
|
|
#X connect 3 0 4 1;
|
|
#X connect 5 0 3 0;
|
|
#X connect 6 0 7 0;
|
|
#X connect 6 1 0 0;
|
|
#X connect 7 0 20 0;
|
|
#X connect 8 0 9 0;
|
|
#X connect 9 0 7 0;
|
|
#X connect 10 0 11 0;
|
|
#X connect 10 0 14 0;
|
|
#X connect 11 0 10 1;
|
|
#X connect 12 0 15 0;
|
|
#X connect 13 0 18 1;
|
|
#X connect 14 0 13 0;
|
|
#X connect 15 0 16 0;
|
|
#X connect 15 1 10 0;
|
|
#X connect 16 0 21 0;
|
|
#X connect 17 0 19 0;
|
|
#X connect 19 0 16 0;
|
|
#X connect 20 0 4 0;
|
|
#X connect 21 0 18 0;
|
|
#X restore 959 14 pd probe;
|
|
#N canvas 0 50 450 250 (subpatch) 0;
|
|
#X array \$0-graph1 1000 float 2;
|
|
#X coords 0 300 1000 -300 1000 140 1 0 0;
|
|
#X restore 19 208 graph;
|
|
#X restore 236 135 pd graph;
|
|
#X obj 17 161 ofSetup;
|
|
#X msg 17 186 bang;
|
|
#X msg 17 211 dir 0 data/DejaVuSansMono.ttf;
|
|
#X obj 17 236 pdcontrol;
|
|
#X obj 17 461 bng 15 250 50 0 empty empty setup_done 17 7 0 10 -262144
|
|
-1 -1;
|
|
#X obj 17 331 t b b;
|
|
#X msg 49 356 read -c sim.lua;
|
|
#X obj 17 406 ofelia f \; ofSetFrameRate(30) \; return nil \;;
|
|
#X obj 17 261 ofelia f \; font = ofTrueTypeFont() \; font:load(a \,
|
|
8) \; return nil \;;
|
|
#X obj 17 381 ofelia f;
|
|
#X msg 17 86 setPosition 500 0 \, setSize 600 600 \, create;
|
|
#X obj 17 661 print -n;
|
|
#X msg 17 636 setup done!;
|
|
#X obj 136 622 ofelia f -c21 \; _bin.simulate(a[1]) \; _bin.display()
|
|
\;;
|
|
#N canvas 1 89 450 300 test 0;
|
|
#X obj 35 193 osc~;
|
|
#X obj 35 218 dac~ 1;
|
|
#X floatatom 35 144 5 0 0 0 - - -;
|
|
#X obj 35 42 bng 15 250 50 0 empty \$0-ondraw r:0-ondraw 17 7 0 10
|
|
-262144 -1 -1;
|
|
#X floatatom 35 62 5 0 0 0 - - -;
|
|
#X obj 35 168 + 300;
|
|
#X obj 137 17 loadbang;
|
|
#X msg 137 42 1;
|
|
#X obj 92 163 skip 50;
|
|
#X floatatom 116 194 5 0 0 0 - - -;
|
|
#X floatatom 116 243 5 0 0 0 - - -;
|
|
#X obj 116 218 + 300;
|
|
#X obj 35 88 ofelia f \; return _bin.planets[a].pos.x;
|
|
#X connect 0 0 1 0;
|
|
#X connect 2 0 5 0;
|
|
#X connect 2 0 8 0;
|
|
#X connect 3 0 4 0;
|
|
#X connect 4 0 12 0;
|
|
#X connect 5 0 0 0;
|
|
#X connect 6 0 7 0;
|
|
#X connect 7 0 4 0;
|
|
#X connect 8 0 9 0;
|
|
#X connect 9 0 11 0;
|
|
#X connect 11 0 10 0;
|
|
#X connect 12 0 2 0;
|
|
#X restore 229 333 pd test;
|
|
#X connect 0 0 25 0;
|
|
#X connect 2 0 12 0;
|
|
#X connect 8 0 28 0;
|
|
#X connect 9 0 8 0;
|
|
#X connect 10 0 11 0;
|
|
#X connect 11 0 8 0;
|
|
#X connect 12 1 8 0;
|
|
#X connect 15 0 16 0;
|
|
#X connect 16 0 17 0;
|
|
#X connect 17 0 18 0;
|
|
#X connect 18 0 23 0;
|
|
#X connect 19 0 27 0;
|
|
#X connect 20 0 24 0;
|
|
#X connect 20 1 21 0;
|
|
#X connect 21 0 24 0;
|
|
#X connect 22 0 19 0;
|
|
#X connect 23 0 20 0;
|
|
#X connect 24 0 22 0;
|
|
#X connect 25 0 1 0;
|
|
#X connect 27 0 26 0;
|