summaryrefslogtreecommitdiff
path: root/npc/024-6/talindra.txt
blob: 7ef8dadfaecb3b136d7422e0ad3ffb9ea6611f53 (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
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
// TMW2 scripts.
// Authors:
//    Jesusalva
// Description:
//    Questmaker Handbook 14.0 (F = Favorable)

024-6,31,23,0	script	Talindra	NPC_ELF_F,{
    .@q = getq(FrostiaQuest_Talindra);
    if (BaseLevel < 65) {
        mesc l("The elf seems busy. She ignores you.");
        close;
    }
    if (.@q == 0) {
        if (frally()) goto L_Start_F;
        else goto L_Start_U;
    }
    else if (.@q == 1) {
        if (frally()) goto L_Submit_F;
        else goto L_Submit_U;
    }
    else if (.@q == 2) {
        if (frally()) goto L_Done_F;
        else goto L_Done_U;
    }
    Exception("Invalid quest state - "+str(.@q));
    end;

L_Start_F:
    mesn;
    mesq lg("Hey friend, could you do me a little favor?");
    next;
    mesn;
    mesq l("I want to prove exotic tea. More specifically, I'm looking for %s and %s. Bring me %d of each, and I'll reward you awesomely.", getitemlink(CelestiaTea), getitemlink(HerbalTea), 15);
    next;
    mesn;
    mesq l("Good luck!");
    setq FrostiaQuest_Talindra, 1;
    close;

L_Submit_F:
    mesn;
    mesq l("Did you got everything I've asked?");
    mes sprintf("- %d %s", 15, getitemlink(CelestiaTea));
    mes sprintf("- %d %s", 15, getitemlink(HerbalTea));
    next;
    if (askyesno() == ASK_YES) {
        if (countitem(CelestiaTea) < 15 ||
            countitem(HerbalTea) < 15) {
            mesn;
            mesq l("You've been spending too much time with humans. You are picking up bad habits from them like lying. Be careful.");
            close;
        }
        inventoryplace EquipmentBlueprintD, 1;
        delitem CelestiaTea, 15;
        delitem HerbalTea, 15;
        getitem EquipmentBlueprintD, 1;
        getexp 50000, 0;
        setq FrostiaQuest_Talindra, 2;
        mesn;
        mesq l("Yay! Many thanks! I'll enjoy it! Here is the promised reward.");
    }
    close;

L_Done_F:
    mesn;
    mesq l("I've heard Aethyr path was to the west, but I'm not sure west of where... %s", col(l("*sigh*"), 9));
    close;
/////////////////////////////////////////////////////////////////////////////////
L_Start_U:
    mesn;
    mesq l("Hey %s, could you do me a little favor?", get_race());
    next;
    mesn;
    mesq l("I want to prove exotic tea. More specifically, I'm looking for %s and %s. Bring me %d of each, and I'll reward you awesomely.", getitemlink(CelestiaTea), getitemlink(HerbalTea), 15);
    next;
    mesn;
    mesq l("Try to don't take too long!");
    setq FrostiaQuest_Talindra, 1;
    close;

L_Submit_U:
    mesn;
    mesq l("Did you got everything I've asked?");
    mes sprintf("%d %s", 15, getitemlink(CelestiaTea));
    mes sprintf("%d %s", 15, getitemlink(HerbalTea));
    next;
    if (askyesno() == ASK_YES) {
        if (countitem(CelestiaTea) < 15 ||
            countitem(HerbalTea) < 15) {
            mesn;
            mesq l("You liar, I'll teach you a lesson you won't forget!");
            mesc l("%s stabs you with a dagger!", .name$);
            percentheal -55, 0;
            close;
        }
        inventoryplace EquipmentBlueprintD, 1;
        delitem CelestiaTea, 15;
        delitem HerbalTea, 15;
        getitem EquipmentBlueprintD, 1;
        getexp 50000, 0;
        setq FrostiaQuest_Talindra, 2;
        mesn;
        mesq l("Thanks! I'll enjoy it! Here is the promised reward.");
    }
    close;

L_Done_U:
    mesn;
    mesq l("I've heard Aethyr path was to the west, but I'm not sure west of where... %s", col(l("*sigh*"), 9));
    next;
    mesn;
    mesq l("...Go mind your own business, %s.", get_race());
    close;

OnInit:
    .@npcId = getnpcid(.name$);
    setunitdata(.@npcId, UDT_HEADBOTTOM, CottonSkirt);
    setunitdata(.@npcId, UDT_HEADMIDDLE, LeatherShirt);
    setunitdata(.@npcId, UDT_HEADTOP, TrapperHat);
    setunitdata(.@npcId, UDT_HAIRSTYLE, 20);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 17);
    npcsit;

    .sex = G_FEMALE;
    .distance = 5;
    end;
}