1 files changed, 89 insertions, 0 deletions
diff --git a/windows/neo-vars/src/source/lernmodus.ahk b/windows/neo-vars/src/source/lernmodus.ahk
new file mode 100644
index 0000000..fa35d57
--- /dev/null
+++ b/windows/neo-vars/src/source/lernmodus.ahk
@@ -0,0 +1,89 @@
+; die Nachfolgenden sind nützlich um sich die Qwertz-Tasten abzugewöhnen, da alle auf der 4. Ebene vorhanden.
+lernModus_std_Return := 0
+lernModus_std_Backspace := 0
+lernModus_std_PgUp := 0
+lernModus_std_PgDn := 0
+lernModus_std_Einf := 0
+lernModus_std_Entf := 0
+lernModus_std_Pos0 := 0
+lernModus_std_Ende := 0
+lernModus_std_Hoch := 0
+lernModus_std_Runter := 0
+lernModus_std_Links := 0
+lernModus_std_Rechts := 0
+lernModus_std_ZahlenReihe := 0
+lernModus_neo_Backspace := 0
+lernModus_neo_Entf := 1
+
+CP3F9 := "P_LMt"
+IniRead,lernModus,%ini%,Global,lernModus,0
+If (lernModus)
+  CharProc_LM1()
+
+
+CharProc_LMt() {
+  global
+  ; Lernmodus togglen
+  lernModus := !(lernModus)
+  if (lernModus) {
+    CharProc_LM1()
+    if (zeigeModusBox)
+      TrayTip,NEO-Lernmodus,NEO-Lernmodus wurde aktiviert. Zum Deaktivieren`, Mod3+F9 drücken.,10,1
+  } else {
+    CharProc_LM0()
+    if (zeigeModusBox)
+      TrayTip,NEO-Lernmodus,Lernmodus wurde deaktiviert.,10,1
+  }
+}
+
+CharProc_LM1() {
+  global
+  ; Lernmodus aktivieren
+  if (!lernModus_std_Return)
+    ED1("enter","")
+  if (!lernModus_std_Backspace)
+    ED1("backspace","")
+  if (!lernModus_std_PgUp)
+    ED1("pgup","")
+  if (!lernModus_std_PgDn)
+    ED1("pgdn","")
+  if (!lernModus_std_Einf)
+    ED1("ins","")
+  if (!lernModus_std_Entf)
+    ED1("del","")
+  if (!lernModus_std_Pos0)
+    ED1("home","")
+  if (!lernModus_std_Ende)
+    ED1("end","")
+  if (!lernModus_std_Hoch)
+    ED1("up","")
+  if (!lernModus_std_Runter)
+    ED1("down","")
+  if (!lernModus_std_Links)
+    ED1("left","")
+  if (!lernModus_std_Rechts)
+    ED1("right","")
+  if (!lernModus_neo_Backspace)
+    CP4VK57SC011 := "" ; Ebene 4 unter v (QWERTZ: w)
+  if (!lernModus_neo_Entf)
+    CP4VK52SC013 := "" ; Ebene 4 unter c (QWERTZ: r)
+}
+
+CharProc_LM0() {
+  global
+  ; Lernmodus deaktivieren
+  ED1("enter"    ,"U000D")
+  ED1("backspace","U0008")
+  ED1("pgup"     ,"SPgUp")
+  ED1("pgdn"     ,"SPgDn")
+  ED1("ins"      ,"S_Ins")
+  ED1("del"      ,"S_Del")
+  ED1("home"     ,"SHome")
+  ED1("end"      ,"S_End")
+  ED1("up"       ,"S__Up")
+  ED1("down"     ,"SDown")
+  ED1("left"     ,"SLeft")
+  ED1("right"    ,"SRght")
+  CP4VK57SC011 := "U0008"
+  CP4VK52SC013 := "S_Del"
+}