linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added t0_chopper_freq for Bilby.

Browse Source
This commit is contained in:
Ferdi Franceschini
2014-07-16 15:02:49 +10:00
parent 3d6488e254
commit 423244858e
1 changed files with 14 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
site_ansto/instrument/bilby/config/chopper/chopper.tcl
View File

@ -36,3 +36,17 @@ if {$sim_mode == false} {
sicslist setatt t0_chopper_id klass NXdisk_chopper sicslist setatt t0_chopper_id klass NXdisk_chopper
sicslist setatt t0_chopper_id long_name t0_chopper_id sicslist setatt t0_chopper_id long_name t0_chopper_id
sicslist setatt t0_chopper_id mutable true sicslist setatt t0_chopper_id mutable true
if [dict exists $::config_dict disk_chopper name] {
set ch_name [dict get $::config_dict disk_chopper name]
} else {
clientput ERROR: Chopper configuration is missing
}
::utility::macro::getset float t0_chopper_freq [subst { {chopper $ch_name} }] {
set cid [SplitReply [t0_chopper_id]]
set rpm [hval /instrument/$chopper/disk_$cid/aspeed]
return [expr $rpm / 60.0]
}
sicslist setatt t0_chopper_freq klass NXdisk_chopper
sicslist setatt t0_chopper_freq long_name t0_chopper_freq
sicslist setatt t0_chopper_freq mutable true