%
% stack: directive
%
% "Target:I,I,I;Action"
%
":" slice
exch !target

%
% stack: rem-action
% parse remaining action
%
";" slice !indicate
{
 isnull ?
 "," slicex
 _target <machindv> notpop
 emptyx
 _indicate <machindw> notpop2
} loop
pop