Files
sea/tcl/pestick.stick
2025-01-17 17:05:02 +01:00

14 lines
410 B
Plaintext

stickDesc = PE stick via Frappy / for MB11 / VarioxB
set ::secop_version 4
set ins [result instrument]
if {[string match "prep*" $ins]} {
set nr [string range $ins end end]
makenv frappy_stick -driver secop -port localhost:1521$nr
} elseif {[lindex [split [info hostname] .] 0] ne $ins} {
error "runs on instruments or prep0-9 only"
} else {
makenv frappy_stick -driver secop -port localhost:15201
}