Macro { area="Common"; key="Ctrl/"; description="Получение названия клавиши. © SimSU"; action = function() --[[1]]--Получение названия клавиши. © SimSU -- Назначается, например, на Ctrl/. -- Красивость on :) if win.GetEnv("farlang")=="Russian" then s=" Нажмите клавишу... " else s=" Press key... " end far.Message(s,"","") -- Красивость off :) VK=mf.waitkey(0,1) if win.GetEnv("farlang")=="Russian" then VK=prompt("Название клавиши",("Код клавиши: %d (0x%X)"):format(VK,VK),0x01+0x10,mf.key(VK)) else VK=prompt("Key name",("Key code: %d (0x%X)"):format(VK,VK),0x01+0x10,mf.key(VK)) end if VK then print(VK) end end; }