「雙向播放」程式碼

從 cycling74 的討論區轉貼過來的程式碼，
請copy 下面文字，然後至max/msp 程式選擇 new from clipboard 即可打開。
這個程式碼可以不斷重複（loop）「往前」及「逆向」播放一個聲音檔案。
可能對於裝置藝術的人比較有用吧。
但程式寫得很有技巧，可以參考看看。

#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 304 447 37 196617 *~ 0.;
#P newex 304 472 60 196617 play~ mogo;
#B color 14;
#P flonum 351 503 35 9 0. 2. 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 304 503 40 196617 *~ 0.5;
#P message 354 552 27 196617 stop;
#P message 317 534 65 196617 startwindow;
#P newex 328 576 30 196617 dac~;
#P user panel 296 527 112 72;
#X brgb 255 255 255;
#X frgb 55 199 76;
#X border 2;
#X rounded 0;
#X shadow 0;
#X done;
#P flonum 87 164 64 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 198 416 15 0;
#P newex 87 138 41 196617 * 2.;
#P window linecount 6;
#P comment 246 130 84 196617 duration values update at the end of
previous cycle if gate is open. Also enables a bang for sync.;
#P window linecount 1;
#P comment 172 99 60 196617 update now;
#P flonum 87 112 58 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 87 45 15 0;
#P message 237 45 42 196617 replace;
#P newex 87 65 125 196617 info~ mogo;
#P newex 237 65 93 196617 buffer~ mogo;
#P comment 92 99 52 196617 duration;
#P comment 236 99 60 196617 gate on/off;
#P user scope~ 74 511 206 599 256 3 128 -1. 1. 0 0. 0 0. 102 255 51
135 135 135 0;
#P newex 160 258 55 196617 loadbang;
#P message 160 282 57 196617 lo 0. \, hi 1.;
#P newex 74 391 69 196617 triangle~ 0.5;
#P button 173 112 15 0;
#P newex 198 391 34 196617 t b b;
#P newex 87 236 49 196617 v bw321;
#P newex 87 258 64 196617 change 0.;
#P toggle 237 113 15 0;
#P flonum 87 210 56 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 87 189 48 196617 !/ 1000.;
#P newex 87 313 35 196617 delta~;
#P newex 87 334 31 196617 <~ 0.;
#P newex 87 358 35 196617 edge~;
#P newex 87 282 63 196617 phasor~ 1.;
#P toggle 148 391 15 0;
#P objectname toggle;
#P newex 164 391 27 196617 gate;
#P comment 216 416 100 196617 a bang to sync with;
#P fasten 3 0 14 0 92 305 79 305;
#P fasten 15 0 14 0 165 344 125 384 79 384;
#P connect 14 0 17 0;
#P fasten 20 1 23 0 325 86 336 86 336 39 92 39;
#P connect 23 0 21 0;
#P fasten 21 6 24 0 188 92 92 92;
#P connect 24 0 27 0;
#P connect 27 0 29 0;
#P connect 29 0 7 0;
#P connect 7 0 8 0;
#P fasten 13 0 11 0 178 230 92 230;
#P connect 8 0 11 0;
#P fasten 12 1 11 0 227 412 235 412 235 230 92 230;
#P connect 11 0 10 0;
#P connect 10 0 3 0;
#P fasten 3 0 6 0 92 306 92 306;
#P connect 6 0 5 0;
#P connect 5 0 4 0;
#P fasten 9 0 2 0 242 280 153 369;
#P connect 16 0 15 0;
#P hidden connect 2 0 1 0;
#P fasten 4 0 1 1 92 379 186 379;
#P fasten 1 0 12 0 169 412 194 412 194 386 203 386;
#P connect 12 0 28 0;
#P connect 22 0 20 0;
#P fasten 14 0 37 0 79 438 309 438;
#P connect 37 0 36 0;
#P connect 36 0 34 0;
#P connect 32 0 31 0;
#P fasten 33 0 31 0 359 571 333 571;
#P fasten 34 0 31 0 309 571 333 571;
#P fasten 21 6 37 1 188 92 336 92;
#P fasten 35 0 34 1 356 522 347 522 347 499 339 499;
#P window clipboard copycount 38;