//sliding loops ( var w, array, plug, trig, timecode, newray; w = GUIWindow.new("panel", Rect.newBy(172, 70, 195, 485)); SliderView.new( w, Rect.newBy(76, 32, 27, 348), "SliderView", 0, 0, 1, 0, 'linear'); ButtonView.new( w, Rect.newBy(74, 404, 32, 33), "add", 0, 0, 1, 0, 'linear'); CheckBoxView.new( w, Rect.newBy(25, 449, 82, 23), "CheckBoxView", 0, 0, 1, 0, 'linear'); RangeView.new( w, Rect.newBy(18, 491, 291, 21), "RangeView", 0, 0, 0, 1, 0, 'linear'); array = Array.fill(1, {0}); newray = Array.fill(1, {0}); w.at(0).action = { newray = newray.add(w.at(0).value) }; w.at(1).action = { array = array.insert(timecode.wrap(0, array.size), newray ).flat; newray = Array.fill(1, {0});}; timecode = 0; Synth.play({ arg synth; trig = Pause.ar( Impulse.ar(10) , w.at(2).kr); Sequencer.ar({ timecode = timecode +1; w.at(0).value = array.wrapAt(timecode); 0.0 }, trig); SinOsc.ar(w.at(0).kr * 300+195 * 4, 90, 0.1) }) )/* authors so far: jrh 2000 */ |