home *** CD-ROM | disk | FTP | other *** search
- {---------------------------------------------------------------------------
- 32bit Fixed-Point Include
- Copyright (c) 1994 by JINX!
- ---------------------------------------------------------------------------}
-
- type
- Fixed = LongInt;
-
-
- function FixMul(A,B :Fixed) :Fixed; near; external;
- function FixDiv(A,B :Fixed) :Fixed; near; external;
- function FixSQR(A :Fixed) :Fixed; near; external;
- function FixSin(W :Integer) :Fixed; near; external;
- function FixCos(W :Integer) :Fixed; near; external;
- function FixSqrt(L :Fixed) :Fixed; near; external;
- {$L FIXEDPAS.OBJ}
-
-