029-1,46,95,0	script	Kaan	NPC160,{
    callfunc "PCtoNPCRange";
    if(@npc_check) end;

    @kaan_talked = getq(CandorQuest_Harasser);
    if (!(@kaan_talked)) goto L_Tanisha;
    if (QL_BEGIN >= 13) goto L_TutDone;
    if (QL_BEGIN == 12) goto L_Plan;
    if (QL_BEGIN == 11) goto L_TrickKnown;
    if (QL_BEGIN == 10) goto L_Trick;
    if (QL_BEGIN == 9) goto L_Hasan;
    goto L_Out;

L_Tanisha:
    mesn l("Young Man");
    mes l("\"You're the person I brought here, right?");
    mes l("My name is Kaan, I'm Tanisha's brother.\"");
    next;
    mesn;
    mesq l("She was babbling at me about it all the morning until I sent her to take care of the maggots in the cafe.");
    mesc l("Kaan grins mischieviously.");
    next;
    mesn;
    mes l("\"She hates maggots.");
    mes l("Did you already talk to Tanisha?\"");
    menu
        l("Yes, I helped her with the maggots."), L_Tanisha1,
        l("Yeah, and she's done with the maggots."), L_Tanisha1;

L_Tanisha1:
    mesn;
    mes "\"Ah, that is good news.";
    mes "You know, we have a lot of problems with bugs here.\"";
    mes "\"I've slain many bugs here to keep them out of our fields.\"";
    mes "\"If we don't watch out the maggots will eat all of our stocks.";
    mes "And the island is crawling with scorpions.\"";
    mes "\"Are you going to visit Hurnscald?";
    mes "Hurnscald is a wondeful place! Traders, entertainers, adventurers - it's very exciting.\"";
    mes "\"And Ian the trainer is hanging around there often. You should talk to him, he's a smart guy.\"";
    mes "\"The ferry to the south takes your there for free.\"";
    setq CandorQuest_Harasser, 1;
    goto L_close;

L_Out:
    mesn;
    mesq l("Hello! How are you? Did you already visit Hurnscald?");
    select
        l("Yes."),
        l("Not yet.");
    close;

L_Hasan:
    mesn;
    mesq l("Hello! How are you? Did you already visit Hurnscald?");
    menu
        "A guy named Hasan is bullying someone.",L_Next1,
        "Yes.", L_close,
        "Not yet.",L_close;

L_Next1:
    mes "\"Hasan! That's crazy. He becomes more cheeky with every day.";
    mes "I'd like to help you, but - I won't risk an open confrontation with him.\"";
    mes "\"Sometimes he just freaks out and then he's dangerous.";
    mes "He might listen to one of the adult men, but they're all off to work in Hurnscald during the day.\"";
    mes "\"We should think about some kind of trick. Ah, if only I knew his weak point.\"";
    QL_BEGIN = 10;
    goto L_Trick;

L_Trick:
    mesn;
    mes "\"Do you have any idea what Hasan's weakness could be?";
    mes "I wonder if Sorfina know something about him that could help us.\"";
    menu
        "No idea.",L_close;

L_TrickKnown:
    mesn;
    mes "\"Do you have any idea what Hasan's weakness could be?";
    menu
        "He's afraid of scorpions.",L_Next2,
        "No idea.",L_close;

L_Next2:
    mesn;
    mes "\"Scorpions?! Right! How could I forget?";
    mes "When he was a child, he nearly died because he fell into a scorpion nest.\"";
    QL_BEGIN = 12;
    next;
    goto L_Explain;

L_Explain:
    mes "\"Ok, then here's the plan:";
    mes "\"You'll go to Hasan and give me a sign when you're ready.";
    mes "Lets say the sign is that you're scratching your head.";
    mes "I'll watch you from this point.\"";
    mes "\"When you give me the sign, I'll summon a scorpion on him.";
    mes "I bet that will show him for the coward he really is.\"";
    mes "\"How's that? We can start as soon as you're ready.\"";
    goto L_close;

L_Plan:
    mesn;
    mes "\"I'm ready. Just give me the sign when you're down there.";
    mes "Or do you want me to explain the plan again?\"";
    menu
        "Yes please.",L_Explain,
        "No, everything's alright.",L_close;

L_TutDone:
    mesn;
    mes "\"Hi there. I hope you enjoy your time in Hurnscald.";
    mes "Hasan can be a real troublemaker, but it seems like he has calmed down for now.\"";
    goto L_close;

L_close:
    close;
}