void main()
{
    // Get the player character who is currently speaking
    object oPC = GetPCSpeaker();

    // Find the waypoint with the specified tag
    object oWaypoint = GetWaypointByTag("WP_CAS_ENTRYDR1");

    // Check if the waypoint is valid
    if (GetIsObjectValid(oWaypoint))
    {
        // Transport the speaking PC to the waypoint
        AssignCommand(oPC, JumpToObject(oWaypoint));
    }
    else
    {
        // Optionally, send a message if the waypoint is not found
        SendMessageToPC(oPC, "Destination waypoint not found.");
    }
}