1
0
mirror of https://github.com/metrostroi-repo/MetrostroiAddon.git synced 2026-05-02 00:42:29 +00:00
This commit is contained in:
g_brzhezinskiy
2021-01-02 12:51:45 +03:00
commit 1d05caf866
613 changed files with 337020 additions and 0 deletions

View File

@@ -0,0 +1,237 @@
--------------------------------------------------------------------------------
-- KV-70 controller
--------------------------------------------------------------------------------
-- Copyright (C) 2013-2018 Metrostroi Team & FoxWorks Aerospace s.r.o.
-- Contains proprietary code. See license.txt for additional information.
--------------------------------------------------------------------------------
Metrostroi.DefineSystem("KV_70")
function TRAIN_SYSTEM:Initialize()
self.Enabled = 1
self.ControllerPosition = 0
self.ReverserPosition = 0
self.RealControllerPosition = 0
self.ChangeSpeed = 0.10
self.ReverserMatrix = {
{ "4" , "0" },
{ 0, 0, 1 },
{"10AK" , "4" },
{ 1, 0, 0 },
{"10AK" , "5" },
{ 0, 0, 1 },
{"10" , "7G"},
{ 1, 0, 1 },
{"10AK" , "DA"},
{ 1, 0, 1 },
{"D" , "D1"},
{ 1, 0, 1 },
{"F" , "F7"},
{ 0, 0, 1 },
{"B9" , "F1"},
{ 1, 1, 0 },
{"D4" , "15"},
{ 1, 0, 1 },
{"D8" ,"15A"},
{ 0, 1, 0 },
}
self.ControllerMatrix = {
{"10", "8" },
{ 1, 0, 0, 0, 0, 0, 0 },
{"U2", "10AK"},
{ 1, 1, 1, 0, 1, 1, 1 },
--{"0", "0" },
--{ 0, 0, 0, 1, 0, 0, 0 },
{"U2", "2" },
{ 1, 1, 0, 0, 0, 1, 1 },
{"U2", "3" },
{ 0, 0, 0, 0, 0, 0, 1 },
{"19B", "19" },
{ 0, 0, 0, 1, 1, 1, 1 },
{"7G", "33Yu"},
{ 0, 0, 0, 0, 1, 1, 1 },
{"10AK", "1"},
{ 0, 0, 0, 1, 1, 1, 1 },
{"U2", "U2a"},
{ 1, 1, 1, 0, 0, 0, 0 },
{"U2", "20a"},
{ 0, 0, 0, 0, 1, 1, 1 },
{"U2", "25"},
{ 0, 1, 0, 0, 0, 0, 0 },
{"10AK", "U4"},
{ 0, 0, 0, 1, 0, 0, 0 },
{"7GA", "RC27"},
{ 0, 0, 0, 1, 0, 0, 0 },
{"15A", "15B"},
{ 1, 1, 1, 1, 0, 0, 0 },
{"U2", "20b"},
{ 1, 1, 1, 0, 0, 0, 0 },
{"UPO", "13" },
{ 1, 1, 1, 1, 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", "ControllerSet", "ReverserSet",
"ControllerUp","ControllerDown","ReverserUp","ReverserDown",
"SetX1", "SetX2", "SetX3", "Set0", "Set0Fast", "SetT1", "SetT1A", "SetT2", "ControllerUnlock" }
end
function TRAIN_SYSTEM:Outputs()
return { "ControllerPosition","RealControllerPosition", "ReverserPosition", "10AS-33","10-8","D4-15","10AK-4","U2-25","7G-33Yu"}
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 == "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
--if prevControllerPosition <= -1 and self.ControllerPosition>-1 and not self.FixatorTimer then self.Train:PlayOnce("kv70_fix_on", "cabin",1) 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("revers_0-b","cabin",1) end
if self.ReverserPosition == 0 then
if prevReverserPosition == -1 then
self.Train:PlayOnce("revers_b-0","cabin",1)
else
self.Train:PlayOnce("revers_f-0","cabin",1)
end
end
if self.ReverserPosition == 1 then self.Train:PlayOnce("revers_0-f","cabin",1) end
end
end
elseif (name == "ControllerUp") and (value > 0.5) then
if self.ControllerPosition+1 == 0 and not self.Locker then return end
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)
elseif (name == "ControllerUnlock") then
self.Locker = value > 0.5
--[[ if self.Locker then
self.Train:PlayOnce("kv70_fix_on", "cabin",1)
else
self.Train:PlayOnce("kv70_fix_off", "cabin",1)
end--]]
end
end
function TRAIN_SYSTEM:Think()
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("kv70_t2_t1a", "cabin",1) end
if (A == -2) and (B == -1) then
self.Train:PlayOnce("kv70_t1a_t1", "cabin",1)
end
--if self.SecondSound and (A == -1) and (B == 0) then self.Train:PlayOnce("kv70_t1_0", "cabin",1) end
--if not self.SecondSound and (A == -1) and (B == 0) then self.Train:PlayOnce("kv70_t1_0_fix", "cabin",1) end
if (A == -1) and (B == 0) then self.Train:PlayOnce("kv70_t1_0", "cabin",1) end-- self.FixatorTimer=CurTime() end
if (A == 0) and (B == 1) then self.Train:PlayOnce("kv70_0_x1", "cabin",1) end
if (A == 1) and (B == 2) then self.Train:PlayOnce("kv70_x1_x2", "cabin",1) end
if (A == 2) and (B == 3) then self.Train:PlayOnce("kv70_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("kv70_x3_x2", "cabin",1) end
if (A == 2) and (B == 1) then self.Train:PlayOnce("kv70_x2_x1", "cabin",1) end
if (A == 1) and (B == 0) then self.Train:PlayOnce("kv70_x1_0", "cabin",1) end
if (A == 0) and (B == -1) then self.Train:PlayOnce("kv70_0_t1", "cabin",1) end
if (A == -1) and (B == -2) then self.Train:PlayOnce("kv70_t1_t1a", "cabin",1) end
if (A == -2) and (B == -3) then self.Train:PlayOnce("kv70_t1a_t2", "cabin",1) end
self.SecondSound = nil
end
--[[ if self.FixatorTimer and CurTime()-self.FixatorTimer > 0.1 then
self.Train:PlayOnce("kv70_fix_off", "cabin",1)
self.FixatorTimer = 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