//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; }