|
7 | 7 | Metrostroi.DefineSystem("81_509_UKS")
|
8 | 8 |
|
9 | 9 | function TRAIN_SYSTEM:Initialize(parameters)
|
10 |
| - self.UKSEngaged = 0 |
| 10 | + self.UKSLamp = 0 |
11 | 11 | self.UKSTriggered = 0
|
12 | 12 | self.UKSEmerTriggered = 0
|
| 13 | + self.UKSEmerTriggeredX = false |
| 14 | + self.UKSEmerTriggeredT = false |
| 15 | + self.UKSEmerTriggeredV = false |
| 16 | + self.UKSEmerTriggeredReal = false |
13 | 17 | self.Train:LoadSystem("UKSDisconnect","Relay","Switch", {bass = true,normally_closed = true})
|
14 | 18 | end
|
15 | 19 |
|
16 | 20 | function TRAIN_SYSTEM:Outputs()
|
17 |
| - return { "UKSEngaged", "UKSTriggered", "UKSEmerTriggered" } |
| 21 | + return { "UKSLamp", "UKSTriggered", "UKSEmerTriggered" } |
18 | 22 | end
|
19 | 23 |
|
20 | 24 | function TRAIN_SYSTEM:Think(dT)
|
21 | 25 | local Train = self.Train
|
22 |
| - self.UKSEngaged = Train.UAVA.Value*Train.UKSDisconnect.Value |
23 |
| - if self.UKSEngaged > 0 then |
| 26 | + local KV = Train.KV |
| 27 | + if Train.Panel.V1*KV["10a-8"]*Train.UAVA.Value*Train.UKSDisconnect.Value > 0 then |
24 | 28 | local speed = Train.ALSCoil.Speed*Train.ALSCoil.SpeedSign
|
25 |
| - if speed > 34 then |
| 29 | + local KVX = KV["33-10AK"] |
| 30 | + local KVTr = KV["U2-6"] |
| 31 | + if speed <= -1 or KV["U2-4"] == 1 then |
| 32 | + self.UKSEmerTriggered = 1 |
26 | 33 | self.UKSTriggered = 1
|
27 |
| - if speed > 40 then |
| 34 | + self.UKSLamp = 1 |
| 35 | + elseif speed > 18 then |
| 36 | + self.UKSLamp = 1 |
| 37 | + self.UKSTriggered = 1 |
| 38 | + if speed > 20 and self.UKSEmerTriggered ~= 1 then |
28 | 39 | self.UKSEmerTriggered = 1
|
| 40 | + self.UKSEmerTriggeredReal = true |
| 41 | + self.UKSEmerTriggeredX = KVX > 0 |
| 42 | + self.UKSEmerTriggeredT = KVTr > 0 |
| 43 | + self.UKSEmerTriggeredV = false |
| 44 | + end |
| 45 | + elseif speed <= 1 then |
| 46 | + if self.UKSEmerTriggered > 0 and KVX > 0 then |
| 47 | + if not self.Starting then self.Starting = CurTime() end |
| 48 | + elseif KVX == 0 and self.UKSEmerTriggered == 0 then |
| 49 | + self.Starting = nil |
| 50 | + end |
| 51 | + if self.Starting then |
| 52 | + if CurTime()-self.Starting > 5 then self.UKSEmerTriggered = 1 self.UKSTriggered = 1 end |
| 53 | + end |
| 54 | + if self.UKSTriggered > 0 then |
| 55 | + self.UKSTriggered = KVX |
| 56 | + self.UKSEmerTriggered = KVX |
| 57 | + else |
| 58 | + self.UKSEmerTriggered = 1-KVX |
| 59 | + self.UKSEmerTriggeredReal = false |
| 60 | + end |
| 61 | + self.UKSLamp = self.UKSEmerTriggered |
| 62 | + elseif speed <= 18 and self.UKSEmerTriggered > 0 and self.UKSEmerTriggeredReal and not self.UKSEmerTriggeredX then |
| 63 | + self.UKSLamp = 0 |
| 64 | + if KVTr+KVX == 0 then self.UKSEmerTriggeredV = true end |
| 65 | + if self.UKSEmerTriggeredV then |
| 66 | + if self.UKSEmerTriggeredT then |
| 67 | + self.UKSEmerTriggered = 1-KVTr |
| 68 | + else |
| 69 | + self.UKSEmerTriggered = 1-KVX |
| 70 | + end |
| 71 | + self.UKSEmerTriggeredReal = self.UKSEmerTriggered > 0 |
| 72 | + self.UKSTriggered = self.UKSEmerTriggered |
| 73 | + end |
| 74 | + elseif speed <= 16 and self.UKSTriggered > 0 and self.UKSEmerTriggered == 0 then |
| 75 | + self.UKSTriggered = KVX |
| 76 | + self.UKSEmerTriggered = KVX |
| 77 | + self.UKSLamp = KVX |
| 78 | + else |
| 79 | + if self.Starting then |
| 80 | + if CurTime()-self.Starting > 5 then self.UKSEmerTriggered = 1 self.UKSTriggered = 1 self.Starting = nil elseif speed > 3 then self.Starting = nil end |
29 | 81 | end
|
30 |
| - elseif speed < 31 and self.UKSEmerTriggered == 0 then |
31 |
| - self.UKSTriggered = 0 |
32 |
| - self.UKSEmerTriggered = 0 |
33 |
| - elseif speed < 1 then |
34 |
| - self.UKSTriggered = 0 |
35 |
| - self.UKSEmerTriggered = 0 |
36 | 82 | end
|
37 | 83 | else
|
38 | 84 | self.UKSTriggered = 0
|
39 | 85 | self.UKSEmerTriggered = 0
|
| 86 | + self.UKSLamp = 0 |
40 | 87 | end
|
41 | 88 | end
|
0 commit comments