FAR Manager (часть 5) - [3471] :: Программы :: Компьютерный форум Ru.Board

Код:

local l = 43 -- ширина участка поля description в меню выбора (при применении key2Process)

local AllKeys = "Ctrl[ Ctrl] CtrlAlt[ CtrlAlt] CtrlShift[ CtrlShift] AltShift[ AltShift]"

--Shell\AllKeys

Macro {
area="Shell"; key=AllKeys; key2='Ctrl['; bdsize=l; sortpriority=70;
description="путь с замыкающим бэкслешем ВНУТРИ кавычек"; --description="Backslash with Ctrl+[]";
action = function()
Keys("AKey")
end;
}

Macro {
area="Shell"; key=AllKeys; key2='CtrlAlt'; bdsize=l; sortpriority=65;
description="путь с замыкающим бэкслешем ЗА кавычками"; --description="Backslash with Ctrl+[]";
action = function()
Keys("AKey 2*BS \" \\")
end;
}

Macro {
area="Shell"; key=AllKeys; key2='CtrlShift'; bdsize=l; sortpriority=61;
description="путь БЕЗ замыкающего бэкслеша"; --description="Backslash with Ctrl+[]";
action = function()
Keys("AKey 2*BS \"")
end;
}

--Shell\CtrlF

Macro {
description="путь с замыкающим бэкслешем ВНУТРИ кавычек"; -- description="CtrlF: add slash after ..";
area="Shell"; key="CtrlF"; key2='CtrlF'; bdsize=l; sortpriority=70;
condition=function() return APanel.Current==".." end;
action=function()
Keys("AKey 2*BS \\ \" Space")
end;
}

Macro {
description="путь с замыкающим бэкслешем ЗА кавычками"; -- description="CtrlF: add slash after ..";
area="Shell"; key="CtrlF"; key2='CtrlAlt'; bdsize=l; sortpriority=65;
condition=function() return APanel.Current==".." end;
action=function()
Keys("AKey BS \\ Space")
end;
}

Macro {
description="путь БЕЗ замыкающего бэкслеша"; -- description="CtrlF: add slash after ..";
area="Shell"; key="CtrlF"; key2='CtrlShift'; bdsize=l; sortpriority=61;
condition=function() return APanel.Current==".." end;
action=function()
Keys("AKey")
end;
}

--Shell\CtrlEnter

Macro {
description="путь с замыкающим бэкслешем ВНУТРИ кавычек"; -- description="CtrlF: add slash after ..";
area="Shell"; key="CtrlEnter"; key2='CtrlEnter'; bdsize=l; sortpriority=70;
condition=function() return APanel.Current==".." end;
action=function()
Keys("AKey")
end;
}

Macro {
description="путь с замыкающим бэкслешем ЗА кавычками"; -- description="CtrlF: add slash after ..";
area="Shell"; key="CtrlEnter"; key2='CtrlAlt'; bdsize=l; sortpriority=65;
condition=function() return APanel.Current==".." end;
action=function()
Keys("AKey 3*BS \" \\ Space")
end;
}

Macro {
description="путь БЕЗ замыкающего бэкслеша"; -- description="CtrlF: add slash after ..";
area="Shell"; key="CtrlEnter"; key2='CtrlShift'; bdsize=l; sortpriority=61;
condition=function() return APanel.Current==".." end;
action=function()
Keys("AKey 3*BS \" Space")
end;
}

--Editor\AllKeys

Macro {
area="Editor"; key=AllKeys; key2='Ctrl['; bdsize=l; sortpriority=70;
description="путь с замыкающим бэкслешем ВНУТРИ кавычек"; --description="Backslash with Ctrl+[]";
action = function()
Keys("AKey")
end;
}

Macro {
area="Editor"; key=AllKeys; key2='CtrlAlt'; bdsize=l; sortpriority=65;
description="путь с замыкающим бэкслешем ЗА кавычками"; --description="Backslash with Ctrl+[]";
action = function()
Keys("AKey 2*BS \" \\")
end;
}

Macro {
area="Editor"; key=AllKeys; key2='CtrlShift'; bdsize=l; sortpriority=61;
description="путь БЕЗ замыкающего бэкслеша"; --description="Backslash with Ctrl+[]";
action = function()
Keys("AKey 2*BS \"")
end;
}

--Dialog\AllKeys

Macro {
area="Dialog"; key=AllKeys; key2='Ctrl['; bdsize=l; sortpriority=70;
description="путь с замыкающим бэкслешем ВНУТРИ кавычек"; --description="Backslash with Ctrl+[]";
condition = function()
return Dlg.ItemType == far.Flags.DI_EDIT
end;
action = function()
Keys("AKey")
end;
}

Macro {
area="Dialog"; key=AllKeys; key2='CtrlAlt'; bdsize=l; sortpriority=65;
description="путь с замыкающим бэкслешем ЗА кавычками"; --description="Backslash with Ctrl+[]";
condition = function()
return Dlg.ItemType == far.Flags.DI_EDIT
end;
action = function()
Keys("AKey 2*BS \" \\")
end;
}

Macro {
area="Dialog"; key=AllKeys; key2='CtrlShift'; bdsize=l; sortpriority=61;
description="путь БЕЗ замыкающего бэкслеша"; --description="Backslash with Ctrl+[]";
condition = function()
return Dlg.ItemType == far.Flags.DI_EDIT
end;
action = function()
Keys("AKey 2*BS \"")
end;
}

Модерирует : gyra, Maz
Maz (15-01-2020 17:38): FAR Manager (часть 6)	Версия для печати • Подписаться • Добавить в закладки
На первую страницу • к этому сообщению • к последнему сообщению