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
|
// TMW2 Script
// Author:
// Jesusalva
// Description:
// Monthly Sponsor Quest
// Variable:
// SQuest_Sponsor
// Quest ID: 1
012-2,46,81,0 script Saulc, 1st Sponsor NPC_GUARD,{
function resetSQS {
setq SQuest_Sponsor, 0, gettime(GETTIME_MONTH);
}
// Check monthly quest
.@d=getq2(SQuest_Sponsor);
if (.@d != gettime(GETTIME_MONTH)) resetSQS();
// Core
.@q=getq(SQuest_Sponsor);
mesn;
mesq l("Ahh, I hate @@.", getmonsterlink(Pinkie));
if (!(.@q & .questID)) goto L_Menu;
close;
L_Menu:
mesq l("I will reward you for 7 @@.", getitemlink(.itemID));
mes "";
menu
rif(countitem(.itemID) >= 7, l("Here they are!")), L_Finish,
l("Where can I find them?"),L_Where,
l("No, thanks."),L_Close;
L_Finish:
delitem .itemID, 7;
getexp 770, 0; // 7 / 4.1% = 171 kills * 52 xp = 3078 xp gained from killing. (25% bonus)
getitem StrangeCoin, rand(1,7);
.@q=getq(SQuest_Sponsor);
setq1 SQuest_Sponsor, .@q | .questID;
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 fields.");
next;
L_Close:
closedialog;
goodbye;
close;
OnInit:
.sex = G_MALE;
.distance = 5;
.questID=1;
.itemID=PinkAntenna;
end;
}
|