max v2; #N vpatcher 423 507 994 889; #P window setfont "Sans Serif" 9.; #N in 1; #P newobj 77 48 25 196617 in 1; #P newex 238 73 40 196617 r Traw; #P newex 115 174 27 196617 sig~; #P newex 145 112 29 196617 float; #P button 126 73 15 0; #P newex 215 112 33 196617 * 1.; #P newex 274 112 29 196617 float; #P newex 338 112 29 196617 float; #P newex 400 112 29 196617 float; #P message 77 93 51 196617 0 \, 1. \$1; #P newex 77 112 30 196617 line~; #P number 77 73 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0; #P newex 185 321 55 196617 send~ rdac; #P newex 63 322 55 196617 send~ ldac; #P newex 164 73 62 196617 r sampstart; #P newex 293 73 40 196617 r ampx; #P newex 357 73 38 196617 r leftx; #P newex 419 73 44 196617 r rightx; #P comment 166 33 46 196617 playback starting sample#; #P comment 185 340 61 196617 right sig out; #P comment 65 341 55 196617 left sig out; #P comment 281 56 61 196617 grain amp in; #P comment 167 203 115 196617 Tx in=graindur*Tfactor #samps per grain: noT=graindur Tup>graindur Tdown