fileeval $cfPath(beamline)/sct_flipper.tcl # NOTE: opCurr is 10 * your operating current, ie if the current is 7.1 then opCurr = 71 ::scobj::rfgen::mkFlipper [subst { name "flipper" address 1 opCurr 71 opFreq 407 IP [dict get $::ACGEN_HOSTPORT ANSFR83B HOST] PORT [dict get $::ACGEN_HOSTPORT ANSFR83B PORT] tuning 1 interval 2 currtol 1 compCurr 1 guideCurr 1 thickness 1 }]