summaryrefslogtreecommitdiff
path: root/npc/003-1/sailors.txt
blob: 45b596608dcf9c42d08dec83c6153f28e4c0f571 (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
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
// TMW2 scripts.
// Authors:
//    Jesusalva
// Description:
//    The major reward from this one is knowledge about secret passages on Tulimshar.
//    The quest pays what you spend, except for travel fees. The real reward here
//    is knowledge, the fishing rod you'll need to make anyway, 150 XP and 20 JExp.
//  1 - First Quest assigned
//  2 - First Quest Complete
//  3 - Second Quest assigned
//  4 - Second Quest Complete

003-1,112,93,0	script	Sailors#003-1	NPC_ELVEN_MAN_TRADER_SITTING,{
    if (BaseLevel < 12) goto L_Complete;
    .@q = getq(TulimsharQuest_Sailors);
    if (.@q == 4)
        goto L_Complete;

    if (.@q == 1)
        goto L_Report1;
    if (.@q == 3)
        goto L_Report2;
    mesn;
    mesq lg("Hey, pal. This spot is very good, I can see the whole town from here.");
    next;
    mesn;
    mesq lg("I am a trader from Nard's ship. We actually need supplies. Help us, and I'll help you.");
    next;
    mesn strcharinfo(0);
    menu
        rif(.@q == 0, l("What do you need?")), L_Quest1,
        rif(.@q == 2, l("What do you need?")), L_Quest2,
        l("Maybe another time."), -;
    close;

L_Complete:
    hello;
    end;

L_Quest1:
    mes "";
    mesn;
    mesq l("You're willing to help? Perfect. We need @@ @@, @@ @@ and @@ @@ for travel.", 1, getitemlink(FishBox), 2, getitemlink(CroconutBox), 3, getitemlink(CottonCloth));
    next;
    mesn;
    mesq l("Cotton Cloth is sold at Candor, Croconut Boxes can be bought at the market. Fish, however, is a little more tricky.");
    next;
    mesn;
    mesq l("If you hug the wall, there's a secret passage somewhere there. Well, there are many secret passages at Tulimshar.");
    next;
    mesn;
    mesq l("You will find a fisher, maybe he is having a good time and can sell you a few boxes. And remember to keep your eye open.");
    setq TulimsharQuest_Sailors, 1;
    next;
    mesn;
    mesq l("There are secret caves on this city. In fact, Tulimshar holds many misteries.");
    mesc l("Take care: Secret passages can be dangerous places (or not).");
    tutmes l("You can get Croconut from Crocotree, and fill @@ purchased in the market.", getitemlink(EmptyBox)), l("Protip"), false;
    close;

L_Report1:
    mesn;
    mes l("@@/1 @@", countitem(FishBox), getitemlink(FishBox));
    mes l("@@/2 @@", countitem(CroconutBox), getitemlink(CroconutBox));
    mes l("@@/3 @@", countitem(CottonCloth), getitemlink(CottonCloth));
    if (countitem(FishBox) < 1 ||
        countitem(CroconutBox) < 2 ||
        countitem(CottonCloth) < 3)
            close;
    next;
    select
        l("[Deliver all goods.]"),
        l("[Maybe another time.]");
    mes "";
    if (@menu == 2)
        close;
    if (countitem(FishBox) < 1 ||
        countitem(CroconutBox) < 2 ||
        countitem(CottonCloth) < 3) {
            mesn;
            mesq l("Liar. Where are the goods? Are you trying to cheat me?!");
            next;
            mesn;
            mesq l("You know Jesus Saves hates cheaters, right? If Saulc didn't asked me to double-check stuff...");
            next;
            mesn;
            mesq l("For short, you would have lost all your items, wouldn't get anything, and there would be no refunds.");
            next;
            mesn;
            mesq l("That's just a friendly advise. That's how things works around here.");
            close;
    }
    inventoryplace Dagger, 1, CottonShirt, 1;
    delitem FishBox, 1;      // 7.500 GP → 3.750 GP
    delitem CroconutBox, 2;  // 12.000 GP → 10.600~11.800 GP
    delitem CottonCloth, 3; // 2.000 GP
    getexp 1508, 15;
    Zeny=Zeny+3750;   // Profit: 1800 GP → 2.400~1.200 GP
    getitem Dagger, 1;
    getitem CottonShirt, 1;
    setq TulimsharQuest_Sailors, 2;
    mesn;
    mesq lg("Many thanks, your help has been invaluable. We're now capable to travel at ease.");
    next;
    mesn;
    mesq l("Take care. Here, take this @@. You can sell it for some quick-spot cash, or use it as a weapon.", getitemlink(Dagger));
    close;

// Second Quest
L_Quest2:
    mes "";
    mesn;
    mesq l("You're willing to help? Perfect. We need @@ @@, @@ @@ and @@ @@ for travel.", 2, getitemlink(FishBox), 5, getitemlink(CroconutBox), 7, getitemlink(CottonCloth));
    next;
    mesn;
    mesq l("Cotton Cloth is sold at Candor, Croconut Boxes can be bought at the market. Fish, however, is a little more tricky.");
    next;
    mesn;
    mesq l("If you hug the wall, there's a secret passage somewhere there. Well, there are many secret passages at Tulimshar.");
    next;
    mesn;
    mesq l("You will find a fisher, maybe he is having a good time and can sell you a few boxes. And remember to keep your eye open.");
    setq TulimsharQuest_Sailors, 3;
    next;
    mesn;
    mesq l("There are secret caves on this city. In fact, Tulimshar holds many misteries.");
    mesc l("Take care: Secret passages can be dangerous places (or not).");
    close;

L_Report2:
    mesn;
    mes l("@@/2 @@", countitem(FishBox), getitemlink(FishBox));
    mes l("@@/5 @@", countitem(CroconutBox), getitemlink(CroconutBox));
    mes l("@@/7 @@", countitem(CottonCloth), getitemlink(CottonCloth));
    if (countitem(FishBox) < 2 ||
        countitem(CroconutBox) < 5 ||
        countitem(CottonCloth) < 7)
            close;
    next;
    select
        l("[Deliver all goods.]"),
        l("[Maybe another time.]");
    mes "";
    if (@menu == 2)
        close;
    if (countitem(FishBox) < 2 ||
        countitem(CroconutBox) < 5 ||
        countitem(CottonCloth) < 7) {
            mesn;
            mesq l("Liar. Where are the goods? Are you trying to cheat me?!");
            next;
            mesn;
            mesq l("You know Jesus Saves hates cheaters, right? If Saulc didn't asked me to double-check stuff...");
            next;
            mesn;
            mesq l("For short, you would have lost all your items, wouldn't get anything, and there would be no refunds.");
            next;
            mesn;
            mesq l("That's just a friendly advise. That's how things works around here.");
            close;
    }
    delitem FishBox, 2;      // 7.500 GP → 3.750 GP
    delitem CroconutBox, 5;  // 12.000 GP → 10.600~11.800 GP
    delitem CottonCloth, 7; // 2.000 GP
    getexp 1508, 15;
    Zeny=Zeny+15750;   // Profit: 1800 GP → 2.400~1.200 GP
    setq TulimsharQuest_Sailors, 4;
    mesn;
    mesq lg("Many thanks, your help has been invaluable. We're now capable to travel at ease.");
    next;
    mesn;
    mesq l("Take care. This is a dangerous world, but I think that worse than being attacked by sea monsters, is starving from hunger!");
    close;


OnInit:
    .sex = G_OTHER;
    .distance = 5;
    end;
}