hedgewars/GSHandlers.inc
changeset 1014 3c7d4e7ccdff
parent 992 c16355b0c982
child 1024 a6942122c31d
equal deleted inserted replaced
1013:17148964400d 1014:3c7d4e7ccdff
  1087 begin
  1087 begin
  1088 AllInactive:= false;
  1088 AllInactive:= false;
  1089 HHGear:= PHedgehog(Gear^.Hedgehog)^.Gear;
  1089 HHGear:= PHedgehog(Gear^.Hedgehog)^.Gear;
  1090 DeleteCI(HHGear);
  1090 DeleteCI(HHGear);
  1091 HHGear^.X:= int2hwFloat(hwRound(HHGear^.X)) - _0_5;
  1091 HHGear^.X:= int2hwFloat(hwRound(HHGear^.X)) - _0_5;
  1092 SetLittle(HHGear^.dX);
  1092 HHGear^.dX:= SignAs(cLittle, Gear^.dX);
       
  1093 
  1093 HHGear^.dY:= - _0_3;
  1094 HHGear^.dY:= - _0_3;
  1094 
  1095 
  1095 Gear^.X:= HHGear^.X;
  1096 Gear^.X:= HHGear^.X;
  1096 Gear^.dX:= SignAs(_0_45, Gear^.dX);
  1097 Gear^.dX:= SignAs(_0_45, Gear^.dX);
  1097 Gear^.dY:= - _0_9;
  1098 Gear^.dY:= - _0_9;