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,50 @@
// 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 output of last console command
// Checkbox 'Long console output' must be checked in
// ConEmu Settings -> Features
// OpenType=1 - Open in editor, OpenType=2 - Open in viewer
const OpenType = 1
const ConEmu = "4b675d80-1d4a-4ea9-8436-fdc23f2fc14b"
farmacro
Descr="ConEmu: Show console output in editor"
Area="Shell"
Key="CtrlO"
{{
callplugin(#%ConEmu,#%OpenType) CtrlEnd
}}
farmacro
Descr="ConEmu: Return to panels from console output"
Area="Editor.'*.tmp'"
Area="Viewer.'*.tmp'"
Key="CtrlO"
{{
$if (Editor) %f=Editor.FileName; $else %f=Viewer.FileName; $end
$if (lcase(fsplit(%f,8))!=".tmp" || ucase(substr(fsplit(%f,4),0,3))!="CEM")
$AKey
$Exit
$end
// Was editor modified?
%m=0; $if (Editor) $if (Editor.State & 0x40) %m=1; $end $end
// Close
Esc
// Skip save confirmation
$if (%m && Dialog) Right Enter $end
}}
farmacro
Descr="Hide/Show panels (standard FAR CtrlO)"
Area="Shell Editor Viewer"
Key="CtrlAltO"
DisableOutput=0
{{
CtrlO
}}

View File

@@ -0,0 +1,17 @@
// 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
// Switch visibility of tab/toolbar panel.
// Look at 'Enable Tabs' checkbox in ConEmu Settings -> Tabs
const ConEmu = "4b675d80-1d4a-4ea9-8436-fdc23f2fc14b"
farmacro
Descr="ConEmu: Switch tabs visibility"
Key="CtrlShiftT"
{{
callplugin(#%ConEmu,3)
}}

View File

@@ -0,0 +1,51 @@
// 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
// Several Far instances may be opened in ConEmu tabs.
// This macro activates existing Editor/Viewer, wich
// may be opened in then inactive instance of Far.
const ConEmu = "4b675d80-1d4a-4ea9-8436-fdc23f2fc14b"
farmacro
Descr="ConEmu: Auto switch to Editor Tab"
Key="F3 F4"
Area="Shell Search"
Cond="PanelType:0"
{{
%k = akey(1,0);
$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,26 @@
// 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
// Increase/decrease font size in ConEmu window with Alt+Wheel
const ConEmu = "4b675d80-1d4a-4ea9-8436-fdc23f2fc14b"
farmacro
Descr="ConEmu: Increase ConEmu font size"
Key="AltMsWheelUp"
{{
callplugin(#%ConEmu,"FontSetSize(1,2)")
}}
farmacro
Descr="ConEmu: Decrease ConEmu font size"
Key="AltMsWheelDown"
{{
callplugin(#%ConEmu,"FontSetSize(1,-2)")
}}

View File

@@ -0,0 +1,104 @@
// 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
// 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 is reqired for 'DisableFlicker = 1'.
const DisableFlicker = 0
farmacro
Descr="Run <File under cursor> or <Command line> in new console of ConEmu"
Key="ShiftEnter AltEnter"
Area="Shell Search ShellACompl"
{{
//history.enable(0xff)
%add = " -new_console";
$if (akey(1,1)=="ShiftEnter" && #%UseBackgroundTab)
%add = %add + ":b";
$if (#%DisableCloseConfirm) %add = %add + ":n"; $end
$else
// AltEnter creates foreground console(tab)
$if (#%DisableCloseConfirm) %add = %add + ":n"; $end
//%add = %add + ":s40V"; // split vertically for example
$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 (Macro.Area=="Shell.AutoCompletion")
Esc // Close autocompletion
$end
$if (CmdLine.Value=="." || CmdLine.Value==".." || CmdLine.Value=="...")
ShiftEnter
$Exit
$else
$if (Macro.Area=="Shell.AutoCompletion")
Del // Remove autocompletion selection
$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)
%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 && Plugin.Call("4B675D80-1D4A-4EA9-8436-FDC23F2FC14B","IsConEmu"))
$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,25 @@
// 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 = "4b675d80-1d4a-4ea9-8436-fdc23f2fc14b"
farmacro
Descr="ConEmu: Show all windows list from all consoles"
Area="Shell QView Info Tree Search Dialog Editor Viewer"
Key="F12"
{{
$if (Plugin.Menu(#%ConEmu)) T $end
}}
farmacro
Descr="ConEmu: Standard Far windows list"
Area="Shell QView Info Tree Search Dialog Editor Viewer"
Key="CtrlShiftF12"
{{
F12
}}

View File

@@ -0,0 +1,34 @@
// 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
// Switch visibility of ConEmu Panel Views
// You may customize Panel Views display in ConEmu Settings -> Views
const ConEmuTh = "bd454d48-448e-46cc-909d-b6cf789c2d65"
farmacro
Descr="ConEmuTh: Switch Thumbnails view on active panel"
Area="Shell"
Key="CtrlShiftF1"
{{
callplugin(#%ConEmuTh,1)
}}
farmacro
Descr="ConEmuTh: Switch Tiles view on active panel"
Area="Shell"
Key="CtrlShiftF2"
{{
callplugin(#%ConEmuTh,2)
}}
farmacro
Descr="ConEmu: Turn off Tiles or Thumbnails on active panel"
Area="Shell"
//Key="CtrlAltF2"
{{
callplugin(#%ConEmuTh,256)
}}

View File

@@ -0,0 +1,56 @@
FarMacro
Descr="Editor: Clipboard actions menu"
Key="MsRClick"
Area="Dialog Editor"
{{
%CopyLine="Copy whole line";
%CopyWord="Copy single word";
%Paste="Paste from clipboard";
$if (Editor)
MsLClick CtrlU $SelWord
$else // Dialog
%dx=dlg.getvalue(0,2); %dy=dlg.getvalue(0,3); %c=dlg.getvalue(0,0);
$if (%c<1) $Exit $end
%i=1;
$while (%i<=%c)
%t=dlg.getvalue(%i,1);
$if (%t==4/*DI_EDIT*/ || %t==6/*DI_EDIT*/)
%f=dlg.getvalue(%i,8);
$if (!(%f & 0xD0000000/*hidden,nofocus,...*/))
$if ((%dy+dlg.GetValue(%i,3))==MsY)
$if (((%dx+dlg.GetValue(%i,2))<=MsX) && ((%dx+dlg.GetValue(%i,4))>=MsX))
dlg.SetFocus(%i)
%c=0;
$end
$end
$end
$end
%i=%i+1;
$end
$if (%c!=0)
MsRClick $Exit
$end
$end
%Menu=%CopyLine+"\n";
$if (Editor.SelValue!="")
%Menu=%Menu+%CopyWord+"\n";
$end
%Menu=%Menu+%Paste;
%s = Menu.Show(%Menu,"",0x3,"",MsX,MsY+1);
$if (%s=="") $Exit $end
$if (%s==%CopyLine)
$if (Dialog) Home $else editor.Pos(1,2,1) $end ShiftEnd
CtrlIns $Exit
$end
$if (%s==%CopyWord)
CtrlIns $Exit
$end
$if (%s==%Paste)
ShiftIns $Exit
$end
}}

View File

@@ -0,0 +1,15 @@
<?xml version="1.0" encoding="UTF-8" ?>
<!--
Description.
This FAR TechInfo's replace key bar label for macroses from ConEmu.Thumbnails.fml
CtrlShiftF1 - switches Thumbnails view, CtrlShiftF2 - Tiles view
Use: "%FARHOME%\Far.exe" /import Thumbnails_KeyBar.farconfig
-->
<farconfig version="3.0.2102">
<generalconfig>
<setting key="KeyBarLabels.English.Shell" name="CtrlShiftF1" type="text" value="Thumb" />
<setting key="KeyBarLabels.English.Shell" name="CtrlShiftF2" type="text" value="Tiles" />
<setting key="KeyBarLabels.Russian.Shell" name="CtrlShiftF1" type="text" value="Эскиз" />
<setting key="KeyBarLabels.Russian.Shell" name="CtrlShiftF2" type="text" value="Плитка" />
</generalconfig>
</farconfig>