summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--example/serverdata/scripts/maps/desert.lua5
-rw-r--r--src/scripting/lua.cpp30
2 files changed, 34 insertions, 1 deletions
diff --git a/example/serverdata/scripts/maps/desert.lua b/example/serverdata/scripts/maps/desert.lua
index 6d88b37..d11be2f 100644
--- a/example/serverdata/scripts/maps/desert.lua
+++ b/example/serverdata/scripts/maps/desert.lua
@@ -100,5 +100,8 @@ function Tamer(npc, ch, list)
end
local m1 = mana.monster_create("Maggot", mana.posX(ch), mana.posY(ch))
- schedule_in(0.5, function() mana.being_say(m1, "Roaaarrrr!!!") end)
+ schedule_in(0.5, function()
+ mana.being_say(m1, "Roaaarrrr!!!")
+ mana.monster_change_anger(m1, ch, 100)
+ end)
end
diff --git a/src/scripting/lua.cpp b/src/scripting/lua.cpp
index 47bf335..cfc07f1 100644
--- a/src/scripting/lua.cpp
+++ b/src/scripting/lua.cpp
@@ -1124,6 +1124,35 @@ static int monster_get_name(lua_State *s)
}
/**
+ * mana.monster_change_anger(Monster*, Being*, int anger)
+ * Makes a monster angry at a being
+ */
+static int monster_change_anger(lua_State *s)
+{
+ const int anger = luaL_checkint(s, 3);
+ if (!lua_islightuserdata(s, 1))
+ {
+ lua_pushboolean(s, false);
+ return 1;
+ }
+ Monster *m = dynamic_cast<Monster *>((Thing *)lua_touserdata(s, 1));
+ if (!m)
+ {
+ raiseScriptError(s, "monster_change_anger called "
+ "for a nonexisting monster");
+ return 0;
+ }
+ Being *being = getBeing(s, 2);
+ if (!being)
+ {
+ raiseScriptError(s, "monster_change_anger called "
+ "for a nonexisting being");
+ }
+ m->changeAnger(being, anger);
+ return 0;
+}
+
+/**
* mana.monster_remove(Monster*): bool success
* Remove a monster object without kill event.
* return whether the monster was enqueued for removal.
@@ -2147,6 +2176,7 @@ LuaScript::LuaScript():
{ "exp_for_level", &exp_for_level },
{ "monster_create", &monster_create },
{ "monster_get_name", &monster_get_name },
+ { "monster_change_anger", &monster_change_anger },
{ "monster_remove", &monster_remove },
{ "monster_load_script", &monster_load_script },
{ "being_apply_status", &being_apply_status },