State at 2023-07-22

88 files changed, 723 insertions, 12 deletions

diff --git a/far/init_code.lua b/far/init_code.lua
index 571e2c4..c9c0ece 100644
--- a/far/init_code.lua
+++ b/far/init_code.lua
@@ -1,5 +1,7 @@
 -- environment_far.lua
 if S.trains == nil then S.trains = {} end
+if S.d == nil then S.d = {} end
+if S.datetime == nil then S.datetime = "" end
 
 F.print = function (str) if F.debug then print("".. (str or "nil") ) end end
 F.isempty = function (s) return s == nil or s == "" end
@@ -20,6 +22,7 @@ end
 
 if event.init then
   F.debug = true
+  F.printAllTrainsInfo = true
   F.max_displays = 15
   F.print("Initialized")
 end
@@ -59,8 +62,12 @@ F.save_train = function(pos)
     else
       pos_string = pos["x"] .. "," .. pos["y"] .. "," .. pos["z"]
     end
-    S.trains[atc_id] = { ["id"] = atc_id, ["rc"] = F.get_rc_safe(), ["ln"] = F.get_line_safe(), ["cars_count"] = F.get_train_length_safe(), ["pos"] = pos_string }
-    -- F.print("Train ID: " .. S.trains[atc_id]["id"] .. " at " .. S.trains[atc_id]["pos"])
+    if F.has_rc("LILSHUNTER", F.get_rc_safe()) then
+      S.trains[atc_id] = { ["id"] = atc_id, ["rc"] = F.get_rc_safe(), ["ln"] = F.get_line_safe(), ["cars_count"] = F.get_train_length_safe(), ["pos"] = pos_string }
+      -- F.print("Train ID: " .. S.trains[atc_id]["id"] .. " at " .. S.trains[atc_id]["pos"])
+      -- remote_track = POS(30919,13,1812)
+      -- interrupt_pos(remote_track, "display")
+    end
   end
 end
 
@@ -88,9 +95,9 @@ end
 
 F.clear_main_depot_displays = function() for i = 1, F.max_displays, 1 do digiline_send("train_display" .. i, " ") end end
 
-F.list_trains = function(number_of_displays)
+F.list_trains = function(print_info)
   if S.trains then
-    if number_of_displays == nil then number_of_displays = F.max_displays end
+    number_of_displays = F.max_displays
     F.clear_main_depot_displays()
     number_of_displays = number_of_displays + 1
     count_keys = 0
@@ -102,6 +109,7 @@ F.list_trains = function(number_of_displays)
     table.sort(trains_table)
     -- x = number_of_displays - count_keys
     x = 1
+
     for _, k in ipairs(trains_table) do
       if S.trains[k] then
         v = S.trains[k]
@@ -151,13 +159,21 @@ F.list_trains = function(number_of_displays)
           end
           message = " ID: " .. v["id"] .. cars_count_display .. rc_display ..  line_number .. pos_string
           if x > 0 then digiline_send("train_display" .. x, message) end
-          F.print(x .. ": " .. message)
+          if print_info then
+            F.print(x .. ": " .. message)
+          end
           x = x + 1
         end
       end
     end
+
+    -- S.datetime = os.date("%Y-%m-%d %H:%M:%S")
+    -- digiline_send("time", "  \n    " .. S.datetime)
+
   else
-    F.print("no trains saved in S.trains")
+    if print_info then
+      F.print("no trains saved in S.trains")
+    end
   end
 end
 
