hedgewars/HHHandlers.inc
changeset 2136 3b19c7874a45
parent 2115 1c9a8081aef6
child 2137 4bb9ff2069ec
equal deleted inserted replaced
2135:0b7972dfad01 2136:3b19c7874a45
   625 	if ((Gear^.Message and gm_HJump) <> 0) and
   625 	if ((Gear^.Message and gm_HJump) <> 0) and
   626 		wasJumping and
   626 		wasJumping and
   627 		((Gear^.State and gstHHHJump) = 0) then
   627 		((Gear^.State and gstHHHJump) = 0) then
   628 		if (not (hwAbs(Gear^.dX) > cLittle)) and (Gear^.dY < -_0_02) then
   628 		if (not (hwAbs(Gear^.dX) > cLittle)) and (Gear^.dY < -_0_02) then
   629 			begin
   629 			begin
   630 			Gear^.State:= Gear^.State or gstHHHJump or gstMoving;
       
   631 			Gear^.dY:= -_0_25;
   630 			Gear^.dY:= -_0_25;
   632 			if not cArtillery then Gear^.dX:= -SignAs(_0_02, Gear^.dX);
   631 			if not cArtillery then
       
   632 				begin
       
   633 				Gear^.State:= Gear^.State or gstHHHJump;
       
   634 				Gear^.dX:= -SignAs(_0_02, Gear^.dX)
       
   635 				end;
       
   636 			
   633 			PlaySound(sndJump2, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack)
   637 			PlaySound(sndJump2, false, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack)
   634 			end;
   638 			end;
   635 	
   639 	
   636 	Gear^.Message:= Gear^.Message and not (gm_LJump or gm_HJump);
   640 	Gear^.Message:= Gear^.Message and not (gm_LJump or gm_HJump);
   637 
   641