adopting the HUBER .db / .proto files to our CC-405 and needs

diff --git a/HUBER_COOLING/HUBER_COOLINGApp/Db/Huber_Unistate_425.db b/HUBER_COOLING/HUBER_COOLINGApp/Db/Huber_Unistate_425.db
index a0574ba043b8d3c9ab83316239fe4aa134a78e04..4ccc0851e5d2fbad62bac5dc13e6cabc1dd52aeb 100644 (file)
--- a/HUBER_COOLING/HUBER_COOLINGApp/Db/Huber_Unistate_425.db
+++ b/HUBER_COOLING/HUBER_COOLINGApp/Db/Huber_Unistate_425.db
@@ -17,7 +17,7 @@
 
 record (ai, "$(sys):$(sub):COOLING:$(csys):SetpointMom") {
   field (DTYP, "stream")
-  field (INP,  "@Huber_Unistate_425.proto getDesVal $(PORT)")  
+  field (INP,  "@Huber_Unistate_425.proto getDesVal $(PORT)")
   field (PINI, "YES")
   field (EGU,  "°C")
   field (PREC, "2")
@@ -25,12 +25,14 @@ record (ai, "$(sys):$(sub):COOLING:$(csys):SetpointMom") {
   field (MDEL, "0.05")
   field (ASLO, "0.01")
   field (AOFF, "0")
+  field (HOPR, "100.0")
+  field (LOPR, "-50.0")
 }
 
 record (ai, "$(sys):$(sub):COOLING:$(csys):BathTemperatureMom") {
   field (DTYP, "stream")
   field (INP,  "@Huber_Unistate_425.proto getBathTemp $(PORT)")
-  field (SCAN, "10 second")
+  field (SCAN, "2 second")
   field (FLNK, "$(sys):$(sub):COOLING:$(csys):ExternalTemperatureMom")
   field (EGU, "°C")
   field (PREC, "2")
@@ -38,41 +40,51 @@ record (ai, "$(sys):$(sub):COOLING:$(csys):BathTemperatureMom") {
   field (MDEL, "0.05")
   field (ASLO, "0.01")
   field (AOFF, "0")
-                                             
+  field (HOPR, "100.0")
+  field (LOPR, "-50.0")
+  field (HIGH, "30.0")
+  field (HIHI, "35.0")
+  field (LOW,  "-20.0")
+  field (LOLO, "-25.0")
 }
 
 record (ai, "$(sys):$(sub):COOLING:$(csys):ExternalTemperatureMom") {
   field (DTYP, "stream")
   field (INP,  "@Huber_Unistate_425.proto getExtTemp $(PORT)")
+  field (FLNK, "$(sys):$(sub):COOLING:$(csys):SetpointMom")
   field (EGU,  "°C")
   field (PREC, "2")
   field (ADEL, "0.05")
   field (MDEL, "0.05")
   field (ASLO, "0.01")
   field (AOFF, "0")
-  field (FLNK, "$(p):$(sub):COOLING:SetpointMom")
+  field (HOPR, "100.0")
+  field (LOPR, "-50.0")
 }
 
 #--------------------------------------------------------------------------------
 
 record (ao, "$(sys):$(sub):COOLING:$(csys):Setpoint") {
   field (DTYP, "stream")
-  field (OUT,  "@Huber_Unistate_425.proto setDesVal $(PORT)") 
+  field (OUT,  "@Huber_Unistate_425.proto setDesVal $(PORT)")
   field (EGU,  "°C")
   field (PREC, "2")
   field (ADEL, "0.05")
   field (MDEL, "0.05")
   field (ASLO, "0.01")
   field (AOFF, "0")
+  field (HOPR, "100.0")
+  field (LOPR, "-50.0")
+  field (FLNK, "$(sys):$(sub):COOLING:$(csys):SetpointMom")
 }
 
 record (ao , "$(sys):$(sub):COOLING:$(csys):MinimumValue") {
   field (DTYP, "stream")
-  field (OUT,  "@Huber_Unistate_425.proto setMinVal $(PORT)") 
+  field (OUT,  "@Huber_Unistate_425.proto setMinVal $(PORT)")
   field (EGU,  "°C")
   field (PREC, "2")
   field (ADEL, "0.05")
-  field (MDEL, "0.05")                                         
+  field (MDEL, "0.05")
   field (ASLO, "0.01")
   field (AOFF, "0")
 }
@@ -93,11 +105,13 @@ record (bo , "$(sys):$(sub):COOLING:$(csys):TemperatureControl") {
   field (OUT,  "@Huber_Unistate_425.proto setTempCtrl $(PORT)")
   field (ZNAM, "OFF")
   field (ONAM, "ON")
+  field (SCAN, "5 second")
+  field (FLNK, "$(sys):$(sub):COOLING:$(csys):TemperatureMode")
 }
 
-record (bo, "$(sys):$(sub):COOLING:$(csys):TemperatureMode") {
-  field (DTYP, "stream")
-  field (OUT,  "@Huber_Unistate_425.proto setTempMode $(PORT)")
-  field (ZNAM, "INTERN")
-  field (ONAM, "EXTERN")
-}
+#record (bo, "$(sys):$(sub):COOLING:$(csys):TemperatureMode") {
+#  field (DTYP, "stream")
+#  field (OUT,  "@Huber_Unistate_425.proto setTempMode $(PORT)")
+#  field (ZNAM, "INTERN")
+#  field (ONAM, "EXTERN")
+#}

diff --git a/HUBER_COOLING/protocols/Huber_Unistate_425.proto b/HUBER_COOLING/protocols/Huber_Unistate_425.proto
index 941933d97b52011d5c6cda5571947431d25448d7..b50ec7d4503d00645b16f9a67008d573d09b9280 100644 (file)
--- a/HUBER_COOLING/protocols/Huber_Unistate_425.proto
+++ b/HUBER_COOLING/protocols/Huber_Unistate_425.proto
@@ -26,7 +26,7 @@ ExtraInput    = Ignore;
 getDesVal {
   # get setpoint
   # Example of command:
-  # field (INP, "@Huber_Unistat_425.proto getDesVal $(PORT)") 
+  # field (INP, "@Huber_Unistat_425.proto getDesVal $(PORT)")
 
   out "SP?";
   in  "SP %d";
@@ -35,7 +35,7 @@ getDesVal {
 getBathTemp {
   # get bath temperature
   # Example of command:
-  # field (INP, "@Huber_Unistat_425.proto getBathTemp $(PORT)") 
+  # field (INP, "@Huber_Unistat_425.proto getBathTemp $(PORT)")
 
   out "TI?";
   in  "TI %d";
@@ -44,7 +44,7 @@ getBathTemp {
 getExtTemp {
   # get temperature at external PT100
   # Example of command:
-  # field (INP, "@Huber_Unistat_425.proto getExtTemp $(PORT)") 
+  # field (INP, "@Huber_Unistat_425.proto getExtTemp $(PORT)")
 
   out "TE?";
   in  "TE %d";
@@ -52,13 +52,17 @@ getExtTemp {
 
 #--------------------------------------------------------------------------------
 
+enableCirculation {
+  out "%(HOPR)7.4f";
+}
+
 setDesVal {
   # set a new setpoint
   # Example of command:
-  # field (OUT, "@Huber_Unistat_425.proto setDesVal $(PORT)") 
+  # field (OUT, "@Huber_Unistat_425.proto setDesVal $(PORT)")
 
-  out "SP@ %+05d";
-  in  "SP %=d";
+  out "SP@ %+06d";
+  in  "SP %=+06d";
 
   @init {
     out "SP?";
@@ -69,10 +73,10 @@ setDesVal {
 setMinVal {
   # set lower limit of setpoint
   # Example of command:
-  # field (OUT, "@Huber_Unistat_425.proto setMinVal $(PORT)") 
+  # field (OUT, "@Huber_Unistat_425.proto setMinVal $(PORT)")
 
-  out "LL& %+05d";
-  in  "LL %=d";        
+  out "LL& %+06d";
+  in  "LL %=+06d";
 
   @init {
     out "LL?";
@@ -83,10 +87,10 @@ setMinVal {
 setMaxVal {
   # set upper limit of setpoint
   # Example of command:
-  # field (OUT, "@Huber_Unistat_425.proto setMaxVal $(PORT)") 
+  # field (OUT, "@Huber_Unistat_425.proto setMaxVal $(PORT)")
 
-  out "LH& %+05d";
-  in  "LH %=d";        
+  out "LH& %+06d";
+  in  "LH %=+06d";
 
   @init {
     out "LH?";
@@ -97,10 +101,10 @@ setMaxVal {
 setTempCtrl {
   # switch chiller on/off
   # Example of command:
-  # field (OUT, "@Huber_Unistat_425.proto setTempCtrl $(PORT)") 
+  # field (OUT, "@Huber_Unistat_425.proto setTempCtrl $(PORT)")
 
-  out "CA@ %+05u";
-  in  "CA %=u";
+  out "CA@ %+06d";
+  in  "CA %=+06d";
 
   @init {
     out "CA?";
@@ -111,10 +115,10 @@ setTempCtrl {
 setTempMode {
   # set temperature control mode
   # Example of command:
-  # field (OUT, "@Huber_Unistat_425.proto setTempMode $(PORT)") 
+  # field (OUT, "@Huber_Unistat_425.proto setTempMode $(PORT)")
 
-  out "TM& %+05u";
-  in  "TM %=u";
+  out "TM& %+06d";
+  in  "TM %=+06d";
 
   @init {
     out "TM?";