|
0
|
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 |
|