axuact
"Tlock" log)(
 <
%
% A - all runner
 |A   "Acnt3C1V" *acurcont 
% B - builder
 |B   "Acnt3C3V" *acurcont 
% C - comm
 |C   
% D - dropout
 |D     
% E - incoming
 |E   
% F - all but products
 |F        
% G - Tem builder
 |G        
% H - Product builder
 |H        
% I - Conduit ops
 |I "Acnt2C1V" *acurcont
% K - Conduit and build ops
 |K "Acnt2C1V" *acurcont
% L - Conduit and build and phosend ops
 |L "Acnt2C1V" *acurcont
% M - Messager
 |M "Acnt3C2V" *acurcont
% P - Producer
 |P "Acnt6C3V" *acurcont     
% Q - Thumber
 |Q "Acnt3C3V" *acurcont
% R - Interactive scheduler
 |R "Acnt3C5V" *acurcont     
% X - cutter
 |X %%%% "Acnt6C1V" *acurcont     
%
% Atop chain ready at home screen
% with awing and photoshop started
% transit to C61
%
`"C00" *atopoint|
*atopwtaw|
*atopwtps|
"Acnt6C1V" *acurcont|
"C61" *atopoint|
1 atopvec|
`
%
% stack: chain-steps
%
 !Atop.Chain

%
%
 > not
 {
stop

 } if