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