void main()
{
int iRandom;
string sTag;
string sReplyTag;
string sSpeak;
string sReply;
object oNPC;

if (Random(10)==0)
    {
    sTag = "htc_citizen" + IntToString(Random(3)+1);
    oNPC = GetObjectByTag(sTag);
    iRandom = Random(13)+1;
    sReply = "You don't say?";
    switch (iRandom)
        {
        case 1: sSpeak = "I hear Suna is really being worked hard making all those items for the adventurer's.";
                sReply = "You don't say?";
                break;
        case 2: sSpeak = "I saw a giant spider as big as a wagon when I visited the lake in the Western Grasslands over the weekend.";
                sReply = "That used to be a good place for a picnic.";
                break;
        case 3: sSpeak = "My brother's friend was attacked by a giant on his way here from the Icy Plains.  He said it was taller than an oak with deep red skin.";
                sReply = "I didn't believe in giants until just recently.";
                break;
        case 4: sSpeak = "I hear the Duke isn't happy about the number of adventurer's his plan has attracted.  He thought there would be hundreds, but there are only dozens.";
                sReply = "Even brave adventurers are too scared to come around these parts.";
                break;
        case 5: sSpeak = "I heard the archmage Austus talking in the tavern.  He said he thinks the problems are coming from the Astral Plane, or some such place.";
                sReply = "I've never heard of that place.";
                break;
        case 6: sSpeak = "I saw a giant anthill smack dab in the middle of the Rolling Plains today.";
                sReply = "You're lucky, my cousin said he saw some giant fireants crawling around that mound.";
                break;
        case 7: sSpeak = "Did you hear about Ann?  She was baking a cake and went outside to get the laundry when she was attacked by a giant wasp! She had to beat it back with a broom handle.";
                sReply = "I wouldn't cross her, she's a fiesty one.";
                break;
        case 8: sSpeak = "Did you see that scene yesterday?  Some adventurers fled to town with some type of demon close on their tail.  Luckily, our guards were able to destroy it.";
                sReply = "Sometimes I think these adventurers are more trouble than they are worth.";
                break;
        case 9: sSpeak = "So, anything new?";
                sReply = "Not much.";
                break;
        case 10: sSpeak = "I hear even the sewers are too dangerous for us citizens now.";
                sReply = "Why would we want to go down there anyway?";
                break;
        case 11: sSpeak = "I heard that Craig won another battle in the gladiator pits.";
                sReply = "He's never going to lose.";
                break;
        case 12: sSpeak = "Daniel sure looks striking today.";
                sReply = "He looks striking every day.";
                break;
        case 13: sSpeak = "Did you hear about Tom?  He almost got eaten by a dragon!";
                sReply = "If he did, then he'd be et! Haha... wait, I don't get it.";
                break;
        }

    DelayCommand(0.5f,AssignCommand(oNPC,ActionSpeakString(sSpeak)));
    sTag = "htc_citizen" + IntToString(Random(3)+1);
    if (sTag == "htc_citizen1")
        sReplyTag = "htc_citizen" + IntToString(Random(2)+2);
    else if (sTag == "htc_citizen2")
        sReplyTag = "htc_citizen1";
    else if (sTag == "htc_citizen3")
        sReplyTag = "htc_citizen" + IntToString(Random(2)+1);

    oNPC = GetObjectByTag(sReplyTag);
    DelayCommand(3.0f,AssignCommand(oNPC,ActionSpeakString(sReply)));
    }
}