How could i add more than one monster and more than one prize? this is and edited Find the mushroom. i've tried a few methods but nothing.
que_moon,158,19,6 script Poring Invasion 1894,{
mes "[ Poring Event ]";
if (!.Status)
mes "There is no event at the moment!";
else {
mes "There are "+.Spawn+" Porings left in "+.Map$+"!";
mes "Find and kill the Porings to gain "+getitemname(.Prize)+"!";
}
if (.Status || getgmlevel() < .GM) close;
mes "Start the event?";
next;
if(select("- No:- Yes") == 1) close;
donpcevent strnpcinfo(0)+"::OnMinute10";
mes "[ Pouring Event ]";
mes "Event started!";
close;
OnInit:
set .Prize,7539; // Reward item ID
set .Amount,10; // Reward item amount
set .GM,60; // GM level required to access NPC
setarray .Maps$[0],"izlude","geffen","morocc","prontera"; // Possible maps
end;
OnMinute10: // Start time (every hour)
if (.Status) end;
set .Status,1;
set .Spawn,rand(1,10); // How many Mushrooms should spawn?
set .Map$,.Maps$[rand(getarraysize(.Maps$))];
killmonster .Map$,"All";
monster .Map$,0,0,"Please don't kill me!",1894 ,.Spawn,strnpcinfo(0)+"::OnMobKilled";
announce "A Pouring Event has Begun!! : Total of "+.Spawn+" Event Pourings have been spawned in "+.Map$+"!",0;
sleep 2500;
announce "[Server] : Every Pouring you kill will give you "+getitemname(.Prize)+"!",0;
end;
OnMobKilled:
set .Spawn, .Spawn - 1;
getitem .Prize, .Amount;
if (.Spawn) announce "[ "+strcharinfo(0)+" ] has killed a Mushroom. There are now "+.Spawn+" Mushroom(s) left.",bc_map;
else {
announce "The Pouring Event has ended. All the Pourings have been killed.",0;
set .Status,0;
}
end;
}
Question
dtw619
How could i add more than one monster and more than one prize? this is and edited Find the mushroom. i've tried a few methods but nothing.
Link to comment
Share on other sites
2 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.