011-3,45,33,0	script	Arkim	NPC116,{
    mes "[Arkim the Hermit]";
    mes "\"Do you want to go back outside?\"";
    if (@knowhermitstory == 1) goto L_Short_Menu;
    menu
         "Yes, please!", L_Sure,
         "Not yet.", L_close,
         "Actually... Why do you live here?", L_Interested;

L_Short_Menu:
    menu
        "Yes, please!", L_Sure,
        "Not yet.", L_close,
        "What was that deal you were offering?", L_Quest;

L_Sure:
    warp "011-1", 60, 95;
    close;

L_Interested:
    mes "[Arkim the Hermit]";
    mes "\"Oh my, never really thought about it!\"";
    next;
    mes "[Arkim the Hermit]";
    mes "\"I guess mostly I enjoy experimenting with the bats here.\"";
    menu
        "I see...", L_close,
        "What type of experimenting?", L_Experiment;

L_Experiment:
    mes "[Arkim the Hermit]";
    mes "\"Never really thought about it either...\"";
    next;
    mes "You watch as the hermit's old, lazy eyes open wide, and the old man comes alive with energy.";
    next;
    mes "[Arkim the Hermit]";
    mes "\"I GUESS I REALLY LIKE CUTTING THEM UP TO SEE HOW THEY WORK!!  HAHAHA!\"";
    menu
        "YOU'RE CRAZY!", L_close,
        "Right... me too!  Can I help?", L_Quest;

L_close:
    close;

L_Quest:
    @knowhermitstory = 1;

    @dq_level = 20;
    @dq_cost = 4;
    @dq_count = 3;
    @dq_name$ = "BatWing";
    @dq_friendly_name$ = "bat wings";
    @dq_money = 600;
    @dq_exp = 100;

    callfunc "DailyQuest";

    next;

    mes "[Arkim the Hermit]";
    mes "\"And remember: never lend your toothbrush to a slime!\"";
    close;
}