From 0298e319dc3c3715cc42029609e2ab3abd122560 Mon Sep 17 00:00:00 2001
From: Fate <fate-tmw@googlemail.com>
Date: Sun, 24 May 2009 16:05:39 +0000
Subject: Added and documented stop_status_change command for magic language

---
 src/map/magic-stmt.c | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'src')

diff --git a/src/map/magic-stmt.c b/src/map/magic-stmt.c
index d89a01e..0d4b4b7 100644
--- a/src/map/magic-stmt.c
+++ b/src/map/magic-stmt.c
@@ -487,6 +487,16 @@ op_status_change(env_t *env, int args_nr, val_t *args)
         return 0;
 }
 
+static int
+op_stop_status_change(env_t *env, int args_nr, val_t *args)
+{
+        entity_t *subject = ARGENTITY(0);
+
+        skill_status_change_end(subject, ARGINT(1), -1);
+
+        return 0;
+}
+
 static int
 op_override_attack(env_t *env, int args_nr, val_t *args)
 {
@@ -794,6 +804,7 @@ static op_t operations[] =
         { "warp", "el", op_warp },
         { "banish", "e", op_banish },
         { "status_change", "eiiiiii", op_status_change },
+        { "stop_status_change", "ei", op_stop_status_change },
         { "override_attack", "eiiiiii", op_override_attack },
         { "create_item", "e.i", op_create_item },
         { "aggravate", "eie", op_aggravate },
-- 
cgit v1.2.3-70-g09d2