summaryrefslogtreecommitdiff
path: root/npc/007-1/dracoula.txt
blob: 2491e954bf9ac133149a8559ae7c46230d62012c (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
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
// TMW2 Script
// Author:
//  Jesusalva
//  Saulc
// Description:
//      Candor girl ask for maggot sliem every 6 hours
// Variable:
//      MineQuest_Dracoula


007-1,165,99,0	script	Dracoula	NPC_ELVEN_FEMALE,{

    mesn;
    mesq l("Monsters do not aim small towns like Candor. This city also comes with the plus that I know where everything's at.");
    if (BaseLevel >= 15) goto L_Menu;
    close;

L_Menu:
    mes "[Dracoula]";
    mesq l("Are you enjoying yourself in Candor? Do you have any questions?");
    mes "";
    menu
        l("What can I do with Maggot Slime?"),L_Ask,
        l("What can I do with Bug Leg?"),L_Bug,
        l("No, thanks."),L_Close;

L_Ask:
    mes "";
    .@q=getq(MineQuest_Dracoula);
    mesq l("I collect them.");
    next;
    if (.@q == 0) goto L_Quest;
    if (.@q == 1 && gettimetick(2) >= DRACOULA_TIMER + 60 * 60 * 23) setq MineQuest_Dracoula, 2;
    if (.@q == 2) goto L_Repeat;
    close;

L_Quest:
    mesq l("With this I make balls of slime for Candor's childs, they really like to play with them.");
    next;
    mesq l("Maybe you could bring me 20 @@? I will reward you for your effort.", getitemlink(BatTeeth));
    mes "";
    menu
        rif(countitem(BatTeeth) >= 20, l("Here they are!")), L_Finish,
        l("I'll get to it."), L_Close;
    close; // double sure

L_Repeat:
    mesq l("I am searching again maggot slime to craft more balls.");
    next;
    mesq l("Maybe you could bring me 10 sticky @@?", getitemlink(BatTeeth));
    mes "";
    menu
        rif(countitem(BatTeeth) >= 10, l("Here they are!")), L_Finish2,
        l("I'll get to it."), L_Close;
    close;

L_Finish2:
    delitem BatTeeth, 10;
    getexp 1, 0;
    Zeny = (Zeny + 1); // 10*4 = 40 base
    setq MineQuest_Dracoula, 1;
    set DRACOULA_TIMER, gettimetick(2);
    mes "";
    mesn;
    mesq l("Many, many thanks! I'm sure the children will love it!");
    close;

L_Finish:
    delitem BatTeeth, 20;
    getexp 1, 10;
    Zeny = (Zeny + 1); // 5*4 = 20 base
    setq MineQuest_Dracoula, 1;
    set DRACOULA_TIMER, gettimetick(2);
    mes "";
    mesn;
    mesq l("Many, many thanks! I'm sure the children will love it!");
    close;

L_Bug:
    mes "";
    mesq l("Ah, personally I don't use it?");
    next;
    mes l("She shakes her head.");
    next;
    mesq l("You should ask this question at Vincent.");
    next;
    mesq l("He is in the process of making a figurine made of bug leg.");
    next;
    mesq l("I hope my answer help you in your adventure!");
    next;
    mes l("she's smiling at you.");
    goto L_Close;

L_Close:
    closedialog;
    goodbye;
    close;

OnInit:
    // TODO: NPC is not ready
    disablenpc .name$;
    end;
}