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,45,33,0 script Arkim NPC116,{
mesn l("Arkim the Hermit");
mesq l("Do you want to go back outside?");
if (@knowhermitstory == 1) goto L_Short_Menu;
menu
l("Yes, please!"), L_Sure,
l("Not yet."), L_close,
l("Actually... Why do you live here?"), L_Interested;
L_Short_Menu:
menu
l("Yes, please!"), L_Sure,
l("Not yet."), L_close,
l("What was that deal you were offering?"), L_Quest;
L_Sure:
warp "011-1", 58, 93;
closeclientdialog;
close;
L_Interested:
mesn l("Arkim the Hermit");
mes "\"Oh my, never really thought about it!\"";
next;
mesn l("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:
mesn l("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;
mesn l("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:
closeclientdialog;
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;
mesn l("Arkim the Hermit");
mesq l("And remember: never lend your toothbrush to a slime!");
close;
}
|
