%
% stack: directive
%
%%% "dirctv" log)(
%
% "Target:I,I,I;Action"
%
":" slicex
%%% "targ" log)(
!target

%
% stack: rem-action
%
%%% "remact" log)(
%
% parse remaining action
%
";" slice !indicate
%%% "premact" log)(
{
 isnull ?
%%% "nextact" log)(
 "," slicex
%%% "nextacts" log)(
 _target
%%% "tarindv" log)(
<lbarinev> notpop
%%% "aftinev" log)(
 emptyx
 _indicate
%%% "indicw" log)(
 <lbarinew> notpop2
%%% "aftinew" log)(
} loop
pop