Назначення скриптам гарячих клавіш. Частина 3

local con = nil -- переменная для объекта консоли
local con_command = "mm_net_player_name" -- консольная команда
local def_value = "_" -- значение по умолчанию - символ подчеркивания
 
function update()
	if not con then -- инициализируем схему
		con = get_console() -- кешируем консоль
		con:execute( con_command .." ".. def_value ) -- инициализируем дефотлным значением, т.к. кнопка не нажата
		for k,v in pairs(_G[script_name()]) do -- перебираем функции в текущем файле
			 -- v это функция 	и её имя является кодом клавиши
			if type(v)=='function' and DIK_keys[string.upper(k)] then
				local key = "k"..string.gsub(k,"dik_","") -- формируем ключ и
				con:execute("bind_console "..con_command.." "..k.." "..key) -- биндим кнопку на него
			end
		end
	else
		-- получаем из консоли значение параметра для нашей команды
		local str = con:get_string(con_command) 
		-- если оно не является значением по умолчанию
		-- и в этом файле есть функция с таким именем, то выполняем её
		if str~=def_value and this[str] then
			this[str]()
			con:execute(con_command.." "..def_value) -- записываем значение по умолчанию
		end
	end
 
end
 
function dik_numpad0()
  news_manager.send_tip(db.actor,"нажали кнопку numpad0")
end
 
function dik_numpad1()
  news_manager.send_tip(db.actor,"нажали кнопку numpad1")
end
 
function dik_numpad2()
  news_manager.send_tip(db.actor,"нажали кнопку numpad2")
end

local con = nil
local con_command = "mm_net_player_name"
local def_value = "_"
local act_key = "" -- последняя нажатая клавиша
 
function update()
	if not con then
		con = get_console()
		con:execute(con_command .." " .. def_value)
		for k,v in pairs(_G[script_name()]) do
			if type(v)=='function' and DIK_keys[string.upper(k)] then
				local key = "k"..string.gsub(k,"dik_","")
				con:execute("bind_console "..con_command.." "..k.." "..key)
			end
		end
	else
		local str = con:get_string(con_command)
		if str~=def_value and this[str] then
			this[str]()
			con:execute(con_command .." " .. def_value)
 
			--отлова отпускания
			-- биндим на показ статика активного квеста нажатую кнопку
			con:execute("bind_sec scores k"..string.gsub(str,"dik_",""))
			-- если статик ещё не показан, то показываем его
			-- он будет висеть пока не отпущена клавиша
			local cs = get_hud():GetCustomStatic("main_task") or get_hud():AddCustomStatic("main_task")
			-- задаем 100% прозрачность тексту, чтоб не светился без нужды
			cs:wnd():SetTextColor(0,240,217,182)
			act_key = str -- запоминаем нажатую кнопку
			news_manager.send_tip(db.actor,"нажали "..act_key)
		end
	end
 
	-- отлов отпускания
	local cs = get_hud():GetCustomStatic("main_task")
	if act_key~="" and not cs then -- была нажата клавиша, а статика нет
		con:execute("unbind_sec scores")
		news_manager.send_tip(db.actor,"отпустили "..act_key)
		act_key=""
	end
 
end
 
function dik_numpad0()
end
 
function dik_numpad1()
end
 
function dik_numpad2()
end