From 15b42908ddc1634edb485e449fa77e7ed2a8169c Mon Sep 17 00:00:00 2001
From: martin_r <martin_r@b9310e46-f624-0410-8ea1-cfbb3a30dc96>
Date: Tue, 12 Aug 2008 00:03:21 +0000
Subject: Zerschossene Lang-s-Tastatur wiederhergestellt Esc(4) setzt Tastatur
 zurück Variablen Ebene7 und Ebene8 zum Abfragen eingeführt #(2L)-Bug behoben
 Korrektur gelesen
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://svn.neo-layout.org@746 b9310e46-f624-0410-8ea1-cfbb3a30dc96
---
 windows/autohotkey/Source/Methods-Other.ahk | 41 +++++++----------------------
 1 file changed, 9 insertions(+), 32 deletions(-)

(limited to 'windows/autohotkey/Source/Methods-Other.ahk')

diff --git a/windows/autohotkey/Source/Methods-Other.ahk b/windows/autohotkey/Source/Methods-Other.ahk
index 86983c6..e80d2e4 100644
--- a/windows/autohotkey/Source/Methods-Other.ahk
+++ b/windows/autohotkey/Source/Methods-Other.ahk
@@ -1,7 +1,5 @@
 /*
-   ------------------------------------------------------
-   Funktionen
-   ------------------------------------------------------
+  Funktionen
 */
 
 /*
@@ -19,6 +17,8 @@ EbeneAktualisieren()
    DeadKey := ""
    CompKey := ""
    Ebene12 := 0
+   Ebene7 := 0
+   Ebene8 := 0
    Modstate := IsShiftPressed() . IsMod3Pressed() . IsMod4Pressed()
 
    if (ahkTreiberKombi)
@@ -40,9 +40,15 @@ EbeneAktualisieren()
      else if (Modstate = "011")
          Ebene = 6                 ; Ebene 6: Mod3+Mod4
      else if (Modstate = "101")
+     {
          Ebene = 4                 ; Ebene 7: Shift+Mod4 impliziert Ebene 4
+         Ebene7 = 1
+     }
      else if (Modstate = "111")
+     {
          Ebene = 6                 ; Ebene 8: Shift+Mod3+Mod4 impliziert Ebene 6
+         Ebene8 = 1
+     }
 
    Ebene12 := ((Ebene = 1) or (Ebene = 2))
 
@@ -53,7 +59,6 @@ EbeneAktualisieren()
 }
 
 
-
 IsShiftPressed()
 {
   return GetKeyState("Shift","P")
@@ -149,8 +154,6 @@ EncodeInteger(ref, val)
    DllCall("ntdll\RtlFillMemoryUlong", "Uint", ref, "Uint", 4, "Uint", val)
 }
 
-DeadSilence = 0
-
 deadAsc(val)
 {
   global
@@ -256,8 +259,6 @@ CheckDeadUni12(d,val1,val2)
     return 0
 }
 
-DeadCompose = 0
-
 compAsc(val)
 {
   global
@@ -417,28 +418,4 @@ outputChar(val1,val2)
     CompKey := c
 }
 
-;Tote/Untote Tasten
-*F9::
-  if (isMod4pressed())
-    DeadSilence :=  not(DeadSilence)
-  else
-    send {blind}{F9}
-return
-
-;Tote/Untote Compose
-*F10::
-  if (isMod4pressed())
-    DeadCompose :=  not(DeadCompose)
-  else
-    send {blind}{F10}
-return
-
-;Lang-s-Tastatur:
-*F11::
-  if (isMod4pressed())
-    LangSTastatur := not(LangSTastatur) ; schaltet die Lang-s-Tastatur ein und aus
-  else
-    send {blind}{F11}
-return
-
 
-- 
cgit v1.2.3