neora

Custom.ahk für NEO-TECK-Belegungsvariante

Jan 18th, 2012
143
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ; -*- encoding:utf-8 -*-
  2. ; NEO-TECK für Truly Ergonomic Computer Keyboard
  3. ; (c) 2012
  4.  
  5. CharProc__ECKt() {
  6.   global
  7.   ; Custom Layout togglen
  8.   isECK := !(isECK)
  9.   if (isECK) {
  10.     CharProc__ECK1()
  11.     if (zeigeModusBox)
  12.       TrayTip,NEO-TECK-Belegungsvariante,Die Belegungsvariante wurde aktiviert. Zum Deaktivieren`, Mod3+F8 druecken.,10,1
  13.   } else {
  14.     CharProc__ECK0()
  15.     if (zeigeModusBox)
  16.       TrayTip,NEO-TECK-Belegungsvariante,Die Belegungsvariante wurde deaktiviert.,10,1
  17.   }
  18. }
  19.  
  20. CharProc__ECK1() {
  21.   global
  22.   ; NEO-TECK-Tastaturbelegungsvariante aktivieren
  23.   ED12("028",1,"j","J")
  24.   ED12("035",1,"y","Y")
  25. }
  26.  
  27. CharProc__ECK0() {
  28.   global
  29.   ; NEO-TECK-Tastaturbelegungsvariante deaktivieren
  30.   ED12("028",1,"y","Y")
  31.   ED12("035",1,"j","J")
  32. }
  33.  
  34. ActivateNEOTECK() {
  35.   global
  36.  
  37.   CP3F8  := "P__ECKt"                   ; M3+F8: Aktiviere/Deaktiviere NEO-TECK
  38.  
  39.   IniRead,isTECK,%ini%,Global,isTECK,0
  40.   if (isTECK)
  41.     CharProc__ECK1()
  42. }
  43.  
  44. ActivateNEOTECK()
RAW Paste Data