it is possible to adapt this script to be a multiple mobs hunter
example: kill 10 poring, 5 lunatic, 3 desert wolf
//======Name========================================// Daily Monster Hunt//======Version=====================================// 1.2//======Author(s)===================================// Sandbox//======Comments====================================// This NPC allows your player to hunt a random amount// of a random monster// *randomception!*// If the player successfully hunts the monster// he'll receive a reward!//======Credits=====================================// KeyWorld, nanakiwurtz, NeoMind, Kido// Thanks for helping me out guize!// Modified by Luciar for Yonko//==================================================
prontera,132,168,3 script BranchHuntChallenge78,{
mes .Npc_Name$;if(Hunter){
mes "You have killed ^880000"+HuntCount+"^000000/^0000FF"+Amt+"^000000 "+getmonsterinfo(Hunt,0)+"s, keep it up!";
close;}if(gettimetick(2)<HuntDelay){
mes "You can only do this quest once every 4 hours!";
mes "You have "+(((HuntDelay)-(gettimetick(2)))/60)+" minutes left until the next quest.";
close;}
mes "Hello "+strcharinfo(0)+", do you want to take on the Branch Hunting Challenge?","If you manage to kill them, you'll receive a reward!"," "+.RewAmt+" x ^880000"+DispLink(.Reward)+"^000000";if(.c_RewAmt >0){
mes "and a bonus of up to "+.c_RewAmt+" ^880000"+DispLink(.c_Reward)+"^000000 for every challenge.";}elseif(.z_RewAmt >0){
mes "and a bonus of up to "+callfunc("F_InsertComma",.z_RewAmt)+"z.";}else{
mes "for every challenge.";}
next;
mes .Npc_Name$;
mes "Do not forget to loot all the monster drops, they are part of the ^880000Dead Branch Quest^000000.";if(select("Bring it on!:How about no?")==2){
next;
mes .Npc_Name$;
mes "Fine!";
close;}
next;
mes .Npc_Name$;Hunt=.Mob_List[rand(getarraysize(.Mob_List))];Amt= rand (50,100);//Amount of mob to hunt
atcommand "@alootid -7201";
atcommand "@alootid -7189";
atcommand "@alootid -1019";
atcommand "@alootid -7222";
atcommand "@alootid +7201";
atcommand "@alootid +7189";
atcommand "@alootid +1019";
atcommand "@alootid +7222";Hunter++;
mes "You have to hunt ^0000FF"+Amt+" "+getmonsterinfo(Hunt,0)+"^000000!";
next;
mes .Npc_Name$;
mes "Go go go!";
close2;HuntDelay= gettimetick(2)+1;//every 1 sec.
end;//----------Config----------OnInit:.Npc_Name$="[^0000FF Daily Hunt ^000000]";
setarray .Mob_List[0],1497,1495,1880,1400,1151,1010,1277,1269,1503;//Mobs to hunt.Reward=12103;//Reward ID.RewAmt=10;//Reward Amount.c_Reward =50000;//Reward ID.c_RewAmt =0;//Reward Amount.z_RewAmt =1000000;//Zeny Reward
end;OnNPCKillEvent:
sleep2 200;if(Hunter>0){if(killedrid ==Hunt){HuntCount++;
dispbottom "You have killed "+HuntCount+"/"+Amt+" "+getmonsterinfo(Hunt,0)+"s, keep it up!";if(rand(1,100)> rand(1,100)){
getitem 7850,1;}if(HuntCount>=Amt){
dispbottom strnpcinfo(1)+": Congratulations! You did it!";
dispbottom strnpcinfo(1)+": "+getitemname(.Reward)+" x "+.RewAmt+"!";
getitem .Reward,.RewAmt;if(.c_RewAmt >0){
getitem .c_Reward,rand(1,.c_RewAmt);// Edit to the reward that you would be giving
dispbottom strnpcinfo(1)+": "+getitemname(.c_Reward)+" x "+.c_RewAmt+"!";}if(.z_RewAmt >0){Zeny=Zeny+.z_RewAmt;// Edit to the zeny that you would be giving
dispbottom strnpcinfo(1)+": "+callfunc("F_InsertComma",.z_RewAmt)+"z!";}Hunt=0;Hunter=0;HuntCount=0;Amt=0;}}}
end;}
Question
Giant Whisper
it is possible to adapt this script to be a multiple mobs hunter
example: kill 10 poring, 5 lunatic, 3 desert wolf
Edited by Giant Whisper4 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.