hedgewars/uGearsHedgehog.pas
changeset 15627 ea189ee9394f
parent 15610 d347785fd61c
child 15639 afeffdb4a712
equal deleted inserted replaced
15626:b0078df61a59 15627:ea189ee9394f
  1408 if (HHGear^.State and gstMoving) <> 0 then
  1408 if (HHGear^.State and gstMoving) <> 0 then
  1409     begin
  1409     begin
  1410     wasJumping:= ((HHGear^.State and gstHHJumping) <> 0);
  1410     wasJumping:= ((HHGear^.State and gstHHJumping) <> 0);
  1411 
  1411 
  1412     if ((HHGear^.Message and gmHJump) <> 0) and wasJumping and ((HHGear^.State and gstHHHJump) = 0) then
  1412     if ((HHGear^.Message and gmHJump) <> 0) and wasJumping and ((HHGear^.State and gstHHHJump) = 0) then
  1413         if (not (hwAbs(HHGear^.dX) > cLittle)) and (HHGear^.dY < -_0_02) then
  1413         if (not (hwAbs(HHGear^.dX) > cLittle)) and (HHGear^.dY < _0_05) then
  1414             begin
  1414             begin
  1415             HHGear^.State:= HHGear^.State or gstHHHJump;
  1415             HHGear^.State:= HHGear^.State or gstHHHJump;
  1416             HHGear^.dY:= -_0_25;
  1416             HHGear^.dY:= -_0_25;
  1417             if (Hedgehog^.Effects[heArtillery] = 0) then
  1417             if (Hedgehog^.Effects[heArtillery] = 0) then
  1418                 HHGear^.dX:= -SignAs(_0_02, HHGear^.dX);
  1418                 HHGear^.dX:= -SignAs(_0_02, HHGear^.dX);