summaryrefslogtreecommitdiff
path: root/world/map/conf
diff options
context:
space:
mode:
authorwushin <pasekei@gmail.com>2014-06-25 22:34:25 -0500
committerwushin <pasekei@gmail.com>2014-06-26 07:44:24 -0500
commitca04411fbf0f460b83fa6cd10f931d1b9602742b (patch)
tree9294c1d37564d471eff385cad7aba80c8e29db24 /world/map/conf
parent8ab0e3a082a043b90a87ede7184a95f9462764f5 (diff)
downloadserverdata-ca04411fbf0f460b83fa6cd10f931d1b9602742b.tar.gz
serverdata-ca04411fbf0f460b83fa6cd10f931d1b9602742b.tar.bz2
serverdata-ca04411fbf0f460b83fa6cd10f931d1b9602742b.tar.xz
serverdata-ca04411fbf0f460b83fa6cd10f931d1b9602742b.zip
Place to host GM Events
Diffstat (limited to 'world/map/conf')
-rw-r--r--world/map/conf/magic-base.sex234
1 files changed, 0 insertions, 234 deletions
diff --git a/world/map/conf/magic-base.sex b/world/map/conf/magic-base.sex
index 8f3b9978..986e2ce1 100644
--- a/world/map/conf/magic-base.sex
+++ b/world/map/conf/magic-base.sex
@@ -3126,240 +3126,6 @@
30)
(message p "You notice a strange smell all around you.")))))
-(SPELL (NONMAGIC SILENT) world-shift "#alonzialonzo" ()
- (=>
- (GUARD
- (REQUIRE
- (&&
- (==
- (&
- (>>
- (script_int caster "Easter_2010_QuestState")
- 16)
- 1)
- 1)
- (==
- (&
- (>>
- (script_int caster "Easter_2010_QuestState")
- 7)
- 3)
- 2))) "Travel only works when you have both helped the doctor at least thrice and have defeated the invader - top level requirement." )
- (|
- (=>
- (GUARD
- (REQUIRE
- (&&
- (&&
- (count_item caster "DarkPetal")
- (!=
- (map_nr
- (location caster))
- 52))
- (!=
- (map_nr
- (location caster))
- 5698))) "Allow unlimited travel with the petal, 52 Do not allow if player is in Illia island, 5698 Do not allow if player is in botcheck area" )
- (|
- (=>
- (GUARD
- (REQUIRE
- (<
- (rdistance
- (location caster)
- (@ "028-1.gat" 69 70))
- 5)))
- (EFFECT
- (sfx
- (location caster)
- SFX_TELEPORT
- 200)
- (WAIT 8000)
- (SCRIPT "{
- savepoint \"009-1\", 52, 39;
- }")
- (warp caster
- (@ "009-1.gat" 55 37))
- (sfx
- (location caster)
- SFX_TELEPORT
- 200)))
- (=>
- (GUARD
- (REQUIRE
- (!=
- (map_nr
- (location caster))
- 28)))
- (EFFECT
- (SET inithp
- (hp caster)) "Store this value."
- (sfx
- (location caster)
- SFX_TELEPORT
- 200)
- (IF (||
- (||
- (||
- (==
- (map_nr
- (location caster))
- 9)
- (==
- (map_nr
- (location caster))
- 1))
- (==
- (map_nr
- (location caster))
- 21))
- (==
- (map_nr
- (location caster))
- 20))
- (WAIT 8000)
- (WAIT 20000))
- (IF (<
- (hp caster)
- inithp)
- (ABORT)) "Cancel teleport if the player took damage during channel time (hacky, but for most purposes should work.)"
- (SCRIPT "{
- savepoint \"028-1\", 69, 71;
- }")
- (warp caster
- (@ "028-1.gat" 69 70))
- (sfx
- (location caster)
- SFX_TELEPORT
- 200)))))
- (|
- (=>
- (REQUIRE
- (<
- (rdistance
- (location caster)
- (@ "028-1.gat" 69 70))
- 5))
- (EFFECT
- (set_script_variable caster "Easter_2010_QuestState"
- (|
- (script_int caster "Easter_2010_QuestState")
- (<< 1 17)))
- (sfx
- (location caster)
- SFX_TELEPORT
- 200)
- (WAIT 8000)
- (SCRIPT "{
- savepoint \"009-1\", 52, 39;
- }")
- (warp caster
- (@ "009-1.gat" 55 37))
- (sfx
- (location caster)
- SFX_TELEPORT
- 200)))
- (=>
- (GUARD
- (REQUIRE
- (&&
- (!=
- (map_nr
- (location caster))
- 28)
- (==
- (&
- (>>
- (script_int caster "Easter_2010_QuestState")
- 17)
- 1)
- 0))) "Allow for one free warp home without the petal" )
- (EFFECT
- (SET inithp
- (hp caster)) "Store this value."
- (sfx
- (location caster)
- SFX_TELEPORT
- 200)
- (IF (||
- (||
- (||
- (==
- (map_nr
- (location caster))
- 9)
- (==
- (map_nr
- (location caster))
- 1))
- (==
- (map_nr
- (location caster))
- 21))
- (==
- (map_nr
- (location caster))
- 20))
- (WAIT 8000)
- (WAIT 20000))
- (IF (<
- (hp caster)
- inithp)
- (ABORT)) "Cancel teleport if the player took damage during channel time (hacky, but for most purposes should work.)"
- (set_script_variable caster "Easter_2010_QuestState"
- (|
- (script_int caster "Easter_2010_QuestState")
- (<< 1 17)))
- (SCRIPT "{
- savepoint \"028-1\", 69, 70;
- }")
- (warp caster
- (@ "028-1.gat" 69 70))
- (sfx
- (location caster)
- SFX_TELEPORT
- 200)))))))
-
-(SPELL (NONMAGIC SILENT) easter-get-debug "#e" (PC p)
- (=>
- (GUARD
- (REQUIRE
- (||
- (==
- (name_of caster)
- "Freeyorp")
- (==
- (name_of caster)
- "Xakelbael the Dark"))))
- (EFFECT
- (SCRIPT "{
- message strcharinfo(0), \"Global state egg1: \"+ $Easter_2010_Egg_Loc_State1;
- message strcharinfo(0), \"Global state egg2: \"+ $Easter_2010_Egg_Loc_State2;
- message strcharinfo(0), \"Global state egg3: \"+ $Easter_2010_Egg_Loc_State3;
- message strcharinfo(0), \"Global state egg4: \"+ $Easter_2010_Egg_Loc_State4;
- message strcharinfo(0), \"Global state egg5: \"+ $Easter_2010_Egg_Loc_State5;
- message strcharinfo(0), \"Global npc state1: \"+ $Easter_2010_Npc_State1;
- message strcharinfo(0), \"Global npc state2: \"+ $Easter_2010_Npc_State2;
- }")
- (message caster
- (+ "Local state egg1: "
- (script_int p "Easter_2010_EggState1")))
- (message caster
- (+ "Local state egg2: "
- (script_int p "Easter_2010_EggState2")))
- (message caster
- (+ "Local state egg3: "
- (script_int p "Easter_2010_EggState3")))
- (message caster
- (+ "Local state egg4: "
- (script_int p "Easter_2010_EggState4")))
- (message caster
- (+ "Local state egg5: "
- (script_int p "Easter_2010_EggState5")))
- (message caster
- (+ "Local state quest: "
- (script_int p "Easter_2010_QuestState"))))))
-
(PROCEDURE hug_tree (target)
(IF (||
(||