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
2cf1605f3ddeec4cdb8c563d3eb7189ef5d2a900
MetrostroiAddon/lua/entities/_obsolete/gmod_subway_ezh3ru1/init.lua
g_brzhezinskiy 1d05caf866 init
2021-01-02 12:51:45 +03:00

980 lines
36 KiB
Lua
Raw Blame History

AddCSLuaFile("cl_init.lua")
AddCSLuaFile("shared.lua")
include("shared.lua")
ENT.BogeyDistance = 650 -- Needed for gm trainspawner
---------------------------------------------------
-- Defined train information
-- Types of wagon(for wagon limit system):
-- 0 = Head or intherim
-- 1 = Only head
-- 2 = Only intherim
---------------------------------------------------
ENT.SubwayTrain = {
Type = "E",
Name = "Ezh3",
Manufacturer = "MVM",
WagType = 0,
ARS = {
HaveASNP = true,
}
}
function ENT:Initialize()
-- Set model and initialize
self:SetModel("models/metrostroi/e/em508.mdl")
self.BaseClass.Initialize(self)
self:SetPos(self:GetPos() + Vector(0,0,140))
-- Create seat entities
self.DriverSeat = self:CreateSeat("driver",Vector(418,-45,-28+4))
self.InstructorsSeat = self:CreateSeat("instructor",Vector(430,40,-48+6+2.5),Angle(0,90,0),"models/vehicles/prisoner_pod_inner.mdl")
self.ExtraSeat1 = self:CreateSeat("instructor",Vector(443,0,-48+6+2.5),Angle(0,90,0),"models/vehicles/prisoner_pod_inner.mdl")
self.ExtraSeat2 = self:CreateSeat("instructor",Vector(420,-20,-48+6),Angle(0,90,0),"models/vehicles/prisoner_pod_inner.mdl")
-- Hide seats
self.DriverSeat:SetColor(Color(0,0,0,0))
self.DriverSeat:SetRenderMode(RENDERMODE_TRANSALPHA)
self.InstructorsSeat:SetColor(Color(0,0,0,0))
self.InstructorsSeat:SetRenderMode(RENDERMODE_TRANSALPHA)
self.ExtraSeat1:SetColor(Color(0,0,0,0))
self.ExtraSeat1:SetRenderMode(RENDERMODE_TRANSALPHA)
self.ExtraSeat2:SetColor(Color(0,0,0,0))
self.ExtraSeat2:SetRenderMode(RENDERMODE_TRANSALPHA)
-- Create bogeys
self.FrontBogey = self:CreateBogey(Vector( 325-10,0,-80),Angle(0,180,0),true)
self.RearBogey = self:CreateBogey(Vector(-325-10,0,-80),Angle(0,0,0),false)
local pneumoPow = 0.8+(math.random()^0.4)*0.3
self.FrontBogey.PneumaticPow = pneumoPow
self.RearBogey.PneumaticPow = pneumoPow
-- Initialize key mapping
self.KeyMap = {
[KEY_1] = "KVSetX1",
[KEY_2] = "KVSetX2",
[KEY_3] = "KVSetX3",
[KEY_4] = "KVSet0",
[KEY_5] = "KVSetT1",
[KEY_6] = "KVSetT1AB",
[KEY_7] = "KVSetT2",
[KEY_8] = "KRP",
[KEY_EQUAL] = "R_Program1Set",
[KEY_MINUS] = "R_Program2Set",
[KEY_G] = "VozvratRPSet",
[KEY_0] = "KVReverserUp",
[KEY_9] = "KVReverserDown",
[KEY_PAD_PLUS] = "KVReverserUp",
[KEY_PAD_MINUS] = "KVReverserDown",
[KEY_W] = "KVUp",
[KEY_S] = "KVDown",
[KEY_F] = "PneumaticBrakeUp",
[KEY_R] = "PneumaticBrakeDown",
[KEY_A] = "KDL",
[KEY_D] = "KDP",
[KEY_V] = "VUD1Toggle",
[KEY_L] = "HornEngage",
[KEY_N] = "VZ1Set",
[KEY_PAD_1] = "PneumaticBrakeSet1",
[KEY_PAD_2] = "PneumaticBrakeSet2",
[KEY_PAD_3] = "PneumaticBrakeSet3",
[KEY_PAD_4] = "PneumaticBrakeSet4",
[KEY_PAD_5] = "PneumaticBrakeSet5",
[KEY_PAD_6] = "PneumaticBrakeSet6",
[KEY_PAD_7] = "PneumaticBrakeSet7",
[KEY_PAD_DIVIDE] = "KRPSet",
[KEY_PAD_MULTIPLY] = "KAHSet",
[KEY_SPACE] = "PBSet",
[KEY_BACKSPACE] = "EmergencyBrake",
[KEY_PAD_0] = "DriverValveDisconnectToggle",
[KEY_PAD_DECIMAL] = "EPKToggle",
[KEY_LSHIFT] = {
[KEY_W] = "KVUp_Unlocked",
[KEY_SPACE] = "KVTSet",
[KEY_F] = "BCCDSet",
[KEY_R] = "VZPSet",
[KEY_A] = "DURASelectAlternate",
[KEY_D] = "DURASelectMain",
[KEY_V] = "DURAToggleChannel",
[KEY_1] = "DIPonSet",
[KEY_2] = "DIPoffSet",
[KEY_4] = "KVSet0Fast",
[KEY_L] = "DriverValveDisconnectToggle",
[KEY_7] = "KVWrenchNone",
[KEY_8] = "KVWrenchKRU",
[KEY_9] = "KVWrenchKV",
[KEY_0] = "KVWrench0",
[KEY_6] = "KVSetT1A",
[KEY_PAD_7] = "BFSet",
[KEY_PAD_8] = "BUpSet",
[KEY_PAD_9] = "BMSet",
[KEY_PAD_4] = "BLeftSet",
[KEY_PAD_5] = "BDownSet",
[KEY_PAD_6] = "BRightSet",
[KEY_PAD_ENTER] = "BPSet",
},
[KEY_RSHIFT] = {
[KEY_7] = "KVWrenchNone",
[KEY_8] = "KVWrenchKRU",
[KEY_9] = "KVWrenchKV",
[KEY_0] = "KVWrench0",
[KEY_L] = "DriverValveDisconnectToggle",
},
[KEY_LALT] = {
[KEY_V] = "VUD1Toggle",
[KEY_L] = "EPKToggle",
[KEY_PAD_PLUS] = "Custom2Set",
[KEY_PAD_MINUS] = "Custom1Set",
[KEY_PAD_ENTER] = "Custom3Set",
[KEY_PAD_ENTER] = "Custom3Set",
[KEY_PAD_MULTIPLY] = "CustomCToggle",
},
[KEY_RALT] = {
[KEY_L] = "EPKToggle",
},
}
self.InteractionZones = {
{ Pos = Vector(458,-30,-55),
Radius = 32,
ID = "FrontBrakeLineIsolationToggle" },
{ Pos = Vector(458, 30,-55),
Radius = 32,
ID = "FrontTrainLineIsolationToggle" },
{ Pos = Vector(-482,30,-55),
Radius = 32,
ID = "RearBrakeLineIsolationToggle" },
{ Pos = Vector(-482, -30,-55),
Radius = 32,
ID = "RearTrainLineIsolationToggle" },
{ Pos = Vector(154,62.5,-65),
Radius = 32,
ID = "GVToggle" },
{ Pos = Vector(393.6,26.0+4.6*1,24.9),
Radius = 8,
ID = "VBToggle" },
{ Pos = Vector(-180,68.5,-50),
Radius = 20,
ID = "AirDistributorDisconnectToggle" },
{ Pos = Vector(-470,-38,9),
Radius = 28,
ID = "RearDoor" },
{ Pos = Vector(450,38,9),
Radius = 28,
ID = "FrontDoor1" },
{ Pos = Vector(450,38,-16),
Radius = 28,
ID = "FrontDoor2" },
{ Pos = Vector(382,38,9),
Radius = 28,
ID = "PassengerDoor" },
{ Pos = Vector(445,61,25),
Radius = 16,
ID = "CabinDoor1" },
{ Pos = Vector(445,61,-25),
Radius = 16,
ID = "CabinDoor2" },
{ Pos = Vector(380,67,25),
Radius = 28,
ID = "CabinDoor3" },
{ Pos = Vector(380,67,-25),
Radius = 28,
ID = "CabinDoor4" },
}
-- Lights
self.Lights = {
-- Head
[1] = { "headlight", Vector(465,0,-20), Angle(0,0,0), Color(216,161,92), fov = 100 },
[2] = { "glow", Vector(460, 49,-28), Angle(0,0,0), Color(255,220,180), brightness = 1, scale = 1.0 },
[3] = { "glow", Vector(460,-49,-28), Angle(0,0,0), Color(255,220,180), brightness = 1, scale = 1.0 },
[4] = { "glow", Vector(458,-15, 57), Angle(0,0,0), Color(255,220,180), brightness = 1, scale = 0.5 },
[5] = { "glow", Vector(458,-5, 57), Angle(0,0,0), Color(255,220,180), brightness = 1, scale = 0.5 },
[6] = { "glow", Vector(458, 5, 57), Angle(0,0,0), Color(255,220,180), brightness = 1, scale = 0.5 },
[7] = { "glow", Vector(458, 15, 57), Angle(0,0,0), Color(255,220,180), brightness = 1, scale = 0.5 },
-- Reverse
[8] = { "light", Vector(458,-31, 58), Angle(0,0,0), Color(255,0,0), brightness = 10, scale = 1.0 },
[9] = { "light", Vector(458, 31, 58), Angle(0,0,0), Color(255,0,0), brightness = 10, scale = 1.0 },
-- Cabin
[10] = { "dynamiclight", Vector( 420, -40, 35), Angle(0,0,0), Color(255,255,255), brightness = 0.1, distance = 550 },
-- Interior
[11] = { "dynamiclight", Vector( 250, 0, 5), Angle(0,0,0), Color(255,255,255), brightness = 3, distance = 400 },
[12] = { "dynamiclight", Vector( 0, 0, 5), Angle(0,0,0), Color(255,255,255), brightness = 3, distance = 400 },
[13] = { "dynamiclight", Vector(-250, 0, 5), Angle(0,0,0), Color(255,255,255), brightness = 3, distance = 400 },
-- Side lights
[14] = { "light", Vector(390, 69, 54), Angle(0,0,0), Color(255,0,0), brightness = 0.5, scale = 0.10, texture = "models/metrostroi_signals/signal_sprite_002.vmt" },
[15] = { "light", Vector(390, 69, 51), Angle(0,0,0), Color(150,255,255), brightness = 0.6, scale = 0.10, texture = "models/metrostroi_signals/signal_sprite_002.vmt" },
[16] = { "light", Vector(390, 69, 48), Angle(0,0,0), Color(50,255,0), brightness = 0.5, scale = 0.10, texture = "models/metrostroi_signals/signal_sprite_002.vmt" },
[17] = { "light", Vector(390, 69, 45), Angle(0,0,0), Color(255,255,0), brightness = 0.5, scale = 0.10, texture = "models/metrostroi_signals/signal_sprite_002.vmt" },
[18] = { "light", Vector(390, -69, 54), Angle(0,0,0), Color(255,0,0), brightness = 0.5, scale = 0.10, texture = "models/metrostroi_signals/signal_sprite_002.vmt" },
[19] = { "light", Vector(390, -69, 51), Angle(0,0,0), Color(150,255,255), brightness = 0.6, scale = 0.10, texture = "models/metrostroi_signals/signal_sprite_002.vmt" },
[20] = { "light", Vector(390, -69, 48), Angle(0,0,0), Color(50,255,0), brightness = 0.5, scale = 0.10, texture = "models/metrostroi_signals/signal_sprite_002.vmt" },
[21] = { "light", Vector(390, -69, 45), Angle(0,0,0), Color(255,255,0), brightness = 0.5, scale = 0.10, texture = "models/metrostroi_signals/signal_sprite_002.vmt" },
[30] = { "headlight", Vector(447.8,-34.6,9.6), Angle(0,0,0), Color(255,161,40), farz = 3, nearz = 1, shadows = 0, brightness = 2, fov = 124 },
[31] = { "headlight", Vector(449,-32.9,13.5), Angle(0,4,0), Color(237,161,73), farz = 3, nearz = 1, shadows = 0, brightness = 2, fov = 120 },
[32] = { "headlight", Vector(445.6,-38.4,0.1), Angle(-65,-5,0), Color(20,161,20), farz = 5, nearz = 1, shadows = 0, brightness = 2, fov = 140 },
[33] = { "headlight", Vector(446.5,-57.2,20.4), Angle(-90,0,0), Color(216,161,92), farz = 7.2, nearz = 1, shadows = 0, brightness = 2, fov = 120 },
-- Custom D
[35] = { "light", Vector(447.7,-54.5,17.4-4.4), Angle(0,-0,0), Color(255,0,0), brightness = 1.0, scale = 0.020 },
-- Custom E
[36] = { "light", Vector(447,-55.5,17.4-4.4), Angle(0,0,0), Color(255,255,255), brightness = 1.0, scale = 0.020 },
-- Custom F
[37] = { "light", Vector(444.7,-58.5,17.4-4.4), Angle(0,0,0), Color(255,160,0), brightness = 1.0, scale = 0.020 },
-- Custom G
[38] = { "light", Vector(444,-59.5,17.4-4.4), Angle(0,0,0), Color(100,255,0), brightness = 1.0, scale = 0.020 },
[70 ] = { "headlight", Vector( 430, -60, -47), Angle(45,-90,0), Color(255,255,255), brightness = 0.5, distance = 400 , fov=120, shadows = 1 },
}
for i = 1,23 do
self.Lights[69+i] = { "light", Vector(-470 + 35*i, 0, 65), Angle(180,0,0), Color(255,220,180), brightness = 0.25, scale = 0.75}
--self:SetLightPower(69+i,RealTime()%1*2>1)
end
-- Cross connections in train wires
self.TrainWireInverts = {
[18] = true,
[34] = true,
}
self.TrainWireCrossConnections = {
[5] = 4, -- Reverser F<->B
[31] = 32, -- Doors L<->R
}
-- Setup door positions
self.LeftDoorPositions = {}
self.RightDoorPositions = {}
for i=0,3 do
table.insert(self.LeftDoorPositions,Vector(353.0 - 35*0.5 - 231*i,65,-1.8))
table.insert(self.RightDoorPositions,Vector(353.0 - 35*0.5 - 231*i,-65,-1.8))
end
-- KV wrench mode
self.KVWrenchMode = 0
-- Parking brake ratio
self.ManualBrake = 0.0
self.RearDoor = false
self.FrontDoor = false
self.CabinDoor = false
self.PassengerDoor = false
self.A5:TriggerInput("Set",0)
self:UpdateTextures()
end
function ENT:UpdateTextures()
local texture = Metrostroi.Skins["train"][self.Texture]
local passtexture = Metrostroi.Skins["pass"][self.PassTexture]
local cabintexture = Metrostroi.Skins["cab"][self.CabTexture]
for k,v in pairs(self:GetMaterials()) do
self:SetSubMaterial(k-1,"")
end
for k,v in pairs(self:GetMaterials()) do
if v == "models/metrostroi_train/81/int02" then
if not Metrostroi.Skins["717_schemes"] or not Metrostroi.Skins["717_schemes"]["m"] then
self:SetSubMaterial(k-1,Metrostroi.Skins["717_schemes"][""])
else
if not self.Adverts or self.Adverts ~= 4 then
self:SetSubMaterial(k-1,Metrostroi.Skins["717_schemes"]["m"].adv)
else
self:SetSubMaterial(k-1,Metrostroi.Skins["717_schemes"]["m"].clean)
end
end
end
local tex = string.Explode("/",v)
tex = tex[#tex]
if cabintexture and cabintexture.textures[tex] then
self:SetSubMaterial(k-1,cabintexture.textures[tex])
end
if passtexture and passtexture.textures[tex] then
self:SetSubMaterial(k-1,passtexture.textures[tex])
end
if texture and texture.textures[tex] then
self:SetSubMaterial(k-1,texture.textures[tex])
end
end
self:SetNW2String("texture",self.Texture)
self:SetNW2String("passtexture",self.PassTexture)
self:SetNW2String("cabtexture",self.CabTexture)
end
local LK = {}
local PKG = 0
local RK = 0
local KV = 0
local OldTime
--------------------------------------------------------------------------------
function ENT:Think()
--[[
if self.KV.ControllerPosition ~= KV then
if KV == 0 then OldTime = nil end
if self.KV.ControllerPosition == 0 then OldTime = nil end
if not OldTime then print("") end
KV = self.KV.ControllerPosition
print(Format("Controller moved:%d",KV))
end
for i=1,5 do
if LK[i] ~= self["LK"..i].Value then
if not OldTime then OldTime = CurTime() end
print(Format("%.2f:LK%d = %d",CurTime()-OldTime,i,self["LK"..i].Value))
LK[i] = self["LK"..i].Value
end
end
if RK ~= math.floor(self.RheostatController.Position+0.5) then
if not OldTime then OldTime = CurTime() end
RK = math.floor(self.RheostatController.Position+0.5)
print(Format("%.2f:RK = %d",CurTime()-OldTime,RK))
end
if PKG ~= math.floor(self.PositionSwitch.Position+0.5) then
if not OldTime then OldTime = CurTime() end
local nPKG = math.floor(self.PositionSwitch.Position+0.5)
print(Format("%.2f:PK = %d->%d",CurTime()-OldTime,PKG,nPKG))
PKG = nPKG
end
]]
self.RetVal = self.BaseClass.Think(self)
-- Check if wrench was pulled out
if self.DriversWrenchPresent then
self.KV:TriggerInput("Enabled",self:IsWrenchPresent() and 1 or 0)
end
self:SetLightPower(1, self.Panel["HeadLights3"] > 0.5,(math.min(1,self.Panel["HeadLights1"])*0.50 +
math.min(1,self.Panel["HeadLights2"])*0.25 +
math.min(1,self.Panel["HeadLights3"])*0.25)
)
self:SetLightPower(2, self.Panel["HeadLights3"] > 0.5)
self:SetLightPower(3, self.Panel["HeadLights3"] > 0.5)
self:SetLightPower(4, self.Panel["HeadLights2"] > 0.5)
self:SetLightPower(5, self.Panel["HeadLights1"] > 0.5)
self:SetLightPower(6, self.Panel["HeadLights1"] > 0.5)
self:SetLightPower(7, self.Panel["HeadLights2"] > 0.5)
-- Reverser lights
self:SetLightPower(8, self.Panel["RedLightRight"] > 0.5)
self:SetLightPower(9, self.Panel["RedLightLeft"] > 0.5)
-- Interior/cabin lights
self:SetLightPower(10, self.Panel["CabinLight"] > 0.5)
local lightsActive2 = self.PowerSupply.XT3_4 > 65.0
local lightsActive1 = self.Panel["EmergencyLight"] > 0.5
self:SetLightPower(11, lightsActive2, 0.8)
self:SetLightPower(12, lightsActive1,0.1 + ((self.PowerSupply.XT3_4 > 65.0) and 0.7 or 0))
self:SetLightPower(13, lightsActive2, 0.8)
for i = 1,23 do
self:SetLightPower(69+i,lightsActive2 and true or lightsActive1 and i%5==1 or false)
end
self:SetLightPower(30, (self.L_3.Value > 0.5))
self:SetLightPower(31, (self.L_3.Value > 0.5))
self:SetLightPower(32, (self.L_3.Value > 0.5))
self:SetLightPower(33, (self.L_3.Value > 0.5))
--self:SetLightPower(12, self.Panel["EmergencyLight"] > 0.5)
--self:SetLightPower(13, self.PowerSupply.XT3_4 > 65.0)
-- Side lights
self:SetLightPower(14, false)
self:SetLightPower(18, false)
self:SetLightPower(15, self.Panel["TrainDoors"] > 0.5)
self:SetLightPower(19, self.Panel["TrainDoors"] > 0.5)
self:SetLightPower(16, self.Panel["GreenRP"] > 0.5)
self:SetLightPower(20, self.Panel["GreenRP"] > 0.5)
self:SetLightPower(17, self.Panel["TrainBrakes"] > 0.5)
self:SetLightPower(21, self.Panel["TrainBrakes"] > 0.5)
-- Total temperature
local IGLA_Temperature = math.max(self.Electric.T1,self.Electric.T2)
-- Switch and button states
self:SetPackedBool(0,self:IsWrenchPresent())
self:SetPackedBool(1,self.VUS.Value == 1.0)
self:SetPackedBool("L_3",self.L_3.Value == 1.0)
self:SetPackedBool(2,self.VozvratRP.Value == 1.0)
self:SetPackedBool(3,self.DIPon.Value == 1.0)
self:SetPackedBool(4,self.DIPoff.Value == 1.0)
self:SetPackedBool(5,self.GV.Value == 1.0)
self:SetPackedBool(6,self.DriverValveDisconnect.Value == 1.0)
self:SetPackedBool(7,self.VB.Value == 1.0)
self:SetPackedBool(8,self.RezMK.Value == 1.0)
self:SetPackedBool(9,self.VMK.Value == 1.0)
self:SetPackedBool(10,self.VAH.Value == 1.0)
self:SetPackedBool(11,self.VAD.Value == 1.0)
self:SetPackedBool(12,self.VUD1.Value == 0.0)
self:SetPackedBool(13,self.VUD2.Value == 1.0)
self:SetPackedBool(14,self.VDL.Value == 1.0)
self:SetPackedBool(15,self.KDL.Value == 1.0)
self:SetPackedBool(16,self.KDP.Value == 1.0)
self:SetPackedBool(17,self.KRZD.Value == 1.0)
self:SetPackedBool(18,self.KSN.Value == 1.0)
self:SetPackedBool(19,self.OtklAVU.Value == 1.0)
self:SetPackedBool(20,self.Pneumatic.Compressor == 1.0)
self:SetPackedBool(21,self.Pneumatic.LeftDoorState[1] > 0.5)
--self:SetPackedBool(22,self.Pneumatic.LeftDoorState[2] > 0.5)
--self:SetPackedBool(23,self.Pneumatic.LeftDoorState[3] > 0.5)
--self:SetPackedBool(24,self.Pneumatic.LeftDoorState[4] > 0.5)
self:SetPackedBool(24,self.DURA.Power)
self:SetPackedBool(25,self.Pneumatic.RightDoorState[1] > 0.5)
--self:SetPackedBool(26,self.Pneumatic.RightDoorState[2] > 0.5)
--self:SetPackedBool(27,self.Pneumatic.RightDoorState[3] > 0.5)
self:SetPackedBool(27,self.KVWrenchMode == 2)
--self:SetPackedBool(28,self.Pneumatic.RightDoorState[4] > 0.5)
self:SetPackedBool(28,self.KVT.Value == 1.0)
--self:SetPackedBool(156,self.KB.Value == 1.0)
self:SetPackedBool(29,self.DURA.SelectAlternate == false)
self:SetPackedBool(30,self.DURA.SelectAlternate == true)
self:SetPackedBool(31,self.DURA.Channel == 2)
self:SetPackedBool(56,self.ARS.Value == 1.0)
self:SetPackedBool(57,self.ALS.Value == 1.0)
self:SetPackedBool(58,self.Panel["CabinLight"] > 0.5)
self:SetPackedBool(112,(self.RheostatController.Velocity ~= 0.0))
self:SetPackedBool(114,self.Custom1.Value == 1.0)
self:SetPackedBool(115,self.Custom2.Value == 1.0)
self:SetPackedBool(116,self.Custom3.Value == 1.0)
self:SetPackedBool(124,self.CustomC.Value == 1.0)
--[[self:SetPackedBool(117,self.Custom4.Value == 1.0)
self:SetPackedBool(118,self.Custom5.Value == 1.0)
self:SetPackedBool(119,self.Custom6.Value == 1.0)
self:SetPackedBool(120,self.Custom7.Value == 1.0)
self:SetPackedBool(121,self.Custom8.Value == 1.0)
self:SetPackedBool(122,self.CustomA.Value == 1.0)
self:SetPackedBool(124,self.CustomC.Value == 1.0)]]--
self:SetLightPower(35,self.CustomD.Value == 1.0)
self:SetLightPower(36,self.CustomE.Value == 1.0)
self:SetLightPower(37,self.CustomF.Value == 1.0)
self:SetLightPower(38,self.CustomG.Value == 1.0)
self:SetPackedBool(125,self.R_G.Value == 1.0)
self:SetPackedBool(126,self.R_Radio.Value == 1.0)
self:SetPackedBool(127,self.R_ZS.Value == 1.0)
self:SetPackedBool("R_VPR",self.R_VPR.Value == 1.0)
self:SetPackedBool("VPR",self.R_VPR.Value == 1.0 and self.A29.Value == 1.0 and self.Panel["V1"])
self:SetPackedBool(128,self.R_Program1.Value == 1.0)
self:SetPackedBool(129,self.R_Program2.Value == 1.0)
self:SetPackedBool(130,self.RC1.Value == 1.0)
self:SetPackedBool(132,self.ManualBrake <= 0.001)
self:SetPackedBool(133,self.ManualBrake >= 0.999)
self:SetPackedBool(134,self.UOS.Value == 1.0)
self:SetPackedBool(135,self.BPS.Value == 1.0)
self:SetPackedBool(152,self.UAVA.Value == 1.0)
self:SetPackedBool(153,self.DURA.Channel1Alternate)
self:SetPackedBool(154,self.DURA.Channel2Alternate)
self:SetPackedBool(155,self.EPK.Value == 1.0)
self:SetPackedBool(156,self.RearDoor)
self:SetPackedBool(157,self.FrontDoor)
self:SetPackedBool(158,self.PassengerDoor)
self:SetPackedBool(159,self.CabinDoor)
-- Signal if doors are open or no to platform simulation
self.LeftDoorsOpen =
(self.Pneumatic.LeftDoorState[1] > 0.5) or
(self.Pneumatic.LeftDoorState[2] > 0.5) or
(self.Pneumatic.LeftDoorState[3] > 0.5) or
(self.Pneumatic.LeftDoorState[4] > 0.5)
self.RightDoorsOpen =
(self.Pneumatic.RightDoorState[1] > 0.5) or
(self.Pneumatic.RightDoorState[2] > 0.5) or
(self.Pneumatic.RightDoorState[3] > 0.5) or
(self.Pneumatic.RightDoorState[4] > 0.5)
self:WriteTrainWire(35,(self.Pneumatic.BrakeCylinderPressure > 0.1) and 1 or 0)
-- DIP/power
self:SetPackedBool(32,self.Panel["V1"] > 0.5)
-- LxRK
self:SetPackedBool(33,false)--self.RheostatController.MotorCoilState ~= 0.0)
-- NR1
self:SetPackedBool(34,(self.NR.Value == 1.0) or (self.RPU.Value == 1.0))
-- Red RP
local TW18 = self:GetTrainWire18()
if self:ReadTrainWire(20) == 0 or (self.Panel["V1"] < 0.5) then TW18 = 0 end--(self.KV.ControllerPositionAutodrive == 0 and self.KV.ControllerPosition == 0)
self:SetPackedBool(35,TW18 > 0.5)
self:SetPackedBool(131,TW18 > 0)
-- Green RP
self:SetPackedBool(36,self.Panel["GreenRP"] > 0.5)
-- Cabin heating
self:SetPackedBool(37,self.Panel["KUP"] > 0.5)
-- AVU
self:SetPackedBool(38,self.Panel["AVU"] > 0.5)
-- Ring
self:SetPackedBool(39,self.Panel["Ring"] > 0.5)
-- SD
self:SetPackedBool(40,self.Panel["SD"] > 0.5)
-- OCh
self:SetPackedBool(41,self.ALS_ARS.NoFreq)
-- 0
self:SetPackedBool(42,self.ALS_ARS.Signal0)
-- 40
self:SetPackedBool(43,self.ALS_ARS.Signal40)
-- 60
self:SetPackedBool(44,self.ALS_ARS.Signal60)
-- 75
self:SetPackedBool(45,self.ALS_ARS.Signal70)
-- 80
self:SetPackedBool(46,self.ALS_ARS.Signal80)
-- KT
self:SetPackedBool(47,self.ALS_ARS.LKT)
-- KVD
self:SetPackedBool(48,self.ALS_ARS.LVD)
-- LVD
self:SetPackedBool(50,self:ReadTrainWire(1) > 0.5)
-- AV states
for i,v in ipairs(self.Panel.AVMap) do
if tonumber(v)
then self:SetPackedBool(64+(i-1),self["A"..v].Value == 1.0)
elseif self[v] then self:SetPackedBool(64+(i-1),self[v].Value == 1.0)
end
end
self.SOSD = self.Panel["SD"] <= 0 and self.Panel["V1"] > 0 and self.KV.ReverserPosition ~= 0
self:SetLightPower(70,self.SOSD)
-- Feed packed floats
self:SetPackedRatio(0, 1-self.Pneumatic.DriverValvePosition/7)
self:SetPackedRatio(1, (self.KV.ControllerPosition+3)/7)
self:SetPackedRatio(2, 1-(self.KV.ReverserPosition+1)/2)
self:SetPackedRatio(4, self.Pneumatic.BrakeLinePressure/16.0)
self:SetPackedRatio(5, self.Pneumatic.TrainLinePressure/16.0)
self:SetPackedRatio(6, (self.Pneumatic.BrakeCylinderPressure + 4.0*self.ManualBrake)/6.0)
self:SetPackedRatio(7, self.Electric.Power750V/1000.0)
self:SetPackedRatio(8, math.abs(self.Electric.I24)/1000.0)
--self:SetPackedRatio(9, self.Pneumatic.BrakeLinePressure_dPdT or 0)
if self.Pneumatic.TrainLineOpen then
self:SetPackedRatio(9, (-self.Pneumatic.TrainLinePressure_dPdT or 0)*6)
else
self:SetPackedRatio(9, self.Pneumatic.BrakeLinePressure_dPdT or 0)
end
self:SetPackedRatio(10,(self.Panel["V1"] * self.Battery.Voltage) / 100.0)
self:SetPackedRatio(11,IGLA_Temperature)
-- Update ARS system
self:SetPackedRatio(3, self.ALS_ARS.Speed/100.0)
if (self.ALS_ARS.Ring == true) then
self:SetPackedBool(39,true)
end
-- RUT test
local weightRatio = math.max(0,math.min(1,(self:GetNW2Float("PassengerCount")/300)))
if math.abs(self:GetAngles().pitch) > 2.5 then weightRatio = weightRatio + 1.00 end
self.YAR_13A:TriggerInput("WeightLoadRatio",math.max(0,math.min(1.00,weightRatio)))
-- Exchange some parameters between engines, pneumatic system, and real world
self.Engines:TriggerInput("Speed",self.Speed)
if IsValid(self.FrontBogey) and IsValid(self.RearBogey) and not self.IgnoreEngine then
local A = 2*self.Engines.BogeyMoment
self.FrontBogey.MotorForce = 30300+25000*(A < 0 and 1 or 0)
self.FrontBogey.Reversed = (self.RKR.Value > 0.5)
self.RearBogey.MotorForce = 30300+25000*(A < 0 and 1 or 0)
self.RearBogey.Reversed = (self.RKR.Value < 0.5)
-- These corrections are required to beat source engine friction at very low values of motor power
local A = 2*self.Engines.BogeyMoment
local P = math.max(0,0.04449 + 1.06879*math.abs(A) - 0.465729*A^2)
if math.abs(A) > 0.4 then P = math.abs(A) end
if math.abs(A) < 0.05 then P = 0 end
if self.Speed < 10 then P = P*(1.0 + 0.5*(10.0-self.Speed)/10.0) end
self.RearBogey.MotorPower = P*0.5*((A > 0) and 1 or -1)
self.FrontBogey.MotorPower = P*0.5*((A > 0) and 1 or -1)
-- Apply brakes
self.FrontBogey.PneumaticBrakeForce = 50000.0
self.FrontBogey.BrakeCylinderPressure = self.Pneumatic.BrakeCylinderPressure + 7.0*self.ManualBrake
self.FrontBogey.BrakeCylinderPressure_dPdT = -self.Pneumatic.BrakeCylinderPressure_dPdT
self.FrontBogey.ParkingBrake = false
self.RearBogey.PneumaticBrakeForce = 50000.0
self.RearBogey.BrakeCylinderPressure = self.Pneumatic.BrakeCylinderPressure + 7.0*self.ManualBrake
self.RearBogey.BrakeCylinderPressure_dPdT = -self.Pneumatic.BrakeCylinderPressure_dPdT
--self.RearBogey.ParkingBrake = self.ManualBrake.Value > 0.5
end
-- Generate bogey sounds
local jerk = math.abs((self.Acceleration - (self.PrevAcceleration or 0)) / self.DeltaTime)
self.PrevAcceleration = self.Acceleration
if jerk > (2.0 + self.Speed/15.0) then
self.PrevTriggerTime1 = self.PrevTriggerTime1 or CurTime()
self.PrevTriggerTime2 = self.PrevTriggerTime2 or CurTime()
if ((math.random() > 0.00) or (jerk > 10)) and (CurTime() - self.PrevTriggerTime1 > 1.5) then
self.PrevTriggerTime1 = CurTime()
self.FrontBogey:EmitSound("subway_trains/chassis_"..math.random(1,3)..".wav", 70, math.random(90,110))
end
if ((math.random() > 0.00) or (jerk > 10)) and (CurTime() - self.PrevTriggerTime2 > 1.5) then
self.PrevTriggerTime2 = CurTime()
self.RearBogey:EmitSound("subway_trains/chassis_"..math.random(1,3)..".wav", 70, math.random(90,110))
end
end
-- Temporary hacks
--self:SetNW2Float("V",self.Speed)
--self:SetNW2Float("A",self.Acceleration)
if self:ReadTrainWire(5)*self:ReadTrainWire(4) > 0 and not self.RevCheck then
self.RevCheck = CurTime()+0.25
end
if self.RevCheck and CurTime() - self.RevCheck > 0 then
if self:ReadTrainWire(5)*self:ReadTrainWire(4) > 0 then
self:TriggerInput("VUOpenBypass")
if self.VU.TargetValue == 0 then
--self:PlayOnce("av_off","cabin")
end
end
self.RevCheck = nil
end
return self.RetVal
end
--------------------------------------------------------------------------------
function ENT:OnButtonPress(button,ply)
-- Parking brake
if button == "ParkingBrakeLeft" then
self.ManualBrake = math.max(0.0,(self.ManualBrake or 0) - 0.008)
if self.ManualBrake == 0.0 then return end
--print(self.ManualBrake)
end
if button == "ParkingBrakeRight" then
self.ManualBrake = math.min(1.0,(self.ManualBrake or 0) + 0.008)
if self.ManualBrake == 1.0 then return end
--print(self.ManualBrake)
end
if string.find(button,"PneumaticBrakeSet") then
self.Pneumatic:TriggerInput("BrakeSet",tonumber(button:sub(-1,-1)))
return
end
if button:find("FrontDoor") then
self.FrontDoor = not self.FrontDoor
if self.FrontDoor then self:PlayOnce("door_open_tor","cabin") else self:PlayOnce("door_close_tor","cabin") end
end
if button:find("RearDoor") then
self.RearDoor = not self.RearDoor
if self.RearDoor then self:PlayOnce("door_open_tor") else self:PlayOnce("door_close_tor") end
end
if button:find("PassengerDoor") then
self.PassengerDoor = not self.PassengerDoor
if self.PassengerDoor then self:PlayOnce("door_open_tor","cabin") else self:PlayOnce("door_close_tor","cabin") end
end
if button:find("CabinDoor") then
self.CabinDoor = not self.CabinDoor
if self.CabinDoor then self:PlayOnce("door_open_tor","cabin") else self:PlayOnce("door_close_tor","cabin") end
end
if button == "VAHToggle" then
local state = self.VAH.TargetValue < 0.5 and "enabled" or "disabled"
RunConsoleCommand("say",ply:GetName().." "..state.." VAH!")
end
if button == "OtklAVUToggle" then
local state = self.OtklAVU.TargetValue < 0.5 and "enabled" or "disabled"
RunConsoleCommand("say",ply:GetName().." "..state.." OtklAVU!")
end
if button == "VADToggle" then
local state = self.VAD.TargetValue < 0.5 and "enabled" or "disabled"
RunConsoleCommand("say",ply:GetName().." "..state.." VAD!")
end
if button == "RC1Toggle" then
local state = self.RC1.TargetValue < 0.5 and "enabled" or "disabled"
RunConsoleCommand("say",ply:GetName().." "..state.." RC1!")
end
if button == "UOSToggle" then
local state = self.UOS.TargetValue < 0.5 and "enabled" or "disabled"
RunConsoleCommand("say",ply:GetName().." "..state.." UOS!")
end
if button == "UAVAToggle" then
local state = self.UAVA.TargetValue < 0.5 and "enabled" or "disabled"
RunConsoleCommand("say",ply:GetName().." "..state.." UAVA!")
end
if button == "BPSToggle" then
local state = self.BPS.TargetValue < 0.5 and "enabled" or "disabled"
RunConsoleCommand("say",ply:GetName().." "..state.." BPS!")
end
if button == "AirDistributorDisconnectToggle" then return end
if button == "NextSign" then
self:PrepareSigns()
self.SignsIndex = self.SignsIndex + 1
if self.SignsIndex > #self.SignsList then self.SignsIndex = 1 end
self:SetNW2String("FrontText",self.SignsList[self.SignsIndex][2])
end
if button == "PrevSign" then
self:PrepareSigns()
self.SignsIndex = self.SignsIndex - 1
if self.SignsIndex < 1 then self.SignsIndex = #self.SignsList end
self:SetNW2String("FrontText",self.SignsList[self.SignsIndex][2])
end
if button == "Num1P" then
if not self.RouteNumber then self.RouteNumber = "00" end
local num = tonumber(self.RouteNumber[2])
num = num + 1
if num > 9 then num = 0 end
self.RouteNumber = string.SetChar(self.RouteNumber,2, num)
self:SetNW2String("RouteNumber",self.RouteNumber)
local trn = self.WagonList[#self.WagonList]
if IsValid(trn) and trn ~= self then
trn.RouteNumber = self.RouteNumber
trn:SetNW2String("RouteNumber",self.RouteNumber)
end
end
if button == "Num1M" then
if not self.RouteNumber then self.RouteNumber = "00" end
local num = tonumber(self.RouteNumber[2])
num = num - 1
if num < 0 then num = 9 end
self.RouteNumber = string.SetChar(self.RouteNumber,2, num)
self:SetNW2String("RouteNumber",self.RouteNumber)
local trn = self.WagonList[#self.WagonList]
if IsValid(trn) and trn ~= self then
trn.RouteNumber = self.RouteNumber
trn:SetNW2String("RouteNumber",self.RouteNumber)
end
end
if button == "Num2P" then
if not self.RouteNumber then self.RouteNumber = "00" end
local num = tonumber(self.RouteNumber[1])
num = num + 1
if num > 9 then num = 0 end
self.RouteNumber = string.SetChar(self.RouteNumber,1, num)
self:SetNW2String("RouteNumber",self.RouteNumber)
local trn = self.WagonList[#self.WagonList]
if IsValid(trn) and trn ~= self then
trn.RouteNumber = self.RouteNumber
trn:SetNW2String("RouteNumber",self.RouteNumber)
end
end
if button == "Num2M" then
if not self.RouteNumber then self.RouteNumber = "00" end
local num = tonumber(self.RouteNumber[1])
num = num - 1
if num < 0 then num = 9 end
self.RouteNumber = string.SetChar(self.RouteNumber,1, num)
self:SetNW2String("RouteNumber",self.RouteNumber)
local trn = self.WagonList[#self.WagonList]
if IsValid(trn) and trn ~= self then
trn.RouteNumber = self.RouteNumber
trn:SetNW2String("RouteNumber",self.RouteNumber)
end
end
-- Parking brake
if button == "ManualBrakeLeft" then
self.ManualBrake = math.max(0.0,self.ManualBrake - 0.008)
if self.ManualBrake == 0.0 then return end
--print(self.ManualBrake)
end
if button == "ManualBrakeRight" then
self.ManualBrake = math.min(1.0,self.ManualBrake + 0.008)
if self.ManualBrake == 1.0 then return end
--print(self.ManualBrake)
end
if button == "KVUp" then
if self.KV.ControllerPosition ~= -1 then
self.KV:TriggerInput("ControllerUp",1.0)
end
end
if button == "KVUp_Unlocked" then
self.KV:TriggerInput("ControllerUp",1.0)
end
if button == "KVDown" then
self.KV:TriggerInput("ControllerDown",1.0)
end
-- KRU
if (self.KVWrenchMode == 2) and (button == "KVReverserUp") then
self.KRU:TriggerInput("Up",1)
self:OnButtonPress("KRUUp")
end
if (self.KVWrenchMode == 2) and (button == "KVReverserDown") then
self.KRU:TriggerInput("Down",1)
self:OnButtonPress("KRUDown")
end
if (self.KVWrenchMode == 2) and (button == "KVSetX1") then
self.KRU:TriggerInput("SetX1",1)
self:OnButtonPress("KRUSetX1")
end
if (self.KVWrenchMode == 2) and (button == "KVSetX2") then
self.KRU:TriggerInput("SetX2",1)
self:OnButtonPress("KRUSetX2")
end
if (self.KVWrenchMode == 2) and (button == "KVSetX3") then
self.KRU:TriggerInput("SetX3",1)
self:OnButtonPress("KRUSetX3")
end
if (self.KVWrenchMode == 2) and (button == "KVSet0") then
self.KRU:TriggerInput("Set0",1)
self:OnButtonPress("KRUSet0")
end
if button == "KVSetT1AB" then
if self.KV.ControllerPosition == -2 then
self.KV:TriggerInput("ControllerSet",-1)
timer.Simple(0.20,function()
self.KV:TriggerInput("ControllerSet",-2)
end)
else
self.KV:TriggerInput("ControllerSet",-2)
end
end
if button == "KVWrench0" then
if self.KVWrenchMode == 3 or self.KVWrenchMode == 1 then
if self.KVWrenchMode ~= 1 then
self:PlayOnce("revers_in","cabin",0.7)
end
self.KVWrenchMode = 0
self.DriversWrenchPresent = false
self.DriversWrenchMissing = false
self.KV:TriggerInput("Enabled",1)
self.KRU:TriggerInput("Enabled",0)
end
end
if button == "KVWrenchKV" then
if self.KVWrenchMode == 3 or self.KVWrenchMode == 0 then
if self.KVWrenchMode ~= 0 then
self:PlayOnce("revers_in","cabin",0.7)
end
self.KVWrenchMode = 1
self.DriversWrenchPresent = true
self.DriversWrenchMissing = false
self.KV:TriggerInput("Enabled",1)
self.KRU:TriggerInput("Enabled",0)
end
end
--THERE IS NO KRU IN THIS EZH MODEL
--[[
if button == "KVWrenchKRU" then
if self.KVWrenchMode == 3 then
self:PlayOnce("kru_in","cabin",0.7)
self.KVWrenchMode = 2
self.DriversWrenchPresent = false
self.DriversWrenchMissing = true
self.KV:TriggerInput("Enabled",0)
self.KRU:TriggerInput("Enabled",1)
self.KRU:TriggerInput("LockX3",1)
end
end]]
if button == "KVWrenchNone" then
if self.KVWrenchMode ~= 3 and self.KV.ReverserPosition == 0 then
if self.KVWrenchMode == 2 then
self:PlayOnce("kru_out","cabin",0.7,120.0)
else
self:PlayOnce("revers_out","cabin",0.7,120.0)
end
self.KVWrenchMode = 3
self.DriversWrenchPresent = false
self.DriversWrenchMissing = true
self.KV:TriggerInput("Enabled",0)
self.KRU:TriggerInput("Enabled",0)
end
end
--if button == "KVT2Set" then self.KVT:TriggerInput("Close",1) end
if button == "KDL" then self.KDL:TriggerInput("Close",1) self:OnButtonPress("KDLSet") end
if button == "KDP" then self.KDP:TriggerInput("Close",1) self:OnButtonPress("KDPSet") end
if button == "VDL" then self.VDL:TriggerInput("Close",1) self:OnButtonPress("VDLSet") end
if button == "KRP" then
self.KRP:TriggerInput("Set",1)
self:OnButtonPress("KRPSet")
end
if button == "EmergencyBrake" then
self.KV:TriggerInput("ControllerSet",-3)
self.Pneumatic:TriggerInput("BrakeSet",7)
self.DriverValveDisconnect:TriggerInput("Set",1)
return
end
-- Special logic
if (button == "VDL") or (button == "KDL") or (button == "KDP") then
--self.VUD1:TriggerInput("Open",1)
end
if (button == "KDP") then
--self.DoorSelect:TriggerInput("Close",1)
end
if (button == "VUD1Set") or (button == "VUD1Toggle") or
(button == "VUD2Set") or (button == "VUD2Toggle") then
self.VDL:TriggerInput("Open",1)
self.KDL:TriggerInput("Open",1)
self.KDP:TriggerInput("Open",1)
end
if button == "GVToggle" then
if self.GV.Value > 0.5 then
self:PlayOnce("revers_f",nil,0.7)
else
self:PlayOnce("revers_b",nil,0.7)
end
return
end
if button == "DriverValveDisconnectToggle" then
if self.DriverValveDisconnect.Value == 1.0 then
self:PlayOnce("pneumo_disconnect2","cabin",0.9)
if self.EPK.Value == 1 then self:PlayOnce("epv_on","cabin",0.9) end
else
self:PlayOnce("pneumo_disconnect1","cabin",0.9)
if self.EPK.Value == 1 then self:PlayOnce("epv_off","cabin",0.9) end
end
return
end
if button == "EPKToggle" and self.DriverValveDisconnect.Value == 1.0 then
if self.EPK.Value == 1.0 then
self:PlayOnce("epv_off","cabin",0.9)
else
self:PlayOnce("epv_on","cabin",0.9)
end
return
end
end
function ENT:OnButtonRelease(button)
if string.find(button,"PneumaticBrakeSet") then
return
end
--if button == "KVT2Set" then self.KVT:TriggerInput("Open",1) end
if button == "KDL" then self.KDL:TriggerInput("Open",1) self:OnButtonRelease("KDLSet") end
if button == "KDP" then self.KDP:TriggerInput("Open",1) self:OnButtonRelease("KDPSet") end
if button == "VDL" then self.VDL:TriggerInput("Open",1) self:OnButtonRelease("VDLSet") end
if button == "KRP" then
self.KRP:TriggerInput("Set",0)
self:OnButtonRelease("KRPSet")
end
--[[
if (button == "PneumaticBrakeDown") and (self.Pneumatic.DriverValvePosition == 1) then
self.Pneumatic:TriggerInput("BrakeSet",2)
end
if self.Pneumatic.ValveType == 1 then
if (button == "PneumaticBrakeUp") and (self.Pneumatic.DriverValvePosition == 5) then
self.Pneumatic:TriggerInput("BrakeSet",4)
end
end
]]
end
function ENT:OnCouple(train,isfront)
if isfront and self.FrontAutoCouple then
self.FrontBrakeLineIsolation:TriggerInput("Open",1.0)
self.FrontTrainLineIsolation:TriggerInput("Open",1.0)
self.FrontAutoCouple = false
elseif not isfront and self.RearAutoCouple then
self.RearBrakeLineIsolation:TriggerInput("Open",1.0)
self.RearTrainLineIsolation:TriggerInput("Open",1.0)
self.RearAutoCouple = false
end
self.BaseClass.OnCouple(self,train,isfront)
end
View Git Blame Copy Permalink