Total Commander
- 4 ответа
- 0 вопросов
0
Вклад в тег
HotKeySet('{F9}', 'Prev')
HotKeySet('{F10}', 'Forv')
HotKeySet('{F11}', 'Stop')
While 1 ; цикл вечного ожидания действий
Sleep(10)
WEnd
Func Prev()
WinActivate("Total Commander") ; перейти в ТК
Send("^{HOME}") ; выход в начало папки
Send("{ENTER}") ; выход из папки
Send("{UP}") ; переход выше
Send("{ENTER}") ; заход в следующую папку
EndFunc
Func Forv()
WinActivate("Total Commander") ; перейти в ТК
Send("^{HOME}") ; выход в начало папки
Send("{ENTER}") ; выход из папки
Send("{DOWN}") ; переход ниже
Send("{ENTER}") ; заход в следующую папку
EndFunc
Func Stop()
Exit
EndFuncSend("^cm_GoToParent") ; выход из папки
Send("{ENTER}") ; выполнить
Простой