plugins/include/float.inc
author David Anderson <dvander@alliedmods.net>
Sat May 19 21:21:55 2007 +0000 (2007-05-19)
changeset 815 8946ca39d52b
parent 619 6934bf39171e
child 831 1995c0dd5c04
permissions -rw-r--r--
include file cleanup
added semicolons where needed
replaced taglists with 'any' tag
added braces to one-line stocks
faluco@242
     1
/**
ds@475
     2
 * vim: set ts=4 :
dvander@374
     3
 * ===============================================================
dvander@374
     4
 * SourceMod (C)2004-2007 AlliedModders LLC.  All rights reserved.
dvander@374
     5
 * ===============================================================
dvander@374
     6
 *
dvander@374
     7
 *  This file is part of the SourceMod/SourcePawn SDK.  This file may only be used 
dvander@374
     8
 * or modified under the Terms and Conditions of its License Agreement, which is found 
dvander@374
     9
 * in LICENSE.txt.  The Terms and Conditions for making SourceMod extensions/plugins 
dvander@374
    10
 * may change at any time.  To view the latest information, see:
dvander@374
    11
 *   http://www.sourcemod.net/license.php
dvander@374
    12
 *
dvander@374
    13
 * Version: $Id$
faluco@242
    14
 */
dvander@374
    15
 
faluco@242
    16
#if defined _float_included
faluco@242
    17
 #endinput
faluco@242
    18
#endif
faluco@242
    19
#define _float_included
faluco@242
    20
faluco@242
    21
/**
dvander@619
    22
 * Different methods of rounding.
faluco@242
    23
 */
faluco@242
    24
enum floatround_method
faluco@242
    25
{
dvander@619
    26
	floatround_round = 0,		/**< Standard IEEE rounding */
dvander@619
    27
	floatround_floor,			/**< Next lowest integer value. */
dvander@619
    28
	floatround_ceil,			/**< Next highest integer value. */
dvander@619
    29
	floatround_tozero			/** Closest integer to zero. */
faluco@242
    30
};
faluco@242
    31
faluco@242
    32
/**
faluco@242
    33
 * Converts an integer into a floating point value.
faluco@242
    34
 *
faluco@242
    35
 * @param value			Integer to convert.
faluco@242
    36
 * @return				Floating point value.
faluco@242
    37
 */
faluco@242
    38
native Float:float(value);
faluco@242
    39
faluco@242
    40
/**
faluco@242
    41
 * Multiplies two floats together.
faluco@242
    42
 *
faluco@242
    43
 * @param oper1			First value.
faluco@242
    44
 * @param oper2			Second value.
faluco@242
    45
 * @return				oper1*oper2.
faluco@242
    46
 */
faluco@242
    47
native Float:FloatMul(Float:oper1, Float:oper2);
faluco@242
    48
faluco@242
    49
/**
faluco@242
    50
 * Divides the dividend by the divisor.
faluco@242
    51
 *
faluco@242
    52
 * @param dividend		First value.
faluco@242
    53
 * @param divisor		Second value.
faluco@242
    54
 * @return				dividend/divisor.
faluco@242
    55
 */
faluco@242
    56
native Float:FloatDiv(Float:dividend, Float:divisor);
faluco@242
    57
faluco@242
    58
/**
faluco@242
    59
 * Adds two floats together.
faluco@242
    60
 *
faluco@242
    61
 * @param oper1			First value.
faluco@242
    62
 * @param oper2			Second value.
faluco@242
    63
 * @return				oper1+oper2.
faluco@242
    64
 */
faluco@242
    65
native Float:FloatAdd(Float:oper1, Float:oper2);
faluco@242
    66
faluco@242
    67
/**
faluco@242
    68
 * Subtracts oper2 from oper1.
faluco@242
    69
 *
faluco@242
    70
 * @param oper1			First value.
faluco@242
    71
 * @param oper2			Second value.
faluco@242
    72
 * @return				oper1-oper2.
faluco@242
    73
 */
faluco@242
    74
native Float:FloatSub(Float:oper1, Float:oper2);
faluco@242
    75
faluco@242
    76
/**
faluco@242
    77
 * Returns the decimal part of a float.
faluco@242
    78
 *
faluco@242
    79
 * @param value			Input value.
faluco@242
    80
 * @return				Decimal part.
faluco@242
    81
 */
faluco@242
    82
native Float:FloatFraction(Float:value);
faluco@242
    83
faluco@242
    84
