From b048475ff677b3caec168bb0d7340ad5d930d811 Mon Sep 17 00:00:00 2001
From: martin_r <martin_r@b9310e46-f624-0410-8ea1-cfbb3a30dc96>
Date: Tue, 27 Jan 2009 15:17:59 +0000
Subject: #114 fixed: Status von Numlock wird bei Unterbrechen und Beenden des
 Skripts bis zum Wiederaktivieren des Skripts wiederhergestellt

git-svn-id: https://svn.neo-layout.org@1557 b9310e46-f624-0410-8ea1-cfbb3a30dc96
---
 windows/neo-vars/src/source/initialize.ahk    | 10 ++++++----
 windows/neo-vars/src/source/trayfunctions.ahk | 27 +++++++++++++++++++--------
 2 files changed, 25 insertions(+), 12 deletions(-)

(limited to 'windows/neo-vars/src/source')

diff --git a/windows/neo-vars/src/source/initialize.ahk b/windows/neo-vars/src/source/initialize.ahk
index 1c3e82e..6de817b 100644
--- a/windows/neo-vars/src/source/initialize.ahk
+++ b/windows/neo-vars/src/source/initialize.ahk
@@ -1,7 +1,7 @@
 if (A_IsCompiled) {
-; Revisionsinformation bereits verfügbar
+; Revisionsinformation bereits verf�gbar
 } else {
-; Revisionsinformation nicht verfügbar oder nicht zuverlässig, neu generieren
+; Revisionsinformation nicht verf�gbar oder nicht zuverl�ssig, neu generieren
   if (FileExist(".svn")<>False) {
     ; .svn existiert, scheint also ausgecheckt worden zu sein
     RegRead,TSVNPath,HKLM,SOFTWARE\TortoiseSVN,Directory
@@ -31,10 +31,12 @@ if (A_IsCompiled) {
 name=Neo 2.0 r%Revision%-r%CompRevision% (%A_ScriptName%)
 enable=Aktiviere %name%
 disable=Deaktiviere %name%
-#LTrim ; Quelltext kann eingerückt werden
+#LTrim ; Quelltext kann einger�ckt werden
 
 SetCapsLockState Off
+Gosub, SaveNumLockState
 SetNumLockState Off
+OnExit, exitprogram
 SetScrollLockState Off
 KeyboardLED(2,"off") ; deaktivieren, falls sie doch brennt
 
@@ -59,7 +61,7 @@ if (inputlocalealias<>inputlocale=%inputlocalealias% and inputlocale<>00000407)
     `t%inputlocale%   
     `nDas deutsche QWERTZ muss als Standardlayout eingestellt  
     sein, damit %name% wie erwartet funktioniert.   
-    `nÄndern Sie die Tastatureinstellung unter 
+    `n�ndern Sie die Tastatureinstellung unter 
     `tSystemsteuerung   
     `t-> Regions- und Sprachoptionen   
     `t-> Sprachen 
diff --git a/windows/neo-vars/src/source/trayfunctions.ahk b/windows/neo-vars/src/source/trayfunctions.ahk
index fabf55c..d73eeb8 100644
--- a/windows/neo-vars/src/source/trayfunctions.ahk
+++ b/windows/neo-vars/src/source/trayfunctions.ahk
@@ -3,12 +3,15 @@ togglesuspend:
     menu, tray, rename, %enable%, %disable%
     menu, tray, tip, %name%
     menu, tray, icon, %ResourceFolder%\neo_enabled.ico,,1
-    suspend , off ; Schaltet Suspend aus -> NEO
+    Gosub, SaveNumLockState
+    SetNumLockState Off
+    suspend, off ; Schaltet Suspend aus -> NEO
   } else {
     menu, tray, rename, %disable%, %enable%
     menu, tray, tip, %name% : Deaktiviert
     menu, tray, icon, %ResourceFolder%\neo_disabled.ico,,1
-    suspend , on  ; Schaltet Suspend ein -> QWERTZ
+    SetNumLockState, %SavedNumLockState%
+    suspend, on  ; Schaltet Suspend ein -> QWERTZ
   }
 return
 
@@ -17,18 +20,18 @@ help:
 return
 
 about:
-  msgbox, 64, %name% – Ergonomische Tastaturbelegung, 
+  msgbox, 64, %name% � Ergonomische Tastaturbelegung, 
   (
   %name% 
-  `nDas Neo-Layout ersetzt das übliche deutsche 
+  `nDas Neo-Layout ersetzt das �bliche deutsche 
   Tastaturlayout mit der Alternative Neo, 
   beschrieben auf http://neo-layout.org/. 
-  `nDazu sind keine Administratorrechte nötig. 
+  `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, 
+  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 
+  `nDie Zeichen�bersetzung kann leicht �ber das Icon im 
   Systemtray deaktiviert werden.  `n
   )
 return
@@ -58,6 +61,14 @@ hide:
 return
 
 exitprogram:
+  SetNumLockState, %SavedNumLockState%
   exitapp
 return
 
+SaveNumLockState:
+  if GetKeyState("NumLock","T")
+    SavedNumLockState = On
+  else
+    SavedNumLockState = Off
+return
+
-- 
cgit v1.2.3