diff --git a/far/nodes/(10018,5,1360).lua b/far/nodes/(10018,5,1360).lua
new file mode 100644
index 0000000..91d86ab
--- /dev/null
+++ b/far/nodes/(10018,5,1360).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 10018,5,1360 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(10022,5,1355).lua b/far/nodes/(10022,5,1355).lua
new file mode 100644
index 0000000..740a8eb
--- /dev/null
+++ b/far/nodes/(10022,5,1355).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 10022,5,1355 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(10438,13,1610).lua b/far/nodes/(10438,13,1610).lua
new file mode 100644
index 0000000..495e96a
--- /dev/null
+++ b/far/nodes/(10438,13,1610).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 10438,13,1610 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(11242,4,932).lua b/far/nodes/(11242,4,932).lua
new file mode 100644
index 0000000..a876224
--- /dev/null
+++ b/far/nodes/(11242,4,932).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 11242,4,932 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(11256,4,928).lua b/far/nodes/(11256,4,928).lua
new file mode 100644
index 0000000..2dad637
--- /dev/null
+++ b/far/nodes/(11256,4,928).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 11256,4,928 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(11743,15,762).lua b/far/nodes/(11743,15,762).lua
new file mode 100644
index 0000000..fd92811
--- /dev/null
+++ b/far/nodes/(11743,15,762).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 11743,15,762 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(12288,28,733).lua b/far/nodes/(12288,28,733).lua
new file mode 100644
index 0000000..ace9308
--- /dev/null
+++ b/far/nodes/(12288,28,733).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 12288,28,733 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(12829,10,676).lua b/far/nodes/(12829,10,676).lua
new file mode 100644
index 0000000..9fb5699
--- /dev/null
+++ b/far/nodes/(12829,10,676).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 12829,10,676 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(13843,20,672).lua b/far/nodes/(13843,20,672).lua
new file mode 100644
index 0000000..47de8b0
--- /dev/null
+++ b/far/nodes/(13843,20,672).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 13843,20,672 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(14396,20,712).lua b/far/nodes/(14396,20,712).lua
new file mode 100644
index 0000000..31245a3
--- /dev/null
+++ b/far/nodes/(14396,20,712).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 14396,20,712 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(14398,20,708).lua b/far/nodes/(14398,20,708).lua
new file mode 100644
index 0000000..4c62a82
--- /dev/null
+++ b/far/nodes/(14398,20,708).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 14398,20,708 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(14934,6,731).lua b/far/nodes/(14934,6,731).lua
new file mode 100644
index 0000000..5e81009
--- /dev/null
+++ b/far/nodes/(14934,6,731).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 14934,6,731 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(15907,25,945).lua b/far/nodes/(15907,25,945).lua
new file mode 100644
index 0000000..9a4d746
--- /dev/null
+++ b/far/nodes/(15907,25,945).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 15907,25,945 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(15907,25,950).lua b/far/nodes/(15907,25,950).lua
new file mode 100644
index 0000000..0e37631
--- /dev/null
+++ b/far/nodes/(15907,25,950).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 15907,25,950 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(16806,10,700).lua b/far/nodes/(16806,10,700).lua
new file mode 100644
index 0000000..2e458fd
--- /dev/null
+++ b/far/nodes/(16806,10,700).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 16806,10,700 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(1755,8,1570).lua b/far/nodes/(1755,8,1570).lua
new file mode 100644
index 0000000..5c9fe05
--- /dev/null
+++ b/far/nodes/(1755,8,1570).lua
@@ -0,0 +1,12 @@
+-- far_luaatctrack_spot_check_01.lua
+-- POS(dd,dd,dd)
+--[[
+POS(1755,8,1570)
+]]
+
+local show_print = false
+if event.train then
+  local posTable = POS(1755,8,1570)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(17862,14,599).lua b/far/nodes/(17862,14,599).lua
new file mode 100644
index 0000000..b43042b
--- /dev/null
+++ b/far/nodes/(17862,14,599).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 17862,14,599 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(17862,14,602).lua b/far/nodes/(17862,14,602).lua
new file mode 100644
index 0000000..4e030e5
--- /dev/null
+++ b/far/nodes/(17862,14,602).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 17862,14,602 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(17950,25,599).lua b/far/nodes/(17950,25,599).lua
new file mode 100644
index 0000000..16ac692
--- /dev/null
+++ b/far/nodes/(17950,25,599).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 17950,25,599 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(17950,25,602).lua b/far/nodes/(17950,25,602).lua
new file mode 100644
index 0000000..85cb8b4
--- /dev/null
+++ b/far/nodes/(17950,25,602).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 17950,25,602 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(1829,8,1548).lua b/far/nodes/(1829,8,1548).lua
new file mode 100644
index 0000000..942c05a
--- /dev/null
+++ b/far/nodes/(1829,8,1548).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 1829,8,1548 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(1860,7,1570).lua b/far/nodes/(1860,7,1570).lua
new file mode 100644
index 0000000..a3f7a71
--- /dev/null
+++ b/far/nodes/(1860,7,1570).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 1860,7,1570 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(18974,14,851).lua b/far/nodes/(18974,14,851).lua
new file mode 100644
index 0000000..d1f1881
--- /dev/null
+++ b/far/nodes/(18974,14,851).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 18974,14,851 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(1936,10,1543).lua b/far/nodes/(1936,10,1543).lua
new file mode 100644
index 0000000..add2167
--- /dev/null
+++ b/far/nodes/(1936,10,1543).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 1936,10,1543 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(1936,10,1546).lua b/far/nodes/(1936,10,1546).lua
new file mode 100644
index 0000000..9449cee
--- /dev/null
+++ b/far/nodes/(1936,10,1546).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 1936,10,1546 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(20279,14,683).lua b/far/nodes/(20279,14,683).lua
new file mode 100644
index 0000000..27e74d1
--- /dev/null
+++ b/far/nodes/(20279,14,683).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 20279,14,683 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(20280,14,687).lua b/far/nodes/(20280,14,687).lua
new file mode 100644
index 0000000..89ba70e
--- /dev/null
+++ b/far/nodes/(20280,14,687).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 20280,14,687 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(21823,25,1293).lua b/far/nodes/(21823,25,1293).lua
new file mode 100644
index 0000000..491b28a
--- /dev/null
+++ b/far/nodes/(21823,25,1293).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 21823,25,1293 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(21825,25,1289).lua b/far/nodes/(21825,25,1289).lua
new file mode 100644
index 0000000..ebc9c7d
--- /dev/null
+++ b/far/nodes/(21825,25,1289).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 21825,25,1289 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(22976,16,1392).lua b/far/nodes/(22976,16,1392).lua
new file mode 100644
index 0000000..a457581
--- /dev/null
+++ b/far/nodes/(22976,16,1392).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 22976,16,1392 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(22976,16,1396).lua b/far/nodes/(22976,16,1396).lua
new file mode 100644
index 0000000..29d6638
--- /dev/null
+++ b/far/nodes/(22976,16,1396).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 22976,16,1396 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(23263,7,1701).lua b/far/nodes/(23263,7,1701).lua
new file mode 100644
index 0000000..826ae2c
--- /dev/null
+++ b/far/nodes/(23263,7,1701).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 23263,7,1701 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(23263,7,1704).lua b/far/nodes/(23263,7,1704).lua
new file mode 100644
index 0000000..f714792
--- /dev/null
+++ b/far/nodes/(23263,7,1704).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 23263,7,1704 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(23736,12,1706).lua b/far/nodes/(23736,12,1706).lua
new file mode 100644
index 0000000..d4b4a27
--- /dev/null
+++ b/far/nodes/(23736,12,1706).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 23736,12,1706 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(24295,24,1573).lua b/far/nodes/(24295,24,1573).lua
new file mode 100644
index 0000000..14e99ec
--- /dev/null
+++ b/far/nodes/(24295,24,1573).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 24295,24,1573 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(25147,24,1460).lua b/far/nodes/(25147,24,1460).lua
new file mode 100644
index 0000000..ff8823c
--- /dev/null
+++ b/far/nodes/(25147,24,1460).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 25147,24,1460 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(25150,24,1457).lua b/far/nodes/(25150,24,1457).lua
new file mode 100644
index 0000000..f910641
--- /dev/null
+++ b/far/nodes/(25150,24,1457).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 25150,24,1457 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(26345,30,1505).lua b/far/nodes/(26345,30,1505).lua
new file mode 100644
index 0000000..0b528fe
--- /dev/null
+++ b/far/nodes/(26345,30,1505).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 26345,30,1505 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(26347,30,1502).lua b/far/nodes/(26347,30,1502).lua
new file mode 100644
index 0000000..ace4109
--- /dev/null
+++ b/far/nodes/(26347,30,1502).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 26347,30,1502 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(27154,12,1730).lua b/far/nodes/(27154,12,1730).lua
new file mode 100644
index 0000000..25b9f95
--- /dev/null
+++ b/far/nodes/(27154,12,1730).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 27154,12,1730 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(27156,12,1727).lua b/far/nodes/(27156,12,1727).lua
new file mode 100644
index 0000000..ee30401
--- /dev/null
+++ b/far/nodes/(27156,12,1727).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 27156,12,1727 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(27668,6,1622).lua b/far/nodes/(27668,6,1622).lua
new file mode 100644
index 0000000..a5d4ad8
--- /dev/null
+++ b/far/nodes/(27668,6,1622).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 27668,6,1622 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(28048,8,1616).lua b/far/nodes/(28048,8,1616).lua
new file mode 100644
index 0000000..aa44767
--- /dev/null
+++ b/far/nodes/(28048,8,1616).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 28048,8,1616 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(29459,26,1433).lua b/far/nodes/(29459,26,1433).lua
new file mode 100644
index 0000000..c08dcd5
--- /dev/null
+++ b/far/nodes/(29459,26,1433).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 29459,26,1433 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(30147,27,1732).lua b/far/nodes/(30147,27,1732).lua
new file mode 100644
index 0000000..883c82a
--- /dev/null
+++ b/far/nodes/(30147,27,1732).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 30147,27,1732 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(30150,27,1729).lua b/far/nodes/(30150,27,1729).lua
new file mode 100644
index 0000000..df2b3cb
--- /dev/null
+++ b/far/nodes/(30150,27,1729).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 30150,27,1729 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(30548,25,1613).lua b/far/nodes/(30548,25,1613).lua
new file mode 100644
index 0000000..a0ba611
--- /dev/null
+++ b/far/nodes/(30548,25,1613).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 30548,25,1613 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(30676,20,1636).lua b/far/nodes/(30676,20,1636).lua
new file mode 100644
index 0000000..440f1a9
--- /dev/null
+++ b/far/nodes/(30676,20,1636).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 30676,20,1636 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(30676,20,1641).lua b/far/nodes/(30676,20,1641).lua
new file mode 100644
index 0000000..dfad573
--- /dev/null
+++ b/far/nodes/(30676,20,1641).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 30676,20,1641 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(30777,15,1712).lua b/far/nodes/(30777,15,1712).lua
new file mode 100644
index 0000000..75e9ff9
--- /dev/null
+++ b/far/nodes/(30777,15,1712).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 30777,15,1712 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(30785,15,1711).lua b/far/nodes/(30785,15,1711).lua
index 06bdb5c..3097ac1 100644
--- a/far/nodes/(30785,15,1711).lua
+++ b/far/nodes/(30785,15,1711).lua
@@ -2,9 +2,13 @@
 local signal_pos = "FareastEndEntrySignal"
 local last_route = "3"
 local proposed_route_name = ""
