Untitled
unknown
plain_text
9 months ago
2.2 kB
11
Indexable
; prank_combined.ahk
; Połączone: 1) CapsLock party 2) a<->e 3) mouse swap
; Hotkeyi:
; Ctrl+Alt+1 - Toggle CapsLock party
; Ctrl+Alt+2 - Toggle letter swap (a <-> e)
; Ctrl+Alt+3 - Toggle mouse swap (L <-> R)
; Ctrl+Alt+Q - Kill script (ExitApp)
#NoEnv
SendMode Input
SetWorkingDir %A_ScriptDir%
SetCapsLockState, Off
; --- zmienne stanu ---
CapsParty := false
CapsFlipToggle := false
LetterSwap := false
MouseSwap := false
; --- globalny Exit ---
^!q::
ToolTip, Skrypt zakończony. Bye.
Sleep, 800
ToolTip
ExitApp
return
; --- Toggle Caps Party ---
^!1::
CapsParty := !CapsParty
if (CapsParty) {
SetTimer, CapsFlip, 2500
; natychmiast włącz Caps żeby efekt był widoczny
SetCapsLockState, On
CapsFlipToggle := true
ToolTip, CAPS PARTY: WŁĄCZONE (Ctrl+Alt+1 wyłącza)
} else {
SetTimer, CapsFlip, Off
SetCapsLockState, Off
ToolTip, CAPS PARTY: WYŁĄCZONE
}
SetTimer, RemoveTip, -1200
return
CapsFlip:
; odwraca CapsLock przy każdym wywołaniu
if (CapsFlipToggle) {
SetCapsLockState, Off
} else {
SetCapsLockState, On
}
CapsFlipToggle := !CapsFlipToggle
return
; --- Toggle Letter Swap ---
^!2::
LetterSwap := !LetterSwap
if (LetterSwap)
ToolTip, Letter swap (a <-> e): WŁĄCZONE
else
ToolTip, Letter swap (a <-> e): WYŁĄCZONE
SetTimer, RemoveTip, -1200
return
; --- Toggle Mouse Swap ---
^!3::
MouseSwap := !MouseSwap
if (MouseSwap)
ToolTip, Mouse swap (L<->R): WŁĄCZONE
else
ToolTip, Mouse swap (L<->R): WYŁĄCZONE
SetTimer, RemoveTip, -1200
return
RemoveTip:
ToolTip
return
; --- Conditional hotkeys / remaps ---
#If (LetterSwap)
a::
; wysyłaj 'e' zamiast 'a'
SendInput, {Text}e
return
e::
; wysyłaj 'a' zamiast 'e'
SendInput, {Text}a
return
#If ; reset context
#If (MouseSwap)
LButton::RButton
RButton::LButton
#If
; Zabezpieczenie: gdy skrypt się uruchamia, pokaz krótko co jest dostępne
ToolTip, Pranki aktywne: 1-CAPS 2-Letters 3-Mouse`nCtrl+Alt+Q = EXIT
SetTimer, RemoveTip, -1400
; Koniec skryptu - persistent
returnEditor is loading...
Leave a Comment