#N canvas 639 83 429 410 10;
#X obj 219 289 *~;
#X obj 219 342 output~;
#X obj 219 315 hip~ 5;
#X obj 256 264 vline~;
#X obj 181 175 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 220 175 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 188 264 osc~ 440;
#N canvas 466 327 354 442 key2 0;
#X obj 41 24 key;
#X obj 178 24 keyup;
#X obj 41 352 change;
#X floatatom 41 325 5 0 0 0 - - -;
#X floatatom 135 325 5 0 0 0 - - -;
#X floatatom 168 219 5 0 0 0 - - -;
#X obj 41 52 trigger f b f;
#X msg 178 79 0;
#X msg 78 79 1;
#X obj 98 134 tabwrite \$0-keystate;
#X obj 135 163 delay 10;
#X obj 168 243 tabread \$0-keystate;
#X obj 135 269 ==;
#X floatatom 98 106 5 0 0 0 - - -;
#X obj 135 295 select 1;
#X obj 178 52 trigger b f f;
#X msg 253 134 set \$1;
#X obj 135 189 trigger b b;
#X msg 135 218 0;
#X msg 86 325 set 0;
#X obj 41 385 outlet;
#X obj 135 385 outlet;
#X text 137 404 keyup;
#X text 39 404 keydown;
#X text 55 106 on/off;
#X text 197 339 memorize key states;
#X obj 193 358 table \$0-keystate 256;
#X connect 0 0 6 0;
#X connect 1 0 15 0;
#X connect 2 0 20 0;
#X connect 3 0 2 0;
#X connect 4 0 21 0;
#X connect 5 0 11 0;
#X connect 6 0 3 0;
#X connect 6 1 8 0;
#X connect 6 2 9 1;
#X connect 7 0 13 0;
#X connect 8 0 13 0;
#X connect 10 0 17 0;
#X connect 11 0 12 1;
#X connect 12 0 14 0;
#X connect 13 0 9 0;
#X connect 14 0 4 0;
#X connect 14 0 19 0;
#X connect 15 0 7 0;
#X connect 15 0 10 0;
#X connect 15 1 9 1;
#X connect 15 2 16 0;
#X connect 16 0 5 0;
#X connect 16 0 4 0;
#X connect 17 0 18 0;
#X connect 17 1 5 0;
#X connect 18 0 12 0;
#X connect 19 0 2 0;
#X restore 181 149 pd key2;
#X obj 26 50 vsl 15 128 0 250 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 600 1;
#X obj 56 50 vsl 15 128 0 500 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 2600 1;
#X obj 86 50 vsl 15 128 0 1 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 5200 1;
#X obj 116 50 vsl 15 128 0 2000 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 8900 1;
#X text 52 31 500;
#X text 89 31 1;
#X text 109 31 2000;
#X obj 26 253 send A;
#X obj 56 233 send D;
#X obj 86 213 send S;
#X obj 116 193 send R;
#X obj 165 24 receive A;
#X msg 165 234 1 11.811;
#X msg 217 214 0.409449 102.362 11.811;
#X msg 323 234 0 1401.57;
#X obj 165 117 prepend set 1;
#X obj 227 24 receive S;
#X obj 289 24 receive D;
#X obj 254 117 pack f f f;
#X obj 227 52 t b f;
#X obj 165 52 t b f;
#X obj 351 52 t b f;
#X obj 289 52 t b f;
#X obj 275 83 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 323 117 prepend set 0;
#X obj 254 149 prepend set;
#X obj 351 24 receive R;
#X text 22 31 250;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X connect 2 0 1 1;
#X connect 3 0 0 1;
#X connect 4 0 20 0;
#X connect 4 0 21 0;
#X connect 5 0 22 0;
#X connect 6 0 0 0;
#X connect 7 0 4 0;
#X connect 7 1 5 0;
#X connect 8 0 15 0;
#X connect 9 0 16 0;
#X connect 10 0 17 0;
#X connect 11 0 18 0;
#X connect 19 0 28 0;
#X connect 20 0 3 0;
#X connect 21 0 3 0;
#X connect 22 0 3 0;
#X connect 23 0 20 0;
#X connect 24 0 27 0;
#X connect 25 0 30 0;
#X connect 26 0 33 0;
#X connect 27 0 31 0;
#X connect 27 1 26 0;
#X connect 28 0 31 0;
#X connect 28 1 23 0;
#X connect 28 1 26 2;
#X connect 29 1 32 0;
#X connect 30 0 31 0;
#X connect 30 1 26 1;
#X connect 31 0 26 0;
#X connect 32 0 22 0;
#X connect 33 0 21 0;
#X connect 34 0 29 0;