Global event script request

[ReSp]

Hello, can you help me please with such script as:

In npc will be configurate id of monster, players will need to kill 1000 monsters, and there will be top in that npc who killed more.

I have script that players gives to npc some item, and was top who bring more, but i lost it script.......

[ReSp]

if no anyone have it maybe can help me with this script?

I need except this: mes "Leader is: "+$leaderchar$+". He gives - "+$leaderloot+"x "+getitemname(.item)+"."; - edit that npc will show only the total number of surrendered items that all players of the server gives to npc.

There is 

-    script    gxdcxs    -1,{
OnInit:
if($ge!=0){end;}
set $leaderchar$,0;
set $leaderloot,0;
set $leaderchar2$,0;
set $leaderloot2,0;
set $leaderchar3$,0;
set $leaderloot3,0;
set $ge,1;
end;
}

-    script    begin    -1,{
//OnDay<month><day>:
OnDay1007:
set $leaderchar$,0;
set $leaderloot,0;
set $leaderchar2$,0;
set $leaderloot2,0;
set $leaderchar3$,0;
set $leaderloot3,0;
set $ge,1;
announce "Глобальный эвент начался. Подробности у NPC в пронтере!",0;
end;
OnDay0712:
set $ge,0;
set $np,1;
announce "Глобальный эвент окончен. Победитель: "+$leaderchar$+", поздравляем его!! Приз у NPC.",0;
end;
}

-    script    Глобальный эвент    709,{
// 1097,7005,7449, 662
if($ge!=1){
mes "Для тебя у меня сейчас нет задания.";
close;}
set .item,7449;
mes "[Глобальный эвент]";
if(loot2>$leaderloot){
set $leaderloot,loot2;
set $leaderchar$,strcharinfo(0);}
if($np==1){
if($leaderchar$==strcharinfo(0)){
if(select("Получить приз:Отмена")==2){close;}
mes "Держи свой приз.";
getitem 7227,3;
set $leaderchar$,0;
set $leaderloot,0;
set $np,0;
close;
}close;}
set loot,countitem(.item);
mes "Leader is: "+$leaderchar$+". He gives - "+$leaderloot+"x "+getitemname(.item)+".";
mes "------------------------";
switch(select("Top-3","Give item","Statisctic","Mission","Последний срок")){
case 1:
if(loot2>$leaderloot){
set $leaderloot3, $leaderloot2;
set $leaderloot2, $leaderloot;
set $leaderloot,loot2;
set $leaderchar3$, $leaderchar2$;
set $leaderchar2$, $leaderchar$;
set $leaderchar$,strcharinfo(0);
}
if(loot2>$leaderloot2){
set $leaderloot3, $leaderloot2;
set $leaderloot, $leaderloot;
set $leaderloot2,loot2;
set $leaderchar3$, $leaderchar2$;
set $leaderchar$, $leaderchar$;
set $leaderchar2$,strcharinfo(0);
}
if(loot2>$leaderloot3){
set $leaderloot2, $leaderloot2;
set $leaderloot, $leaderloot;
set $leaderloot3,loot2;
set $leaderchar2$, $leaderchar2$;
set $leaderchar$, $leaderchar$;
set $leaderchar3$,strcharinfo(0);
}
mes "Место - ник - кол-во";
mes "1. "+$leaderchar$+" "+$leaderloot+"";
mes "2. "+$leaderchar2$+" "+$leaderloot2+"";
mes "3. "+$leaderchar3$+" "+$leaderloot3+"";
close;
case 2:
if(loot<1){mes "У тебя нет необходимого лута!";close;}
delitem .item,loot;
set loot2,loot2+loot;
close;
case 3:
mes "You also give me "+loot2+" items.";
close;
case 4:
mes "Вам необходимо сдавать следующий лут: "+getitemname(.item)+". Игрок, сдавший наибольшее кол-во лута (лидер) - побеждает.";
close;
case 5:
mes "Последний срок сдачи лута - 11 июля. Не опоздайте!";
close;
}
}

[sader1992]

i suggest you read this

https://github.com/rathena/rathena/blob/8a93b120207c216711e8e7db4d2442ae97e232d0/doc/script_commands.txt#L428

Edited October 8, 2017 by sader1992