changeset 2139 | 5a083e71a71d |
parent 2090 | 4edb0d49a42d |
child 2140 | 75e5c4fcae2a |
2138:b246ad6484f5 | 2139:5a083e71a71d |
---|---|
493 |
493 |
494 if (TurnTimeLeft > 0) then |
494 if (TurnTimeLeft > 0) then |
495 dec(TurnTimeLeft) |
495 dec(TurnTimeLeft) |
496 else |
496 else |
497 begin |
497 begin |
498 PHedgehog(Gear^.Hedgehog)^.AttacksNum:= Gear^.Ammo^.NumPerTurn+1; |
|
498 DeleteGear(Gear); |
499 DeleteGear(Gear); |
499 AfterAttack; |
500 AfterAttack; |
500 TurnTimeLeft:= 0 |
501 TurnTimeLeft:= 0 |
501 end; |
502 end; |
502 end; |
503 end; |