SCClassLibrary/Common/Control/asScore/RenderNotePlayer.sc

   1 //RenderNotePlayer : NotePlayer {
   2 //      var <>maxTime, <>score, <time=0;
   3 //
   4 //      *new { arg maxTime = 60;
   5 //              ^super.newCopyArgs(maxTime, Score.new)
   6 //      }
   7 //
   8 //      playOneEvent { arg desc, lag, msgArgs;
   9 //              var server, id, bundle, noteOffTime;
  10 //
  11 //              server = ~server;
  12 //              id = server.nextNodeID;
  13 //              bundle = [time + lag, [9, desc.name, id, ~addAction, ~group] ++ msgArgs];
  14 //              score = score.add(bundle);
  15 //              if (desc.hasGate) {
  16 //                      noteOffTime = time + lag  + ~sustain;
  17 //                      // noteOffTime = min(maxTime, noteOffTime);
  18 //                      bundle = [noteOffTime, [15, id, \gate, 0]]; //15 == n_set
  19 //                      score.add(bundle);
  20 //              };
  21 //              time = time + ~dur;
  22 //      }
  23 //
  24 //      read { arg stream;
  25 //              var val;
  26 //              while {
  27 //                      val = stream.next(Event.default);
  28 //                      val.notNil and: { time < maxTime };
  29 //              } {
  30 //                      this.playEvent(val);
  31 //              };
  32 //
  33 //      }
  34 //
  35 //}