hedgewars/uFloat.pas
changeset 538 74219eadab5e
parent 515 270f10276d2e
child 543 465e2ec8f05f
equal deleted inserted replaced
537:4d2e60623e44 538:74219eadab5e
    59 function DistanceI(const dx, dy: LongInt): hwFloat;
    59 function DistanceI(const dx, dy: LongInt): hwFloat;
    60 function AngleSin(const Angle: Longword): hwFloat;
    60 function AngleSin(const Angle: Longword): hwFloat;
    61 function AngleCos(const Angle: Longword): hwFloat;
    61 function AngleCos(const Angle: Longword): hwFloat;
    62 function SignAs(const num, signum: hwFloat): hwFloat;
    62 function SignAs(const num, signum: hwFloat): hwFloat;
    63 
    63 
       
    64 {$J-}
    64 const  _1div1024: hwFloat = (isNegative: false; QWordValue:     4194304);
    65 const  _1div1024: hwFloat = (isNegative: false; QWordValue:     4194304);
    65       _1div10000: hwFloat = (isNegative: false; QWordValue:      429496);
    66       _1div10000: hwFloat = (isNegative: false; QWordValue:      429496);
    66       _1div50000: hwFloat = (isNegative: false; QWordValue:       85899);
    67       _1div50000: hwFloat = (isNegative: false; QWordValue:       85899);
    67      _1div100000: hwFloat = (isNegative: false; QWordValue:       42950);
    68      _1div100000: hwFloat = (isNegative: false; QWordValue:       42950);
    68           _1div3: hwFloat = (isNegative: false; QWordValue:  1431655766);
    69           _1div3: hwFloat = (isNegative: false; QWordValue:  1431655766);
   117            _1024: hwFloat = (isNegative: false; QWordValue:  4398046511104);
   118            _1024: hwFloat = (isNegative: false; QWordValue:  4398046511104);
   118            _2048: hwFloat = (isNegative: false; QWordValue:  8796093022208);
   119            _2048: hwFloat = (isNegative: false; QWordValue:  8796093022208);
   119           _10000: hwFloat = (isNegative: false; QWordValue:  4294967296 * 10000);
   120           _10000: hwFloat = (isNegative: false; QWordValue:  4294967296 * 10000);
   120 
   121 
   121          cLittle: hwFloat = (isNegative: false; QWordValue:           1);
   122          cLittle: hwFloat = (isNegative: false; QWordValue:           1);
   122          cHHKick: hwFloat = (isNegative: false; QWordValue:   128849018);
   123          cHHKick: hwFloat = (isNegative: false; QWordValue:   128849018);  // _0_03
   123 {$ENDIF}
   124 {$ENDIF}
   124 
   125 
   125 {$IFNDEF FPC}
   126 {$IFNDEF FPC}
   126 type hwFloat = Extended;
   127 type hwFloat = Extended;
   127 {$ENDIF}
   128 {$ENDIF}