/**
faluco@242
    85
 * Rounds a float into an integer number.
faluco@242
    86
 *
faluco@242
    87
 * @param value			Input value to be rounded.
faluco@242
    88
 * @param method		Rounding method to use.
faluco@242
    89
 * @return				Rounded value.
faluco@242
    90
 */
faluco@242
    91
native FloatRound(Float:value, floatround_method:method=floatround_round);
faluco@242
    92
faluco@242
    93
/**
faluco@242
    94
 * Compares two floats.
faluco@242
    95
 *
faluco@242
    96
 * @param fOne			First value.
faluco@242
    97
 * @param fTwo			Second value.
faluco@242
    98
 * @return				Returns 1 if the first argument is greater than the second argument.
faluco@242
    99
 *                      Returns -1 if the first argument is smaller than the second argument.
faluco@242
   100
 *                      Returns 0 if both arguments are equal.
faluco@242
   101
 */
faluco@242
   102
native FloatCompare(Float:fOne, Float:fTwo);
faluco@242
   103
faluco@242
   104
/**
faluco@242
   105
 * Returns the square root of the input value, equivalent to floatpower(value, 0.5).
faluco@242
   106
 *
faluco@242
   107
 * @param value			Input value.
faluco@242
   108
 * @return				Square root of the value.
faluco@242
   109
 */
faluco@242
   110
native Float:SquareRoot(Float:value);
faluco@242
   111
faluco@242
   112
/**
faluco@242
   113
 * Returns the value raised to the power of the exponent.
faluco@242
   114
 *
faluco@242
   115
 * @param value			Value to be raised.
faluco@242
   116
 * @param exponent		Value to raise the base.
faluco@242
   117
 * @return				value^exponent.
faluco@242
   118
 */
faluco@242
   119
native Float:Pow(Float:value, Float:exponent);
faluco@242
   120
faluco@242
   121
/**
faluco@242
   122
 * Returns the value of raising the input by e.
faluco@242
   123
 *
faluco@242
   124
 * @param value			Input value.
faluco@242
   125
 * @return				exp(value).
faluco@242
   126
 */
faluco@242
   127
native Float:Exponential(Float:value);
faluco@242
   128
faluco@242
   129
/**
faluco@242
   130
 * Returns the logarithm of any base specified.
faluco@242
   131
 *
faluco@242
   132
 * @param value			Input value.
faluco@242
   133
 * @param base			Logarithm base to use, default is 10.
faluco@242
   134
 * @return				log(value)/log(base).
faluco@242
   135
 */
faluco@242
   136
native Float:Logarithm(Float:value, Float:base=10.0);
faluco@242
   137
faluco@242
   138
/**
faluco@242
   139
 * Returns the sine of the argument.
faluco@242
   140
 *
faluco@242
   141
 * @param value			Input value in radians.
faluco@242
   142
 * @return				sin(value).
faluco@242
   143
 */
faluco@242
   144
native Float:Sine(Float:value);
faluco@242
   145
faluco@242
   146
/**
faluco@242
   147
 * Returns the cosine of the argument.
faluco@242
   148
 *
faluco@242
   149
 * @param value			Input value in radians.
faluco@242
   150
 * @return				cos(value).
faluco@242
   151
 */
faluco@242
   152
native Float:Cosine(Float:value);
faluco@242
   153
faluco@242
   154
/**
faluco@242
   155
 * Returns the tangent of the argument.
faluco@242
   156
 *
faluco@242
   157
 * @param value			Input value in radians.
faluco@242
   158
 * @return				tan(value).
faluco@242
   159
 */
faluco@242
   160
native Float:Tangent(Float:value);
faluco@242
   161
faluco@242
   162
/**
dvander@619
   163
 * Returns an absolute value.
faluco@242
   164
 *
faluco@242
   165
 * @param value			Input value.
dvander@619
   166
 * @return				Absolute value of the input.
faluco@242
   167
 */
faluco@242
   168
native Float:FloatAbs(Float:value);
faluco@242
   169
faluco@242
   170
/**
faluco@242
   171
 * Returns the arctangent of the input value.
faluco@242
   172
 *
faluco@242
   173
 * @param angle			Input value.
faluco@242
   174
 * @return				atan(value) in radians.
faluco@242
   175
 */
faluco@242
   176
native Float:ArcTangent(Float:angle);
faluco@242
   177
faluco@242
   178
/**
faluco@242
   179
 * Returns the arccosine of the input value.
faluco@242
   180
 *
faluco@242
   181
 * @param angle			Input value.
faluco@242
   182
 * @return				acos(value) in radians.
faluco@242
   183
 */
faluco@242
   184
native Float:ArcCosine(Float:angle);
faluco@242
   185
