//Synthesizer quest - Base (EDEN)
prontera,104,54,4 script Scientist Que 857,{
if (BaseLevel > 70) {
mes "[Scientist Que]";
mes "...So you're here for";
mes "the energy crystals.";
mes "You need to hunt 100 monster!";
mes "For every crystal energy!";
next;
mes "[Scientist Que]";
mes "So.. choose what energy crystals you want. Goodluck!";
next;
switch(select("Unrefined Crystal Energy:Refined Crystal Energy:Pure Crystal Energy - 5:Pure Cyrstal Energy - 10")) {
case 1:
if(checkquest(19950) != 1){
switch(select("Requiem:Bathory:Spring Rabbit:Sleeper:Evil Druid:Petite:Clock")) {
case 1: callsub L_Quest1,19900,"Requiem";
case 2: callsub L_Quest1,19901,"Bathory";
case 3: callsub L_Quest1,19902,"Spring Rabbit";
case 4: callsub L_Quest1,19903,"Sleeper";
case 5: callsub L_Quest1,19904,"Evil Druid";
case 6: callsub L_Quest1,19905,"Petite";
case 7: callsub L_Quest1,19906,"Clock";
}
}else{
mes "[Scientist Que]";
mes "You have just finished..";
mes "Unrefined Energy Crystal Quest";
mes "Comeback after 23 hours!";
close;
}
case 2:
if(checkquest(19951) != 1){
switch(select("Siroma:Dark Priest:Stapo:Solider")) {
case 1: callsub L_Quest2,19907,"Siroma";
case 2: callsub L_Quest2,19908,"Dark Priest";
case 3: callsub L_Quest2,19909,"Stapo";
case 4: callsub L_Quest2,19910,"Solider";
}
}else{
mes "[Scientist Que]";
mes "You have just finished..";
mes "Refined Energy Crystal Quest";
mes "Comeback after 23 hours!";
close;
}
case 3:
if(checkquest(19952) != 1){
switch(select("Desert Wolf:Medusa:Pinguicula:Majoruros")) {
case 1: callsub L_Quest3,19911,"Desert Wolf";
case 2: callsub L_Quest3,19912,"Medusa";
case 3: callsub L_Quest3,19913,"Pinguicula";
case 4: callsub L_Quest3,19914,"Majoruros";
}
}else{
mes "[Scientist Que]";
mes "You have just finished..";
mes "Pure Energy Crystal Quest";
mes "Comeback after 23 hours!";
close;
}
case 4:
if(checkquest(19953) != 1){
switch(select("Raydric:Naga:Ancient Mummy:Ancient Mimic")) {
case 1: callsub L_Quest4,19915,"Raydric";
case 2: callsub L_Quest4,19916,"Naga";
case 3: callsub L_Quest4,19917,"Ancient Mummy";
case 4: callsub L_Quest4,19918,"Ancient Mimic";
}
}else{
mes "[Scientist Que]";
mes "You have just finished..";
mes "Pure Energy Crystal Quest";
mes "Comeback after 23 hours!";
close;
}
}
end;
}else{
mes "[Scientist Que]";
mes "Sorry but you're not strong enough";
mes "to get this quest reward yet!";
mes "Come back again next time!";
mes "Thanks!";
close;
end;
}
L_Quest1:
if (checkquest(getarg(0),HUNTING) == 2) {
mes "[Scientist Que]";
mes "Wow! You're amazing!";
mes "You hunted all 100 "+getarg(1)+".";
next;
mes "[Scientist Que]";
mes "As a reward, here is your unrefined crystal energy..";
mes "Hope you can make the improved item of your choice!..";
next;
erasequest getarg(0);
getitem 6623,10;
setquest 19950;
mes "[Scientist Que]";
mes "Wooohoo!";
mes "Good luck.";
close;
}
if (checkquest(getarg(0)) == -1) {
setquest getarg(0);
mes "[Scientist Que]";
mes "Please hunt 100 "+getarg(1)+" and return here.";
close;
}
mes "[Scientist Que]";
mes "Umm? You didn't hunt";
mes "all 100 "+getarg(1)+" yet...";
mes "Will you check again?";
close;
L_Quest2:
if (checkquest(getarg(0),HUNTING) == 2) {
mes "[Scientist Que]";
mes "Wow! You're amazing!";
mes "You hunted all 100 "+getarg(1)+".";
next;
mes "[Scientist Que]";
mes "As a reward, here is your unrefined crystal energy..";
mes "Hope you can make the improved item of your choice!..";
next;
erasequest getarg(0);
getitem 6624,10;
setquest 19951;
mes "[Scientist Que]";
mes "Wooohoo!";
mes "Good luck.";
close;
}
if (checkquest(getarg(0)) == -1) {
setquest getarg(0);
mes "[Scientist Que]";
mes "Please hunt 100 "+getarg(1)+" and return here.";
close;
}
mes "[Scientist Que]";
mes "Umm? You didn't hunt";
mes "all 100 "+getarg(1)+" yet...";
mes "Will you check again?";
close;
L_Quest3:
if (checkquest(getarg(0),HUNTING) == 2) {
mes "[Scientist Que]";
mes "Wow! You're amazing!";
mes "You hunted all 100 "+getarg(1)+".";
next;
mes "[Scientist Que]";
mes "As a reward, here is your unrefined crystal energy..";
mes "Hope you can make the improved item of your choice!..";
next;
erasequest getarg(0);
getitem 6625,5;
setquest 19952;
mes "[Scientist Que]";
mes "Wooohoo!";
mes "Good luck.";
close;
}
if (checkquest(getarg(0)) == -1) {
setquest getarg(0);
mes "[Scientist Que]";
mes "Please hunt 100 "+getarg(1)+" and return here.";
close;
}
mes "[Scientist Que]";
mes "Umm? You didn't hunt";
mes "all 100 "+getarg(1)+" yet...";
mes "Will you check again?";
close;
L_Quest4:
if (checkquest(getarg(0),HUNTING) == 2) {
mes "[Scientist Que]";
mes "Wow! You're amazing!";
mes "You hunted all 100 "+getarg(1)+".";
next;
mes "[Scientist Que]";
mes "As a reward, here is your unrefined crystal energy..";
mes "Hope you can make the improved item of your choice!..";
next;
erasequest getarg(0);
getitem 6625,10;
setquest 19953;
mes "[Scientist Que]";
mes "Wooohoo!";
mes "Good luck.";
close;
}
if (checkquest(getarg(0)) == -1) {
setquest getarg(0);
mes "[Scientist Que]";
mes "Please hunt 100 "+getarg(1)+" and return here.";
close;
}
mes "[Scientist Que]";
mes "Umm? You didn't hunt";
mes "all 100 "+getarg(1)+" yet...";
mes "Will you check again?";
close;
}