void main()
{

object oTarget;
int nInt;

object oPC = GetPCSpeaker();

oTarget = GetObjectByTag("PerchCom1");

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

oTarget = GetObjectByTag("PerchCom1");

nInt = GetObjectType(oTarget);

oTarget = GetObjectByTag("PerchCom1");

DestroyObject(oTarget, 3.0);

oTarget = GetObjectByTag("PerchCom2");

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

oTarget = GetObjectByTag("PerchCom2");

nInt = GetObjectType(oTarget);

oTarget = GetObjectByTag("PerchCom2");

DestroyObject(oTarget, 3.0);

oTarget = GetObjectByTag("PerchCom3");

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

oTarget = GetObjectByTag("PerchCom3");

nInt = GetObjectType(oTarget);

oTarget = GetObjectByTag("PerchCom3");

DestroyObject(oTarget, 3.0);

}