Remove obsolete stuffs

This commit is contained in:
leokhoa
2025-10-05 17:33:37 +02:00
parent 71b1fe4850
commit 1c759708e4
15680 changed files with 4890893 additions and 139873 deletions

View File

@@ -0,0 +1,46 @@
// This is sample macro-file for MacroLib plugin for Far Manager 2.x
// You can download plugin here:
// http://code.google.com/p/far-plugins/wiki/MacroLib
//include "Consts.fmi"
const ConEmu = 0x43454D55
macro Descr="ConEmu: Auto switch to Editor Tab"
Key="F3 F4"
Area="Shell Search"
Cond="PanelType:0"
{{
%k = Key(#AKey);
$if (!APanel.Empty && (APanel.Current!=".."))
%s=APanel.Path;
%s=%s+iif(substr(%s,len(%s)-1)=="\\","","\\")+APanel.Current;
//MsgBox("Current item", %s)
%c = substr(%k,len(%k)-1,1);
%cmd = iif(%c=="4","FindEditor:","FindViewer:")+%s;
%iRc=callplugin(#%ConEmu,%cmd);
//MsgBox("EditOpen result", "callplugin="+%iRc+"\n<"+env("ConEmuMacroResult")+">")
$if (%iRc!=0)
%r = env("ConEmuMacroResult");
$if (substr(%r,0,5)=="Found")
$Exit // Ok
$else $if (substr(%r,0,6)=="Active")
F12 eval(substr(%r,7))
$Exit // Ok
$else $if (%r=="Blocked")
// MsgBox("ConEmu macro","Tab can't be activated now\n"+%s);
$end $end $end
$end
$end
//history.enable(0xF)
$if (%k=="F4") F4 $else F3 $end
// As we get here, Far will try to open viewer or editor window.
// But, it may be already opened in the current Far instance.
// When it's exists, Far show messagebox with confirmation and buttons:
// { Current } [ New instance ] [ Reload ]
// Next macro line depress { Current } button
$if (Dialog && Title=="Editor" && Dlg.ItemCount==7 && Dlg.CurPos==5 && Dlg.ItemType==7) Enter $end
}}

View File

@@ -0,0 +1,23 @@
// This is sample macro-file for MacroLib plugin for Far Manager 2.x
// You can download plugin here:
// http://code.google.com/p/far-plugins/wiki/MacroLib
// Note! This is just an example of calling GuiMacro from Far Manager
// Note! Ctrl+Wheel may be already binded in ConEmu Keys&Macro settings
//include "Consts.fmi"
const ConEmu = 0x43454D55
macro Descr="ConEmu: Increase ConEmu font size"
Key="AltMsWheelUp"
{{
callplugin(#%ConEmu,"FontSetSize(1,2)")
}}
macro Descr="ConEmu: Increase ConEmu font size"
Key="AltMsWheelDown"
{{
callplugin(#%ConEmu,"FontSetSize(1,-2)")
}}

View File

@@ -0,0 +1,18 @@
// This is sample macro-file for MacroLib plugin for Far Manager 2.x
// You can download plugin here:
// http://code.google.com/p/far-plugins/wiki/MacroLib
//include "Consts.fmi"
const ConEmu = 0x43454D55
macro Descr="ConEmu: Test GuiMacro" Key="AltShiftF12"
{{
F11
$if (menu.select("ConEmu",2) > 0)
Enter ~
$else
MsgBox("Error","ConEmu plugin was not found in the list")
$end
}}

View File

@@ -0,0 +1,109 @@
// This is sample macro-file for MacroLib plugin for Far Manager 2.x
// You can download plugin here:
// http://code.google.com/p/far-plugins/wiki/MacroLib
// Run 'File under cursor' or 'Command line' in new console of ConEmu.
// 'Press enter to close console' will be displayed after command completion.
// Note! If you want to disable this confirmation,
// set 'DisableCloseConfirm = 1'
const DisableCloseConfirm = 0
// AltEnter - run command and activate new ConEmu tab
// Note! You must enable "Alt+Enter" option in ConEmu Settings->Keys.
// ShiftEnter - run command in background ConEmu tab
// Note! If you want to activate new tab on ShiftEnter,
// set 'UseBackgroundTab = 0'
const UseBackgroundTab = 1
// While starting command in background tab, there is a flicker on panels.
// If you want to disable flicker, set 'DisableFlicker = 1'.
// Note! ConEmu plugin reqired for 'DisableFlicker = 1'.
const DisableFlicker = 0
macro
Descr="Run <File under cursor> or <Command line> in new console of ConEmu"
Key="ShiftEnter AltEnter"
Area="Shell Search ACompl"
{{
history.enable(0xff) // Remove this line in old Far2 versions
$if (akey(1,1)=="ShiftEnter" && #%UseBackgroundTab)
%add = " -new_console:b";
$if (#%DisableCloseConfirm) %add = %add + "n"; $end
$else
// AltEnter creates foreground console(tab)
%add = " -new_console";
$if (#%DisableCloseConfirm) %add = %add + ":n"; $end
$end
%oldcmd = "";
$if (Search)
// Save and clear command line - about to execute panel(!) item
%oldcmd = CmdLine.Value; %oldpos = CmdLine.CurPos;
Esc Esc // First - close search, second - clear command line
$end
$if (!CmdLine.Empty)
$if (MacroArea=="AutoCompletion")
Esc // Close autocompletion
$end
$if (CmdLine.Value=="." || CmdLine.Value==".." || CmdLine.Value=="...")
ShiftEnter
$Exit
$else
$if (MacroArea=="AutoCompletion")
Del // Remove autocompletion selection
// Unfortunately, 'AutoCompletion' area exists in both Shell & Dialog.
Esc $if (MacroArea!="Shell") $Exit $end
$end
//CtrlEnd - fails, couse of AutoCompletion
$Rep(CmdLine.ItemCount) CtrlD $end
//Append "-new_console" if not exists
$if (index(CmdLine.Value,"-new_console")<0) print(%add) $end
$end
$else $if (APanel.FilePanel && !APanel.Plugin && !APanel.Empty && !APanel.Folder && len(APanel.Current)>4)
$if (MacroArea=="AutoCompletion")
// Unfortunately, 'AutoCompletion' area exists in both Shell & Dialog.
Esc $if (MacroArea!="Shell") $Exit $end
$end
%exec = ucase(env("PATHEXT"));
$if (%exec=="") %exec = ".COM;.EXE;.BAT;.CMD"; $end
%ext = ucase(fsplit(APanel.Current,8));
$if (%ext!="" && index(";"+%exec+";",";"+%ext+";")>=0)
CtrlEnter
Del // Remove possible autocompletion selection
//Append "-new_console"
print(%add)
$else
$if (akey(1,1)=="ShiftEnter") ShiftEnter $end
$Exit
$end
$else
$if (akey(1,1)=="ShiftEnter") ShiftEnter $end
$Exit
$end $end
Del // Remove possible autocompletion selection
$if (#%DisableFlicker)
$Rep(CmdLine.ItemCount) CtrlS $end
print("ConEmu:run:")
$end
Enter // Execute
// Restore old command line state (running file from Panel in QSearch mode)
$if (%oldcmd != "")
print(%oldcmd)
$if (%oldpos>=1 && %oldpos<=CmdLine.ItemCount) CtrlHome $Rep(%oldpos-1) CtrlD $end $end
$end
}}

View File

@@ -0,0 +1,30 @@
// This is sample macro-file for MacroLib plugin for Far Manager 3.x
// You can download plugin here:
// http://code.google.com/p/far-plugins/wiki/MacroLib
// Show all windows list from all consoles
const ConEmu = 0x43454D55
macro
Descr="ConEmu: Show all windows list from all consoles"
Area="Shell QView Info Tree Search Dialog Editor Viewer"
Key="F12"
{{
F11
$if (menu.select("ConEmu",2) > 0)
Enter T
$else
MsgBox("Error","ConEmu plugin was not found in the list")
$end
}}
macro
Descr="ConEmu: Standard Far windows list"
Area="Shell QView Info Tree Search Dialog Editor Viewer"
Key="CtrlShiftF12"
{{
F12
}}

View File

@@ -0,0 +1,41 @@
// This is sample macro-file for MacroLib plugin for Far Manager 2.x
// You can download plugin here:
// http://code.google.com/p/far-plugins/wiki/MacroLib
const ConEmu = 0x43454D55
const ConEmuTh = 0x43455568
// Макросы для ConEmu
macro Descr="ConEmu: Switch tabs visibility" Key="CtrlShiftT"
{{
callplugin(#%ConEmu,3)
}}
macro Descr="ConEmu: Show console output in editor" Area="Shell" Key="CtrlO"
{{
callplugin(#%ConEmu,1) CtrlEnd
}}
macro Descr="Hide/Show panels (standard FAR CtrlO)" Area="Shell" Key="CtrlAltO"
{{
CtrlO
}}
macro Descr="Тест открытия EMenu макросом (ready for conemu)" Area="Shell" Key="ShiftApps"
{{
$If (!CmdLine.Empty) %Flg_Cmd=1; %CmdCurPos=CmdLine.ItemCount-CmdLine.CurPos+1; %CmdVal=CmdLine.Value; Esc $Else %Flg_Cmd=0; $End print("rclk_gui:") Enter $If (%Flg_Cmd==1) print(%CmdVal) %Flg_Cmd=0; %Num=%CmdCurPos; $While (%Num!=0) %Num=%Num-1; CtrlS $End $End
}}
// Create new console with ConEmu debugger on this instance of FAR
macro Descr="ConEmu: debugger on this instance of FAR" Area="Shell" Key="CtrlAltD"
{{
callplugin(#%ConEmu,8)
}}
// Макросы ConEmu PanelView
macro Descr="ConEmuTh: Switch Thumbnail view on active panel" Area="Shell" Key="CtrlShiftF1"
{{
callplugin(#%ConEmuTh,1)
}}
macro Descr="ConEmuTh: Switch Tiles view on active panel" Area="Shell" Key="CtrlShiftF2"
{{
callplugin(#%ConEmuTh,2)
}}