| changeset 7835 | a84936d1618a |
| parent 7755 | b8958e64e68d |
| child 7837 | 3e031b3b33e6 |
| 7834:3a65b70b1285 | 7835:a84936d1618a |
|---|---|
245 with Gear^ do |
245 with Gear^ do |
246 begin |
246 begin |
247 Z:= cCurrHHZ; |
247 Z:= cCurrHHZ; |
248 State:= gstHHDriven; |
248 State:= gstHHDriven; |
249 Active:= true; |
249 Active:= true; |
250 Power:= 0; |
|
250 LastDamage:= nil |
251 LastDamage:= nil |
251 end; |
252 end; |
252 RemoveGearFromList(Gear); |
253 RemoveGearFromList(Gear); |
253 InsertGearToList(Gear); |
254 InsertGearToList(Gear); |
254 FollowGear:= Gear |
255 FollowGear:= Gear |