summaryrefslogtreecommitdiff
path: root/world/map/npc/011-3/hermit.txt
blob: e8c2d11abcdcf0ae7fec919bca10860bff1656a2 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
//

011-3.gat,30,23,0|script|Arkim|116,
{
    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.gat", 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:
    set @knowhermitstory, 1;

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

    callfunc "DailyQuest";

    next;

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