Version 3.0

STK/ReedTabl.cpp

@@ -0,0 +1,46 @@
+/**********************************************/
+/*  One break point linear reed table object  */
+/*  by Perry R. Cook, 1995-96                 */
+/*  Consult McIntyre, Schumacher, & Woodhouse */
+/*        Smith, Hirschman, Cook, Scavone,    */
+/*        more for information.               */
+/**********************************************/
+
+#include "ReedTabl.h"
+
+ReedTabl :: ReedTabl() : Object()
+{
+    offSet = (MY_FLOAT) 0.6;    /* Offset is a bias, related to reed rest position  */
+    slope = (MY_FLOAT) -0.8;    /* Slope corresponds loosely to reed stiffness      */
+}
+
+ReedTabl :: ~ReedTabl()
+{
+
+}
+
+void ReedTabl :: setOffset(MY_FLOAT aValue)
+{
+    offSet = aValue;     /* Offset is a bias, related to reed rest position */
+}
+
+void ReedTabl :: setSlope(MY_FLOAT aValue)
+{
+    slope = aValue;      /* Slope corresponds loosely to reed stiffness  */
+}
+
+MY_FLOAT ReedTabl :: lookup(MY_FLOAT deltaP)    
+    /*   Perform "Table Lookup" by direct clipped  */
+    /*   linear function calculation               */
+{   /*   deltaP is differential reed pressure      */
+    lastOutput = offSet + (slope * deltaP); /* compute basic non-linearity     */
+    if (lastOutput > 1.0) lastOutput = (MY_FLOAT) 1.0;     /* if other way, reed slams shut   */
+    if (lastOutput < -1.0) lastOutput = (MY_FLOAT) -1.0;   /* if all the way open, acts like open end */
+    return lastOutput;
+}
+
+MY_FLOAT ReedTabl :: lastOut()
+{
+    return lastOutput;
+}
+