%
% set and display edit or hier drop mode
%
"DragOps('"
_Hier.Drag zero { 1 } { 0 } ifelse dup !Hier.Drag
zero
{
 &"Copy Mode"
}
{
 &"Move"
} ifelse
&"')" zerotab&
Help.!