void main()
{
object oPC = GetLastKiller();
while (GetIsObjectValid(GetMaster(oPC)))
{
oPC=GetMaster(oPC);
}
if (!GetIsPC(oPC)) return;
object oTarget;
oTarget = GetObjectByTag("kingkirmar");
int nInt;
nInt = GetObjectType(oTarget);
if (nInt != OBJECT_TYPE_WAYPOINT) ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_SUMMON_GATE), oTarget);
else ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_SUMMON_GATE), GetLocation(oTarget));
oTarget = GetObjectByTag("kingkirmar");
nInt = GetObjectType(oTarget);
if (nInt != OBJECT_TYPE_WAYPOINT) ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_WORD), oTarget);
else ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_WORD), GetLocation(oTarget));

  int nDiceRoll = d100(1);
  if(nDiceRoll <= 10)
    {
    CreateItemOnObject("Kirmar1", OBJECT_SELF, 1);
    }
   else if(nDiceRoll <= 20)
    {
    CreateItemOnObject("Kirmar2", OBJECT_SELF, 1);
    }
   else if(nDiceRoll <= 30)
    {
    CreateItemOnObject("Kirmar3", OBJECT_SELF, 1);
    }
    CreateObject(OBJECT_TYPE_CREATURE, "KingRall",
    GetLocation(GetNearestObjectByTag("King_Rall")));
    CreateObject(OBJECT_TYPE_CREATURE, "undeadrallbmage",
    GetLocation(GetNearestObjectByTag("undeadrallbmage_1")));
    CreateObject(OBJECT_TYPE_CREATURE, "undeadblackmage2",
    GetLocation(GetNearestObjectByTag("undeadrallbmage_2")));
}