add old sea versions of dil5 / mb11

This commit is contained in:
2024-06-06 09:05:43 +02:00
parent 157a5f7433
commit 47c0ce5f78
3 changed files with 152 additions and 0 deletions

54
tcl/dil5_sea.stick Normal file
View File

@ -0,0 +1,54 @@
stickDesc = 100 mm dilution
set box linse-dil5
proc triton {kind obj name db col {htrdb ""}} {
upvar box box
makenv $obj -driver itc$kind -port ${box}:33576 -controller _tritondil $db $htrdb
switch $kind {
temp {
GraphAdd $obj K_3 T_$name
# GraphAdd $obj.raw Ohm_3 R_$name
}
press {
GraphAdd $obj mbar_2 p_$name
}
}
}
proc itcchan {obj name dbt dbh col setcol} {
upvar box box
makenv $obj -driver itctemp -port ${box}:3000 -controller _itcdil ${dbt}.T1 ${dbh}.H1
GraphAdd $obj K_5 T_$name
GraphAdd $obj.set K_5 T_${name}_set $setcol
# GraphAdd $obj.pow W_3 pow_$name
# GraphAdd $obj.raw Ohm_3 R_$name
}
itcchan twstill wupstill MB1 MB0 blue cyan
itcchan tonek oneK DB5 DB3 red orange
itcchan twmix wupMix DB6 DB1 green lightgreen
itcchan twivc wupIVC DB7 DB2 magenta violet
itcchan tcond cond DB8 DB3 yellow grey
triton temp tsorb sorb T1 dark_violet
triton temp tivc IVC T2 brown
triton temp tstill still T3 orange
triton temp tcp cond T4 grey
triton temp tmix mix T5 cyan H1
triton press pdump dump P1 cyan
triton press pcond cond P2 blue
triton press pstill still P3 black
triton press pfore fore P4 green
triton press pback back P5 red
makenv tmixdrv -driver drvpar /tmix
defineTemperature tmixdrv

89
tcl/mb11_sea.config Normal file
View File

@ -0,0 +1,89 @@
deviceDesc = 11 Tesla vertical 100mm cryomagnet
device stick_menu "mb11 dil5 varioxB"
makenv tvs -driver itctemp -port mb11-ts:3001 -controller _tt DB6.T1 DB1.H1
GraphAdd tvs K T_VTIs red
GraphAdd tvs.set K T_stat_set orange
GraphAdd tvs.pow W pow_tvs red
# GraphAdd tvs.raw Ohm R_tvs red
makenv tvd -driver itctemp -port mb11-ts:3001 -controller _tt DB7.T1 DB2.H1
GraphAdd tvd K T_VTId magenta
GraphAdd tvd.set K T_dyn_set violet
GraphAdd tvd.pow W pow_tvd magenta
# GraphAdd tvd.raw Ohm R_tvd magenta
makeIpsLev -port mb11-ts:3003 -controller _mf -slot DB1
makenv pstat -driver itcpress -port mb11-ts:3001 -controller _tt DB5.P1 DB3.G1
GraphAdd pstat mbar p_stat
# GraphAdd pstat.pos % nv_stat
GraphAdd pstat.set mbar p_stat_set
makenv pdyn -driver itcpress -port mb11-ts:3001 -controller _tt DB8.P1 DB4.G1
GraphAdd pdyn mbar p_dyn
# GraphAdd pdyn.pos % nv_dyn
GraphAdd pdyn.set mbar p_dyn_set
makenv tneck1 -driver itctemp -port mb11-ts:3002 -controller _ta MB1.T1 MB0.H1
makenv tneck2 -driver itctemp -port mb11-ts:3002 -controller _ta DB6.T1 DB1.H1
makenv tnvs -driver itctemp -port mb11-ts:3002 -controller _ta DB7.T1 DB2.H1
makenv tnvd -driver itctemp -port mb11-ts:3002 -controller _ta DB8.T1 DB3.H1
# GraphAdd tneck1 K_2 T_neck1
# GraphAdd tneck1.pow W pow_neck1
# GraphAdd tneck2 K_2 T_neck2
# GraphAdd tneck2.pow W pow_neck2
# GraphAdd tnvs K_2 T_nvs
# GraphAdd tnvs.pow W pow_nvs
# GraphAdd tnvd K_2 T_nvd
# GraphAdd tnvd.pow W pow_nvd
makenv mf -driver ipsmag -port mb11-ts:3003 -controller _mf
makeCCU4 mb11
makeHeFill ccu4ilm
makeN2Fill ccu4ilm {
ln2fill lowlevel 10
ln2fill highlevel 90
ln2fill minfillminutes 8
ln2fill maxfillminutes 60
ln2fill minholdhours 12
ln2fill maxholdhours 96
}
makeHePump
GraphAdd mf T mf
GraphAdd mf.ips.leads_meas T mf_leads green
GraphAdd mf.ips.slave1 A I_master red
GraphAdd mf.ips.slave2 A I_slave2 green
GraphAdd mf.ips.slave3 A I_slavw3 blue
hupdate /mf/ips/symode symmetric
mf gen/profile 11:0.25
mf gen/profile_training 11:0.25
mf gen/limit 10
mf gen/wait_switch_on 60
mf gen/wait_switch_off 60
mf gen/wait_stable_leads 5
mf gen/wait_stable_field 30
makeCCU4 mb11
makeN2Fill ccu4ilm {
ln2fill lowlevel 10
# ln2fill highlevel 95
ln2fill minfillminutes 8
ln2fill maxfillminutes 40
ln2fill minholdhours 24
ln2fill maxholdhours 96
# appendVars ln2fill.smooth/%/N2smooth/13
}
makenv tcoil -driver itctemp -port mb11-ts:3003 -controller _mf MB1.T1
# GraphAdd tcoil K_2 T_coil
setstickrot mb11-ts:3004

9
tcl/mb11_sea.stick Normal file
View File

@ -0,0 +1,9 @@
stickDesc = stick for MB11
defineTemperature ts
makenv ts -driver itctemp -port mb11-ts:3001 -controller _tt MB1.T1 MB0.H1
GraphAdd ts K T_sam blue
GraphAdd ts.set K T_sam_set cyan
GraphAdd ts.pow W pow_ts blue
GraphAdd ts.raw Ohm R_ts blue