Mercurial > hg > weather-synthesis-prototyping

annotate SwordAutoD2/centreAngles.pd @ 306:c57f401165ca tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New Decision tree added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 13 Jan 2018 14:47:35 +0000
parents 0ce3b6ae1866
children
rev   line source
r@187 1 #N canvas 55 100 1362 700 10;
r@187 2 #X obj 58 160 f;
r@187 3 #X obj 58 117 r GO;
r@187 4 #X obj 73 138 r preswingTime;
r@187 5 #X obj 220 117 r setUp;
r@187 6 #X text 203 98 Start at 0 speed;
r@187 7 #X obj 235 138 r presweepAzim;
r@187 8 #X obj 220 161 f;
r@187 9 #X msg 220 184 \$1;
r@187 10 #X obj 344 62 t f b;
r@187 11 #X obj 345 90 delay;
r@187 12 #X obj 359 17 r preswingTime;
r@187 13 #X obj 366 139 r postswingTime;
r@187 14 #X obj 344 -3 r GO;
r@187 15 #X obj 344 39 f;
r@187 16 #X obj 345 117 f;
r@187 17 #X obj 345 162 pack;
r@187 18 #X obj 387 91 r postsweepAzim;
r@187 19 #X msg 345 188 \$1 \$2;
r@187 20 #X obj 168 117 r myEnd;
r@187 21 #X obj 847 129 f;
r@187 22 #X obj 847 86 r GO;
r@187 23 #X obj 868 152 r preswingTime;
r@187 24 #X obj 1018 151 r setUp;
r@187 25 #X text 1001 132 Start at 0 speed;
r@187 26 #X obj 1018 195 f;
r@187 27 #X msg 1018 218 \$1;
r@187 28 #X obj 1130 95 t f b;
r@187 29 #X obj 1131 123 delay;
r@187 30 #X obj 1145 50 r preswingTime;
r@187 31 #X obj 1152 172 r postswingTime;
r@187 32 #X obj 1130 30 r GO;
r@187 33 #X obj 1130 72 f;
r@187 34 #X obj 1131 150 f;
r@187 35 #X obj 1131 195 pack;
r@187 36 #X msg 1131 221 \$1 \$2;
r@187 37 #X obj 1033 172 r presweepElev;
r@187 38 #X obj 1173 98 r postsweepElev;
r@187 39 #X obj 847 176 pack;
r@187 40 #X obj 862 108 r midElev;
r@187 41 #X msg 847 210 \$1 \$2;
r@187 42 #X obj 647 94 +;
r@187 43 #X obj 632 121 /;
r@187 44 #X obj 605 73 t f f;
r@187 45 #X obj 647 144 r presweepElev;
r@187 46 #X obj 662 166 r postsweepElev;
r@187 47 #X obj 647 50 r postswingTime;
r@187 48 #X obj 662 72 r preswingTime;
r@187 49 #X obj 632 219 *;
r@187 50 #X obj 632 287 s midElev;
r@187 51 #X text 523 -7 Calculate the angles with respect to the centre of the
r@187 52 swing circle;
r@187 53 #X obj 969 150 r myEnd;
r@187 54 #X obj 647 195 -;
r@187 55 #X obj 632 262 +;
r@187 56 #X obj 647 239 r postsweepElev;
r@187 57 #X msg 58 183 180 \$1;
r@187 58 #X obj 220 242 outlet~;
r@187 59 #X obj 1018 278 outlet~;
r@187 60 #X obj 220 218 line~;
r@187 61 #X obj 1018 252 line~;
r@187 62 #X text 283 237 Current Sword Azimuth angle;
r@187 63 #X text 1081 271 Current Sword Elevation angle;
r@187 64 #X connect 0 0 54 0;
r@187 65 #X connect 1 0 0 0;
r@187 66 #X connect 2 0 0 1;
r@187 67 #X connect 3 0 6 0;
r@187 68 #X connect 5 0 6 1;
r@187 69 #X connect 6 0 7 0;
r@187 70 #X connect 7 0 57 0;
r@187 71 #X connect 8 0 9 1;
r@187 72 #X connect 8 1 9 0;
r@187 73 #X connect 9 0 14 0;
r@187 74 #X connect 10 0 13 1;
r@187 75 #X connect 11 0 15 1;
r@187 76 #X connect 12 0 13 0;
r@187 77 #X connect 13 0 8 0;
r@187 78 #X connect 14 0 15 0;
r@187 79 #X connect 15 0 17 0;
r@187 80 #X connect 16 0 14 1;
r@187 81 #X connect 17 0 57 0;
r@187 82 #X connect 18 0 6 0;
r@187 83 #X connect 19 0 37 0;
r@187 84 #X connect 20 0 19 0;
r@187 85 #X connect 21 0 37 1;
r@187 86 #X connect 22 0 24 0;
r@187 87 #X connect 24 0 25 0;
r@187 88 #X connect 25 0 58 0;
r@187 89 #X connect 26 0 27 1;
r@187 90 #X connect 26 1 27 0;
r@187 91 #X connect 27 0 32 0;
r@187 92 #X connect 28 0 31 1;
r@187 93 #X connect 29 0 33 1;
r@187 94 #X connect 30 0 31 0;
r@187 95 #X connect 31 0 26 0;
r@187 96 #X connect 32 0 33 0;
r@187 97 #X connect 33 0 34 0;
r@187 98 #X connect 34 0 58 0;
r@187 99 #X connect 35 0 24 1;
r@187 100 #X connect 36 0 32 1;
r@187 101 #X connect 37 0 39 0;
r@187 102 #X connect 38 0 19 1;
r@187 103 #X connect 39 0 58 0;
r@187 104 #X connect 40 0 41 1;
r@187 105 #X connect 41 0 47 0;
r@187 106 #X connect 42 0 40 0;
r@187 107 #X connect 42 1 41 0;
r@187 108 #X connect 43 0 51 0;
r@187 109 #X connect 44 0 51 1;
r@187 110 #X connect 45 0 42 0;
r@187 111 #X connect 46 0 40 1;
r@187 112 #X connect 47 0 52 0;
r@187 113 #X connect 50 0 24 0;
r@187 114 #X connect 51 0 47 1;
r@187 115 #X connect 52 0 48 0;
r@187 116 #X connect 53 0 52 1;
r@187 117 #X connect 54 0 57 0;
r@187 118 #X connect 57 0 55 0;
r@187 119 #X connect 58 0 56 0;