Examples
REGEDIT4 ;open the disks menu in the passive file panel ;make the panel for which the menu is going to be open visible if it was hidden before. [HKEY_CURRENT_USER\Software\Far\KeyMacros\Disks\Tab] "Sequence"="Esc $If (!PPanel.Visible) $If (APanel.Left) CtrlF2 $Else CtrlF1 $End $End Tab F9 Enter End Enter" "DisableOutput"=dword:00000001
REGEDIT4 ;select/unselect a single word under the text cursor [HKEY_CURRENT_USER\Software\Far\KeyMacros\Editor\RAlt] "Sequence"="RCtrl9 CtrlRight CtrlLeft $If (!Selected) CtrlShiftRight $Else CtrlU $End Ctrl9" "DisableOutput"=dword:00000001
REGEDIT4 ;create a new folder with name consisting of the current date [HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlShiftF7] "Sequence"="%folder=date(\"%d.%m0.%Y\"); $If (!panel.fexist(0,%folder)) F7 CtrlY $Text %folder Enter $End" "DisableOutput"=dword:00000001 "NoPluginPanels"=dword:00000001
REGEDIT4 ;quick find the file in the passive panel with the same name as selected ;in the active panel ;sequence F5 ShiftEnter CtrlIns is used to get the file name independently ;of the state of the command line and number of selected files in the panels [HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlAltLeft] "Sequence"="$IClip $If (((Bof && APanel.Root) || !Bof) && PPanel.Visible) $If (fexist(PPanel.Path+\"\\\\\"+APanel.Current) == 1) F5 ShiftEnter CtrlIns Esc Tab Home Alt< ShiftIns Esc $End $End" "DisableOutput"=dword:00000001 [HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlAltRight] "Sequence"="$IClip $If (((Bof && APanel.Root) || !Bof) && PPanel.Visible) $If (fexist(PPanel.Path+\"\\\\\"+APanel.Current) == 1) F5 ShiftEnter CtrlIns Esc Tab Home Alt< ShiftIns Esc $End $End" "DisableOutput"=dword:00000001
REGEDIT4 ;select 30 next/previous files or folders [HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlDown] "Sequence"="$If (!Eof) $Rep (30) $If (Eof) Ins $Exit $Else Ins $End $End $End" "DisableOutput"=dword:00000001 [HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlUp] "Sequence"="Up $If (Bof) $If (!APanel.Root) Down $End $Exit $Else Down $End $If (Eof) Ins $Else Ins Up $End $Rep (29) Up Ins Up $If (Bof) $If (!APanel.Root) Down $End $Exit $End $End Up" "DisableOutput"=dword:00000001
REGEDIT4 ;capture the whole screen to the text file far-screen.out ;this macro works only in the Dialog area of execution [HKEY_CURRENT_USER\Software\Far\KeyMacros\Dialog\AltP] "Sequence"="$IClip AltIns CtrlHome ShiftEnd ShiftPgDn Enter Esc $If (!Shell) Esc $End $If (Shell && !APanel.Plugin) ShiftF4 CtrlY \"far-screen.out\" Enter ShiftIns Enter Enter F2 Esc $End" "DisableOutput"=dword:00000001
REGEDIT4 ;delete the file or folder using Del hotkey ;if the cursor was on the .. element then try to delete the parent folder ;if command line cursor is not in the end of the command line then delete current symbol [HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\Del] "Sequence"="$If (!CmdLine.Eof) Del $Exit $Else $If ((APanel.Bof && !APanel.Selected) && (!APanel.Root || APanel.Plugin)) CtrlPgUp $End F8 $End" "DisableOutput"=dword:00000001
REGEDIT4 ;maximize the passive panel before showing the quickview panel ;restore the panel size before closing the quickview panel [HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlQ] "Sequence"="Tab $If (QView) Tab Ctrl2 Tab CtrlClear $Else Tab Ctrl6 Tab $If (APanel.Left) $Rep (APanel.width) CtrlRight $End $Else $Rep (APanel.width) CtrlLeft $End $End $End Tab CtrlQ" "DisableOutput"=dword:00000001
This macro is intended to highlight HTML file/folder pairs:
REGEDIT4 [HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlShiftIns] "Sequence"="%Current=APanel.Current; %Ext=substr(%Current,len(%Current)-6); $If (%Ext==\"_files\") %Name=substr(%Current,0,len(%Current)-6); $Else %Ext=fsplit(%Current,FSPLIT_EXT); %Name=fsplit(%Current,FSPLIT_NAME); $End $if (%Ext==\".htm\" || %Ext==\".html\") panel.setpos(ACTIVEPANEL,%Name+\".files\") panel.setpos(ACTIVEPANEL,%Name+\"_files\") $end $if (%Ext==\".files\" || %Ext==\"_files\") panel.setpos(ACTIVEPANEL,%Name+\".htm\") panel.setpos(ACTIVEPANEL,%Name+\".html\") $End $if (APanel.Current!=%Current) $If(!panelitem(ACTIVEPANEL,0,PANELITEM_SELECTED)) Ins $End panel.setpos(ACTIVEPANEL,%Current) $If(!panelitem(ACTIVEPANEL,0,PANELITEM_SELECTED)) Ins $End $End $MMode 1 $MMode 1" "DisableOutput"=dword:00000001 ;Macro is not called when command line is not empty, in order to keep the primary ;action of CtrlShiftIns combination - Copy names of selected files to clipboard "EmptyCommandLine"=dword:00000001