On 09.09.2010 10:34, Matthias Wächter wrote:
> On 08.09.2010 20:31, Arne Babenhauserheide wrote:
>> Hier erstmal die Auflösung: Die Layouts sind: 
>>
>> #### 20 ####
>> xuc.ö vdsljq´
>> fiaeo mtrnhk
>> ,üzäy bgßwp 

Der Vollständigkeit Halvar: VDSL hier für neo-vars.

– Mœsi
; -*- encoding:utf-8 -*-
; TEAIU
; (c) 2010 Matthias Wächter


CharProc__TEAt() {
  global
  ; Custom Layout togglen
  isCustom := !(isCustom)
  if (isCustom) {
    CharProc__TEA1()
    if (zeigeModusBox)
      TrayTip,Custom-Belegungsvariante,Die Belegungsvariante wurde aktiviert. 
Zum Deaktivieren`, Mod3+F8 druecken.,10,1
  } else {
    CharProc__TEA0()
    if (zeigeModusBox)
      TrayTip,Custom-Belegungsvariante,Die Belegungsvariante wurde 
deaktiviert.,10,1
  }
}

CharProc__TEA1() {
  global
  ; Tastaturbelegungsvariante aktivieren
  ED12("010",1,"x","X")
  ED12("011",1,"u","U")
  ED12("012",1,"c","C")
  ED12("013",0,".","•")
  ED12("014",1,"ö","Ö")
  ED12("015",1,"v","V")
  ED12("016",1,"d","D")
  ED12("017",1,"s","S")
  ED12("018",1,"l","L")
  ED12("019",1,"j","J")
  ED12("01A",1,"q","Q")

  ED12("01E",1,"f","F")
  ED12("01F",1,"i","I")
  ED12("020",1,"a","A")
  ED12("021",1,"e","E")
  ED12("022",1,"o","O")
  ED12("023",1,"m","M")
  ED12("024",1,"t","T")
  ED12("025",1,"r","R")
  ED12("026",1,"n","N")
  ED12("027",1,"h","H")
  ED12("028",1,"k","K")

  ED12("02C",0,",","–")
  ED12("02D",1,"ü","Ü")
  ED12("02E",1,"z","Z")
  ED12("02F",1,"ä","Ä")
  ED12("030",1,"y","Y")
  ED12("031",1,"b","B")
  ED12("032",1,"g","G")
  ED12("033",1,"ß","ẞ")
  ED12("034",1,"w","W")
  ED12("035",1,"p","P")
}

CharProc__TEA0() {
  global
  ; Tastaturbelegungsvariante deaktivieren
  ED12("010",1,"x","X")
  ED12("011",1,"v","V")
  ED12("012",1,"l","L")
  ED12("013",1,"c","C")
  ED12("014",1,"w","W")
  ED12("015",1,"k","K")
  ED12("016",1,"h","H")
  ED12("017",1,"g","G")
  ED12("018",1,"f","F")
  ED12("019",1,"q","Q")
  ED12("01A",1,"ß","ẞ")

  ED12("01E",1,"u","U")
  ED12("01F",1,"i","I")
  ED12("020",1,"a","A")
  ED12("021",1,"e","E")
  ED12("022",1,"o","O")
  ED12("023",1,"s","S")
  ED12("024",1,"n","N")
  ED12("025",1,"r","R")
  ED12("026",1,"t","T")
  ED12("027",1,"d","D")
  ED12("028",1,"y","Y")

  ED12("02C",1,"ü","Ü")
  ED12("02D",1,"ö","Ö")
  ED12("02E",1,"ä","Ä")
  ED12("02F",1,"p","P")
  ED12("030",1,"z","Z")
  ED12("031",1,"b","B")
  ED12("032",1,"m","M")
  ED12("033",0,",","–")
  ED12("034",0,".","•")
  ED12("035",1,"j","J")
}

ActivateCustomLayout() {
  global

  CP3F8  := "P__TEAt"    ; M3+F8: Aktiviere/Deaktiviere Belegungsvariante

  IniRead,isCustom,%ini%,Global,isCustom,0
  if (isCustom)
    CharProc__TEA1()
}

ActivateCustomLayout()

Antwort per Email an