+local posTable = POS( 30785,15,1711 )
 
 if event.type == "train" then
   if not atc_id then return end
+
+  F.save_train(posTable)
+
   if atc_arrow then
     atc_send("B0")
   end
@@ -18,4 +22,3 @@ if event.type == "train" then
     end
   end
 end
-
diff --git a/far/nodes/(30870,15,1800).lua b/far/nodes/(30870,15,1800).lua
index b50e6aa..153ef38 100644
--- a/far/nodes/(30870,15,1800).lua
+++ b/far/nodes/(30870,15,1800).lua
@@ -5,4 +5,15 @@ if event.train then
   local posTable = POS(30870,15,1800)
   F.save_train(posTable)
   return
+end
+
+
+-- INSIDE A STUPID FUCKING LUA TRACK
+-- DONT TOUCH OR ELSE
+if event.type == "ext_int" then
+     if event.message == "display" then
+          header()
+          disp_data()
+     end
+     return
 end
\ No newline at end of file
diff --git a/far/nodes/(30919,13,1812).lua b/far/nodes/(30919,13,1812).lua
new file mode 100644
index 0000000..392f2a6
--- /dev/null
+++ b/far/nodes/(30919,13,1812).lua
@@ -0,0 +1,10 @@
+if event.type == "ext_int" then
+  if event.message == "display" then
+    S.datetime = os.date("%Y-%m-%d %H:%M:%S")
+    digiline_send("time", "  \n    " .. S.datetime)
+    F.list_trains(true)
+    F.print("INSIDE A LUA TRACK: " .. S.datetime)
+  end
+  return
+end
+
diff --git a/far/nodes/(30919,13,1814).lua b/far/nodes/(30919,13,1814).lua
index 0bf4df5..738d0c0 100644
--- a/far/nodes/(30919,13,1814).lua
+++ b/far/nodes/(30919,13,1814).lua
@@ -1,9 +1,27 @@
+-- far_luaatctrack_farcom_op_01.lua
+
 
