SECoP: add sea_recorder command and setups for sea recorder
NICOS might call this in order to start SEA recording from SECoP servers
This commit is contained in:
@ -740,6 +740,17 @@ proc secop::update_ {} {
|
|||||||
clientlog ACTIVE
|
clientlog ACTIVE
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
set act [silent 0 sct activate_stick]
|
||||||
|
if {$act} {
|
||||||
|
sct activate_stick 0
|
||||||
|
dolater 0 activate_stick
|
||||||
|
} else {
|
||||||
|
set act [silent 0 sct activate_addon]
|
||||||
|
if {$act} {
|
||||||
|
sct activate_addon 0
|
||||||
|
dolater 0 activate_addon
|
||||||
|
}
|
||||||
|
}
|
||||||
sct active 1
|
sct active 1
|
||||||
sct end_fast 0
|
sct end_fast 0
|
||||||
}
|
}
|
||||||
|
8
tcl/secop.addon
Normal file
8
tcl/secop.addon
Normal file
@ -0,0 +1,8 @@
|
|||||||
|
addonDesc = SECoP test (version v1.0)
|
||||||
|
|
||||||
|
set ::secop_version 4
|
||||||
|
|
||||||
|
makenv secopaddon -driver secop
|
||||||
|
#debug _secopaddon
|
||||||
|
|
||||||
|
#dolater 0 _secop poll /secop 1 read test
|
8
tcl/secop.config
Normal file
8
tcl/secop.config
Normal file
@ -0,0 +1,8 @@
|
|||||||
|
deviceDesc = SECoP test (version v1.0)
|
||||||
|
|
||||||
|
set ::secop_version 4
|
||||||
|
|
||||||
|
makenv secop -driver secop
|
||||||
|
#debug _secop
|
||||||
|
|
||||||
|
#dolater 0 _secop poll /secop 1 read test
|
8
tcl/secop.stick
Normal file
8
tcl/secop.stick
Normal file
@ -0,0 +1,8 @@
|
|||||||
|
stickDesc = SECoP test (version v1.0)
|
||||||
|
|
||||||
|
set ::secop_version 4
|
||||||
|
|
||||||
|
makenv secopstick -driver secop
|
||||||
|
#debug _secopstick
|
||||||
|
|
||||||
|
#dolater 0 _secop poll /secop 1 read test
|
@ -481,3 +481,4 @@ publishLazy frappy_remove Spy
|
|||||||
publishLazy check_config Spy
|
publishLazy check_config Spy
|
||||||
publishLazy describe_obj Spy
|
publishLazy describe_obj Spy
|
||||||
publishLazy treatvars
|
publishLazy treatvars
|
||||||
|
publishLazy sea_recorder
|
||||||
|
Reference in New Issue
Block a user