1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
|
; -*- encoding:utf-8 -*-
; NordTast. Belegung von Ulf Bro, http://www.nordtast.org/
; Aus der Neo-Welt (AdNW) von Andreas Wettstein, http://wettstae.home.solnet.ch/
; (c) 2010 Matthias Wächter
CharProcNordTt() {
global
; Custom Layout togglen
if (isNordTast == 0) {
isNordTast := 1
CharProcNordT1()
if (zeigeModusBox)
TrayTip,NordTast-Belegungsvariante,Die Belegungsvariante NT wurde aktiviert. Zum Umschalten`, Mod3+F12 drücken.,10,1
} else if (isNordTast == 1) {
isNordTast := 2
CharProcNordT2()
if (zeigeModusBox)
TrayTip,NordTast-Belegungsvariante,Die Belegungsvariante AdNW wurde aktiviert. Zum Umschalten`, Mod3+F12 drücken.,10,1
} else if (isNordTast == 2) {
isNordTast := 3
CharProcNordT3()
if (zeigeModusBox)
TrayTip,NordTast-Belegungsvariante,Die Belegungsvariante DIEgO wurde aktiviert. Zum Umschalten`, Mod3+F12 drücken.,10,1
} else if (isNordTast == 3) {
isNordTast := 4
CharProcNordT4()
if (zeigeModusBox)
TrayTip,NordTast-Belegungsvariante,Die Belegungsvariante K.O`,Y wurde aktiviert. Zum Umschalten`, Mod3+F12 drücken.,10,1
} else {
isNordTast := 0
CharProcNordT0()
if (zeigeModusBox)
TrayTip,NordTast-Belegungsvariante,Die Belegungsvariante wurde deaktiviert.,10,1
}
}
CharProcNordT1() {
; Tastaturbelegungsvariante NordTast aktivieren
Change1256Layout("-äuobpkglmfxaietchdnrsß.,üöqyzwvj")
}
CharProcNordT2() {
; Tastaturbelegungsvariante Aus der Neo-Welt (AdNW) aktivieren
Change1256Layout("-kuü.ävgcljfhieaodtrnsßxyö,qbpwmz")
}
CharProcNordT3() {
; Tastaturbelegungsvariante DIEgO aktivieren
Change1256Layout("-puü.äjclhxzdieaogtrnsßkyö,qmvwbf")
}
CharProcNordT4() {
; Tastaturbelegungsvariante K.O,Y aktivieren
Change1256Layout("-k.o,yvgclßzhaeiudtrnsfxqäüöbpwmj")
}
CharProcNordT0() {
; Tastaturbelegungsvariante deaktivieren
Change1256LayoutNeo20()
}
CharProcNordTs() {
global
if (isNordTast == 0)
IniDelete,%ini%,Global,isNordTast
else
IniWrite,%isNordTast%,%ini%,Global,isNordTast
if ErrorLevel
TrayTip,NordTast-Belegungsvariante,Beim Speichern der Variante ist ein Fehler aufgetreten.,10,1
else if (zeigeModusBox)
TrayTip,NordTast-Belegungsvariante,Variante gespeichert.,10,1
}
ActivateNordTast() {
global
CP3F12 := "PNordTt" ; M3+F12: Aktiviere/Deaktiviere NordTast
CP4F12 := "PNordTs" ; M4+F12: Speichere NordTast
IniRead,isNordTast,%ini%,Global,isNordTast,0
if (isNordTast == 1)
CharProcNordT1()
else if (isNordTast == 2)
CharProcNordT2()
else if (isNordTast == 3)
CharProcNordT3()
else if (isNordTast == 4)
CharProcNordT4()
}
ActivateNordTast()
|