void main()
{

object oPC = GetPCSpeaker();

object oTarget;

location lTarget;

oTarget = GetObjectByTag("Alek");

AssignCommand(oTarget, ActionMoveToObject(GetObjectByTag("WP_Alek1")));

oTarget = GetObjectByTag("Alek");

int nInt;

nInt = GetObjectType(oTarget);

oTarget = GetObjectByTag("Alek");

DestroyObject(oTarget, 6.0);

oTarget = GetWaypointByTag("WP_Rodolon_01");

lTarget = GetLocation(oTarget);

if (GetAreaFromLocation(lTarget)==OBJECT_INVALID) return;

oTarget=GetFirstFactionMember(oPC, FALSE);

while (GetIsObjectValid(oTarget))
   {
   AssignCommand(oTarget, ClearAllActions());

   AssignCommand(oTarget, ActionJumpToLocation(lTarget));
   oTarget=GetNextFactionMember(oPC, FALSE);
   }

}