//================= 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) 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/>.
//=========================================================================
//= iRO Repeatable EXP Quests.
//================= Description ===========================================
//= Repeatable EXP Quest (Powder of Butterfly) (Dialog is semi-custom)
//================= Current Version =======================================
//= 1.0
//=========================================================================
prt_fild04,356,148,3 script Laertes#Creamy_Hunt 4_M_NFMAN,{
if (questprogress(60122)) {
if (questprogress(60122,HUNTING) != 2) {
mes "[Laertes]";
mes "Have you finished hunting the 50 Creamys?";
next;
switch(select("Yes:No:I want to quit")) {
case 1:
mes "[Laertes]";
mes "Hmm, I don't think you've hunted 50 yet...";
close;
case 2:
mes "[Laertes]";
mes "Remember, I need help hunting Creamys so go and hunt 50 of them.";
close;
case 3:
mes "[Laertes]";
mes "Are you sure that you want to stop hunting?";
mes "Any progress that you've made will be erased";
next;
switch(select("Yes:No")) {
case 1:
mes "[Laertes]";
mes "Ok then, well come back here if you change your mind.";
erasequest 60122;
close;
case 2:
mes "[Laertes]";
mes "Please kill 50 Creamys.";
close;
}
}
}
else {
mes "[Laertes]";
mes "Amazing, you did that with speed.";
getexp 2950,1125;
erasequest 60122;
close;
}
}
if (questprogress(60123)) {
if (questprogress(60123,HUNTING) != 2) {
mes "[Laertes]";
mes "Have you finished hunting the 50 Creamys?";
next;
switch(select("Yes:No:I want to quit")) {
case 1:
mes "[Laertes]";
mes "Hmm, I don't think you've hunted 100 yet...";
close;
case 2:
mes "[Laertes]";
mes "Remember, I need help hunting Creamys so go and hunt 100 of them.";
close;
case 3:
mes "[Laertes]";
mes "Are you sure that you want to stop hunting?";
mes "Any progress that you've made will be erased";
next;
switch(select("Yes:No")) {
case 1:
mes "[Laertes]";
mes "Ok then, well come back here if you change your mind.";
erasequest 60123;
close;
case 2:
mes "[Laertes]";
mes "Please kill 100 Creamys.";
close;
}
}
}
else {
mes "[Laertes]";
mes "Amazing, you did that with speed.";
getexp 2950,1125;
getexp 2950,1125;
erasequest 60123;
close;
}
}
if (questprogress(60124)) {
if (questprogress(60124,HUNTING) != 2) {
mes "[Laertes]";
mes "Have you finished hunting the 150 Creamys?";
next;
switch(select("Yes:No:I want to quit")) {
case 1:
mes "[Laertes]";
mes "Hmm, I don't think you've hunted 150 yet...";
close;
case 2:
mes "[Laertes]";
mes "Remember, I need help hunting Creamys so go and hunt 150 of them.";
close;
case 3:
mes "[Laertes]";
mes "Are you sure that you want to stop hunting?";
mes "Any progress that you've made will be erased";
next;
switch(select("Yes:No")) {
case 1:
mes "[Laertes]";
mes "Ok then, well come back here if you change your mind.";
erasequest 60124;
close;
case 2:
mes "[Laertes]";
mes "Please kill 150 Creamys.";
close;
}
}
}
else {
mes "[Laertes]";
mes "Amazing, you did that with speed.";
getexp 2950,1125;
getexp 2950,1125;
getexp 2950,1125;
erasequest 60124;
close;
}
}
//for minimum level
if (BaseLevel > 14) {
//for maximum level
if (BaseLevel < 45) {
mes "[Laertes]";
mes "Good Morning!";
mes "Perhaps you could help me?";
next;
switch(select("Sure:No")) {
case 1:
mes "[Laertes]";
mes "I work for an apothecary in Prontera.";
mes "I come here to collect materials for medicine.";
next;
switch(select("Gather Items:Hunt Creamys:Cancel")) {
case 1:
// Item turn in
mes "[Laertes]";
mes "I need to have a good supply of ^FF0000Powder of Butterfly^000000";
next;
switch(select("I have Powder of Butterfly:What did you need?")) {
case 1:
/*
if (checkweight(502,5) == 0) {
mes "[Laertes]";
mes "Hey, it looks like that the weight on";
mes "your back will crush you. Come back";
mes "after you have lost some weight.";
close;
}
*/
if (countitem(924) > 24) {
mes "[Laertes]";
mes "Hey, thank you again.";
mes "Here you go, as promised.";
delitem 924,25; //Powder_Of_Butterfly
getexp 2950,1125;
//getitem 502,5; //Orange_Potion
close;
}
else {
mes "[Laertes]";
mes "It doesn't look like you have enough.";
next;
mes "[Laertes]";
mes "If you bring me ^FF000025 Powder of Butterfly^000000,";
mes "I will give you some medical supplies.";
close;
}
case 2:
mes "[Laertes]";
mes "If you bring me ^FF000025 Powder of Butterfly^000000,";
mes "I will give you some medical supplies.";
close;
}
case 2:
// Kill Count Quest
mes "[Laertes]";
mes "Ah, ok I think you can help me out by hunting some Creamys.";
mes "How many would you like to hunt?";
next;
switch(select("50 Creamys:100 Creamys:150 Creamys")) {
case 1:
mes "[Laertes]";
mes "Come back when you've finished your task and I will give you a small reward.";
setquest 60122;
close;
case 2:
mes "[Laertes]";
mes "Come back when you've finished your task and I will give you a small reward.";
setquest 60123;
close;
case 3:
mes "[Laertes]";
mes "Come back when you've finished your task and I will give you a small reward.";
setquest 60124;
close;
}
case 3:
mes "[Laertes]";
mes "If you change your mind, please come back.";
close;
}
case 2:
mes "[Laertes]";
mes "If you change your mind, please come back.";
close;
}
}
else {
mes "[Laertes]";
mes "Good Morning!";
next;
mes "[Laertes]";
mes "I work for an apothecary in Prontera";
mes "I come here to collect materials for medicine.";
close;
}
}
else {
mes "[Laertes]";
mes "Your level is too low!";
next;
mes "[Laertes]";
mes "Go kill more Porings!";
close;
}
}