metrostroi-repo/MetrostroiAddon
1
0
Fork 0
mirror of https://github.com/metrostroi-repo/MetrostroiAddon.git synced 2026-05-02 00:42:29 +00:00
Code Activity
Files
11c124e7911787186bef4cdbe6fa5f908bb6f1c0
MetrostroiAddon/lua/metrostroi/systems/sys_kv_20.lua
g_brzhezinskiy 1d05caf866 init
2021-01-02 12:51:45 +03:00

208 lines
8.8 KiB
Lua
Raw Blame History

--------------------------------------------------------------------------------
-- KV-20 controller
--------------------------------------------------------------------------------
-- Copyright (C) 2013-2018 Metrostroi Team & FoxWorks Aerospace s.r.o.
-- Contains proprietary code. See license.txt for additional information.
--------------------------------------------------------------------------------
Metrostroi.DefineSystem("KV_20")
function TRAIN_SYSTEM:Initialize()
self.Enabled = 1
self.RCU = 1
self.ControllerPosition = 0
self.ReverserPosition = 0
self.RealControllerPosition = 0
self.ChangeSpeed = 0.10
self.ReverserMatrix = {
{ "U2" , "4" },
{ 1, 0, 0 },
{ "U2" , "5M" },
{ 0, 0, 1 },
{ "10" , "F1" },
{ 1, 1, 0 },
{ "D" , "D2" },
{ 1, 0, 1 },
{ "D" , "D1" },
{ 1, 0, 1 },
{ "F" , "F7" },
{ 0, 0, 1 },
}
self.ControllerMatrix = {
{"U2", "10AK"},
{ 1, 1, 1, 0, 1, 1, 1 },
{"10", "8" },
{ 1, 0, 0, 0, 0, 0, 0 },
{"U2", "1" },
{ 0, 0, 0, 0, 1, 1, 1 },
{"U2", "2" },
{ 1, 1, 0, 0, 0, 1, 1 },
{"U2", "3" },
{ 0, 0, 0, 0, 0, 0, 1 },
{"U2", "6" },
{ 1, 1, 1, 0, 0, 0, 0 },
{"U2", "7" },
{ 0, 1, 0, 0, 0, 0, 0 },
{"0", "12"},
{ 1, 1, 1, 0, 1, 1, 1 },
{"10AK", "17"},
{ 0, 0, 0, 1, 0, 0, 0 },
{"5M", "5" },
{ 1, 1, 1, 0, 0, 0, 0 },
}
-- Initialize contacts values
for i=1,#self.ReverserMatrix/2 do
local v = self.ReverserMatrix[i*2-1]
self[v[1].."-"..v[2]] = 0
end
for i=1,#self.ControllerMatrix/2 do
local v = self.ControllerMatrix[i*2-1]
self[v[1].."-"..v[2]] = 0
end
end
function TRAIN_SYSTEM:Inputs()
return { "Enabled", "RCU", "ControllerSet", "ReverserSet",
"ControllerUp","ControllerDown","ReverserUp","ReverserDown",
"SetX1", "SetX2", "SetX3", "Set0", "Set0Fast", "SetT1", "SetT1A", "SetT2", }
end
function TRAIN_SYSTEM:Outputs()
return { "ControllerPosition","RealControllerPosition", "ReverserPosition", "RCU"}
end
function TRAIN_SYSTEM:TriggerInput(name,value)
local prevReverserPosition = self.ReverserPosition
-- Change position
if name == "Type" then
self.Type = math.floor(value)
elseif name == "Enabled" then
self.Enabled = math.floor(value)
elseif name == "RCU" then
if self.RCU ~= math.floor(value) then
self.RCU = math.floor(value)
self.Train:PlayOnce(self.RCU==1 and "rcu_on" or "rcu_off", "cabin",0.9)
end
elseif name == "ControllerSet" then
if self.Enabled ~= 0 and (self.ReverserPosition ~= 0) and (math.floor(value) ~= self.ControllerPosition) then
local prevControllerPosition = self.ControllerPosition
self.ControllerPosition = math.floor(value)
-- Limit motion
if self.ControllerPosition > 3 then self.ControllerPosition = 3 end
if self.ControllerPosition < -3 then self.ControllerPosition = -3 end
end
elseif name == "ReverserSet" then
if self.Enabled ~= 0 and (math.floor(value) ~= self.ReverserPosition) and self.ControllerPosition == 0 then
local prevReverserPosition = self.ReverserPosition
self.ReverserPosition = math.floor(value)
if self.ReverserPosition > 1 then self.ReverserPosition = 1 end
if self.ReverserPosition < -1 then self.ReverserPosition = -1 end
if prevReverserPosition ~= self.ReverserPosition then
if self.ReverserPosition == -1 then self.Train:PlayOnce("ezh3_revers_0-b","cabin",1) end
if self.ReverserPosition == 0 then
if prevReverserPosition == -1 then
self.Train:PlayOnce("ezh3_revers_b-0","cabin",1)
else
self.Train:PlayOnce("ezh3_revers_f-0","cabin",1)
end
end
if self.ReverserPosition == 1 then self.Train:PlayOnce("ezh3_revers_0-f","cabin",1) end
end
end
elseif (name == "ControllerUp") and (value > 0.5) then
self:TriggerInput("ControllerSet",self.ControllerPosition+1)
self.Timer = CurTime()-self.ChangeSpeed
self.SecondSound = true
elseif (name == "ControllerDown") and (value > 0.5) then
self:TriggerInput("ControllerSet",self.ControllerPosition-1)
self.Timer = CurTime()-self.ChangeSpeed
self.SecondSound = true
elseif (name == "ReverserUp") and (value > 0.5) then
self:TriggerInput("ReverserSet",self.ReverserPosition+1)
elseif (name == "ReverserDown") and (value > 0.5) then
self:TriggerInput("ReverserSet",self.ReverserPosition-1)
elseif (name == "SetX1") and (value > 0.5) then
self:TriggerInput("ControllerSet",1)
elseif (name == "SetX2") and (value > 0.5) then
self:TriggerInput("ControllerSet",2)
elseif (name == "SetX3") and (value > 0.5) then
self:TriggerInput("ControllerSet",3)
elseif (name == "Set0") and (value > 0.5) then
self:TriggerInput("ControllerSet",0)
elseif (name == "Set0Fast") and (value > 0.5) then
self:TriggerInput("ControllerSet",0)
self.ChangeSpeed = 0.05
elseif (name == "SetT1") and (value > 0.5) then
self:TriggerInput("ControllerSet",-1)
elseif (name == "SetT1A") and (value > 0.5) then
self:TriggerInput("ControllerSet",-2)
elseif (name == "SetT2") and (value > 0.5) then
self:TriggerInput("ControllerSet",-3)
end
end
function TRAIN_SYSTEM:Think()
--self:Initialize()
local Train = self.Train
if (self.Enabled == 0) and (self.ReverserPosition ~= 0) then
self.ReverserPosition = 0
self.ControllerPosition = 0
end
if (self.ReverserPosition == 0) and (self.ControllerPosition ~= 0) then
self.ReverserPosition = 0
self.ControllerPosition = 0
end
-- Move controller
self.Timer = self.Timer or CurTime()
if ((CurTime() - self.Timer > self.ChangeSpeed) and (self.ControllerPosition > self.RealControllerPosition)) then
local previousPosition = self.RealControllerPosition
self.Timer = CurTime()
self.RealControllerPosition = self.RealControllerPosition + 1
local A,B = previousPosition,self.RealControllerPosition
if (A == -3) and (B == -2) then self.Train:PlayOnce("kv40_t2_t1a", "cabin",1) end
if (A == -2) and (B == -1) then self.Train:PlayOnce("kv40_t1a_t1", "cabin",1) end
if self.SecondSound and (A == -1) and (B == 0) then self.Train:PlayOnce("kv40_t1_0", "cabin",1) end
if not self.SecondSound and (A == -1) and (B == 0) then self.Train:PlayOnce("kv40_t1_0", "cabin",1) end
if (A == 0) and (B == 1) then self.Train:PlayOnce("kv40_0_x1", "cabin",1) end
if (A == 1) and (B == 2) then self.Train:PlayOnce("kv40_x1_x2", "cabin",1) end
if (A == 2) and (B == 3) then self.Train:PlayOnce("kv40_x2_x3", "cabin",1) end
self.SecondSound = nil
end
if ((CurTime() - self.Timer > self.ChangeSpeed) and (self.ControllerPosition < self.RealControllerPosition)) then
local previousPosition = self.RealControllerPosition
self.Timer = CurTime()
self.RealControllerPosition = self.RealControllerPosition - 1
local A,B = previousPosition,self.RealControllerPosition
if (A == 3) and (B == 2) then self.Train:PlayOnce("kv40_x3_x2", "cabin",0.9) end
if (A == 2) and (B == 1) then self.Train:PlayOnce("kv40_x2_x1", "cabin",0.9) end
if (A == 1) and (B == 0) then self.Train:PlayOnce("kv40_x1_0", "cabin",0.9) end
if (A == 0) and (B == -1) then self.Train:PlayOnce("kv40_0_t1", "cabin",0.8) end
if (A == -1) and (B == -2) then self.Train:PlayOnce("kv40_t1_t1a", "cabin",0.8) end
if (A == -2) and (B == -3) then self.Train:PlayOnce("kv40_t1a_t2", "cabin",0.8) end
self.SecondSound = nil
end
if self.RealControllerPosition == 0 then self.ChangeSpeed = 0.10 end
local position = self.RealControllerPosition
-- Update contacts
for i=1,#self.ReverserMatrix/2 do
local v = self.ReverserMatrix[i*2-1]
local d = self.ReverserMatrix[i*2]
self[v[1].."-"..v[2]] = d[self.ReverserPosition+2]
end
for i=1,#self.ControllerMatrix/2 do
local v = self.ControllerMatrix[i*2-1]
local d = self.ControllerMatrix[i*2]
self[v[1].."-"..v[2]] = d[(position)+4]
end
end
View Git Blame Copy Permalink