% % tracker timing spurs % |4000 4010 !Gearing 100 !Trak.Spin 50 !Time.Cycle 3 !Time.Thour 40 !Time.Keep 15 !Sim.Zoom true !Initing 0 !Watchdog Time.Now !Watching Time.Now !Delta "Trak" ofconn folder pop "Fencing" ofconn folder pop "Alerts" ofconn folder pop % % initialize tracker process % *trakstar 0 !Fen.Next empty !Fen.Seed 0 !Atop.Ticker 4005 !tick 100 !Trak.Standoff 100 |4005 -Trak.Standoff 0 gt { } { *traklopn true !Initing 4010 !tick } ifelse 100 |4010 4020 !Gearing +Watchdog 20 gt { *watchers } if % % flags for cycle protection % *trakflgs % % check for tracker changes % "tracker" *trakings { % % write the comprehensive sim list % currently not using cellular connections % %%% "sims" "Tracker" *webtelln % % write the current trackers database list % "trackers" "Tracker" *webportl % % generate all lists and js in sims summary process % %%% *trakstap % % create javascript for tracker ui % "All" !Sim.Track *trakstan "Trackers" !Sim.Track *trakstan /* % % insure data network pathways for trackers % *trakdwin */ } if *trakspur |4020 4050 !Gearing *trakevak "vehicle" *trakings { % % write the current vehicles list % "vehicles" "Tracker" *webportl % % vehicles/tracker js for lists % % matching vehicles and trackers % "Images" !Sim.Track "Vehicles" text*conn "Vehicles" !Sim.Track "Vehicles" text*conn } if *trakspur |4050 4080 !Gearing /* % % process incoming tracker data % *traks103 % % process the next tracker % +Sim.Next "Actives" text?conn { empty !IMEI "trak_" &_Sim.UniqueName text*conn _IMEI isnull) { } { _IMEI 10 right ^"1" !Sim.PartImei } ifelse } { 0 !Sim.Next } ifelse } if */ "fence" *trakings { /* % % write the multiple forms of geo fences % "fence&act=geo" "Tracker" *webtelln % % fences js list/summary % *trakstaw */ } if *trakspur |4080 4010 !Gearing % % downstream actions % *fintimer % % process commands and outgoing messages % 0 !Sim.Next { *traknext ? *trakmapu } loop % % enforce time limit barriers on tracker files % /* *barriers */ false !Initing *trakspur |4090 0 !Gearing *trakspur |4200 4201 !Gearing "off" *atoptick *trakspur |4201 4201 !Gearing *atopchek *trakspur |4300 4010 !Gearing "on" *atoptick *trakspur