AltBS.reg - новая версия

Здесь обсуждается всё, что касается макросов.
Post Reply
Jin X
Posts: 8
Joined: Sun 03 Jan, 2010 20:29

AltBS.reg - новая версия

Post by Jin X » Sun 03 Jan, 2010 20:37

Что изменено?
[+] Добавлена комбинация AltShiftBS - перемещение вперёд по истории
[*] Если история пуста, на экране не появляется пустой диалог
[*] Если мы достигли вершины списка, переход заново по кругу не начинается
Здесь есть небольшая игра с Enter и ShiftEnter. Если делать только ShiftEnter, порой вылезают глюки.

Code: Select all

REGEDIT4

[-HKEY_CURRENT_USER\Software\Far2\KeyMacros\Shell\AltBS]
[HKEY_CURRENT_USER\Software\Far2\KeyMacros\Shell\AltBS]
"Description"="Use Alt-BS to undo folder changes"
"Sequence"="AltF12 $if(CurPos == 1 || ItemCount == 0) %%AltBS=0; Esc $else $if(CurPos == ItemCount) $if(%%AltBS == 0) %%AltBS=1; Enter $else %%AltBS=0; Up Up ShiftEnter $end $else %%AltBS=0; Up ShiftEnter $end $end"
"DisableOutput"=dword:00000001

[-HKEY_CURRENT_USER\Software\Far2\KeyMacros\Shell\AltShiftBS]
[HKEY_CURRENT_USER\Software\Far2\KeyMacros\Shell\AltShiftBS]
"Description"="Use Alt-Shift-BS to redo folder changes"
"Sequence"="AltF12 $if(CurPos != ItemCount) Down $if(CurPos != ItemCount) ShiftEnter $else Enter $end $else Esc $end"
"DisableOutput"=dword:00000001
Last edited by Jin X on Sun 03 Jan, 2010 21:00, edited 1 time in total.

Jin X
Posts: 8
Joined: Sun 03 Jan, 2010 20:29

Re: AltBS.reg - новая версия

Post by Jin X » Sun 03 Jan, 2010 20:43

Это для Far2

User avatar
SUSim
Posts: 1537
Joined: Thu 18 Feb, 2010 17:32
Has thanked: 5 times
Been thanked: 9 times

Re: AltBS.reg - новая версия

Post by SUSim » Sun 11 Apr, 2010 07:29

Вот мой вариант:

Code: Select all

;;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
;; Макросы для перехода по папкам предыдущая/следующая 
;;-------------------------------------------------------------------------------------------------
%comment="Макрос возврата в предыдущую папку. (с) SimSU";
%comment="Назначается на AltBS в панелях.";
AltF12 
$if ((ItemCount == 0) || (CurPos == 1)) %comment="Некуда возвращаться.";
  Esc 
  $exit 
$end 
$if (CurPos == ItemCount)
  Enter %comment="Перешли и занесли текущую позицию в историю.";
  AltF12 Up ShiftEnter %comment="Сменили положение в истории.";
$else
  Up ShiftEnter %comment="Перешли и cменили положение в истории.";
$end
;;-------------------------------------------------------------------------------------------------
%comment="Макрос перехода в следующую папку после возвратов. (с) SimSU";
%comment="Назначается на ShiftBS в панелях.";
AltF12 
$if ((ItemCount == 0) || (CurPos == ItemCount)) %comment="Некуда переходить.";
  Esc 
$else
  Down ShiftEnter %comment="Перешли и cменили положение в истории.";
$end 
;;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
А вообще у меня на данный момент макросы запоминают еще и пометку файлов при любом хождении по директориям :)
SimSU ··· ·· -- ··· ··-

Post Reply

Return to “Обсуждение макросов”