stickDesc = dilution insert

stick_sensors undefined undefined

set diln dil2

makenv ts -driver dil12 -reg370 /treg -mon370 /tmon -hasturbo 1

ts auto/pumptime1 3600

# lakeshore 370 ctrl
makenv treg -driver 370_lsc -port ${diln}-ts:3001 {
# curves for sample:
# u02045     normal dil2 holder
# m59        old dil2 weak link
# ruoxben1k  weak link with test ring heater
# ruox5k     weak link with test ring heater
# standard   ch6 cx198/cx262/cx078  (new sensors DIL2/3/4 from Sep2014)
# heater/thermo ch8 rx198/rx262/rx078 (new field insensitive sensors DIL2/3/4 Sep2014)

  lsc_sensor sample -channel 6 -sensor cx198 -active 0 -excitation 20uV \
    -color blue
  lsc_sensor mix -channel 5 -sensor ruoxm0 -active 1 -excitation 20uV \
    -color cyan
  lsc_sensor samplehtr -channel 8 -sensor rx198 -active 0 -excitation 20uV \
    -color black
 
# weaklink heater
  lsc_loop set -channel 5 -maxheater 31mA -resist 316 -linearpower 0.2e-3
  GraphAdd treg.set.reg K T_set dark_green
  GraphAdd treg.set.power W Htr_Power dark_green
}
# fix a bug (in the 370?): set the HRTRNG to 7 (31mA) when needed
hsetprop /treg/set fix_range 7

# lakeshore 370 monitor
makenv tmon -driver 370_lsc -port ${diln}-ts:3003 {
  lsc_sensor sorb -channel 12 -sensor c270 -excitation 2mV -color dark_violet
  lsc_sensor onek -channel 11 -sensor ruoxm0 -excitation 2mV -color yellow
  lsc_sensor stillt -channel 10 -sensor ruoxm0 -excitation 200uV -color orange
  lsc_sensor sample 3 clone
  lsc_sensor samplehtr 1 clone
  lsc_sensor mix 4 clone
}

proc graphvti {} {
  GraphItem shown tt.ts 0
  GraphItem label tt.set.reg VTI_reg
  GraphItem label tt.set.power VTI_power
}
dolater 0 graphvti

tt ts/curve undefined
hsetprop /tt group "VTI temperature"

makeDil -port ${diln}-ts:3005

makenv sorb -driver piloop -invar "/tmon/sorb" -outvar "dil psorb" \
  -prop 200 -int 15

# control on mix by default (todo: check for unknown first/check default mechanism)
ts control 6
treg set/deriv 0

defineTemperature ts

dil extVersion 1

# take last selected values when doing samenv reload
catch {default ts control}
catch {default ts heaterselect}

#makeMotorValve vb ${diln}-ts:3004
#makeMotorValve vm ${diln}-ts:3006