Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- on *:TEXT:!top10:#:{
- top10 #
- }
- alias top10 {
- window -h @. | var %i 1
- while $ini(points.ini,%i) {
- var %n $v1
- if ($+(*,$1,*) iswm %n) {
- aline @. $gettok($remove(%n,[,]),2,46) $readini(points.ini,%n,points)
- }
- inc %i
- }
- filter -cetuww 2 32 @. @.
- var %i 1 | while %i <= 10 {
- var %list $addtok(%list,$line(@.,%i),44)
- inc %i
- }
- msg $1 Top 10 point are: $replace(%list,$chr(44),$+($chr(44),$chr(32)))
- window -c @.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement