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
|
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;
}
|
