From 69f5372502cb99fb9fe7f53ecd59ff2377237a5b Mon Sep 17 00:00:00 2001
From: mekolat <mekolat@users.noreply.github.com>
Date: Thu, 24 Sep 2015 23:28:47 +0000
Subject: add arithmetic mean builtin

---
 src/map/script-fun.cpp | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/src/map/script-fun.cpp b/src/map/script-fun.cpp
index 23702e5..2407b37 100644
--- a/src/map/script-fun.cpp
+++ b/src/map/script-fun.cpp
@@ -370,6 +370,18 @@ void builtin_min(ScriptState *st)
     push_int<ScriptDataInt>(st->stack, min);
 }
 
+static
+void builtin_average(ScriptState *st)
+{
+    int total, i;
+    total = conv_num(st, &AARG(0));
+
+    for (i = 1; HARG(i); i++)
+        total += conv_num(st, &AARG(i));
+
+    push_int<ScriptDataInt>(st->stack, (total / i));
+}
+
 static
 void builtin_sqrt(ScriptState *st)
 {
@@ -3449,6 +3461,7 @@ BuiltinFunction builtin_functions[] =
     BUILTIN(if_then_else, "iii"_s, '.'),
     BUILTIN(max, "e?*"_s, 'i'),
     BUILTIN(min, "ii*"_s, 'i'),
+    BUILTIN(average, "ii*"_s, 'i'),
     BUILTIN(sqrt, "i"_s, 'i'),
     BUILTIN(cbrt, "i"_s, 'i'),
     BUILTIN(pow, "ii"_s, 'i'),
-- 
cgit v1.2.3-70-g09d2