IF
Global("CorpseExplotion","GLOBAL",1)
See(DeadActor)
ActionListEmpty()
THEN
RESPONSE #100
MoveToObject(LastSeenBy(Myself))
SetGlobal("CorpseExplotion","GLOBAL",2)
END
IF
Global("CorpseExplotion","GLOBAL",2)
Level("(%1-5%)",LastSummonerOf(Myself))
ActionListEmpty()
THEN
RESPONSE #100
SetGlobal("CorpseExplotion","GLOBAL",3)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",2)
Level("(%6-8%)",LastSummonerOf(Myself))
ActionListEmpty()
THEN
RESPONSE #100
SetGlobal("CorpseExplotion","GLOBAL",4)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",2)
Level("(%9-11%)",LastSummonerOf(Myself))
ActionListEmpty()
THEN
RESPONSE #100
SetGlobal("CorpseExplotion","GLOBAL",5)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",2)
Level("(%12-14%)",LastSummonerOf(Myself))
ActionListEmpty()
THEN
RESPONSE #100
SetGlobal("CorpseExplotion","GLOBAL",6)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",2)
Level("(%15-17%)",LastSummonerOf(Myself))
ActionListEmpty()
THEN
RESPONSE #100
SetGlobal("CorpseExplotion","GLOBAL",7)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",2)
Level("(%17-40%)",LastSummonerOf(Myself))
ActionListEmpty()
THEN
RESPONSE #100
SetGlobal("CorpseExplotion","GLOBAL",
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",3)
ActionListEmpty()
THEN
RESPONSE #100
SetCreLevel("1",(Myself))
AddSpecialAbility("GENEC4") // Corpse Explotion
SetGlobal("CorpseExplotion","GLOBAL",9)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",4)
ActionListEmpty()
THEN
RESPONSE #100
SetCreLevel("6",(Myself))
AddSpecialAbility("GENEC4") // Corpse Explotion
SetGlobal("CorpseExplotion","GLOBAL",9)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",5)
ActionListEmpty()
THEN
RESPONSE #100
SetCreLevel("9",(Myself))
AddSpecialAbility("GENEC4") // Corpse Explotion
SetGlobal("CorpseExplotion","GLOBAL",9)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",6)
ActionListEmpty()
THEN
RESPONSE #100
SetCreLevel("12",(Myself))
AddSpecialAbility("GENEC4") // Corpse Explotion
SetGlobal("CorpseExplotion","GLOBAL",9)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",7)
ActionListEmpty()
THEN
RESPONSE #100
SetCreLevel("15",(Myself))
AddSpecialAbility("GENEC4") // Corpse Explotion
SetGlobal("CorpseExplotion","GLOBAL",9)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",
ActionListEmpty()
THEN
RESPONSE #100
SetCreLevel("15",(Myself))
AddSpecialAbility("GENEC4") // Corpse Explotion
SetGlobal("CorpseExplotion","GLOBAL",9)
Continue()
END
IF
Global("CorpseExplotion","GLOBAL",
ActionListEmpty()
THEN
RESPONSE #100
ReallyForceSpellRES("GENEC4",(Myself))
SetGlobal("CorpseExplotion","GLOBAL",0)
END