block load
{
	es_keygroupload ranks |ranks

	es_xsetinfo em_rank 0 
	popup create em_regeln
	popup addline em_regeln "Server Ranks:"

	// 1
	es_keygetvalue em_rank em_rank ranks 1
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 2
	es_keygetvalue em_rank em_ranks ranks 2
	if (server_var(em_rule) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 3
	es_keygetvalue em_rank em_ranks ranks 3
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_ank 0
	// 4
	es_keygetvalue em_rank em_ranks ranks 4
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 5
	es_keygetvalue em_rank em_ranks ranks 5
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 6
	es_keygetvalue em_rank em_ranks ranks 6
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 7
	es_keygetvalue em_rank em_ranks ranks 7
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 8
	es_keygetvalue em_rank em_ranks ranks 8
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 9
	es_keygetvalue em_rank em_ranks ranks 9
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 10
	es_keygetvalue em_rank em_ranks ranks 10
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 11
	es_keygetvalue em_rank em_ranks ranks 11
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 12
	es_keygetvalue em_rank em_ranks ranks 12
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 13
	es_keygetvalue em_rank em_ranks ranks 13
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 14
	es_keygetvalue em_rank em_ranks ranks 14
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 15
	es_keygetvalue em_rank em_ranks ranks 15
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	// 16
	es_keygetvalue em_rank em_ranks ranks 16
	if (server_var(em_rank) != 0) then popup addline em_regeln server_var(em_rank)
	es_xsetinfo em_rank 0
	
	es_xsetinfo em_acc 0
	es_keygetvalue em_acc em_ranks options show_accept_and_disaccept
	if (server_var(em_acc) == 1) do
	{
		popup addline em_regeln "->1. I understand ranks!"
		popup addline em_regeln "->2. I don't understand ranks... Kick me!"
		popup menuselect em_regeln ranks/gewaehlt
	}
}


block unload
{
  popup unsendname em_regeln #all
  popup delete em_regeln
}

block gewaehlt
{
	es_xsetinfo em_msg 0
	es_keygetvalue em_msg em_ranks options show_messages
	if (server_var(em_msg) == 1) do
	{
		if (server_var(_popup_choice) == 1) then es_msg #multi #green[Siili's Mod - Ranks]#lightgreen event_var(es_username) accepted the Ranks!
		if (server_var(_popup_choice) == 2) then es_msg #multi #green[Siili's Mod - Ranks]#lightgreen event_var(es_username) was kicked due he/she don't accept the Ranks!
	}

	es_xsetinfo em_kick 0
	es_keygetvalue em_kick em_ranks options show_accept_and_disaccept
	if (server_var(em_kick) == 1) do
	{
		if (server_var(_popup_choice) == 2) then kickid event_var(userid) Next time accept the Ranks!
    	}

	if (server_var(_popup_choice) > 2) do
	{
		if (server_var(_popup_choice) < 10) do
		{
			es_tell server_var(_popup_userid) You should Accept or Disaccept!
			es popup send em_regeln server_var(_popup_userid)
		}
	}
}

event player_team
{
	es_xsetinfo em_delay 0
	es_xsetinfo em_show 0
	es_keygetvalue em_show em_ranks options show_ranks_on_teamjoin
	es_keygetvalue em_delay em_ranks options show_ranks_on_teamjoin_delay
	if (server_var(em_show) == 1) do
	{
		if (event_var(team) > 1) then es_xdelayed em_delay popup send em_regeln event_var(userid)
	}
}

event player_say
{
        if (event_var(text) == "!ranks") do
        {
                es popup send em_regeln event_var(userid)
        }
	if (event_var(text) == "/ranks") do
        {
                es popup send em_regeln event_var(userid)
        }
} 

// Ranks MOD BY [Siili]
// ICQ: 8-495-239