1 tplarson 1.3 #N canvas 1 52 1265 635 10;
 2              #X msg 633 124 set \$1;
 3              #X msg 633 160 sum2;

 4 tplarson 1.1 #X obj 332 168 until;
 5              #X obj 332 196 f;
 6              #X obj 363 198 + 1;
 7              #X obj 407 198 sel 0;
 8              #X obj 511 278 tabread;
 9              #X obj 254 72 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
10              -1;
11              #X obj 277 107 float;
12              #X obj 254 29 inlet;
13              #X obj 633 35 inlet;
14              #X obj 71 453 soundfiler;
15              #X obj 308 357 tabwrite \$1;
16              #X obj 71 305 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1
17              -1;
18              #X text 107 311 save array to WAVE file;
19              #X obj 71 369 list append;
20              #X obj 145 340 r play-SR;
21              #X obj 71 343 symbol \$1;
22              #X msg 254 131 -1;
23              #X obj 551 38 inlet;
24              #X floatatom 551 69 5 0 0 0 - - -, f 5;
25 tplarson 1.1 #X obj 382 291 +;
26              #X obj 401 45 r nsamples;

27 tplarson 1.2 #X obj 401 116 min;

28 tplarson 1.1 #X obj 401 74 t b f;
29              #X obj 373 21 r block-size;

30 tplarson 1.2 #X obj 425 163 - 1;
31              #X obj 478 341 outlet;

32 tplarson 1.3 #X msg 71 414 write -wave -bytes 4 -rate \$2 ./wav_out/modecat \$1
33              ;
34              #X obj 633 68 list prepend symbol;
35              #X obj 633 95 route list;

36 tplarson 1.1 #X connect 0 0 1 0;
37              #X connect 0 0 6 0;
38              #X connect 2 0 3 0;
39              #X connect 3 0 4 0;
40              #X connect 4 0 5 0;
41              #X connect 4 0 3 1;
42              #X connect 4 0 6 0;
43              #X connect 4 0 21 0;
44              #X connect 5 0 2 1;

45 tplarson 1.3 #X connect 5 0 27 0;

46 tplarson 1.1 #X connect 6 0 12 0;
47              #X connect 7 0 8 0;
48              #X connect 7 0 18 0;
49              #X connect 8 0 2 0;
50              #X connect 9 0 7 0;

51 tplarson 1.3 #X connect 10 0 29 0;

52 tplarson 1.1 #X connect 13 0 17 0;

53 tplarson 1.3 #X connect 15 0 28 0;

54 tplarson 1.1 #X connect 16 0 15 1;
55              #X connect 17 0 15 0;
56              #X connect 18 0 3 1;
57              #X connect 19 0 20 0;
58              #X connect 20 0 21 1;
59              #X connect 21 0 12 1;

60 tplarson 1.3 #X connect 22 0 24 0;
61              #X connect 23 0 8 1;
62              #X connect 23 0 26 0;
63              #X connect 24 0 23 0;
64              #X connect 24 1 23 1;
65              #X connect 25 0 23 0;
66              #X connect 26 0 5 1;
67              #X connect 28 0 11 0;
68              #X connect 29 0 30 0;
69              #X connect 30 0 0 0;