on join:
	{ranking::%player%} is not set:
		set {ranking::%player%} to 0
	{gracz::%player%} is not set:
		set {gracz::%player%} to uncolored display name of player
		
on break:
	add 1 to {ranking::%player%}

on place:
	add 1 to {ranking::%player%}
	
command /top [<integer=1>]:
	trigger:
		set {_s} to rounded up (size of {ranking::*} / 5)
		arg 1 is between 1 and {_s}:
			send "&2&lTOP 5"
			loop {ranking::*}:
				set {_l::%loop-index%} to loop-value
			set {_num} to size of {_l::*}
			set {_max} to arg * 5
			set {_min} to {_max} - 4
			loop {_max} times:
				loop {_l::*}:
					{_w.%loop-number%} is not set:
						set {_w.%loop-number%} to loop-value-2
						set {_n.%loop-number%} to loop-index
					loop-value-2 is more than {_w.%loop-number%}:
						set {_w.%loop-number%} to loop-value-2
						set {_n.%loop-number%} to loop-index
				delete {_l::%{_n.%loop-number%}%}
			loop {_max} times:
				loop-number is between {_min} and {_max}
				loop-number <= {_num}:
					send "%loop-number%. %{gracz::%{_n.%loop-number%}%}% (%{_w.%loop-number%}%)"
				{_max} is more than {_num}:
					set {_r} to {_num}
			loop {_max} - {_num} times:
				add 1 to {_r}
				send "%{_r}%. Brak"
			send "Strona: %arg% z %{_s}%"
			stop
		{_s} is 1:
			send "Wyniki mieszcza sie na 1 stronie."
			stop
		send "Wyniki mieszcza sie na %{_s}% stronach."