void main()
{

object oPC = GetPCSpeaker();
CreateItemOnObject("x0_it_mthnmisc11", oPC);

SetLocalInt(oPC, "Talked2Harvey", 4);
SetLocalInt(oPC, "Talked2Herschel", 4);

object oTarget = GetObjectByTag("StartPerch");
DestroyObject(oTarget, 0.0);

object oSpawn;
location lTarget;

oTarget = GetWaypointByTag("WP_JudgePerch");
lTarget = GetLocation(oTarget);
oSpawn = CreateObject(OBJECT_TYPE_PLACEABLE, "parrotperch", lTarget);

oTarget = GetObjectByTag("HerschelPerch");
SetPlotFlag(oTarget, FALSE);
DestroyObject(oTarget, 0.0);

oTarget = GetWaypointByTag("WP_HerschelPerch");
lTarget = GetLocation(oTarget);
oSpawn = CreateObject(OBJECT_TYPE_PLACEABLE, "nw_plc_parrot", lTarget);

oTarget = GetObjectByTag("HerschelChest");
SetPlotFlag(oTarget, FALSE);
SetLocked(oTarget, FALSE);

}

