void main()
{
    if(!GetLocalInt(OBJECT_SELF, "SUMMONED" ))

    {
    SetLocalInt(OBJECT_SELF, "SUMMONED", 1);

    object oPilar1 = GetObjectByTag("ba_cryptpilar1");
    object oPilar2 = GetObjectByTag("ba_cryptpilar2");
    object oPilar3 = GetObjectByTag("ba_cryptpilar3");
    object oPilar4 = GetObjectByTag("ba_cryptpilar4");
    object oPilar5 = GetObjectByTag("ba_cryptpilar5");

    effect eBeam1 = EffectBeam(VFX_BEAM_LIGHTNING, oPilar1, FALSE);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam1, oPilar2, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam1, oPilar3, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam1, oPilar4, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam1, oPilar5, 10.0f);

    effect eBeam2 = EffectBeam(VFX_BEAM_LIGHTNING, oPilar2, FALSE);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam2, oPilar1, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam2, oPilar3, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam2, oPilar4, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam2, oPilar5, 10.0f);

    effect eBeam3 = EffectBeam(VFX_BEAM_LIGHTNING, oPilar3, FALSE);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam3, oPilar1, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam3, oPilar2, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam3, oPilar4, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam3, oPilar5, 10.0f);

    effect eBeam4 = EffectBeam(VFX_BEAM_LIGHTNING, oPilar4, FALSE);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam4, oPilar1, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam4, oPilar2, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam4, oPilar3, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam4, oPilar5, 10.0f);

    effect eBeam5 = EffectBeam(VFX_BEAM_LIGHTNING, oPilar5, FALSE);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam5, oPilar1, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam5, oPilar2, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam5, oPilar3, 10.0f);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBeam5, oPilar4, 10.0f);


    object oCrypt = GetObjectByTag("ba_cryptboss");
    vector vBalor = Vector(22.50f, 35.00f, 0.00f);
    location lSummon = Location(oCrypt, vBalor, 90.0);
    CreateObject(OBJECT_TYPE_CREATURE, "ba_lordofthetomb", lSummon, TRUE);
    }
}