void main()
{
object oNPC1;
object oNPC2;
object oWP1;
object oWP2;
string sTalk;

if (GetIsPC(GetEnteringObject()) && GetLocalInt(OBJECT_SELF,"EN4DoOnce") == 0)
    {
    SetLocalInt(OBJECT_SELF,"EN4DoOnce",1);
    if (Random(2) == 0)
        {
        oNPC1 = GetObjectByTag("htc_actor1");
        oNPC2 = GetObjectByTag("htc_actor2");
        sTalk = "Do you love me?";
        DelayCommand(0.5f,AssignCommand(oNPC1,ActionSpeakString(sTalk)));
        sTalk = "You know I do!";
        DelayCommand(3.0f,AssignCommand(oNPC2,ActionSpeakString(sTalk)));
        sTalk = "How much do you love me?";
        DelayCommand(5.0f,AssignCommand(oNPC1,ActionSpeakString(sTalk)));
        sTalk = "Bunches and bunches.";
        DelayCommand(7.0f,AssignCommand(oNPC2,ActionSpeakString(sTalk)));
        sTalk = "More than anyone else?";
        DelayCommand(9.0f,AssignCommand(oNPC1,ActionSpeakString(sTalk)));
        sTalk = "More than the world, baby.";
        DelayCommand(11.0f,AssignCommand(oNPC2,ActionSpeakString(sTalk)));
        sTalk = "I love you too.";
        DelayCommand(13.0f,AssignCommand(oNPC1,ActionSpeakString(sTalk)));
        } else {
        oNPC1 = GetObjectByTag("htc_actor1");
        oNPC2 = GetObjectByTag("htc_actor2");
        oWP1 = GetObjectByTag("wp_actor1");
        oWP2 = GetObjectByTag("wp_actor2");
        sTalk = "Do you love me?";
        DelayCommand(0.5f,AssignCommand(oNPC1,ActionSpeakString(sTalk)));
        sTalk = "You know I do!";
        DelayCommand(3.0f,AssignCommand(oNPC2,ActionSpeakString(sTalk)));
        sTalk = "Then why did I see you with Carol?";
        DelayCommand(5.0f,AssignCommand(oNPC1,ActionSpeakString(sTalk)));
        sTalk = "We were just talking!";
        DelayCommand(7.0f,AssignCommand(oNPC2,ActionSpeakString(sTalk)));
        sTalk = "You were kissing her!!";
        DelayCommand(9.0f,AssignCommand(oNPC1,ActionSpeakString(sTalk)));
        sTalk = "She had something in her eye, honey, I was just helping her.";
        DelayCommand(11.0f,AssignCommand(oNPC2,ActionSpeakString(sTalk)));
        sTalk = "I don't believe you!";
        DelayCommand(13.0f,AssignCommand(oNPC1,ActionSpeakString(sTalk)));
        DelayCommand(14.0f,AssignCommand(oNPC1,ActionMoveToObject(oWP1)));
        sTalk = "Wait, honey, don't go!";
        DelayCommand(15.0f,AssignCommand(oNPC2,ActionSpeakString(sTalk)));
        sTalk = "Damn.";
        DelayCommand(18.0f,AssignCommand(oNPC2,ActionSpeakString(sTalk)));
        DelayCommand(19.0f,AssignCommand(oNPC2,ActionMoveToObject(oWP2)));
        }
    }
}