faluco@242
   186
/**
faluco@242
   187
 * Returns the arcsine of the input value.
faluco@242
   188
 *
faluco@242
   189
 * @param angle			Input value.
faluco@242
   190
 * @return				asin(value) in radians.
faluco@242
   191
 */
faluco@242
   192
native Float:ArcSine(Float:angle);
faluco@242
   193
faluco@242
   194
/**
faluco@242
   195
 * Returns the arctangent2 of the input values.
faluco@242
   196
 *
faluco@242
   197
 * @param x				Horizontal value.
faluco@242
   198
 * @param y				Vertical value.
faluco@242
   199
 * @return				atan2(value) in radians.
faluco@242
   200
 */
faluco@244
   201
native Float:ArcTangent2(Float:x, Float:y);
faluco@242
   202
faluco@242
   203
/**
faluco@242
   204
 * User defined operators.
faluco@242
   205
 *
faluco@242
   206
 */
faluco@242
   207
#pragma rational Float
faluco@242
   208
faluco@242
   209
native Float:operator*(Float:oper1, Float:oper2) = FloatMul;
faluco@242
   210
native Float:operator/(Float:oper1, Float:oper2) = FloatDiv;
faluco@242
   211
native Float:operator+(Float:oper1, Float:oper2) = FloatAdd;
faluco@242
   212
native Float:operator-(Float:oper1, Float:oper2) = FloatSub;
faluco@242
   213
faluco@242
   214
stock Float:operator++(Float:oper)
dvander@815
   215
{
faluco@242
   216
	return oper+1.0;
dvander@815
   217
}
faluco@242
   218
faluco@242
   219
stock Float:operator--(Float:oper)
dvander@815
   220
{
faluco@242
   221
	return oper-1.0;
dvander@815
   222
}
faluco@242
   223
faluco@242
   224
stock Float:operator-(Float:oper)
dvander@815
   225
{
faluco@242
   226
	return oper^Float:((-1)^((-1)/2));				/* IEEE values are sign/magnitude */
dvander@815
   227
}
faluco@242
   228
faluco@242
   229
stock Float:operator*(Float:oper1, oper2)
dvander@815
   230
{
faluco@242
   231
	return FloatMul(oper1, float(oper2));			/* "*" is commutative */
dvander@815
   232
}
faluco@242
   233
faluco@242
   234
stock Float:operator/(Float:oper1, oper2)
dvander@815
   235
{
faluco@242
   236
	return FloatDiv(oper1, float(oper2));
dvander@815
   237
}
faluco@242
   238
faluco@242
   239
stock Float:operator/(oper1, Float:oper2)
dvander@815
   240
{
faluco@242
   241
	return FloatDiv(float(oper1), oper2);
dvander@815
   242
}
faluco@242
   243
faluco@242
   244
stock Float:operator+(Float:oper1, oper2)
dvander@815
   245
{
faluco@242
   246
	return FloatAdd(oper1, float(oper2));			/* "+" is commutative */
dvander@815
   247
}
faluco@242
   248
faluco@242
   249
stock Float:operator-(Float:oper1, oper2)
dvander@815
   250
{
faluco@242
   251
	return FloatSub(oper1, float(oper2));
dvander@815
   252
}
faluco@242
   253
faluco@242
   254
stock Float:operator-(oper1, Float:oper2)
dvander@815
   255
{
faluco@242
   256
	return FloatSub(float(oper1), oper2);
dvander@815
   257
}
faluco@242
   258
faluco@242
   259
stock bool:operator==(Float:oper1, Float:oper2)
dvander@815
   260
{
faluco@242
   261
	return FloatCompare(oper1, oper2) == 0;
dvander@815
   262
}
faluco@242
   263
faluco@242
   264
stock bool:operator==(Float:oper1, oper2)
dvander@815
   265
{
faluco@242
   266
	return FloatCompare(oper1, float(oper2)) == 0; 	/* "==" is commutative */
dvander@815
   267
}
faluco@242
   268
faluco@242
   269
stock bool:operator!=(Float:oper1, Float:oper2)
dvander@815
   270
{
faluco@242
   271
	return FloatCompare(oper1, oper2) != 0;
dvander@815
   272
}
faluco@242
   273
faluco@242
   274
stock bool:operator!=(Float:oper1, oper2)
dvander@815
   275
{
faluco@242
   276
	return FloatCompare(oper1, float(oper2)) != 0; 	/* "==" is commutative */
dvander@815
   277
}
faluco@242
   278
faluco@242
   279
