equal
deleted
inserted
replaced
1525 Gear^.X:= Gear^.X + int2hwFloat(xx); |
1525 Gear^.X:= Gear^.X + int2hwFloat(xx); |
1526 if not TestCollisionYwithGear(Gear, yyn) then NextAngle |
1526 if not TestCollisionYwithGear(Gear, yyn) then NextAngle |
1527 end; |
1527 end; |
1528 |
1528 |
1529 dec(Gear^.Health); |
1529 dec(Gear^.Health); |
1530 if Gear^.Health = 0 then |
1530 if (Gear^.Health = 0) or ((Gear^.Message and gm_Attack) <> 0) then |
1531 begin |
1531 begin |
1532 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 75, EXPLAutoSound); |
1532 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 75, EXPLAutoSound); |
1533 AfterAttack; |
1533 AfterAttack; |
1534 DeleteGear(Gear) |
1534 DeleteGear(Gear) |
1535 end |
1535 end |