%
% Atop generic timing spurs
%

|5400
%
% sequence the startup procedure
% according to right letter of locking code
%
% clear the Tree area where comm occurs
%
 bintree
 &"SaWing_*.*" delfiles

 5410 !tick
 100

%
% proceed with Atop
%
|5410
%
% start a web interface for current server selection
%
%%% "AtopA.html?content=Acnt0C&current=AcurA&buttons=AbutC&" *alltserv

 "Acnt0C" !Atop.Content
 "AcurA" !Atop.Current
 "AbutC" !Atop.Buttons
 false !Atop.Proceed
 "Donn" *allseter
 *lokrstar
 "Conn" *allseter
 false !Atop.Swover

 *atopstar

 5415 !tick
 100

%
% 
%
|5415
%%%%%%%%%%%%%%%%%%%%%%%%
 5415 !tick
 100

%
% 
%
|5420

 _Edit.Enabled
 {
  5422 !tick
 }
 {
  5430 !tick
 } ifelse
 100
%
% 
%
|5422
 false !Edit.Resume
 *editstar
 5424 !tick
 100
%
% wait for editor complete
%
|5424

 0 !tick
%%% *resume(
%%% 5426 !tick

 100

%
% editor started
%
|5426


 5430 !tick
 100

%
% 
%
|5430
 *atoplnex
 false !Atop.Swover
 "Custom" !Arching.Runner
 axuact
"Slock" log)(
 <
%
% A - all runner
 |A   5500   "All" !Arching.Runner
% B - builder
 |B   5500   "Build" !Arching.Runner
% C - comm
 |C   5501   "Comm" !Arching.Runner
% D - dropout
 |D   5500   "Dropout" !Arching.Runner
% E - incoming
 |E   5700   "Incoming" !Arching.Runner
% F - all but products
 |F   5500   "AllNoProd" !Arching.Runner
% G - Tem builder
 |G   5500   "TemBuild" !Arching.Runner
% H - Product builder
 |H   5500   "ProdBuild" !Arching.Runner
% I - Conduit
 |I   7000   "PhoSend" !Arching.Runner
% J - Fupload
 |J   7000   "Upload" !Arching.Runner
% K - Conduit and Build
 |K   5450   "AlsoBuild" !Arching.Runner true !Atop.Swover
% L - Conduit and Build using PhoSend
 |L   5450   "AlsoPhoSend" !Arching.Runner true !Atop.Swover
% M - messager
 |M   5700   "Messager" !Arching.Runner
% P - Product producer
 |P   5500   "Producer" !Arching.Runner
% Q - Thumbnailer
 |Q   5500   "Thumbnailer" !Arching.Runner
% R - interactive scheduler
 |R   5005   "SchedInter" !Arching.Runner
% S - scheduler
 |S   5005   "Sched" !Arching.Runner
% T - tracking
 |T   4000   "Tracker" !Arching.Runner
% X - cutter
 |X   5500   "Cutter" !Arching.Runner
%
%
 > not
 {
stop
  5950
 } if
 !tick
 _Arching.Vm
 {
  "Vm" &:Arching.Runner
 } if
 100

%
% proceed to designated Atop content
%
|5450
%
% wait for first content page
%
/*
 _Atop.Swover
 {
%
% clear conduit-specific flags
%
  *condflgs
 } if
*/

 _Atop.Proceed
 {
  5452 !tick
 } if
 300

%
% proceed to designated Atop content
%
|5452
 5005 !tick
 _Arching.Auto
 {
%
% final launch point for locker code operation
%
  *axuplace
  false !Arching.Auto
 } if
 100