From 3693b0964043efaddb3fc69445daaa4d7da379db Mon Sep 17 00:00:00 2001
From: nora <nora@b9310e46-f624-0410-8ea1-cfbb3a30dc96>
Date: Sat, 26 May 2007 11:24:59 +0000
Subject: autohotkey: Capslock auf Mod3+Mod3, Numpaddot auf Mod5+Mod5, schmales
 und geschütztes Leerzeichen
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://svn.neo-layout.org@129 b9310e46-f624-0410-8ea1-cfbb3a30dc96
---
 windows/XP/autohotkey/neo20-remap.ahk | 127 ++++++++++++++++++++++------------
 1 file changed, 83 insertions(+), 44 deletions(-)

(limited to 'windows/XP/autohotkey/neo20-remap.ahk')

diff --git a/windows/XP/autohotkey/neo20-remap.ahk b/windows/XP/autohotkey/neo20-remap.ahk
index eca8d69..3e48831 100644
--- a/windows/XP/autohotkey/neo20-remap.ahk
+++ b/windows/XP/autohotkey/neo20-remap.ahk
@@ -1,7 +1,7 @@
 /*
-  Mod3: Umbelegung von Win+Ctrl auf CapsLock und #,
-  Mod5: Zweites AltGr auf <
-  Version vom 21.05.2007
+   Mod3: Umbelegung von Win+Ctrl auf CapsLock und #,
+   Mod5: Zweites AltGr auf <
+   Version vom 25.05.2007
 */
 
 ;#InstallKeybdHook
@@ -14,6 +14,7 @@ name = NEO-Remap
 enable  = Aktiviere %name%
 disable = Deaktiviere %name%
 
+
 ; Menü des Systray-Icons 
 ; ----------------------
 
@@ -31,79 +32,117 @@ menu, tray, add, %name% beenden, exitprogram
 menu, tray, tip, %name%
 
 
+
 ; Mod3 (3. und 4. Ebene)
 ; CapsLock und # werden zu Win + Ctrl
+; # + CapsLock = CapsLock
 ; --------------------------------------------
 
 
 *CapsLock::
-Send {RWin Down}
-Send {Control Down}
-Loop
-{
-   Sleep, 10
-   GetKeyState, keystate, CapsLock, P
-   if keystate = U  
-   break
-   ; The key has been released, so break out of the loop.
-}
-Send {RWin Up} 
-Send {Control Up} 
+   Send {RWin Down}
+   Send {Control Down}
+   GetKeyState, capsstate, #, P
+   If capsstate = D  
+      {
+      keywait, Capslock
+      GetKeyState, state, CapsLock, T 
+         ; D if CapsLock is ON or U otherwise.
+      if state = D
+         setcapslockstate, off
+      else
+         setcapslockstate, on
+      }
+   Else 
+      {
+      Loop
+         {
+         Sleep, 10
+         GetKeyState, keystate, CapsLock, P
+         if keystate = U
+            {
+            Send {RWin Up} 
+            Send {Control Up} 
+            break
+            }
+         }
+      }
 return
 
 
 *#::
-Send {RWin Down}
-Send {Control Down}
-Loop
-{
-   Sleep, 10
-   GetKeyState, keystate, #, P
-   if keystate = U  
-   break
-   ; The key has been released, so break out of the loop.
-}
-Send {RWin Up} 
-Send {Control Up} 
+   Send {RWin Down}
+   Send {Control Down}
+   Loop
+   {
+      Sleep, 10
+      GetKeyState, keystate, #, P
+      if keystate = U  
+         break
+   }
+   Send {RWin Up} 
+   Send {Control Up} 
 return
 
 
 ; Mod5 (5. und 6. Ebene)
-; < wird zu zweiter AltGr (SC138)
+; < wird zu zweitem AltGr (SC138)
+; < + AltGr = NumpadDot
 ; --------------------------------
-
-
+; 
+
+*SC138:: 
+   Send {Blind}{LCtrl Up}{SC138 DownTemp}
+   GetKeyState, dotstate, <, P
+   If dotstate = D  
+      {
+      keywait, SC138
+      Send {numpaddot}
+      Send {Blind}{LCtrl Up}{SC138 DownTemp}
+      }
+   Else
+      {
+      Loop
+         {
+         Sleep, 10
+         GetKeyState, keystate, SC138, P
+         If keystate = U  
+            {   
+            Send {Blind}{SC138 Up}
+            break
+            }
+         }
+      }
+return
 
 *<::
-Send {SC138 Down}
-Loop
-{
-   Sleep, 10
-   GetKeyState, keystate, <, P
-   if keystate = U  
-   break
-   ; The key has been released, so break out of the loop.
-}
-Send {SC138 Up}
+   Send {SC138 DownTemp}
+   Loop
+   {
+      Sleep, 10
+      GetKeyState, keystate, <, P
+      if keystate = U  
+         break
+   }
+   Send {SC138 Up}
 return
 
 
-
 ; Funktionen des Systray-Menüs
 ; ----------------------------
 
 toggleneo:
-   if suspendstate <>
+   If suspendstate <>
    {
       suspendstate =
       menu, tray, rename, %enable%, %disable%
    }
-   else
+   Else
    {
       suspendstate = : Deaktiviert
       menu, tray, rename, %disable%, %enable%
    }
-   menu, tray, tip, %name%%state%
+   menu, tray, tip, %name%%suspendstate%
    suspend
 return
 
-- 
cgit v1.2.3