stock bool:operator>(Float:oper1, Float:oper2)
dvander@815
   280
{
faluco@242
   281
	return FloatCompare(oper1, oper2) > 0;
dvander@815
   282
}
faluco@242
   283
faluco@242
   284
stock bool:operator>(Float:oper1, oper2)
dvander@815
   285
{
faluco@242
   286
	return FloatCompare(oper1, float(oper2)) > 0;
dvander@815
   287
}
faluco@242
   288
faluco@242
   289
stock bool:operator>(oper1, Float:oper2)
dvander@815
   290
{
faluco@242
   291
	return FloatCompare(float(oper1), oper2) > 0;
dvander@815
   292
}
faluco@242
   293
faluco@242
   294
stock bool:operator>=(Float:oper1, Float:oper2)
dvander@815
   295
{
faluco@242
   296
	return FloatCompare(oper1, oper2) >= 0;
dvander@815
   297
}
faluco@242
   298
faluco@242
   299
stock bool:operator>=(Float:oper1, oper2)
dvander@815
   300
{
faluco@242
   301
	return FloatCompare(oper1, float(oper2)) >= 0;
dvander@815
   302
}
faluco@242
   303
faluco@242
   304
stock bool:operator>=(oper1, Float:oper2)
dvander@815
   305
{
faluco@242
   306
	return FloatCompare(float(oper1), oper2) >= 0;
dvander@815
   307
}
faluco@242
   308
faluco@242
   309
stock bool:operator<(Float:oper1, Float:oper2)
dvander@815
   310
{
faluco@242
   311
	return FloatCompare(oper1, oper2) < 0;
dvander@815
   312
}
faluco@242
   313
faluco@242
   314
stock bool:operator<(Float:oper1, oper2)
dvander@815
   315
{
faluco@242
   316
	return FloatCompare(oper1, float(oper2)) < 0;
dvander@815
   317
}
faluco@242
   318
faluco@242
   319
stock bool:operator<(oper1, Float:oper2)
dvander@815
   320
{
faluco@242
   321
	return FloatCompare(float(oper1), oper2) < 0;
dvander@815
   322
}
faluco@242
   323
faluco@242
   324
stock bool:operator<=(Float:oper1, Float:oper2)
dvander@815
   325
{
faluco@242
   326
	return FloatCompare(oper1, oper2) <= 0;
dvander@815
   327
}
faluco@242
   328
faluco@242
   329
stock bool:operator<=(Float:oper1, oper2)
dvander@815
   330
{
faluco@242
   331
	return FloatCompare(oper1, float(oper2)) <= 0;
dvander@815
   332
}
faluco@242
   333
faluco@242
   334
stock bool:operator<=(oper1, Float:oper2)
dvander@815
   335
{
faluco@242
   336
	return FloatCompare(float(oper1), oper2) <= 0;
dvander@815
   337
}
faluco@242
   338
faluco@242
   339
stock bool:operator!(Float:oper)
dvander@815
   340
{
faluco@242
   341
	return (_:oper & ((-1)/2)) == 0;		/* -1 = all bits to 1; /2 = remove most significant bit (sign)
faluco@242
   342
											works on both 32bit and 64bit systems; no constant required */
dvander@815
   343
}
faluco@242
   344
faluco@242
   345
/**
faluco@242
   346
 * Forbidden operators.
faluco@242
   347
 *
faluco@242
   348
 */
faluco@242
   349
forward operator%(Float:oper1, Float:oper2);
faluco@242
   350
forward operator%(Float:oper1, oper2);
faluco@261
   351
forward operator%(oper1, Float:oper2);
faluco@261
   352
faluco@261
   353
#define FLOAT_PI 3.1415926535897932384626433832795
faluco@261
   354
dvander@619
   355
/**
dvander@619
   356
 * Converts degrees to radians.
dvander@619
   357
 *
dvander@619
   358
 * @param angle		Degrees.
dvander@619
   359
 * @return			Radians.
dvander@619
   360
 */
faluco@261
   361
stock Float:DegToRad(Float:angle)
faluco@261
   362
{
faluco@261
   363
	return (angle*FLOAT_PI)/180;
faluco@261
   364
}
faluco@261
   365
dvander@619
   366
/**
dvander@619
   367
 * Converts degrees to radians.
dvander@619
   368
 *
dvander@619
   369
 * @param angle		Radians.
dvander@619
   370
 * @return			Degrees.
dvander@619
   371
 */
faluco@261
   372
stock Float:RadToDeg(Float:angle)
faluco@261
   373
{
faluco@261
   374
	return (angle*180)/FLOAT_PI;
ds@475
   375
}