1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462
|
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<meta http-equiv="Content-Style-Type" content="text/css">
<title></title>
<meta name="Generator" content="Cocoa HTML Writer">
<meta name="CocoaVersion" content="949.46">
<style type="text/css">
p.p1 {margin: 0.0px 0.0px 0.0px 0.0px; font: 18.0px Helvetica}
p.p2 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; min-height: 14.0px}
p.p3 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica}
p.p4 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; min-height: 12.0px}
p.p5 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #aa0b00}
p.p6 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco}
p.p7 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #606060}
span.s1 {color: #0010bf}
span.s2 {color: #aa0b00}
span.s3 {color: #000000}
span.s4 {color: #307200}
span.s5 {color: #606060}
span.Apple-tab-span {white-space:pre}
</style>
</head>
<body>
<p class="p1"><b>SMS<span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>Spectral Modeling Synthesis</b></p>
<p class="p2"><br></p>
<p class="p3"><b>resynthesis = SMS.ar(input,maxpeaks=80, currentpeaks=80, tolerance=4, noisefloor= 0.2, freqmult=1.0, freqadd=0.0, formantpreserve=0, useifft=0, ampmult=1.0, graphicsbufnum, mul=1.0, add=0.0)</b></p>
<p class="p2"><br></p>
<p class="p3">An implementation of the sines+noise model first described by Xavier Serra in his 1989 PhD thesis; an input sound is analysed in terms of sinusoidal components by a peak tracking phase vocoder. The error between the sinusoidal reconstruction and the original signal (the residual) is then modeled by a noise model of filtered white noise. The sines part and the noise part are separately resynthesised, allowing independent transformations. <span class="Apple-converted-space"> </span></p>
<p class="p2"><br></p>
<p class="p3">For technical details see:</p>
<p class="p2"><br></p>
<p class="p3">Xavier Serra and Julius O. Smith (1990) "Spectral Modeling Synthesis: A Sound Analysis/Synthesis System Based on a Deterministic plus Stochastic Decomposition". Computer Music Journal 14(4): 12--24</p>
<p class="p2"><br></p>
<p class="p3">Note that this plugin assumes block size of 64 and is optimised for 44100 sampling rate (internally, it uses 1024 point FFTs).<span class="Apple-converted-space"> </span></p>
<p class="p2"><br></p>
<p class="p3"><b>input- </b>Audio rate input to be analysed</p>
<p class="p3"><b>maxpeaks- </b>Absolute maximum number of allowed peaks to be detected in the spectrum</p>
<p class="p3"><b>currentpeaks- </b>Current number of allowed peaks to be detected in the spectrum</p>
<p class="p3"><b>tolerance- </b>Search area for matching peaks; within tolerance spectral bins</p>
<p class="p3"><b>noisefloor- </b>Minimum magnitude for a candidate peak (measured as spectral magnitude)</p>
<p class="p3"><b>freqmult- </b>Resynthesis parameter to change frequency; currently causes a gross multiplication of frequency of all sinusoidal components</p>
<p class="p3"><b>freqadd- </b>Resynthesis parameter to change frequency; currently causes a gross addition of a frequency to all sinusoidal components</p>
<p class="p3"><b>formantpreserve- </b>Even if changing the frequencies of sinusoidal partial tracks, re-impose the original magnitude spectrum so as to keep the formants (spectral envelope preservation). 0 is off, otherwise on (there is a small performance hit).<span class="Apple-converted-space"> </span></p>
<p class="p3"><b>useifft- </b>Use IFFT based resynthesis, which is lower quality, but substantially more efficient</p>
<p class="p3"><b>ampmult- </b>amplitude multiplier for internal compensation for window power loss within algorithm. Usually leave as default of 1.0.<span class="Apple-converted-space"> </span></p>
<p class="p3"><b>graphicsbufnum- </b>Will fill a user provided buffer with sines + noise data; the buffer must be size 1 + 513 + 5*(maxsines). The first entry will be the number of sines active for that polled frame. Default for this argument is -1, meaning do not write any status data. See the example with live plotting at the base of this help file.<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//sine reconstruction left channel, noises on right</p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in= <span class="s1">SoundIn</span>.ar(0); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 50,<span class="s1">MouseY</span>.kr(1,50), 8, 0.3);<span class="Apple-converted-space"> </span><span class="s2">//or freqmult: MouseX.kr(0.5,4)</span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output</p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//sum reconstruction channels to simulate effect of straight through</p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in= <span class="s1">SoundIn</span>.ar(0); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 50,<span class="s1">MouseY</span>.kr(1,50), 8, 0.3);<span class="Apple-converted-space"> </span><span class="s2">//or freqmult: MouseX.kr(0.5,4)</span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output.sum.dup</p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//just noise residual</p>
<p class="p4"><br></p>
<p class="p7"><span class="s3">d=</span><span class="s1">Buffer</span><span class="s3">.read(s,</span>"sounds/a11wlk01.wav"<span class="s3">);</span></p>
<p class="p4"><br></p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in=<span class="s1">PlayBuf</span>.ar(1,d,<span class="s1">BufRateScale</span>.kr(d),1,0,1);</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 50,50, <span class="s1">MouseX</span>.kr(1.0,10.0).round(1.0),<span class="s1">MouseY</span>.kr(0.1,20.0,<span class="s4">'exponential'</span>), 1.0); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(0,<span class="s1">Pan2</span>.ar(output[1]));<span class="Apple-converted-space"> </span></p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//frequency multiplication and shift with formant preservation</p>
<p class="p4"><br></p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in=<span class="s1">PlayBuf</span>.ar(1,d,<span class="s1">BufRateScale</span>.kr(d),1,0,1);</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 60,60, 4.0,0.2, <span class="s1">MouseX</span>.kr(0.5,4), <span class="s1">MouseY</span>.kr(0,1000), 1.0); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(0,<span class="s1">Pan2</span>.ar(output[0]));<span class="Apple-converted-space"> </span></p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p6">)<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//transient detection via Pitch hasFreq output</p>
<p class="p5">//could have freq input and transient detection input to SMS to control rendering <span class="Apple-converted-space"> </span></p>
<p class="p6">(</p>
<p class="p6">{</p>
<p class="p4"><br></p>
<p class="p6"><span class="s1">var</span> in, fft, sines, noise, freq, hasFreq;</p>
<p class="p4"><br></p>
<p class="p5">//in= SoundIn.ar(0);<span class="Apple-converted-space"> </span></p>
<p class="p6">in=<span class="s1">PlayBuf</span>.ar(1,d,<span class="s1">BufRateScale</span>.kr(d),1,0,1);</p>
<p class="p4"><br></p>
<p class="p6">#freq, hasFreq= <span class="s1">Pitch</span>.kr(in); <span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p6">#sines, noise=<span class="s1">SMS</span>.ar(in, 50,50, 8, 1.0, <span class="s1">MouseX</span>.kr(0.5,4));<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p6"><span class="s1">Pan2</span>.ar(sines*(hasFreq.lag(0.01,0.01)) + <span class="s1">LPF</span>.ar(noise,<span class="s1">MouseY</span>.kr(100,10000,<span class="s4">'exponential'</span>)),0.0)</p>
<p class="p6">}.play</p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//alternative; only pass into SMS if not a transient region</p>
<p class="p6">(</p>
<p class="p6">{</p>
<p class="p4"><br></p>
<p class="p6"><span class="s1">var</span> in, fft, sines, noise, freq, hasFreq;</p>
<p class="p4"><br></p>
<p class="p5">//in= SoundIn.ar(0);<span class="Apple-converted-space"> </span></p>
<p class="p6">in=<span class="s1">PlayBuf</span>.ar(1,d,<span class="s1">BufRateScale</span>.kr(d),1,0,1);</p>
<p class="p4"><br></p>
<p class="p6">#freq, hasFreq= <span class="s1">Pitch</span>.kr(in); <span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p6">#sines, noise=<span class="s1">SMS</span>.ar(if(hasFreq,in, <span class="s1">Silent</span>.ar), 50,50, 8, 1.0, <span class="s1">MouseX</span>.kr(0.5,4));<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p6">if(hasFreq,<span class="s1">Pan2</span>.ar(sines + <span class="s1">LPF</span>.ar(noise,<span class="s1">MouseY</span>.kr(100,10000,<span class="s4">'exponential'</span>)), 0.0),0.25*in)</p>
<p class="p4"><br></p>
<p class="p6">}.play</p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//having fun</p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in=<span class="s1">PlayBuf</span>.ar(1,d,<span class="s1">BufRateScale</span>.kr(d),1,0,1);</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 60,60, 4.0,0.2, <span class="s1">MouseX</span>.kr(0.5,4), <span class="s1">MouseY</span>.kr(0.0001,10000,<span class="s4">'exponential'</span>), <span class="s1">LFNoise0</span>.kr(2,0.5,0.5).round(1)); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(0,<span class="s1">Pan2</span>.ar(<span class="s1">AllpassC</span>.ar(output[0],0.05,<span class="s1">LFNoise2</span>.kr(10,0.02,0.025),0.5) + <span class="s1">CombL</span>.ar(output[1],0.1,0.1,2),0.0));<span class="Apple-converted-space"> </span></p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//having even more fun</p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in=<span class="s1">SoundIn</span>.ar(0);</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 60,60, 4.0,0.1, <span class="s1">MouseX</span>.kr(0.01,10), <span class="s1">MouseY</span>.kr(-1000,1000), 0.0); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(0,<span class="s1">Pan2</span>.ar(<span class="s1">CombL</span>.ar(output[1],0.02,0.02,0.5) + output[0]));<span class="Apple-converted-space"> </span></p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//testing IFFT resynthesis</p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in=<span class="s1">PlayBuf</span>.ar(1,d,<span class="s1">BufRateScale</span>.kr(d),1,0,1);</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 300,<span class="s1">MouseY</span>.kr(1,300), 10.0,0.01, <span class="s1">MouseX</span>.kr(0.5,4), 0, 1.0, 1); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(0,output);<span class="Apple-converted-space"> </span></p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p6">)<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//just<span class="Apple-converted-space"> </span>sines</p>
<p class="p4"><br></p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in=<span class="s1">PlayBuf</span>.ar(1,d,<span class="s1">BufRateScale</span>.kr(d),1,0,1);</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 500,500, <span class="s1">MouseX</span>.kr(1.0,10.0).round(1.0),<span class="s1">MouseY</span>.kr(0.001,20.0,<span class="s4">'exponential'</span>), 1.0, 1.0,0,1); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(0,<span class="s1">Pan2</span>.ar(output[0]));<span class="Apple-converted-space"> </span></p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//having even more fun, this time with IFFT</p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in=<span class="s1">SoundIn</span>.ar(0);</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 200,200, 4.0,0.1, <span class="s1">MouseX</span>.kr(0.01,10), <span class="s1">MouseY</span>.kr(-1000,1000), 0.0, useifft:1); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(0,<span class="s1">Pan2</span>.ar(<span class="s1">CombL</span>.ar(output[1],0.02,0.02,0.5) + output[0]));<span class="Apple-converted-space"> </span></p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">//experimenting with ampmult</p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6">{<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in=<span class="s1">SoundIn</span>.ar(0);</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 200,200, 4.0,0.01,<span class="s1">MouseY</span>.kr(0.01,100,<span class="s4">'exponential'</span>),0, formantpreserve:1.0, useifft:1, ampmult:<span class="s1">MouseX</span>.kr(0.0,10.0)); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">Out</span>.ar(0,output);<span class="Apple-converted-space"> </span></p>
<p class="p6">}.play<span class="Apple-converted-space"> </span></p>
<p class="p6">)</p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p5">/////////////////////////////////////////////////////////////</p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p5">//drawing out sine trails<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">b.free<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p5">//buffer for getting data back from UGen</p>
<p class="p6">b=<span class="s1">Buffer</span>.alloc(s,100*5*2+514,1)<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p5">//sine reconstruction left channel, noises on right<span class="Apple-converted-space"> </span></p>
<p class="p6">( <span class="Apple-converted-space"> </span></p>
<p class="p6">{ <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">var</span> in, fft, output; <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>in= <span class="s1">SoundIn</span>.ar(0);<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output=<span class="s1">SMS</span>.ar(in, 100,100, 8, 0.05, useifft:1, graphicsbufnum: b.bufnum);<span class="Apple-converted-space"> </span><span class="s2">//or freqmult: MouseX.kr(0.5,4)<span class="Apple-converted-space"> </span></span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>output <span class="Apple-converted-space"> </span></p>
<p class="p6">}.play <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">)<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p5">//get data back to language<span class="Apple-converted-space"> </span></p>
<p class="p6">b.getn(0,1514,{<span class="s1">|val|</span> <span class="s1">Post</span> << val <<< nl; })<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-converted-space"> </span></span>//</p>
<p class="p5">//frequency is (bin number/512.0) *<span class="Apple-converted-space"> </span>pi</p>
<p class="p5">//1500*172 would be 258000 floats per second passed!<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p5">//plot sines (512) only (not plotting noise for now but could do as (128 bands))<span class="Apple-converted-space"> </span></p>
<p class="p6">(<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> data, basedata, updatedata, paintdata; <span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> xperframe= 3;<span class="Apple-converted-space"> </span><span class="s2">//5 values</span></p>
<p class="p6"><span class="s1">var</span> fps= 172; <span class="s2">//172;<span class="Apple-converted-space"> </span></span></p>
<p class="p5"><span class="s1">var</span><span class="s3"> drawaccum=8; </span>//to avoid too much redraw, accumulate this number of FFT frames worth of data, then plot; 8 is good compromise</p>
<p class="p6"><span class="s1">var</span> updatesperwindow= 40; <span class="s2">//22;<span class="Apple-converted-space"> </span></span></p>
<p class="p5"><span class="s1">var</span><span class="s3"> frameperwindow = drawaccum*updatesperwindow; </span>//176//must be divisible by drawaccum //fps = about 172<span class="Apple-converted-space"> </span>= 44100/256<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> windowx = xperframe*frameperwindow;<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p6"><span class="s1">var</span> windowy=640; <span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s1">var</span><span class="s3"> freqconvert= (512.0/pi); </span>//(44100/1024.0)* // unit->m_nover2/pi <span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> freq1, freq2, amp1, amp2, freq, amp;<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> temp;<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> black, white; <span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s1">var</span><span class="s3"> counter=0;<span class="Apple-converted-space"> </span></span>//for scrolling around<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> userview; <span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> drawdataready=<span class="s1">false</span>, drawpos=0;<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="s1">var</span> i, t;<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p5">//var drawupdate = drawaccum/</p>
<p class="p6"><span class="s1">var</span> bufferfetchwait = (1.0/172.0);</p>
<p class="p6"><span class="s1">var</span> drawupdatex = drawaccum*xperframe;<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p6">black= <span class="s1">Integer</span>.fromColor(<span class="s1">Color</span>.black);<span class="Apple-converted-space"> </span></p>
<p class="p6">white= <span class="s1">Integer</span>.fromColor(<span class="s1">Color</span>.white);<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">data= <span class="s1">Array</span>.fill(windowx*640); <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">basedata= <span class="s1">Int32Array</span>.fill(drawupdatex*windowy,{black});<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">updatedata=basedata.copy; <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">i = <span class="s1">SCImage</span>.new(windowx@windowy);<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">w = <span class="s1">SCWindow</span>.new(<span class="s5">"SCImage"</span>, <span class="s1">Rect</span>(0, 100, windowx+10, windowy+10)).front;<span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3">w.onClose_({ t.stop; i.free; }); </span>// free the image when the window is closed<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6">userview = <span class="s1">SCUserView</span>(w, w.view.bounds)<span class="Apple-converted-space"> </span></p>
<p class="p6">.relativeOrigin_(<span class="s1">false</span>)<span class="Apple-converted-space"> </span></p>
<p class="p5">//.focusColor_(Color.white.alpha_(0))<span class="Apple-converted-space"> </span></p>
<p class="p5">//.resize_(5)<span class="Apple-converted-space"> </span></p>
<p class="p6">.backgroundImage_(i)<span class="Apple-converted-space"> </span><span class="s2">//, 10<span class="Apple-converted-space"> </span></span></p>
<p class="p6">.drawFunc_({<span class="s1">arg</span> view;<span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span></span>//image.drawInRect(view.bounds, image.bounds, 2, 1.0);</p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span></span>//userview.refreshInRect(Rect(10+(counter*drawupdatex),10,drawupdatex,windowy));<span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> <span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>i.drawInRect(<span class="s1">Rect</span>(10+(counter*xperframe),10,drawupdatex,windowy),<span class="s1">Rect</span>(counter*xperframe,0,drawupdatex,windowy), 2, 1.0);<span class="Apple-converted-space"> </span></p>
<p class="p6">});<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">t= { <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="s1">inf</span>.do {<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>b.getn(0,1514,{<span class="s1">|val|</span> <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s1">var</span> number = val[0].round(1.0).asInteger;<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s1">var</span> drawshift= drawpos*xperframe; <span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//number.postln;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//updatedata=basedata.copy;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>if(drawpos<drawaccum, {<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>number.do{<span class="s1">|i|</span> <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s1">var</span> pos= 1+(5*i);<span class="Apple-converted-space"> </span><span class="s2">//5 values</span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//freq1, freq2, amp1, amp2, phase<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>freq1 = (freqconvert*val[pos]); <span class="s2">//.round(1.0).asInteger.min(511);<span class="Apple-converted-space"> </span></span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>freq2 = (freqconvert*val[pos+1]); <span class="s2">//.round(1.0).asInteger.min(511);<span class="Apple-converted-space"> </span></span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//freq1 = freqconvert*val[pos];<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>freq= (freq1+freq2)*0.5;</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//warping</p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//freq=<span class="Apple-converted-space"> </span>((((freq1+freq2)*0.5)/511.0)**0.25)*511.0;</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//[\freq1, freq1, \original, val[pos]].postln;<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>freq= 511-((freq).round(1.0).asInteger.min(511));<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>amp= (((val[pos+2] + val[pos+3])*0.5)*1024).min(1.0);<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//[\freq, freq, \amp, amp].postln;</p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//goes across by rows then columns down page</p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//i*windowy+freq1</p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//(i*windowy+freq1).post; " ".post;</p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//Integer.fromColor(Color.white);<span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//was = white</p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>xperframe.do{<span class="s1">|i|</span><span class="Apple-converted-space"> </span>updatedata[drawshift+i+(freq*drawupdatex)]= <span class="s1">Integer</span>.fromColor(<span class="s1">Color</span>.green(amp));}; <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//" ".postln;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>};<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>drawpos=drawpos+1;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>if(drawpos==drawaccum,{drawdataready= <span class="s1">true</span>;});<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>});<span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>if(drawdataready,{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>drawdataready=<span class="s1">false</span>;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>paintdata= updatedata.copy;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>updatedata = basedata.copy;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>drawpos=0;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>{<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>counter=(counter+drawaccum)%frameperwindow;<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>i.setPixels(<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>paintdata,<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="s1">Rect</span>(counter*xperframe,0,drawupdatex,windowy)<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>);<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//drawupdatex<span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//w.refresh<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>userview.refreshInRect(<span class="s1">Rect</span>(10+(counter*xperframe),10,drawupdatex,windowy));<span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p5"><span class="s3"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></span>//i.drawInRect(Rect(10+(counter*xperframe),10,xperframe,windowy), Rect(counter*xperframe,0,xperframe,windowy), 2, 1.0); // only a section<span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>}.defer; <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>});<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>});<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span><span class="Apple-tab-span"> </span>bufferfetchwait.wait; <span class="Apple-converted-space"> </span></p>
<p class="p6"><span class="Apple-tab-span"> </span>} <span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-tab-span"> </span><span class="Apple-converted-space"> </span></p>
<p class="p6">}.fork;<span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><br></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p6">)<span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p4"><span class="Apple-converted-space"> </span></p>
<p class="p4"><br></p>
</body>
</html>
|