%
% machine serial open
%

@SerialA
@!Prop
@_IsSet
"PortSet?" log)(
pop
"Siphon" @!Gate
true @!Open
@^Open
"SerialOpen" log)(
pop
@^Cts
hide
true !SerialA.Enabled
false !Tsrv.BypassA
*serlsava