listeleme mantığı top 5 (kills ve players)

for a 1 10  
obj = <var.topplayer_<dlocal.a>>
if !(strmatch('<var0.topplayer_<dlocal.a>>','0')
   dtext 0 <hval <local.c>*20> 50 <obj.name>
   dtext 400 <hval <local.c>*20> 50 <dobj.tag0.puan_action>
endfor

[defname topplayer]
topplayer 10 //değiştirilebilir topplayer değeri

[function toplist]
tag0.puan_action +=1
for 1 <ddef.topplayer>
        var.remove <ddef.topplayer>
        for y 1 <ddef.topplayer>
                ref1=<var.topplayer_<dlocal.y>>
                if (<ref1> = <uid>)
                        var.remove <dlocal.y>
                endif
        endfor
        ref2=<var.topplayer_<dlocal._for>>
        if (<dtag.puan_action> >= <ref2.dtag.puan_action>)
                var.topplayer_<dvar.remove>
                for x <dvar.remove> <dlocal._for>
                        var.topplayer_<dlocal.x> <var.topplayer_<eval <dlocal.x> -1>>
                endfor
                var.topplayer_<dlocal._for> <uid>
                var.remove
                return 1
        endif
endfor

[function f_toplist]
tag0.rank ++

if !strregex(^[0-9]+$, <list.toplist.findelem <uid>>)
list.toplist.add <uid>
endif

for 0 <list.toplist.count>
ref1 <list.toplist.<dlocal._for>>
if (<dtag.rank> >= <ref1.dtag.rank>)
local.elem <list.toplist.findelem <uid>>
list.toplist.<dlocal.elem>.remove
list.toplist.<dlocal._for>.insert <uid>
return 1
endif
endfor

for a 1 10  
obj = <list.toplist.<dlocal.a>>
if !(strmatch('<obj>','0')
   dtext 0 <hval <local.c>*20> 50 <obj.name>
   dtext 400 <hval <local.c>*20> 50 <dobj.tag0.puan_action>
endfor