﻿//
// Redirectmenu 0.1 by Перевод Nissan3501
// Requirements: Eventscripts 1.5+ ,
//
//
//

block load
{
	es_xload popup
	es_xset rm_timeout 0		// Время в секундах прежде popup исчезает, если = 0  остаются на экране, пока ключ не нажат
	es_xset rm_condelay 5		// Количество секунд после playen выбрало, он связан с сервером. 0 = немедленно
	es_xset rm_command "!redirect"  // Прикажите, чтобы игрок напечатал в чате, чтобы показать popup. 0 повреждает

	es_xset rm_showonjoin 1		// Если 1 автоматически показы popup, когда игроку после присоединения.
	es_xset rm_force 0		// Если 1 игрок автоматически отправлен новому местоположению сервера после присоединения.
	es_xset rm_advert 90		// Время секунд между объявлениями команды, 0 повреждает
	es_xset rm_method 2		// Метод для того, чтобы переадресовать 1 = ES1.5+ Usermsg, 2 = EST (Требует eventscripts tools 0.420c)

	// Redirect servername and location
	es_xset rm_rserver1_name "***KR-Team*** DM_NoSteam(RUS) Nissan3501"
	es_xset rm_rserver1_ip "192.168.1.3:27018"

	// Popup message.
	es_xset rm_msg1 "NOTE:"
	es_xset rm_msg2 "Наш новый сервер:"
	es_xset rm_msg3 "192.168.1.3:27018. Пожалуйста добавьте его в избранное."
	es_xset rm_msg4 "------------------------------------------------------"
	es_xset rm_msg5 "Нажмите цифру 1 что бы присоединиться к новому серверу."

	es_xset rm_advert_msg1 "В чате пишите !redirect что бы увидеть новые сервера"
	es_xset rm_advert_msg2 "Новый сервер ***KR-Team*** DM_NoSteam(RUS) Nissan3501 его IP 192.168.1.3:27018 "

	es_xset rm_title "Redirectmenu 0.1" // Title of popup window.


	es_xset redirectmenu_version "redirectmenu 0.1 Перевод by Nissan3501"
	es_makepublic redirectmenu_version

	popup create rmenu
	es_xset tempmoption 0
	es_xformatv tempmoption "->1. %1" rm_rserver1_name


	es popup addline rmenu server_var(rm_msg1)
	es popup addline rmenu server_var(rm_msg2)
	es popup addline rmenu server_var(rm_msg3)
	es popup addline rmenu server_var(rm_msg4)
	es popup addline rmenu server_var(rm_msg5)
	es popup addline rmenu server_var(tempmoption)

	if (server_var(rm_timeout) > 0) then es popup timeout rmenu view server_var(rm_timeout)
	popup menuselect rmenu redirectmenu/forwardblock

	if (server_var(rm_command) != 0) then es_regsaycmd server_var(rm_command) redirectmenu/rmcommand
	if (server_var(rm_advert) > 0) do
	{
		repeat create rmadvert "es_xdoblock redirectmenu/advertblock"
	}

}

event player_activate
{
	if (server_var(rm_force) == 1) do
	{
		es_xset connectstring 0
		es_xformatv connectstring "steam://connect/%1" rm_rserver1_ip
		if (server_var(rm_method) == 1) then es usermsg motd server_var(_popup_userid) server_var(rm_title) 0 server_var(connectstring)
		if (server_var(rm_method) == 2) then es Est_MotD_W server_var(_popup_userid) server_var(rm_title) 0 server_var(connectstring)
	}
	if (server_Var(rm_showonjoin) == 1) then es popup send rmenu event_var(userid)
}

block advertblock
{
	es_xset randmsg 0
	es_xrand randmsg 1 2
	if (server_var(randmsg) == "1") then es_msg #green server_var(rm_advert_msg1)
	if (server_var(randmsg) == "2") then es_msg #green server_var(rm_advert_msg1)
}

event round_start
{
	if (server_var(rm_advert) > 0) then es repeat start rmadvert server_var(rm_advert)
}

event round_end
{
	if (server_var(rm_advert) > 0) then repeat stop rmadvert
}

block rmcommand
{
	es_xset cmd_rm_user 0
	es_xgetcmduserid cmd_rm_user
	es popup send rmenu server_var(cmd_rm_user)

}
block forwardblock
{
	if (server_var(_popup_choice) == "1") do
	{
		if (server_var(rm_condelay) > 0) do
		{
			es_tell server_var(_popup_userid) #green Вы присоединитесь к   server_var(rm_rserver1_name) через server_var(rm_condelay) секунд...
			es_delayed server_var(rm_condelay) es_xdoblock redirectmenu/redirectme
		}
		else es_xdoblock redirectmenu/redirectme
	}

}

block unload
{
	popup unsendname rmenu #all
	popup delete rmenu
	if (server_var(rm_command) != 0) then es_unregsaycmd server_var(rm_command) redirectmenu/rmcommand
}

block redirectme
{
	es_xset connectstring 0
	es_xformatv connectstring "steam://connect/%1" rm_rserver1_ip
	if (server_var(rm_method) == 1) then es usermsg motd server_var(_popup_userid) 2 server_var(rm_title) server_var(connectstring)
	if (server_var(rm_method) == 2) then es Est_MotD_W server_var(_popup_userid) server_var(rm_title) 0 server_var(connectstring)
}