hedgewars/uGearsUtils.pas
changeset 10659 79e466c393f7
parent 10654 cdce07f5a011
child 10668 a15d57d941a1
equal deleted inserted replaced
10658:a3872ffdeab1 10659:79e466c393f7
   103 dmgBase:= dmgRadius + cHHRadius div 2;*)
   103 dmgBase:= dmgRadius + cHHRadius div 2;*)
   104 dmgBase:= Radius shl 1 + cHHRadius div 2;
   104 dmgBase:= Radius shl 1 + cHHRadius div 2;
   105 
   105 
   106 // we might have to run twice if weWrap is enabled
   106 // we might have to run twice if weWrap is enabled
   107 wrap:= false;
   107 wrap:= false;
   108 repeat;
   108 repeat
   109 
   109 
   110 fX:= int2hwFloat(X);
   110 fX:= int2hwFloat(X);
   111 fY:= int2hwFloat(Y);
   111 fY:= int2hwFloat(Y);
   112 Gear:= GearsList;
   112 Gear:= GearsList;
   113 
   113