Untitled

 avatar
unknown
plain_text
10 months ago
2.2 kB
14
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
return
Editor is loading...
Leave a Comment