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

Update init.lua

Browse Source
This commit is contained in:
BlueSnooty
2022-01-28 22:41:14 +03:00
committed by GitHub
parent 02c6ea475f
commit db950c2f75
1 changed files with 7 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
lua/entities/gmod_subway_81-717_mvm/init.lua
View File

@@ -670,13 +670,13 @@ function ENT:Think()
self:SetPackedRatio("EnginesCurrent", 0.5 + 0.5*(self.Electric.I24/500.0)) self:SetPackedRatio("EnginesCurrent", 0.5 + 0.5*(self.Electric.I24/500.0))
----------------------------------*****************************-------------------------------- ----------------------------------*****************************--------------------------------
--10th wire voltage readout imitation depending on the BPSNs and EKK state, not on the wagon battery switch state --10th wire voltage readout imitation depending on the BPSNs and EKK state, not on the wagon battery switch state
-- PC <EFBFBD> power converter; CC <EFBFBD> control circuits -- PC — power converter; CC — control circuits
local hvcounter = 0 local hvcounter = 0
local hvcar = nil local hvcar = nil
local vdrop = 1.125*(#self.WagonList) local vdrop = 1.125*(#self.WagonList)
for k,v in ipairs(self.WagonList) do for k,v in ipairs(self.WagonList) do
if v.PowerSupply.X2_2 > 0 and v.A24.Value > 0 then if v.PowerSupply.X2_2 > 0 and v.A24.Value > 0 then
hvcounter = hvcounter + 1 hvcounter = hvcounter + 1
hvcar = hvcar or v hvcar = hvcar or v
vdrop = vdrop - 1.125 vdrop = vdrop - 1.125
@@ -687,17 +687,16 @@ function ENT:Think()
local PCV_o = hvcounter > 0 and math.Clamp(76+(hvcar.Electric.Aux750V - 600)*8/375, 76, 84) - vdrop or self.WagonList[1].Battery.Voltage local PCV_o = hvcounter > 0 and math.Clamp(76+(hvcar.Electric.Aux750V - 600)*8/375, 76, 84) - vdrop or self.WagonList[1].Battery.Voltage
--imitating converter overload protection only when control circuits are energized and at least one PC on the train is off; pretty useless btw (but fun) --imitating converter overload protection only when control circuits are energized and at least one PC on the train is off; pretty useless btw (but fun)
local pcloadratio = #self.WagonList/(hvcounter > 0 and hvcounter or 0.5) local pcloadratio = #self.WagonList/(hvcounter > 0 and hvcounter or 0.5)
--local _a = 25*(#self.WagonList - #self.WagonList/(#self.WagonList-0.99)) --0.99 instead of 1 is for zero division protection local _A = 25*(6 - 6/(5.01)) --assuming one PC on 6 cars can work for 25 secs while the cars' CCs are energized
local _A = 25*(6 - 6/(5.01)) --assuming one PC on 6 cars can work for 25 secs while the cars' CCs are energized
if pcloadratio > 1 and pcloadratio <= #self.WagonList and self.LK4.Value > 0 and self.PowerSupply.X2_2 > 0 and not self.pcrlxtimer then if pcloadratio > 1 and pcloadratio <= #self.WagonList and self.LK4.Value > 0 and self.PowerSupply.X2_2 > 0 and not self.pcrlxtimer then
self.pcprotimer = self.pcprotimer or CurTime() self.pcprotimer = self.pcprotimer or CurTime()
--if CurTime() - self.pcprotimer > _a/(pcloadratio + _a/25 - #self.WagonList) + self._pcdiff then --hyperbolic function of PC operating time depending on load coeff --hyperbolic function of PC operating time depending on load coeff
if CurTime() - self.pcprotimer > _A/(pcloadratio - 6/5.01) then if CurTime() - self.pcprotimer > _A/(pcloadratio - 6/5.01) then
self.pcrlxtimer = CurTime() self.pcrlxtimer = CurTime()
end end
else else
if self.pcrlxtimer then if self.pcrlxtimer then
if CurTime() - self.pcrlxtimer < 30 then --30 seconds relaxation time before PC overload protecion can be reset if CurTime() - self.pcrlxtimer < 30 then --30 seconds relaxation time before PC overload protecion can be reset
self.RZP:TriggerInput("Close",1) self.RZP:TriggerInput("Close",1)
else else
self.pcrlxtimer = nil self.pcrlxtimer = nil
@@ -707,7 +706,6 @@ function ENT:Think()
end end
end end
self.PowerSupply:TriggerInput("3x2",self.pcrlxtimer and 1 or 0) --BPSN overheat protection in case of RZP button is being pressed constantly self.PowerSupply:TriggerInput("3x2",self.pcrlxtimer and 1 or 0) --BPSN overheat protection in case of RZP button is being pressed constantly
--print("self.WagonNumber = "..self.WagonNumber)
----------------------------------*****************************-------------------------------- ----------------------------------*****************************--------------------------------
self:SetPackedRatio("BatteryVoltage",Panel["V1"]*PCV_o/150.0) self:SetPackedRatio("BatteryVoltage",Panel["V1"]*PCV_o/150.0)