-local show_print = false
 if event.type == "punch" then
+--  F.delete_train_info("298909")
+  digiline_send("time", "   \nUPDATE")
+
+  S.datetime = os.date("%Y-%m-%d %H:%M:%S")
+  digiline_send("time", "  \n    " .. S.datetime)
+  F.list_trains(false)
+--  local pos = POS(30919,13,1812)
+--  interrupt_pos(pos, "display")
+--  interrupt(1, "farcom_display")
+  return
+end
+
+
+--[[
 
---  F.delete_train_info("595542")
+if event.iid == "farcom_display" then
+  local pos = POS(30919,13,1812)
+  interrupt_pos(pos, "display")
 
-  F.list_trains(15)
+  interrupt(30, "farcom_display")
   return
-end
\ No newline at end of file
+end
+]]
\ No newline at end of file
diff --git a/far/nodes/(30919,13,1815).lua b/far/nodes/(30919,13,1815).lua
index dee866e..5624662 100644
--- a/far/nodes/(30919,13,1815).lua
+++ b/far/nodes/(30919,13,1815).lua
@@ -2,8 +2,11 @@
 local show_print = false
 if event.type == "punch" then
 
-  F.slow_train_down("458503")
+  F.slow_train_down("010765")
+-- F.slow_train_down("403053")
+-- F.slow_train_down("428934")
 
   F.clear_main_depot_displays()
