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
|
//===== rAthena Script =======================================
// Eden Group Quests - Mission [11 - 25]
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
//= 1.2
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
//= Repetable Quests for Players between Baselevel 11 - 25.
//===== Additional Comments: =================================
//= 1.0 First Version.
//= 1.1 Some little optimization here and there. [Masao]
//= 1.2 Optimized. [Euphy]
//============================================================
moc_para01,36,38,3 script Mission [11 - 25]#Tuto 857,{
if (countitem(6219) < 1) {
mes "- You need to have an -";
mes "- ^4d4dff'Eden Group Mark'^000000 -";
mes "- to receive these missions. -";
close;
}
for(set .@i,11124; .@i<11134; set .@i,.@i+1)
if (checkquest(.@i,PLAYTIME) == 2) erasequest .@i;
for(set .@i,11114; .@i<11123; set .@i,.@i+1) {
set .@j, checkquest(.@i,HUNTING);
if (.@j == 2) {
mes " - You must collect your - ";
mes " - reward before starting - ";
mes " - a new mission. - ";
mes " ";
mes " - Manager : Spike - ";
close;
}
else if (.@j >= 0) {
mes " - You can only request - ";
mes " - one mission at a time. - ";
mes " ";
mes " - Manager : Spike - ";
close;
}
}
if (BaseLevel < 11) {
mes " - There are no tasks - ";
mes " - open for you right now. - ";
close;
}
if (BaseLevel > 25) {
mes " - These missions are too - ";
mes " - easy for your caliber - ";
mes " - search for a more level - ";
mes " - appropriate mission. - ";
close;
}
mes " - Mission bulletin board -";
mes " - for beginners. -";
mes " ";
mes " - Manager : Spike -";
next;
switch(select("Hornet Hunting:Condor Hunting:Grasshopper's Leg:Worm Tail Hunting:Spore Hunting:Pest Control:Muka Hunting:Familiar Hunting:Collect Feathers:Collect Poison Spores:Cancel")) {
case 1: callsub L_Quest,11114,"Hornet Hunting"," - Hunt 10 ^4d4dff'Hornets'^000000 - "," - northwest of Prontera. - ";
case 2: callsub L_Quest,11115,"Condor Hunting"," - Hunt 20 ^4d4dff'Condors'^000000 - "," - south of Morroc. - ";
case 3: callsub L_Quest,11116,"Grasshopper's Leg"," - Hunt 10 ^4d4dff'Rockers'^000000 - "," - southwest of Prontera and - "," - bring 10 ^4d4dffGrasshopper's Legs^000000. - ";
case 4: callsub L_Quest,11117,"Worm Tail Hunting"," - Hunt 20 ^4d4dff'Worm Tails'^000000 - "," - southeast of Payon.- ";
case 5: callsub L_Quest,11118,"Spore Hunting"," - Hunt 30 ^4d4dff'Spores'^000000 - "," - around Payon. - ";
case 6: callsub L_Quest,11119,"Pest Control"," - Hunt 20 ^4d4dffThief Bug Eggs^000000 - "," - in the Prontera Culvert - "," - and bring 10 ^4d4dffChrysalis^000000. - ";
case 7: callsub L_Quest,11120,"Muka Hunting"," - Hunt 20 ^4d4dff'Muka'^000000 - "," - south of Prontera. - ";
case 8: callsub L_Quest,11121,"Familiar Hunting"," - Hunt 20 ^4d4dffFamiliar^000000 - "," - in the Culvert Sewers - "," - west of Prontera. - ";
case 9: callsub L_Quest,11122,"Collect Feathers"," - Hunt 30 ^4d4dff'Peco Pecos'^000000 - "," - south of Prontera. - ";
case 10: callsub L_Quest,11123,"Collect Poison Spores"," - Hunt 30 ^4d4dffPoison Spores^000000 - "," - inside the Geffen Tower and - "," - bring 5 ^4d4dffPoison Spores^000000. - ";
case 11: mes " - Stop reading the bulletin board. - "; close;
}
end;
L_Quest:
if (checkquest(getarg(0),PLAYTIME) == 1) {
mes " - Mission ^4d4dff"+getarg(1)+"^000000 - ";
mes " - is already finished for today. - ";
mes " ";
mes " - Manager : Spike - ";
close;
}
mes " - Mission '"+getarg(1)+"' - ";
for(set .@i,2; .@i<getargcount(); set .@i,.@i+1)
mes getarg(.@i);
mes " ";
mes " - Manager : Spike - ";
next;
if(select("I will do this mission.:Look for other missions.") == 2) {
mes " - Let's search for -";
mes " - other missions. - ";
close;
}
for(set .@i,2; .@i<getargcount(); set .@i,.@i+1)
mes getarg(.@i);
if (getarg(0) == 11123 && checkquest(11123,PLAYTIME) == 2)
erasequest 11133; // Special case for "Collect Poison Spores"
setquest getarg(0);
close;
}
moc_para01,32,30,6 script Spike 914,{
for(set .@i,11114; .@i<11124; set .@i,.@i+1) {
set .@j, checkquest(.@i,HUNTING);
if (.@j == 2) switch(.@i) {
case 11114: callsub L_Quest,.@i,"Hornet Hunting",900;
case 11115: callsub L_Quest,.@i,"Condor Hunting",1800;
case 11116: callsub L_Quest,.@i,"Grasshopper's Leg",1400,940,10;
case 11117: callsub L_Quest,.@i,"Worm Tail Hunting",2600;
case 11118: callsub L_Quest,.@i,"Spore Hunting",3900;
case 11119: callsub L_Quest,.@i,"Extirpate Insects",2900,915,10;
case 11120: callsub L_Quest,.@i,"Muka Hunting",3200;
case 11121: callsub L_Quest,.@i,"Familiar Hunting",3200;
case 11122: callsub L_Quest,.@i,"Collect Feathers",5400;
case 11123: callsub L_Quest,.@i,"Collect Poison Spores",6000,7033,5;
}
else if (.@j >= 0) {
mes "[Spike]";
mes "You haven't finished your mission yet.";
mes "Keep up the good work. You are almost done.";
close;
}
}
mes "[Spike]";
mes "Are you looking for a job?";
mes "We always have lots of work to do.";
next;
mes "[Spike]";
mes "Why don't you look around and find some interesting tasks?";
close;
L_Quest:
if (checkquest(getarg(0),HUNTING) == 2) {
if (getarg(3,0))
if (countitem(getarg(3)) < getarg(4)) {
mes "[Spike]";
mes "You don't have enough "+getitemname(getarg(3))+".";
mes "You need to bring "+getarg(4)+" "+getitemname(getarg(3))+".";
close;
}
mes "[Spike]";
mes "Hmm... let me see~";
mes "You have completed the '"+getarg(1)+"' mission.";
next;
mes "[Spike]";
mes "Good work~!!";
mes "Our client is so happy with your work. He will appreciate what you have done.";
mes "Please help us again. Thanks!";
if (getarg(3,0)) delitem getarg(3),getarg(4);
erasequest getarg(0);
setquest getarg(0)+10;
getexp getarg(2),0;
close;
}
}
|
