summaryrefslogtreecommitdiff
path: root/npc/024-5/saevel.txt
blob: 2005cb01c4d561e948d00fae75d6ac5dbe0c0d96 (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
// TMW2 scripts.
// Authors:
//    Jesusalva
// Description:
//    Questmaker Handbook 14.0 (F = Favorable)

024-5,38,23,0	script	Saevel	NPC_ELF,{
    .@q = getq(FrostiaQuest_Saevel);
    if (BaseLevel < 47) {
        mesc l("The elf seems busy. He 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 l("I'm am about to make myself some powerful equipment... But I ran out of material to refine it!");
    next;
    mesn;
    mesq l("Could you, perhaps, bring me %d %s? That'll help me to finish this.", 1, getitemlink(Arcanum));
    setq FrostiaQuest_Saevel, 1;
    close;

L_Submit_F:
    mesn;
    mesq l("Did you got the %d %s I've asked?", 1, getitemlink(Arcanum));
    next;
    if (askyesno() == ASK_YES) {
        if (countitem(Arcanum) < 1) {
            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 EquipmentBlueprintB, 1, EquipmentBlueprintA, 1;
        delitem Arcanum, 1;
        getexp 7000, 0;
        getitem EquipmentBlueprintB, 1;
        getitem EquipmentBlueprintA, 1;
        setq FrostiaQuest_Saevel, 2;
        mesn;
        mesq l("Muahahaha, I'll be SO strong thanks to you! Here, I don't need these weak recipes anymore. You can have them!");
    }
    close;

L_Done_F:
    mesn;
    mesq l("POWER!");
    next;
    mesn;
    mesq l("Reminds me, but they say the Aethyr is a place where powerful elves of old live. But nobody has been there on the past century... Or if they were, nobody said anything about it! Hahahah!");
    close;
/////////////////////////////////////////////////////////////////////////////////
L_Start_U:
    mesn;
    mesq l("I'm am about to make myself some powerful equipment... But I ran out of material to refine it!");
    next;
    mesn;
    mesq l("Could you bring me %d %s? That'll help me to finish this.", 1, getitemlink(Arcanum));
    setq FrostiaQuest_Saevel, 1;
    close;

L_Submit_U:
    mesn;
    mesq l("Did you got the %d %s I've asked?", 1, getitemlink(Arcanum));
    next;
    if (askyesno() == ASK_YES) {
        if (countitem(Arcanum) < 1) {
            mesn;
            mesq l("You liar, I'll teach you a lesson you won't forget!");
            mesc l("%s slaps you!", .name$);
            percentheal -30, 0;
            close;
        }
        inventoryplace EquipmentBlueprintB, 1, EquipmentBlueprintA, 1;
        delitem Arcanum, 1;
        getexp 7000, 0;
        getitem EquipmentBlueprintB, 1;
        getitem EquipmentBlueprintA, 1;
        setq FrostiaQuest_Saevel, 2;
        mesn;
        mesq l("Muahahaha, I'll be SO strong thanks to you! Here, these recipes should be useful for ya. You can have them!");
    }
    close;

L_Done_U:
    mesn;
    mesq l("POWER!");
    next;
    mesn;
    mesq l("Reminds me, but they say the Aethyr is a place where powerful elves of old live. But nobody has been there on the past century... Or if they were, nobody said anything about it! Hahahah!");
    close;

OnInit:
    .@npcId = getnpcid(.name$);
    setunitdata(.@npcId, UDT_HEADBOTTOM, BromenalPants);
    setunitdata(.@npcId, UDT_HEADMIDDLE, GoldenWarlordPlate);
    setunitdata(.@npcId, UDT_HEADTOP, SamuraiHelmet);
    setunitdata(.@npcId, UDT_HAIRSTYLE, 2);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 8);

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