+  F.print("Cleared displays at FARCOM")
   return
 end
\ No newline at end of file
diff --git a/far/nodes/(3161,16,1586).lua b/far/nodes/(3161,16,1586).lua
new file mode 100644
index 0000000..cbf0ef6
--- /dev/null
+++ b/far/nodes/(3161,16,1586).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 3161,16,1586 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(3161,16,1592).lua b/far/nodes/(3161,16,1592).lua
new file mode 100644
index 0000000..3962ceb
--- /dev/null
+++ b/far/nodes/(3161,16,1592).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 3161,16,1592 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(3695,10,1719).lua b/far/nodes/(3695,10,1719).lua
new file mode 100644
index 0000000..657a65a
--- /dev/null
+++ b/far/nodes/(3695,10,1719).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 3695,10,1719 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(3773,10,1715).lua b/far/nodes/(3773,10,1715).lua
new file mode 100644
index 0000000..3c13feb
--- /dev/null
+++ b/far/nodes/(3773,10,1715).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 3773,10,1715 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(3773,10,1719).lua b/far/nodes/(3773,10,1719).lua
new file mode 100644
index 0000000..50be201
--- /dev/null
+++ b/far/nodes/(3773,10,1719).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 3773,10,1719 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(3847,10,1719).lua b/far/nodes/(3847,10,1719).lua
new file mode 100644
index 0000000..274d03f
--- /dev/null
+++ b/far/nodes/(3847,10,1719).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 3847,10,1715 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(4162,16,1870).lua b/far/nodes/(4162,16,1870).lua
new file mode 100644
index 0000000..e14be3e
--- /dev/null
+++ b/far/nodes/(4162,16,1870).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(4162,16,1870)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(4364,-2,1953).lua b/far/nodes/(4364,-2,1953).lua
new file mode 100644
index 0000000..3c25727
--- /dev/null
+++ b/far/nodes/(4364,-2,1953).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 4364,-2,1953 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(4368,-2,1952).lua b/far/nodes/(4368,-2,1952).lua
new file mode 100644
index 0000000..80d9c20
--- /dev/null
+++ b/far/nodes/(4368,-2,1952).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 4368,-2,1952 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(4423,-2,2054).lua b/far/nodes/(4423,-2,2054).lua
new file mode 100644
index 0000000..46397c1
--- /dev/null
+++ b/far/nodes/(4423,-2,2054).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 4423,-2,2054 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(4426,-2,2052).lua b/far/nodes/(4426,-2,2052).lua
new file mode 100644
index 0000000..a752812
--- /dev/null
+++ b/far/nodes/(4426,-2,2052).lua
@@ -0,0 +1,7 @@
+-- far_luaatctrack_spot_check_01.lua
+
+if event.train then
+  local posTable = POS( 4426,-2,2052 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(4728,11,2211).lua b/far/nodes/(4728,11,2211).lua
new file mode 100644
index 0000000..bc2d604
--- /dev/null
+++ b/far/nodes/(4728,11,2211).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(4728,11,2211)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(4839,7,2226).lua b/far/nodes/(4839,7,2226).lua
new file mode 100644
index 0000000..37eee58
--- /dev/null
+++ b/far/nodes/(4839,7,2226).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(4839,7,2226)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(5326,32,2314).lua b/far/nodes/(5326,32,2314).lua
new file mode 100644
index 0000000..fe2fee9
--- /dev/null
+++ b/far/nodes/(5326,32,2314).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(5326,32,2314)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(5326,32,2318).lua b/far/nodes/(5326,32,2318).lua
new file mode 100644
index 0000000..f16da09
--- /dev/null
+++ b/far/nodes/(5326,32,2318).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(5326,32,2318)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(5856,21,2306).lua b/far/nodes/(5856,21,2306).lua
new file mode 100644
index 0000000..72eeb79
--- /dev/null
+++ b/far/nodes/(5856,21,2306).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(5856,21,2306)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(6173,25,2302).lua b/far/nodes/(6173,25,2302).lua
new file mode 100644
index 0000000..690af51
--- /dev/null
+++ b/far/nodes/(6173,25,2302).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(6173,25,2302)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(6173,25,2312).lua b/far/nodes/(6173,25,2312).lua
new file mode 100644
index 0000000..ab08a5c
--- /dev/null
+++ b/far/nodes/(6173,25,2312).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(6173,25,2312)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(6575,10,2347).lua b/far/nodes/(6575,10,2347).lua
new file mode 100644
index 0000000..3f71a74
--- /dev/null
+++ b/far/nodes/(6575,10,2347).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(6575,10,2347)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(6575,10,2351).lua b/far/nodes/(6575,10,2351).lua
new file mode 100644
index 0000000..9b82d8f
--- /dev/null
+++ b/far/nodes/(6575,10,2351).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(6575,10,2351)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(7288,5,1987).lua b/far/nodes/(7288,5,1987).lua
new file mode 100644
index 0000000..07f806b
--- /dev/null
+++ b/far/nodes/(7288,5,1987).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(7288,5,1987)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(7288,5,1991).lua b/far/nodes/(7288,5,1991).lua
new file mode 100644
index 0000000..50c0fac
--- /dev/null
+++ b/far/nodes/(7288,5,1991).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS(7288,5,1991)
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(7795,11,1991).lua b/far/nodes/(7795,11,1991).lua
new file mode 100644
index 0000000..507ad82
--- /dev/null
+++ b/far/nodes/(7795,11,1991).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 7795,11,1991 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(8242,6,2064).lua b/far/nodes/(8242,6,2064).lua
new file mode 100644
index 0000000..8dc8759
--- /dev/null
+++ b/far/nodes/(8242,6,2064).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 8242,6,2064 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(8630,14,1686).lua b/far/nodes/(8630,14,1686).lua
new file mode 100644
index 0000000..50c7834
--- /dev/null
+++ b/far/nodes/(8630,14,1686).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 8630,14,1686 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(8633,14,1688).lua b/far/nodes/(8633,14,1688).lua
new file mode 100644
index 0000000..bafbb3a
--- /dev/null
+++ b/far/nodes/(8633,14,1688).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 8633,14,1688 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(8783,18,1304).lua b/far/nodes/(8783,18,1304).lua
new file mode 100644
index 0000000..882c2be
--- /dev/null
+++ b/far/nodes/(8783,18,1304).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 8783,18,1304 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(8787,18,1307).lua b/far/nodes/(8787,18,1307).lua
new file mode 100644
index 0000000..b95567a
--- /dev/null
+++ b/far/nodes/(8787,18,1307).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 8787,18,1307 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(9076,26,963).lua b/far/nodes/(9076,26,963).lua
new file mode 100644
index 0000000..70ebbb9
--- /dev/null
+++ b/far/nodes/(9076,26,963).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 9076,26,963 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(9080,26,966).lua b/far/nodes/(9080,26,966).lua
new file mode 100644
index 0000000..a75f21b
--- /dev/null
+++ b/far/nodes/(9080,26,966).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 9080,26,966 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(9603,7,761).lua b/far/nodes/(9603,7,761).lua
new file mode 100644
index 0000000..51652bf
--- /dev/null
+++ b/far/nodes/(9603,7,761).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 9603,7,761 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file
diff --git a/far/nodes/(9603,7,765).lua b/far/nodes/(9603,7,765).lua
new file mode 100644
index 0000000..51652bf
--- /dev/null
+++ b/far/nodes/(9603,7,765).lua
@@ -0,0 +1,8 @@
+-- far_luaatctrack_spot_check_01.lua
+
+local show_print = false
+if event.train then
+  local posTable = POS( 9603,7,761 )
+  F.save_train(posTable)
+  return
+end
\ No newline at end of file