1 files changed, 50 insertions, 0 deletions
diff --git a/npc/functions/math.txt b/npc/functions/math.txt
new file mode 100644
index 00000000..357407da
--- /dev/null
+++ b/npc/functions/math.txt
@@ -0,0 +1,50 @@
+// Evol functions.
+// Authors:
+//    4144
+//    Reid
+//    Jesusalva
+// Description:
+//    Math functions
+
+
+// abs(<int>)
+//    returns the absolute value of the passed integer
+
+function	script	abs	{
+    .@n = getarg(0);
+    return .@n >= 0 ? .@n : -.@n;
+}
+
+
+
+// lognbaselvl({<multiplicator>{, <min value>}})
+//     returns BaseLevel * logn (BaseLevel * alpha).
+
+function	script	lognbaselvl	{
+    .@alpha = getarg(0, 1);
+    .@min = getarg(1, 1);
+    .@ret = 0;
+    .@pc_level = BaseLevel * .@alpha;
+
+    while (.@pc_level >>= 1)
+    {
+        ++.@ret;
+    }
+    .@ret *= BaseLevel;
+
+    if (.@ret <= .@min)
+    {
+        .@ret = .@min;
+    }
+
+    return .@ret;
+}
+
+
+// result is: lower < target <= higher
+// is_between ( lower, higher, target)
+function	script	is_between	{
+    .@val=getarg(2);
+    return (getarg(0) < .@val && getarg(1) >= .@val);
+}
+