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
|
// TMW2 Script
// Author:
// Jesusalva
// Saulc
// Description:
// Guard ask you to clean the cave of red scorpion. bring him some red scorpion stingers to prove you do it well.
// Variable:
// TulimsharQuest_Devoir
003-10,25,60,0 script Guard Devoir NPC_ELF_F,{
mesn;
mesq l("That's terrible! Monsters are piling up near city gates! We need to stop their progression.");
if (BaseLevel >= 25) goto L_Menu;
close;
L_Menu:
mesn;
mesq l("Would you like to help us to protect the town from a red scorpion invasion??");
mes "";
menu
l("Yeah, sure! I'm brave as Simon."),L_Quest, // famous player name
l("Where can I find them?"),L_Where,
l("No, thanks."),L_Close;
L_Quest:
mes "";
.@q=getq(TulimsharQuest_Devoir);
mesq l("Nice! I want you to kill some red scorpions, as I said!");
next;
if (.@q == 0) goto L_Continue;
if (.@q == 1 && gettimetick(2) >= getqtime(TulimsharQuest_Devoir)) setq1 TulimsharQuest_Devoir, 2; // Repats every 36 hours
if (.@q == 2) goto L_Repeat;
close;
L_Continue:
mesq l("Red Scorpion breed as fast as the Ratto! With our current numbers, it's nearly impossible to take over.");
next;
mesq l("I usually ask for 7, but to prove you are going to help us in this purge, I will ask you for 14 @@! I will reward you for your bravure.", getitemlink(RedScorpionStinger));
mes "";
menu
rif(countitem(RedScorpionStinger) >= 14, l("Here they are, miss!")), L_Finish,
l("I'll get to it."), L_Close;
close; // double sure
L_Repeat:
mesq l("How is your purge going? I hope you had success at it!");
next;
mesq l("Did you brought me 7 @@?", getitemlink(RedScorpionStinger));
mes "";
menu
rif(countitem(RedScorpionStinger) >= 7, l("Here they are miss!")), L_Finish2,
l("I'll get to it."), L_Close;
close;
// First Time Only
L_Finish:
delitem RedScorpionStinger, 14;
getexp 1555, 10;
Zeny = (Zeny + 1410); // 70*14 = 980 base
setq1 TulimsharQuest_Devoir, 1;
setqtime TulimsharQuest_Devoir, gettimetick(2) + (60*60*36);
mes "";
mesn;
mesq l("Many thanks! Come back later to bring me extra @@!", getitemlink(RedScorpionStinger));
close;
// Repeat
L_Finish2:
delitem RedScorpionStinger, 7;
getexp 999, 0;
Zeny = (Zeny + 680); // 70*7 = 490 base
setq1 TulimsharQuest_Devoir, 1;
setqtime TulimsharQuest_Devoir, gettimetick(2) + (60*60*36);
mes "";
mesn;
mesq l("Many thanks! Come back later to bring me extra @@!", getitemlink(RedScorpionStinger));
close;
L_Where:
mes "";
mesq l("Ah, there are lots on the miners cave.");
next;
mes l("Take care though, don't attack them when they are in group!");
next;
mes l("Good luck.");
goto L_Close;
L_Close:
closedialog;
goodbye;
close;
}
|