Move library tree where it belongs

lib-src/libnyquist/nyquist/nyqstk/src/Envelope.cpp

@@ -0,0 +1,125 @@
+/***************************************************/
+/*! \class Envelope
+    \brief STK envelope base class.
+
+    This class implements a simple envelope
+    generator which is capable of ramping to
+    a target value by a specified \e rate.
+    It also responds to simple \e keyOn and
+    \e keyOff messages, ramping to 1.0 on
+    keyOn and to 0.0 on keyOff.
+
+    by Perry R. Cook and Gary P. Scavone, 1995 - 2005.
+*/
+/***************************************************/
+
+#include "Envelope.h"
+
+using namespace Nyq;
+
+Envelope :: Envelope(void) : Generator()
+{    
+  target_ = 0.0;
+  value_ = 0.0;
+  rate_ = 0.001;
+  state_ = 0;
+}
+
+Envelope :: Envelope ( const Envelope& e )
+{
+  target_ = 0.0;
+  value_ = 0.0;
+  rate_ = 0.001;
+  state_ = 0;
+}
+
+Envelope :: ~Envelope(void)
+{
+}
+
+Envelope& Envelope :: operator= ( const Envelope& e )
+{
+  if ( this != &e ) {
+    target_ = e.target_;
+    value_ = e.value_;
+    rate_ = e.rate_;
+    state_ = e.state_;
+  }
+
+  return *this;
+}
+
+void Envelope :: keyOn(void)
+{
+  target_ = 1.0;
+  if (value_ != target_) state_ = 1;
+}
+
+void Envelope :: keyOff(void)
+{
+  target_ = 0.0;
+  if (value_ != target_) state_ = 1;
+}
+
+void Envelope :: setRate(StkFloat rate)
+{
+  if (rate < 0.0) {
+    errorString_ << "Envelope::setRate: negative rates not allowed ... correcting!";
+    handleError( StkError::WARNING );
+    rate_ = -rate;
+  }
+  else
+    rate_ = rate;
+}
+
+void Envelope :: setTime(StkFloat time)
+{
+  if (time < 0.0) {
+    errorString_ << "Envelope::setTime: negative times not allowed ... correcting!";
+    handleError( StkError::WARNING );
+    rate_ = 1.0 / (-time * Stk::sampleRate());
+  }
+  else
+    rate_ = 1.0 / (time * Stk::sampleRate());
+}
+
+void Envelope :: setTarget(StkFloat target)
+{
+  target_ = target;
+  if (value_ != target_) state_ = 1;
+}
+
+void Envelope :: setValue(StkFloat value)
+{
+  state_ = 0;
+  target_ = value;
+  value_ = value;
+}
+
+int Envelope :: getState(void) const
+{
+  return state_;
+}
+
+StkFloat Envelope :: computeSample(void )
+{
+  if (state_) {
+    if (target_ > value_) {
+      value_ += rate_;
+      if (value_ >= target_) {
+        value_ = target_;
+        state_ = 0;
+      }
+    }
+    else {
+      value_ -= rate_;
+      if (value_ <= target_) {
+        value_ = target_;
+        state_ = 0;
+      }
+    }
+  }
+
+  lastOutput_ = value_;
+  return value_;
+}