From 5a85183bf95d702d15c2550389c3ddcb11313d36 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?m=C3=B6si?= Date: Fri, 31 Oct 2008 12:30:13 +0000 Subject: =?UTF-8?q?Key-Hooks=20f=C3=BCr=20normale=20Tasten=20ausgelagert?= =?UTF-8?q?=20und=20Funktionen=20in=20recycle.ahk=20umsortiert.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://svn.neo-layout.org@1072 b9310e46-f624-0410-8ea1-cfbb3a30dc96 --- windows/neo-vars/recycle.ahk | 538 ++++++++++++------------------------------- 1 file changed, 151 insertions(+), 387 deletions(-) (limited to 'windows/neo-vars/recycle.ahk') diff --git a/windows/neo-vars/recycle.ahk b/windows/neo-vars/recycle.ahk index 197f17c..2a46b1a 100644 --- a/windows/neo-vars/recycle.ahk +++ b/windows/neo-vars/recycle.ahk @@ -180,156 +180,6 @@ lernModus_neo_Backspace := 0 lernModus_neo_Entf := 1 -/********************** -* Tastenkombinationen * -*********************** -*/ - -+pause:: -Suspend, Permit - goto togglesuspend - -/***************** -* Menüfunktionen * -****************** -*/ -togglesuspend: - if A_IsSuspended { - menu, tray, rename, %enable%, %disable% - menu, tray, tip, %name% - if (iconBenutzen) - menu, tray, icon, %ResourceFolder%\neo.ico,,1 - suspend , off ; Schaltet Suspend aus -> NEO - } else { - menu, tray, rename, %disable%, %enable% - menu, tray, tip, %name% : Deaktiviert - if (iconBenutzen) - menu, tray, icon, %ResourceFolder%\neo_disabled.ico,,1 - suspend , on ; Schaltet Suspend ein -> QWERTZ - } return - -help: - Run, %A_WinDir%\hh mk:@MSITStore:autohotkey.chm -return - -about: - msgbox, 64, %name% – Ergonomische Tastaturbelegung, - ( - %name% - `nDas Neo-Layout ersetzt das übliche deutsche - Tastaturlayout mit der Alternative Neo, - beschrieben auf http://neo-layout.org/. - `nDazu sind keine Administratorrechte nötig. - `nWenn Autohotkey aktiviert ist, werden alle Tastendrucke - abgefangen und statt dessen eine Übersetzung weitergeschickt. - `nDies geschieht transparent für den Anwender, - es muss nichts installiert werden. - `nDie Zeichenübersetzung kann leicht über das Icon im - Systemtray deaktiviert werden. `n - ) -return - -neo: - run http://neo-layout.org/ -return - -autohotkey: - run http://autohotkey.com/ -return - -open: - ListLines ; shows the Autohotkey window -return - -edit: - edit -return - -reload: - Reload -return - -hide: - menu, tray, noicon -return - -exitprogram: - exitapp -return - -/************************** -* lernModus Konfiguration * -* nur relevant wenn * -* lernModus = 1 * -* Strg+Komma schaltet um * -*************************** -*/ -^,::lernModus := not(lernModus) - -; 0 = aus, 1 = an - -; LShift+RShift == CapsLock (simuliert) -; Es werden nur die beiden Tastenkombinationen abgefragt, -; daher kommen LShift und RShift ungehindert bis in die -; Applikation. Dies ist aber merkwürdig, da beide Shift- -; Tasten nun /modifier keys/ werden und, wie in der AHK- -; Hilfe beschrieben, eigentlich nicht mehr bis zur App -; durchkommen sollten. -; KeyboardLED(4,"switch") hatte ich zuerst genommen, aber -; das schaltet, oh Wunder, die LED nicht wieder aus. - -VKA1SC136 & VKA0SC02A:: ; RShift, dann LShift -VKA0SC02A & VKA1SC136:: ; LShift, dann RShift - if (GetKeyState("VKA1SC136", "P") and GetKeyState("VKA0SC02A", "P")) - { - if isMod2Locked - { - isMod2Locked = 0 - KeyboardLED(4,"off") - } - else - { - isMod2Locked = 1 - KeyBoardLED(4,"on") - } - } -return - -;Mod3-Tasten (Wichtig, sie werden sonst nicht verarbeitet!) -*VKBFSC02B:: ; # -*VK14SC03A:: ; CapsLock - if GetKeyState("VKBFSC02B", "P") and GetKeyState("VK14SC03A", "P") - CharStarDown("", "", "SComp") -return - -;Mod4+Mod4 == Mod4-Lock -; Im Gegensatz zu LShift+RShift werden die beiden Tasten -; _nicht_ zur Applikation weitergeleitet, und nur bei -; gleichzeitigem Drücken wird der Mod4-Lock aktiviert und -; angezeigt. - -*VKA5SC138:: -*VKE2SC056:: - if (GetKeyState("VKA5SC138", "P") and GetKeyState("VKE2SC056", "P")) - { - if IsMod4Locked - { - if zeigeLockBox - MsgBox Mod4-Feststellung aufgebehoben! - IsMod4Locked = 0 - if UseMod4Light - KeyboardLED(1,"off") - } - else - { - if zeigeLockBox - MsgBox Mod4 festgestellt: Um Mod4 wieder zu lösen, drücke beide Mod4-Tasten gleichzeitig! - IsMod4Locked = 1 - if UseMod4Light - KeyboardLED(1,"on") - } - } -return EbeneAktualisieren() { @@ -565,6 +415,157 @@ SendUnicodeCharUp(charCode){ EncodeInteger(ref,val){ DllCall("ntdll\RtlFillMemoryUlong","Uint",ref,"Uint",4,"Uint",val) } + +/********************** +* Tastenkombinationen * +*********************** +*/ + ++pause:: +Suspend, Permit + goto togglesuspend + +/***************** +* Menüfunktionen * +****************** +*/ +togglesuspend: + if A_IsSuspended { + menu, tray, rename, %enable%, %disable% + menu, tray, tip, %name% + if (iconBenutzen) + menu, tray, icon, %ResourceFolder%\neo.ico,,1 + suspend , off ; Schaltet Suspend aus -> NEO + } else { + menu, tray, rename, %disable%, %enable% + menu, tray, tip, %name% : Deaktiviert + if (iconBenutzen) + menu, tray, icon, %ResourceFolder%\neo_disabled.ico,,1 + suspend , on ; Schaltet Suspend ein -> QWERTZ + } return + +help: + Run, %A_WinDir%\hh mk:@MSITStore:autohotkey.chm +return + +about: + msgbox, 64, %name% – Ergonomische Tastaturbelegung, + ( + %name% + `nDas Neo-Layout ersetzt das übliche deutsche + Tastaturlayout mit der Alternative Neo, + beschrieben auf http://neo-layout.org/. + `nDazu sind keine Administratorrechte nötig. + `nWenn Autohotkey aktiviert ist, werden alle Tastendrucke + abgefangen und statt dessen eine Übersetzung weitergeschickt. + `nDies geschieht transparent für den Anwender, + es muss nichts installiert werden. + `nDie Zeichenübersetzung kann leicht über das Icon im + Systemtray deaktiviert werden. `n + ) +return + +neo: + run http://neo-layout.org/ +return + +autohotkey: + run http://autohotkey.com/ +return + +open: + ListLines ; shows the Autohotkey window +return + +edit: + edit +return + +reload: + Reload +return + +hide: + menu, tray, noicon +return + +exitprogram: + exitapp +return + +/************************** +* lernModus Konfiguration * +* nur relevant wenn * +* lernModus = 1 * +* Strg+Komma schaltet um * +*************************** +*/ +^,::lernModus := not(lernModus) + +; 0 = aus, 1 = an + +; LShift+RShift == CapsLock (simuliert) +; Es werden nur die beiden Tastenkombinationen abgefragt, +; daher kommen LShift und RShift ungehindert bis in die +; Applikation. Dies ist aber merkwürdig, da beide Shift- +; Tasten nun /modifier keys/ werden und, wie in der AHK- +; Hilfe beschrieben, eigentlich nicht mehr bis zur App +; durchkommen sollten. +; KeyboardLED(4,"switch") hatte ich zuerst genommen, aber +; das schaltet, oh Wunder, die LED nicht wieder aus. + +VKA1SC136 & VKA0SC02A:: ; RShift, dann LShift +VKA0SC02A & VKA1SC136:: ; LShift, dann RShift + if (GetKeyState("VKA1SC136", "P") and GetKeyState("VKA0SC02A", "P")) + { + if isMod2Locked + { + isMod2Locked = 0 + KeyboardLED(4,"off") + } + else + { + isMod2Locked = 1 + KeyBoardLED(4,"on") + } + } +return + +;Mod3-Tasten (Wichtig, sie werden sonst nicht verarbeitet!) +*VKBFSC02B:: ; # +*VK14SC03A:: ; CapsLock + if GetKeyState("VKBFSC02B", "P") and GetKeyState("VK14SC03A", "P") + CharStarDown("", "", "SComp") +return + +;Mod4+Mod4 == Mod4-Lock +; Im Gegensatz zu LShift+RShift werden die beiden Tasten +; _nicht_ zur Applikation weitergeleitet, und nur bei +; gleichzeitigem Drücken wird der Mod4-Lock aktiviert und +; angezeigt. + +*VKA5SC138:: +*VKE2SC056:: + if (GetKeyState("VKA5SC138", "P") and GetKeyState("VKE2SC056", "P")) + { + if IsMod4Locked + { + if zeigeLockBox + MsgBox Mod4-Feststellung aufgebehoben! + IsMod4Locked = 0 + if UseMod4Light + KeyboardLED(1,"off") + } + else + { + if zeigeLockBox + MsgBox Mod4 festgestellt: Um Mod4 wieder zu lösen, drücke beide Mod4-Tasten gleichzeitig! + IsMod4Locked = 1 + if UseMod4Light + KeyboardLED(1,"on") + } + } +return /* ------------------------------------------------------ BildschirmTastatur @@ -730,240 +731,3 @@ ToggleAlwaysOnTop: alwaysOnTop = 1 } Return - -;;;;;; DOWN EVENTS -; Reihe 1 - -*VKDCSC029:: ; Zirkumflex -*VK31SC002:: ; 1 -*VK32SC003:: ; 2 -*VK33SC004:: ; 3 -*VK34SC005:: ; 4 -*VK35SC006:: ; 5 -*VK36SC007:: ; 6 -*VK37SC008:: ; 7 -*VK38SC009:: ; 8 -*VK39SC00A:: ; 9 -*VK30SC00B:: ; 0 -*VKDBSC00C:: ; ß -*VKDDSC00D:: ; Akut - -; Reihe 2 - -*VK51SC010:: ; q (x) -*VK57SC011:: ; w (v)x -*VK45SC012:: ; e (l) -*VK52SC013:: ; r (c) -*VK54SC014:: ; t (w) -*VK5ASC015:: ; z (k) -*VK55SC016:: ; u (h) -*VK49SC017:: ; i (g) -*VK4FSC018:: ; o (f) -*VK50SC019:: ; p (q) -*VKBASC01A:: ; ü (ß) -*VKBBSC01B:: ; + (tot3) - -; Reihe 3 - -*VK41SC01E:: ; a (u) -*VK53SC01F:: ; s (i) -*VK44SC020:: ; d (a) -*VK46SC021:: ; f (e) -*VK47SC022:: ; g (o) -*VK48SC023:: ; h (s) -*VK4ASC024:: ; j (n) -*VK4BSC025:: ; k (r) -*VK4CSC026:: ; l (t) -*VKC0SC027:: ; ö (d) -*VKDESC028:: ; ä (y) - -; Reihe 4 - -*VK59SC02C:: ; y (ü) -*VK58SC02D:: ; x (ö) -*VK43SC02E:: ; c (ä) -*VK56SC02F:: ; v (p) -*VK42SC030:: ; b (z) -*VK4ESC031:: ; n (b) -*VK4DSC032:: ; m (m) -*VKBCSC033:: ; , (,) -*VKBESC034:: ; . (.) -*VKBDSC035:: ; - (j) - -; Numpad - -*VK90SC145:: ; NumLock -*VK6FSC135:: ; NumpadDiv -*VK6ASC037:: ; NumpadMult -*VK6DSC04A:: ; NumpadSub -*VK6BSC04E:: ; NumpadAdd -; *VK0DSC11C:: ; NumpadEnter -*VK67SC047:: ; NumPad7 -*VK24SC047:: ; NumPadHome -*VK68SC048:: ; NumPad8 -*VK26SC048:: ; NumPadUp -*VK69SC049:: ; NumPad9 -*VK21SC049:: ; NumPadPgUp -*VK64SC04B:: ; NumPad4 -*VK25SC04B:: ; NumPadLeft -*VK65SC04C:: ; NumPad5 -*VK0CSC04C:: ; NumPadClear -*VK66SC04D:: ; NumPad6 -*VK27SC04D:: ; NumPadRight -*VK61SC04F:: ; NumPad1 -*VK23SC04F:: ; NumPadEnd -*VK62SC050:: ; NumPad2 -*VK28SC050:: ; NumPadDown -*VK63SC051:: ; NumPad3 -*VK22SC051:: ; NumPadPgDn -*VK60SC052:: ; NumPad0 -*VK2DSC052:: ; NumPadIns -*VK6ESC053:: ; NumPadDot -*VK2ESC053:: ; NumPadDel -tab:: -esc:: -*enter:: -*backspace:: -*del:: -*ins:: -*home:: -*end:: -*pgup:: -*pgdn:: -*up:: -*down:: -*left:: -*right:: -F10:: -F11:: -numpadenter:: - -;;;;;; UP EVENTS -; Reihe 1 - -*VKDCSC029 up:: ; Zirkumflex -*VK31SC002 up:: ; 1 -*VK32SC003 up:: ; 2 -*VK33SC004 up:: ; 3 -*VK34SC005 up:: ; 4 -*VK35SC006 up:: ; 5 -*VK36SC007 up:: ; 6 -*VK37SC008 up:: ; 7 -*VK38SC009 up:: ; 8 -*VK39SC00A up:: ; 9 -*VK30SC00B up:: ; 0 -*VKDBSC00C up:: ; ß -*VKDDSC00D up:: ; Akut - -; Reihe 2 - -*VK51SC010 up:: ; q (x) -*VK57SC011 up:: ; w (v)x -*VK45SC012 up:: ; e (l) -*VK52SC013 up:: ; r (c) -*VK54SC014 up:: ; t (w) -*VK5ASC015 up:: ; z (k) -*VK55SC016 up:: ; u (h) -*VK49SC017 up:: ; i (g) -*VK4FSC018 up:: ; o (f) -*VK50SC019 up:: ; p (q) -*VKBASC01A up:: ; ü (ß) -*VKBBSC01B up:: ; + (tot3) - -; Reihe 3 - -*VK41SC01E up:: ; a (u) -*VK53SC01F up:: ; s (i) -*VK44SC020 up:: ; d (a) -*VK46SC021 up:: ; f (e) -*VK47SC022 up:: ; g (o) -*VK48SC023 up:: ; h (s) -*VK4ASC024 up:: ; j (n) -*VK4BSC025 up:: ; k (r) -*VK4CSC026 up:: ; l (t) -*VKC0SC027 up:: ; ö (d) -*VKDESC028 up:: ; ä (y) - -; Reihe 4 - -*VK59SC02C up:: ; y (ü) -*VK58SC02D up:: ; x (ö) -*VK43SC02E up:: ; c (ä) -*VK56SC02F up:: ; v (p) -*VK42SC030 up:: ; b (z) -*VK4ESC031 up:: ; n (b) -*VK4DSC032 up:: ; m (m) -*VKBCSC033 up:: ; , (,) -*VKBESC034 up:: ; . (.) -*VKBDSC035 up:: ; - (j) - -; Numpad - -*VK90SC145 up:: ; NumLock -*VK6FSC135 up:: ; NumpadDiv -*VK6ASC037 up:: ; NumpadMult -*VK6DSC04A up:: ; NumpadSub -*VK6BSC04E up:: ; NumpadAdd -; *VK0DSC11C up:: ; NumpadEnter -*VK67SC047 up:: ; NumPad7 -*VK24SC047 up:: ; NumPadHome -*VK68SC048 up:: ; NumPad8 -*VK26SC048 up:: ; NumPadUp -*VK69SC049 up:: ; NumPad9 -*VK21SC049 up:: ; NumPadPgUp -*VK64SC04B up:: ; NumPad4 -*VK25SC04B up:: ; NumPadLeft -*VK65SC04C up:: ; NumPad5 -*VK0CSC04C up:: ; NumPadClear -*VK66SC04D up:: ; NumPad6 -*VK27SC04D up:: ; NumPadRight -*VK61SC04F up:: ; NumPad1 -*VK23SC04F up:: ; NumPadEnd -*VK62SC050 up:: ; NumPad2 -*VK28SC050 up:: ; NumPadDown -*VK63SC051 up:: ; NumPad3 -*VK22SC051 up:: ; NumPadPgDn -*VK60SC052 up:: ; NumPad0 -*VK2DSC052 up:: ; NumPadIns -*VK6ESC053 up:: ; NumPadDot -*VK2ESC053 up:: ; NumPadDel -tab up:: -esc up:: -*enter up:: -*backspace up:: -*del up:: -*ins up:: -*home up:: -*end up:: -*pgup up:: -*pgdn up:: -*up up:: -*down up:: -*left up:: -*right up:: -F10 up:: -F11 up:: -numpadenter up:: - - AllStar(A_ThisHotkey) -return - -*space:: - if ((einHandNeo)) - spacepressed := 1 - else - AllStar(A_ThisHotkey) -return - -*space up:: - if ((einHandNeo)) { - if ((keypressed)) { - keypressed := 0 - spacepressed := 0 - } else { - AllStar("space") ;??? - AllStar("space up") - } - } else - AllStar(A_ThisHotkey) -return -- cgit v1.2.3