//================= Hercules Script =======================================
//= _ _ _
//= | | | | | |
//= | |_| | ___ _ __ ___ _ _| | ___ ___
//= | _ |/ _ \ '__/ __| | | | |/ _ \/ __|
//= | | | | __/ | | (__| |_| | | __/\__ \
//= \_| |_/\___|_| \___|\__,_|_|\___||___/
//================= License ===============================================
//= This file is part of Hercules.
//= http://herc.ws - http://github.com/HerculesWS/Hercules
//=
//= Copyright (C) 2012-2015 Hercules Dev Team
//= Copyright (C) Euphy
//= Copyright (C) Masao
//= Copyright (C) L0ne_W0lf
//=
//= Hercules is free software: you can redistribute it and/or modify
//= it under the terms of the GNU General Public License as published by
//= the Free Software Foundation, either version 3 of the License, or
//= (at your option) any later version.
//=
//= This program is distributed in the hope that it will be useful,
//= but WITHOUT ANY WARRANTY; without even the implied warranty of
//= MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
//= GNU General Public License for more details.
//=
//= You should have received a copy of the GNU General Public License
//= along with this program. If not, see <http://www.gnu.org/licenses/>.
//=========================================================================
//= Eden Group Quests - Mission [11 - 25]
//================= Description ===========================================
//= Repetable Quests for Players between Baselevel 11 - 25.
//================= Current Version =======================================
//= 1.2
//=========================================================================
moc_para01,36,38,3 script Mission [11 - 25]#Tuto 4_BOARD3,{
if (countitem(6219) < 1) {
mes "- You need to have an -";
mes "- ^4d4dff'Eden Group Mark'^000000 -";
mes "- to receive these missions. -";
close;
}
for(.@i = 11124; .@i<11134; ++.@i)
if (questprogress(.@i,PLAYTIME) == 2) erasequest .@i;
for(.@i = 11114; .@i<11123; ++.@i) {
.@state = questprogress(.@i,HUNTING);
if (.@state == 2) {
mes " - You must collect your - ";
mes " - reward before starting - ";
mes " - a new mission. - ";
mes " ";
mes " - Manager : Spike - ";
close;
}
else if (.@state) {
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 (questprogress(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(.@i = 2; .@i<getargcount(); ++.@i)
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(.@i = 2; .@i<getargcount(); ++.@i)
mes getarg(.@i);
if (getarg(0) == 11123 && questprogress(11123,PLAYTIME) == 2)
erasequest 11133; // Special case for "Collect Poison Spores"
setquest getarg(0);
close;
}
moc_para01,32,30,6 script Spike 4_F_CHILD,{
for(.@i = 11114; .@i<11124; ++.@i) {
.@state = questprogress(.@i,HUNTING);
if (.@state == 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 (.@state) {
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 (questprogress(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;
}
}
