#N struct 1038-symarray float x array symbols 1038-sym;
#N struct 1038-sym symbol name float on;
#N canvas 57 97 931 998 10;
#X declare -lib ratts;
#X obj 42 -252 gemwin;
#X msg 52 -282 0 \, destroy;
#X msg 42 -312 border 0 \, offset 1920 0 \, dimen 1024 768 \, create
\, 1;
#X obj 348 114 r holmes-play;
#X obj 396 79 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 348 194 metro 10;
#X floatatom 40 233 5 0 0 0 - - -;
#X msg 40 254 basec \$1;
#X obj 226 150 guessphones;
#X obj 226 180 phones2holmes;
#X obj 226 340 holmes;
#X obj 226 360 klatt~;
#X obj 42 -222 import ratts;
#X obj 471 -216 hsl 128 15 4000 0 0 0 empty empty empty -2 -8 0 10
-4034 -1 -1 0 1;
#X obj 358 164 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X msg 246 310 clear;
#X obj 468 -196 expr ($f1 / 2)/100;
#X floatatom 468 -174 5 0 0 0 - - -;
#X msg 199 -284 dimen 1024 768 \, create \, 1;
#X obj 224 509 dac~;
#X obj 358 144 loadbang;
#X obj 468 -280 metro;
#X obj 388 -291 tgl 30 0 empty empty empty 17 7 0 10 -258113 -1 -1
0 1;
#X obj 468 -23 spigot;
#X obj 225 451 *~ 0.1;
#X obj 261 431 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 258 411 maxlib/scale 0 127 0 1 0;
#X obj 258 391 ctlin 7;
#X obj 41 150 maxlib/scale 0 127 0.1 5 0;
#X obj 40 127 ctlin 22;
#X obj 41 185 knob 32 32 0.1 5 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 501 -88 loadbang;
#X obj 246 270 bng 30 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X text 287 275 clear;
#X obj 246 230 key;
#X obj 246 252 sel 99;
#X obj 501 -60 tgl 30 0 empty empty empty 17 7 0 10 -258113 -1 -1 1
1;
#X msg 490 -315 dimen 500 500 \, create \, 1;
#X symbolatom 106 50 20 0 0 0 - - -;
#X obj 106 -180 opentextfile;
#X text 261 -179 open a plain text file;
#X floatatom 224 -40 5 0 0 0 - - -;
#X floatatom 165 -40 5 0 0 0 - - -;
#X obj 165 -20 sel;
#X msg 165 0 0;
#X obj 165 22 s start;
#X text 217 21 starts recording;
#X obj 317 -133 bng 20 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 317 -103 t b b b;
#X msg 355 -78 0;
#X obj 355 -56 s start;
#X msg 315 -77 1;
#X obj 316 -15 s reset;
#X msg 316 -39 0;
#X text 343 -132 reset and record;
#N canvas 697 753 450 300 record 0;
#X obj 140 118 f;
#X obj 173 118 + 1;
#X obj 71 18 sel 0 1;
#X obj 90 98 t b b;
#X msg 90 120 start;
#X msg 71 50 stop;
#X obj 71 -12 r start;
#X obj 71 198 writesf~ 2;
#X obj 20 169 inlet~;
#X msg 140 138 open pd_text_speak_\$1.wav;
#X connect 0 0 1 0;
#X connect 0 0 9 0;
#X connect 1 0 0 1;
#X connect 2 0 5 0;
#X connect 2 1 3 0;
#X connect 3 0 4 0;
#X connect 3 1 0 0;
#X connect 4 0 7 0;
#X connect 5 0 7 0;
#X connect 6 0 2 0;
#X connect 8 0 7 0;
#X connect 8 0 7 1;
#X connect 9 0 7 0;
#X restore 274 509 pd record;
#X obj 735 13 gemhead;
#X msg 602 55 text \$1;
#X obj 784 1 loadbang;
#X obj 735 95 text2d;
#X msg 778 40 font UmePlumePMincho-330.otf;
#X floatatom 811 70 5 0 0 0 - - -;
#X msg 466 389 \; pd dsp 1;
#X obj 466 369 loadbang;
#X msg 137 -248 color 0.1 0.21 0.31;
#X obj 137 -268 loadbang;
#X obj 488 -258 random 4000;
#X obj 467 -239 random 4000;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 5 0;
#X connect 4 0 5 1;
#X connect 5 0 10 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 24 0;
#X connect 13 0 16 0;
#X connect 13 0 39 0;
#X connect 14 0 5 0;
#X connect 15 0 10 0;
#X connect 16 0 17 0;
#X connect 17 0 23 0;
#X connect 18 0 0 0;
#X connect 20 0 14 0;
#X connect 21 0 66 0;
#X connect 21 0 67 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 24 0 19 0;
#X connect 24 0 19 1;
#X connect 24 0 55 0;
#X connect 25 0 24 1;
#X connect 26 0 25 0;
#X connect 27 0 26 0;
#X connect 28 0 30 0;
#X connect 29 0 28 0;
#X connect 30 0 6 0;
#X connect 31 0 36 0;
#X connect 32 0 15 0;
#X connect 34 0 35 0;
#X connect 35 0 32 0;
#X connect 36 0 23 1;
#X connect 37 0 0 0;
#X connect 38 0 8 0;
#X connect 38 0 57 0;
#X connect 39 0 38 0;
#X connect 39 1 42 0;
#X connect 39 2 41 0;
#X connect 41 0 43 0;
#X connect 42 0 43 1;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 47 0 48 0;
#X connect 48 0 51 0;
#X connect 48 1 53 0;
#X connect 48 2 49 0;
#X connect 49 0 50 0;
#X connect 51 0 50 0;
#X connect 53 0 52 0;
#X connect 56 0 59 0;
#X connect 57 0 59 0;
#X connect 58 0 60 0;
#X connect 60 0 59 0;
#X connect 61 0 59 1;
#X connect 63 0 62 0;
#X connect 64 0 0 0;
#X connect 65 0 64 0;
#X connect 66 0 21 1;
#X connect 67 0 13 0;