From bc4deaf81d9701261baac6a10d762b0f40e7f65f Mon Sep 17 00:00:00 2001 From: mekolat Date: Thu, 11 Jun 2015 11:13:11 -0400 Subject: initial commit for magic v3 Fix Druid Tree and add hug to TMW --- world/map/conf/magic-misc.sex | 112 ------------------------------------------ 1 file changed, 112 deletions(-) (limited to 'world/map/conf/magic-misc.sex') diff --git a/world/map/conf/magic-misc.sex b/world/map/conf/magic-misc.sex index 15672f4c..14d6ea3a 100644 --- a/world/map/conf/magic-misc.sex +++ b/world/map/conf/magic-misc.sex @@ -1,68 +1,6 @@ "--------------------------------------------------------------------------------" " Special-purpose quasispells " "--------------------------------------------------------------------------------" -(SPELL (NONMAGIC) dueloff "#dueloff" () - (=> - (GUARD - (REQUIRE - (== (substr (location caster) 2 5) "009-7"))) - (EFFECT - (IF (== (script_int caster "@Duels_Off") 1) - (BLOCK - (SCRIPT "{set @Duels_Off, 0;}") - (message caster "Now accepting incoming duel requests.") - (ABORT))) - (SCRIPT "{set @Duels_Off, 1;}") - (message caster "Now blocking incoming duel requests.")))) - -(SPELL (NONMAGIC) duel "#duel" (PC target) - (=> - (GUARD - (REQUIRE - (== (& (script_int target "$SANGUINE") (script_int target "$@SV_FCDBit")) 0))) - (EFFECT - (IF (== target caster) - (BLOCK - (message caster "You can not fight against yourself.") - (ABORT))) - (IF (is_dead target) - (BLOCK - (message caster "You can not fight against a corpse.") - (ABORT))) - (IF (status_option caster SO_GMINVISIBLE) - (BLOCK - (message caster "You can not fight while being invisible.") - (ABORT))) - (IF (status_option target SO_GMHIDE) - (BLOCK - (message caster "This player have @hide enabled.") - (ABORT))) - (IF (status_option target SO_GMINVISIBLE) - (ABORT)) - (IF (status_option caster SO_GMHIDE) - (ABORT)) - (IF (!= (substr (location caster) 2 5) "009-7") - (BLOCK - (message caster "You need to be in the fight club to challenge someone to a duel.") - (ABORT))) - (IF (!= (substr (location target) 2 5) "009-7") - (BLOCK - (message caster "This player is not in the fight club at the moment.") - (ABORT))) - (IF (> (script_int target "@Duels_Off") 0) - (BLOCK - (message caster "This player is automatically ignoring incoming duel requests.") - (ABORT))) - (IF (> (script_int caster "$@Duel_Queue_ID[($@Duel_QueueLimit)]") 0) - (BLOCK - (message caster (+ (+ "There is already " (script_int caster "$@Duel_QueueLimit")) " duel(s) in the queue, which is the maximum.")) - (ABORT))) - (IF (> (script_int target "@Duel_Queue[($@Duel_PlayerQueueLimit)]") 0) - (BLOCK - (message caster (+ (+ "There is already " (script_int caster "$@Duel_PlayerQueueLimit")) " duel request(s) in the queue of this player, which is the maximum.")) - (ABORT))) - (SET script_target target) - (SCRIPT "{callfunc \"fightclub_sendrequest\";}")))) (SPELL (NONMAGIC SILENT) marriage "marry" (PC target) (=> @@ -165,53 +103,3 @@ (+ (name_of target) " turned down your marriage offer.")))))) - -(DISABLED - (SPELL (LOCAL) mouboo-groan "#g" () - (=> - (GUARD - (MANA 1) - (REQUIRE - (== - (name_of caster) - "MOUBOOTAUR"))) - (EFFECT - (FOREACH PC p - (rbox - (location caster) - 200) - (SET distance - (rdistance - (location caster) - (location p)))) - (IF (< distance 15) - (message p "The moubootaur's groaning rings in your ears!") - (IF (< distance 70) - (message p "You hear a loud groaning noise, not far away...") - (message p "You hear an odd groaning noise in the distance..."))))))) - -(DISABLED - (SPELL (LOCAL) mouboo-smell "#s" () - (=> - (GUARD - (MANA 1) - (REQUIRE - (== - (name_of caster) - "MOUBOOTAUR"))) - (EFFECT - (WAIT 30000) - (FOREACH PC p - (rbox - (location caster) - 30) - (message p "You notice a strange smell all around you.")))))) - -(SPELL (NONMAGIC) killgm0 "#pullrabbit" () - (=> - (REQUIRE - (is_equipped caster "MagicGMTopHat")) - (EFFECT - (SCRIPT "{ - callfunc \"ActivateMagicGMTophat\"; - }")))) -- cgit v1.2.3-60-g2f50