SCClassLibrary/JITLib/ProxySpace/TempoBusClock.sc

   1 TempoBusClock : TempoClock {
   2         var <>control;
   3         classvar <>default;
   4
   5         *new { arg control, tempo, beats, seconds;
   6                 ^super.new(tempo, beats, seconds).control_(control)
   7         }
   8
   9         setTempoAtBeat { arg newTempo, beats;
  10                 control.set(\fadeTime, 0.0, \tempo, newTempo);
  11                 ^super.setTempoAtBeat(newTempo, beats)
  12         }
  13
  14         setTempoAtSec { arg newTempo, secs;
  15                 control.set(\fadeTime, 0.0, \tempo, newTempo)
  16                 ^super.setTempoAtSec(newTempo, secs)
  17         }
  18
  19 }