hedgewars/GSHandlers.inc
changeset 3356 3ae3fccb439e
parent 3355 dc9e61e67484
child 3358 546e75f839ce
equal deleted inserted replaced
3355:dc9e61e67484 3356:3ae3fccb439e
  3081     doMakeExplosion(hwRound(Gear^.X) - 30 - r0, hwRound(Gear^.Y) + 40, 40 + r1, EXPLAutoSound);
  3081     doMakeExplosion(hwRound(Gear^.X) - 30 - r0, hwRound(Gear^.Y) + 40, 40 + r1, EXPLAutoSound);
  3082     doMakeExplosion(hwRound(Gear^.X) + 30 + r1, hwRound(Gear^.Y) + 40, 40 + r0, EXPLAutoSound);
  3082     doMakeExplosion(hwRound(Gear^.X) + 30 + r1, hwRound(Gear^.Y) + 40, 40 + r0, EXPLAutoSound);
  3083     Gear^.dY:= -_1;
  3083     Gear^.dY:= -_1;
  3084     end
  3084     end
  3085 else
  3085 else
  3086     Gear^.dY += cGravity * 2; // let it fall faster so itdoesn't take too long for the whole attack
  3086     Gear^.dY:= Gear^.dY + cGravity * 2; // let it fall faster so itdoesn't take too long for the whole attack
  3087 end;
  3087 end;