Серый форум

The gray Cardinal · 2007-04-09 21:21:41

Скрипт-индикатор для NumLock, CapsLock, ScrollLock, Insert для клавиатуры, в которой нет светодиодов. Состояния кнопок отображаются на кнопке "Пуск" в виде букв. Взято с официального форума AutoHotkey.

Код:

#persistent ; необходимо, только если используется в качестве отдельного скрипта
; или встраивается в скрипт без строк автозамены, горячих клавиш или команд GUI.
SetTimer, Start, 100 ; настройте второй параметр, чтобы изменить интервал реагирования
Start:
    StartButtonText = %CapsToggle%%NumToggle%%ScrollToggle%%InsToggle%
    GetKeyState, CapsToggle, CapsLock, T ; проверяем, включен ли Capslock
    If CapsToggle = U
        CapsToggle = -  ; если Capslock выключен, отобразим на кнопке "Пуск" дефис
    Else
        CapsToggle = C ; иначе, отобразим "С" на кнопке "Пуск"
    GetKeyState, NumToggle, Numlock, T
    If NumToggle = U
        NumToggle = -
    Else
        NumToggle = N
    GetKeyState, ScrollToggle, ScrollLock, T
    If ScrollToggle = U
        ScrollToggle = -
    Else
        ScrollToggle = S
    GetKeyState,InsToggle, Insert, T
    If InsToggle = U
        InsToggle = -
    Else
        InsToggle = I
    ControlSetText,Button1,%StartButtonText%,ahk_class Shell_TrayWnd
    ; команда выше изменяет текст на кнопке "Пуск"
Return

The gray Cardinal · 2007-04-09 21:27:09

Скрипт для индикации NumLock в трее:

Код:

GetKeyState, NumState, NumLock, T
If NumState = D
{
Menu, Tray, Icon, NL_ON.ico, 1
Menu, Tray, Tip, NumLock включен
}
Else
{
Menu, Tray, Icon, NL_OFF.ico, 1
Menu, Tray, Tip, NumLock выключен
}
Return

~NumLock::
GetKeyState, NumState, NumLock, T
If NumState = D
{
Menu, Tray, Icon, NL_ON.ico, 1
Menu, Tray, Tip, NumLock включен
SoundBeep, 1000, 20 ; Звуковой сигнал
}
Else
{
Menu, Tray, Icon, NL_OFF.ico, 1
Menu, Tray, Tip, NumLock выключен
SoundBeep, 500, 20 ; Звуковой сигнал
}
Return

Скрипт для индикации CapsLock в трее:

Код:

GetKeyState, CapsState, CapsLock, T
If CapsState = D
{
Menu, Tray, Icon, CL_ON.ico, 1
Menu, Tray, Tip, CapsLock включен
}
Else
{
Menu, Tray, Icon, CL_OFF.ico, 1
Menu, Tray, Tip, CapsLock выключен
}
Return

~CapsLock::
GetKeyState, CapsState, CapsLock, T
If CapsState = D
{
Menu, Tray, Icon, CL_ON.ico, 1
Menu, Tray, Tip, CapsLock включен
SoundBeep, 1000, 20 ; Звуковой сигнал
}
Else
{
Menu, Tray, Icon, CL_OFF.ico, 1
Menu, Tray, Tip, CapsLock выключен
SoundBeep, 500, 20 ; Звуковой сигнал
}
Return

Автор скриптов - sergeich.
Скрипты требуют иконок, которые находятся в прикреплённом файле.

Прикрепленные файлы:

icons.zip, Размер: 783 байт, Скачано: 609

Серый форум

#1 2007-04-09 21:21:41

AutoHotkey: скрипт-индикатор для NumLock, CapsLock, ScrollLock, Insert

Код:

#2 2007-04-09 21:27:09

Re: AutoHotkey: скрипт-индикатор для NumLock, CapsLock, ScrollLock, Insert

Код:

Код:

Board footer