//::///////////////////////////////////////////////
//:: FileName s_pcl_teleport
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Script Wizard
//:: Created On: 8/3/2002 1:13:27 PM
//:://////////////////////////////////////////////


// *** original version, not to be used *** //
// void main()
// {
//     object oPC = GetPCSpeaker();
//     object oLeader = GetFactionLeader(oPC);

//     if (oLeader != oPC) {

//         ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_UNSUMMON), oPC);
//         AssignCommand(oPC, JumpToObject(oLeader));

//     } else {

//         SendMessageToPC(oPC, "You are the party leader!");

//     }
// }
// *** END *** //

// *** Seeker's creation to include the teleport restrictions for Alangara PW *** //


#include "mn_i_pwfunctions"

void main()
{
    object oPC = GetPCSpeaker();
    object oLeader = GetFactionLeader(oPC);
    if (oLeader != oPC) {
        int teleportType = TELEPORT_DYNAMIC; // Use TELEPORT_OOC instead, if the teleport is "out of character"
        DoScriptTeleport(oPC, oLeader, teleportType, TELEPORT_ANIMATION_UNSUMMONEFFECT, TELEPORT_SPEED_DELAYED);
    } else {
        SendMessageToPC(oPC, "You are the party leader!");
    }
}

// *** DONE *** //