init

lua/metrostroi/systems/sys_81_718_bkcu.lua

@@ -0,0 +1,64 @@
+--------------------------------------------------------------------------------
+-- 81-718 control circuit switching unit
+--------------------------------------------------------------------------------
+-- Copyright (C) 2013-2018 Metrostroi Team & FoxWorks Aerospace s.r.o.
+-- Contains proprietary code. See license.txt for additional information.
+--------------------------------------------------------------------------------
+Metrostroi.DefineSystem("81_718_BKCU")
+
+function TRAIN_SYSTEM:Initialize()
+    self.KM1 = 0 --Контактор-повторитель КР "Назад"
+    self.KM2 = 0 --Контактор-повторитель КР "Вперёд"
+    self.KM3 = 0 --Контактор-повторитель КР "0"
+    self.KM4 = 0 --Реле блокировки постов управления
+    self.KM5 = 0 --Контактор-повторитель КРУ "Назад"
+    self.KM6 = 0 --Контактор-повторитель КРУ "Вперёд"
+    self.KM7 = 0 --Контактор-повторитель КРУ "0"
+    self.KM8 = 0 --Реле блокировки постов управления
+
+    --Контроллер
+    self.Controller = 0
+    self.TargetController = 0
+end
+
+function TRAIN_SYSTEM:Inputs()
+    return { "KVUp", "KVDown", "KV1", "KV2", "KV3", "KV4", "KV5", "KV6", "KV7", "ControllerUnlock"}
+end
+
+function TRAIN_SYSTEM:Outputs()
+    return { "Controller" }
+end
+--if not TURBOSTROI then return end
+function TRAIN_SYSTEM:TriggerInput(name,value)
+    if name == "KVUp" and value > 0 and self.Controller < 3 then
+        if self.TargetController+1 == 0 and not self.Locker then return end
+        self.TargetController = self.TargetController + 1
+    end
+    if name == "KVDown" and value > 0 and self.TargetController > -3 then
+        self.TargetController = self.TargetController - 1
+    end
+    if name == "KV3" and value > 0 then self.TargetController = 3 end
+    if name == "KV2" and value > 0 then self.TargetController = 2 end
+    if name == "KV1" and value > 0 then self.TargetController = 1 end
+    if name == "KV4" and value > 0 then self.TargetController = 0 end
+    if name == "KV5" and value > 0 then self.TargetController = -1 end
+    if name == "KV6" and value > 0 then self.TargetController = -2 end
+    if name == "KV7" and value > 0 then self.TargetController = -3 end
+    if name == "ControllerUnlock" then self.Locker = value > 0.5 end
+    self.ControllerTimer = CurTime()-1
+end
+function TRAIN_SYSTEM:Think()
+    if self.ControllerTimer and CurTime() - self.ControllerTimer > 0.03 and self.Controller ~= self.TargetController then
+        local previousPosition = self.Controller
+        self.ControllerTimer = CurTime()
+        if self.TargetController > self.Controller then
+            self.Controller = self.Controller + 1
+        else
+            self.Controller = self.Controller - 1
+        end
+        self.Train:PlayOnce("KV_"..previousPosition.."_"..self.Controller, "cabin",0.5)
+    end
+    if self.Controller == self.TargetController then
+        self.ControllerTimer = nil
+    end
+end