018-1.gat,80,61,0|script|Miner|109,

{
    mes"[Miner]";
    mes"\"Be careful in there.\"";
    close;

L_Miner_Start:
    mes"[Miner]";
    mes"\"Hi, you look fairly experienced, could you help an old miner out while you are in there?\"";
    menu
           "Sure I'll help.", L_Help
           "No thanks.", L_Close

L_Help:
    mes"[Miner]";
    mes"\"You see when the spiders came I hurried up and ran, dropping my keychain in the process.\"";
    mes"\"The keychain broke, but that's not what i'm worried about, I'm worried about the keys the spiders gobbled up.\"";
    mes"\"There were alot of keys so if you can get them back for me I'd be really grateful.\"";

    menu
           "I''ll be right back with them." L_Close
           "I have them right here."  L_Thanks
           "I've changed my mind." L_Close

L_Thanks:
    set @dq_level, 40;
    set @dq_cost, 30;
    set @dq_count, 5;
    set @dq_name$, "Treasure Key";
    set @dq_friendly_name$, "treasure key";
    set @dq_money, 5000;
    set @dq_exp, 5000;


    callfunc "DailyQuest";

    next;

    mes "[Miner]";
    mes "/"Check back with me tomorrow to see if I've found all my keys yet.\"";

    L_Close
}