--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/IOCINFRAApp/Db/SATECO_lakeshore331.proto	Thu Mar 07 09:23:26 2019 +0100
@@ -0,0 +1,55 @@
+# $Source: /cvs/G/DRV/SATECO/cfg/SATECO_lakeshore331.ptcols,v $
+# $Date: 2012/12/06 10:32:25 $
+# $Revision: 1.9 $
+# $Author: wang_x1 $
+#----------------------------------------------
+InTerminator  = CR LF;
+OutTerminator = CR LF;
+ReplyTimeout  =  500;
+ReadTimeout   =  100;
+WriteTimeout  =  100;
+ExtraInput    = Ignore;
+
+GET_VERSION     { out "*IDN?";      in "%39c";      wait 50; }
+
+GET_MODE        { out "MODE?";      in "%{0|1|2}";  wait 50; }
+SET_MODE        { out "MODE %{0|1|2}";              wait 50; }
+
+GET_TEMP-SP     { out "SETP? 1";    in "%f";        wait 50; }
+GET_TEMP        { out "KRDG? A";    in "%f";        wait 50; }
+SET_TEMP        { out "SETP 1,%f";  wait 50; }
+
+GET_TEMP-B      { out "KRDG? B";    in "%f";        wait 50; }
+GET_TEMP-C      { out "KRDG? C";    in "%f";        wait 50; }
+GET_TEMP-D      { out "KRDG? D";    in "%f";        wait 50; }
+
+GET_HEAT-RANGE  { out "RANGE?";     in "%{0|1|2|3}";wait 50; }
+SET_HEAT-RANGE  { out "RANGE %{0|1|2|3}";           wait 50; }
+
+GET_HEAT-STAT   { out "HTRST?";     in "%{0|1|2}";  wait 50; }
+
+GET_MHP         { out "MOUT? 1";    in "%f";        wait 50; }
+SET_MHP         { out "MOUT 1, %f"; wait 50; }
+
+GET_HEAT-LEVEL  { out "HTR?";    in "%f";           wait 50; }
+SET_HEAT-LEVEL  {}
+
+GET_P { out "PID? 1";  in "%f,%*f,%*f";             wait 50;}
+SET_P { out "PID 1,%f,%(\$1:I_RBV.VAL)f,%(\$1:D_RBV.VAL)f"; wait 50;}
+
+GET_I { out "PID? 1";  in "%*f,%f,%*f";             wait 50;}
+SET_I { out "PID 1,%(\$1:P_RBV.VAL)f,%f,%(\$1:D_RBV.VAL)f"; wait 50; }
+
+GET_D { out "PID? 1";  in "%*f,%*f,%f";             wait 50;}
+SET_D { out "PID 1,%(\$1:P_RBV.VAL)f,%(\$1:I_RBV.VAL)f,%f"; wait 50;}
+
+GET_CONTROL-MODE { out "CMODE? 1"; in "%{1|2|3|4|5|6}"; wait 50; }
+SET_CONTROL-MODE { out "CMODE 1, %{1|2|3|4|5|6}";       wait 50; }
+
+GET_RAMP        { out "RAMP? 1";    in "%{0|1},%(\$1:RMP-RT_RBV.VAL)f"; wait 50; }
+GET_RAMP-STAT   { out "RAMPST? 1";  in "%{0|1}";                        wait 50; }
+SET_RAMP-RATE   { out "RAMP 1, %(\$1:RMP-MD_RBV.VAL)d, %f";             wait 50; }
+SET_RAMP-MODE   { out "RAMP 1, %d, %(\$1:RMP-RT_RBV.VAL)f";             wait 50; }
+
+QUERY {out "%s"; in "%(\$1)39c";}
+