void main()

{

object oPC = GetPCSpeaker();

object oTarget;
location lTarget;

oTarget = GetWaypointByTag("WP_HarborShp1");

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);
   }

//AssignCommand(oPC, TakeGoldFromCreature(5, oPC, TRUE));

FadeToBlack(oPC);

FadeFromBlack(oPC);

}