| changeset 5063 | d0722d0b024d |
| parent 5052 | 74a81c276d67 |
| child 5167 | 7b515d0945b1 |
| 5062:e2d38329b84a | 5063:d0722d0b024d |
|---|---|
209 begin |
209 begin |
210 with Gear^ do |
210 with Gear^ do |
211 begin |
211 begin |
212 Z:= cCurrHHZ; |
212 Z:= cCurrHHZ; |
213 State:= gstHHDriven; |
213 State:= gstHHDriven; |
214 Active:= true |
214 Active:= true; |
215 LastDamage:= nil |
|
215 end; |
216 end; |
216 RemoveGearFromList(Gear); |
217 RemoveGearFromList(Gear); |
217 InsertGearToList(Gear); |
218 InsertGearToList(Gear); |
218 FollowGear:= Gear |
219 FollowGear:= Gear |
219 end; |
220 end; |