IOCINFRAApp/Db/SATECO_lakeshore331.proto
changeset 0 77d8eafe2a07
equal deleted inserted replaced
-1:000000000000 0:77d8eafe2a07
       
     1 # $Source: /cvs/G/DRV/SATECO/cfg/SATECO_lakeshore331.ptcols,v $
       
     2 # $Date: 2012/12/06 10:32:25 $
       
     3 # $Revision: 1.9 $
       
     4 # $Author: wang_x1 $
       
     5 #----------------------------------------------
       
     6 InTerminator  = CR LF;
       
     7 OutTerminator = CR LF;
       
     8 ReplyTimeout  =  500;
       
     9 ReadTimeout   =  100;
       
    10 WriteTimeout  =  100;
       
    11 ExtraInput    = Ignore;
       
    12 
       
    13 GET_VERSION     { out "*IDN?";      in "%39c";      wait 50; }
       
    14 
       
    15 GET_MODE        { out "MODE?";      in "%{0|1|2}";  wait 50; }
       
    16 SET_MODE        { out "MODE %{0|1|2}";              wait 50; }
       
    17 
       
    18 GET_TEMP-SP     { out "SETP? 1";    in "%f";        wait 50; }
       
    19 GET_TEMP        { out "KRDG? A";    in "%f";        wait 50; }
       
    20 SET_TEMP        { out "SETP 1,%f";  wait 50; }
       
    21 
       
    22 GET_TEMP-B      { out "KRDG? B";    in "%f";        wait 50; }
       
    23 GET_TEMP-C      { out "KRDG? C";    in "%f";        wait 50; }
       
    24 GET_TEMP-D      { out "KRDG? D";    in "%f";        wait 50; }
       
    25 
       
    26 GET_HEAT-RANGE  { out "RANGE?";     in "%{0|1|2|3}";wait 50; }
       
    27 SET_HEAT-RANGE  { out "RANGE %{0|1|2|3}";           wait 50; }
       
    28 
       
    29 GET_HEAT-STAT   { out "HTRST?";     in "%{0|1|2}";  wait 50; }
       
    30 
       
    31 GET_MHP         { out "MOUT? 1";    in "%f";        wait 50; }
       
    32 SET_MHP         { out "MOUT 1, %f"; wait 50; }
       
    33 
       
    34 GET_HEAT-LEVEL  { out "HTR?";    in "%f";           wait 50; }
       
    35 SET_HEAT-LEVEL  {}
       
    36 
       
    37 GET_P { out "PID? 1";  in "%f,%*f,%*f";             wait 50;}
       
    38 SET_P { out "PID 1,%f,%(\$1:I_RBV.VAL)f,%(\$1:D_RBV.VAL)f"; wait 50;}
       
    39 
       
    40 GET_I { out "PID? 1";  in "%*f,%f,%*f";             wait 50;}
       
    41 SET_I { out "PID 1,%(\$1:P_RBV.VAL)f,%f,%(\$1:D_RBV.VAL)f"; wait 50; }
       
    42 
       
    43 GET_D { out "PID? 1";  in "%*f,%*f,%f";             wait 50;}
       
    44 SET_D { out "PID 1,%(\$1:P_RBV.VAL)f,%(\$1:I_RBV.VAL)f,%f"; wait 50;}
       
    45 
       
    46 GET_CONTROL-MODE { out "CMODE? 1"; in "%{1|2|3|4|5|6}"; wait 50; }
       
    47 SET_CONTROL-MODE { out "CMODE 1, %{1|2|3|4|5|6}";       wait 50; }
       
    48 
       
    49 GET_RAMP        { out "RAMP? 1";    in "%{0|1},%(\$1:RMP-RT_RBV.VAL)f"; wait 50; }
       
    50 GET_RAMP-STAT   { out "RAMPST? 1";  in "%{0|1}";                        wait 50; }
       
    51 SET_RAMP-RATE   { out "RAMP 1, %(\$1:RMP-MD_RBV.VAL)d, %f";             wait 50; }
       
    52 SET_RAMP-MODE   { out "RAMP 1, %d, %(\$1:RMP-RT_RBV.VAL)f";             wait 50; }
       
    53 
       
    54 QUERY {out "%s"; in "%(\$1)39c";}
       
    55