[Глобальный эвент]

Написал глобальный эвент, но возникла одна проблема, топ-3 рейтинг чаров сдавших лут не отображает правильно, т.е не так как надо. Подскажите в чём мой косяк?

- 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>:
OnDay0705:
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;
}

prontera,162,194,3 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 20197,1;
getitem 7227,3;
set $leaderchar$,0;
set $leaderloot,0;
set $np,0;
close;
}close;}
set loot,countitem(.item);
mes "Лидер дня: "+$leaderchar$+". Он сдал - "+$leaderloot+"x "+getitemname(.item)+".";
mes "------------------------";
switch(select("Топ-3","Сдать лут","Ваша Статистика","Задание","Последний срок")){
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 "Вы уже сдали всего "+loot2+" лута.";
close;
case 4:
mes "Вам необходимо сдавать следующий лут: "+getitemname(.item)+". Игрок, сдавший наибольшее кол-во лута (лидер) - побеждает.";
close;
case 5:
mes "Последний срок сдачи лута - 11 июля. Не опоздайте!";
close;
}
}