diff options
author | martin_r <martin_r@b9310e46-f624-0410-8ea1-cfbb3a30dc96> | 2008-10-18 00:03:14 +0000 |
---|---|---|
committer | martin_r <martin_r@b9310e46-f624-0410-8ea1-cfbb3a30dc96> | 2008-10-18 00:03:14 +0000 |
commit | e5d78780552652af2fe4114363575d8c613bee28 (patch) | |
tree | 431dbf2f400867c1f4dd65db9350126080b61254 /windows | |
parent | 263879a3062d6f84007b2f6ca3193301d8809fb5 (diff) |
Aktualisierung der toten Tasten abgeschlossen
git-svn-id: https://svn.neo-layout.org@1016 b9310e46-f624-0410-8ea1-cfbb3a30dc96
Diffstat (limited to 'windows')
-rw-r--r-- | windows/autohotkey/Changelog-and-Todo.txt | 2 | ||||
-rw-r--r-- | windows/autohotkey/Source/Keys-Neo.ahk | 213 | ||||
-rw-r--r-- | windows/autohotkey/Source/Keys-NumPad.ahk | 4 | ||||
-rw-r--r-- | windows/autohotkey/Source/Keys-Numbers.ahk | 22 | ||||
-rw-r--r-- | windows/autohotkey/Source/Keys-Special.ahk | 4 | ||||
-rw-r--r-- | windows/autohotkey/neo20.ahk | 1557 | ||||
-rw-r--r-- | windows/autohotkey/neo20.exe | bin | 440165 -> 440271 bytes |
7 files changed, 899 insertions, 903 deletions
diff --git a/windows/autohotkey/Changelog-and-Todo.txt b/windows/autohotkey/Changelog-and-Todo.txt index 00798d7..13488aa 100644 --- a/windows/autohotkey/Changelog-and-Todo.txt +++ b/windows/autohotkey/Changelog-and-Todo.txt @@ -23,6 +23,8 @@ Matthias Wächter <matthias (at) waechter.wiz. a t> === Änderungshistorie ===
+Revision 1016 (von Martin Roppelt)
+- Tote Tasten fertig angepasst.
Revision 993 (von Martin Roppelt)
- Tote Tasten aktualisiert.
Revision 953 (von Martin Roppelt)
diff --git a/windows/autohotkey/Source/Keys-Neo.ahk b/windows/autohotkey/Source/Keys-Neo.ahk index b5e340f..38fcc8e 100644 --- a/windows/autohotkey/Source/Keys-Neo.ahk +++ b/windows/autohotkey/Source/Keys-Neo.ahk @@ -20,7 +20,13 @@ neo_a: OutputChar("{{}", "braceleft")
else if (Ebene = 4)
OutputChar("{Down}", "Down")
- else if (Ebene = 5 and !(CheckDeadUni("g5",0x1F01)
+ else if (Ebene = 5 and !(CheckDeadUni("c1",0x1FB6)
+ or CheckDeadUni("c5",0x1FB0)
+ or CheckDeadUni("c6",0x1FB1)
+ or CheckDeadUni("g1",0x1F70)
+ or CheckDeadUni("g5",0x1F01)
+ or CheckDeadUni("a1",0x03AC)
+ or CheckDeadUni("a2",0x1FB3)
or CheckDeadUni("a5",0x1F00)))
SendUnicodeChar(0x03B1, "Greek_alpha") ; alpha
else if (Ebene = 6)
@@ -65,7 +71,7 @@ return neo_d:
EbeneAktualisieren()
if (Ebene12 and !(CheckDeadUni12("c1",0x1E13,0x1E12)
- or CheckDeadUni("c2",0x1D6D)
+ or CheckDeadUni( "c2",0x1D6D)
or CheckDeadUni12("c4",0x010F,0x010E)
or CheckDeadUni12("g3",0x1E0D,0x1E0C)
or CheckDeadUni12("a1",0x00F0,0x00D0)
@@ -108,18 +114,17 @@ return neo_f:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E1F,0x1E1E)
- or CheckDeadUni12("t4",0x0192,0x0191)))
+ if (Ebene12 and !(CheckDeadUni12("a6",0x1E1F,0x1E1E)))
OutputChar12("f","F","f","F")
- else if ((Ebene = 3) and !(CheckDeadUni("a6",0x2257) ; ring equal to
- or CheckDeadUni("c1",0x2259) ; entspricht
- or CheckDeadUni("c2",0x225A) ; EQUIANGULAR TO
- or CheckDeadUni("t2",0x2261) ; identisch
- or CheckDeadUni("t1",0x2245) ; ungefähr gleich
- or CheckDeadUni("t4",0x2260))) ; ungleich
+ else if ((Ebene = 3) and !(CheckDeadUni("c1",0x2259) ; entspricht
+ or CheckDeadUni("c2",0x2245) ; ungefähr gleich
+ or CheckDeadUni("c3",0x2257) ; ring equal to
+ or CheckDeadUni("c4",0x225A) ; EQUIANGULAR TO
+ or CheckDeadUni("c6",0x2261) ; identisch
+ or CheckDeadUni("a3",0x2260))) ; ungleich
OutputChar("`=", "equal")
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2079)
- or CheckDeadUni("t4",0x2089)))
+ or CheckDeadUni("a3",0x2089)))
OutputChar("{Numpad9}", "KP_9")
else if (Ebene = 5)
SendUnicodeChar(0x03C6, "Greek_phi") ; phi
@@ -129,15 +134,15 @@ return neo_g:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a3",0x0123,0x0122)
- or CheckDeadUni12("a4",0x0121,0x0120)
- or CheckDeadUni12("c1",0x011D,0x011C)
- or CheckDeadUni12("c3",0x011F,0x011E)))
+ if (Ebene12 and !(CheckDeadUni12("c1",0x011D,0x011C)
+ or CheckDeadUni12("c5",0x011F,0x011E)
+ or CheckDeadUni12("a2",0x0123,0x0122)
+ or CheckDeadUni12("a6",0x0121,0x0120)))
OutputChar12("g","G","g","G")
- else if ((Ebene = 3) and !(CheckDeadUni("t4",0x2265))) ; größer gleich
+ else if ((Ebene = 3) and !(CheckDeadUni("a3",0x2265))) ; größer gleich
OutputChar(">", "greater")
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2078)
- or CheckDeadUni("t4",0x2088)))
+ or CheckDeadUni("a3",0x2088)))
OutputChar("{Numpad8}", "KP_8")
else if (Ebene = 5)
SendUnicodeChar(0x03B3, "Greek_gamma") ; gamma
@@ -147,15 +152,14 @@ return neo_h:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E23,0x1E22)
- or CheckDeadUni12("c1",0x0125,0x0124)
- or CheckDeadUni12("c5",0x0127,0x0126)
- or CheckDeadUni12("c6",0x1E25,0x1E24)))
+ if (Ebene12 and !(CheckDeadUni12("c1",0x0125,0x0124)
+ or CheckDeadUni12("a3",0x0127,0x0126)
+ or CheckDeadUni12("a6",0x1E23,0x1E22)))
OutputChar12("h","H","h","H")
- else if ((Ebene = 3) and !(CheckDeadUni("t4",0x2264))) ; kleiner gleich
+ else if ((Ebene = 3) and !(CheckDeadUni("a3",0x2264))) ; kleiner gleich
OutputChar("<", "less")
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2077)
- or CheckDeadUni("t4",0x2087)))
+ or CheckDeadUni("a3",0x2087)))
OutputChar("{Numpad7}", "KP_7")
else if (Ebene = 5)
SendUnicodeChar(0x03C8, "Greek_psi") ; psi
@@ -165,16 +169,16 @@ return neo_i:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00ED,0x00CD)
- or CheckDeadUni12("a2",0x00EC,0x00CC)
- or CheckDeadUni12("a4",0x012F,0x012E)
- or CheckDeadUni12("a5",0x0131,0x0130)
- or CheckDeadUni12("c1",0x00EE,0x00CE)
- or CheckDeadUni12("c2",0x01D0,0x01CF)
- or CheckDeadUni12("c3",0x012D,0x012C)
- or CheckDeadUni12("t1",0x0129,0x0128)
- or CheckDeadUni12("t2",0x012B,0x012A)
- or CheckDeadAsc12("t3","ï","Ï")))
+ if (Ebene12 and !(CheckDeadUni12("c1",0x00EE,0x00CE)
+ or CheckDeadUni12("c2",0x0129,0x0128)
+ or CheckDeadUni12("c4",0x01D0,0x01CF)
+ or CheckDeadUni12("c5",0x012D,0x012C)
+ or CheckDeadUni12("c6",0x012B,0x012A)
+ or CheckDeadUni12("g1",0x00EC,0x00CC)
+ or CheckDeadAsc12("g3","ï","Ï")
+ or CheckDeadUni12("a1",0x00ED,0x00CD)
+ or CheckDeadUni12("a2",0x0131,0x0130)
+ or CheckDeadUni12("a6",0x012F,0x012E)))
OutputChar12("i","I","i","I")
else if (Ebene = 3)
OutputChar("`/", "slash")
@@ -189,7 +193,7 @@ return neo_j:
EbeneAktualisieren()
if (Ebene12 and !(CheckDeadUni12("c1",0x0135,0x0134)
- or CheckDeadUni("c2",0x01F0)))
+ or CheckDeadUni( "c4",0x01F0)))
OutputChar12("j","J","j","J")
else if (Ebene = 3)
OutputChar("`;", "semicolon")
@@ -203,8 +207,8 @@ return neo_k:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a3",0x0137,0x0136)
- or CheckDeadUni12("c6",0x1E33,0x1E32)))
+ if (Ebene12 and !(CheckDeadUni12("a2",0x0137,0x0136)
+ or CheckDeadUni12("a6",0x1E33,0x1E32)))
OutputChar12("k","K","k","K")
else if (Ebene = 3)
OutputChar("{!}", "exclam")
@@ -218,12 +222,11 @@ return neo_l:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x013A,0x0139)
- or CheckDeadUni12("a3",0x013C,0x013B)
- or CheckDeadUni12("c2",0x013E,0x013D)
- or CheckDeadUni12("c4",0x0140,0x013F)
- or CheckDeadUni12("c6",0x1E37,0x1E36)
- or CheckDeadUni12("t4",0x0142,0x0141)))
+ if (Ebene12 and !(CheckDeadUni12("c4",0x013E,0x013D)
+ or CheckDeadUni12("a1",0x013A,0x0139)
+ or CheckDeadUni12("a2",0x013C,0x013B)
+ or CheckDeadUni12("a3",0x0142,0x0141)
+ or CheckDeadUni12("a6",0x1E37,0x1E36)))
OutputChar12("l","L","l","L")
else if (Ebene = 3)
OutputChar("[", "bracketleft")
@@ -237,13 +240,12 @@ return neo_m:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E41,0x1E40)
- or CheckDeadUni12("c6",0x1E43,0x1E42)))
+ if (Ebene12 and !CheckDeadUni12("a6",0x1E41,0x1E40))
OutputChar12("m","M","m","M")
else if (Ebene = 3)
OutputChar("`%", "percent")
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x00B9)
- or CheckDeadUni("t4",0x2081)))
+ or CheckDeadUni("a3",0x2081)))
OutputChar("{Numpad1}", "KP_1")
else if (Ebene = 5)
SendUnicodeChar(0x03BC, "Greek_mu") ; griechisch mu, micro wäre 0x00B5
@@ -253,16 +255,16 @@ return neo_n:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x0144,0x0143)
- or CheckDeadUni12("a3",0x0146,0x0145)
- or CheckDeadUni12("a4",0x1E45,0x1E44)
- or CheckDeadUni12("c2",0x0148,0x0147)
- or CheckDeadUni12("t1",0x00F1,0x00D1)))
+ if (Ebene12 and !(CheckDeadUni12("c2",0x00F1,0x00D1)
+ or CheckDeadUni12("c4",0x0148,0x0147)
+ or CheckDeadUni12("a1",0x0144,0x0143)
+ or CheckDeadUni12("a2",0x0146,0x0145)
+ or CheckDeadUni12("a6",0x1E45,0x1E44)))
OutputChar12("n","N","n","N")
else if (Ebene = 3)
OutputChar("(", "parenleft")
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2074)
- or CheckDeadUni("t4",0x2084)))
+ or CheckDeadUni("a3",0x2084)))
OutputChar("{Numpad4}", "KP_4")
else if (Ebene = 5)
SendUnicodeChar(0x03BD, "Greek_nu") ; nu
@@ -272,17 +274,17 @@ return neo_o:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00F3,0x00D3)
- or CheckDeadUni12("a2",0x00F2,0x00D2)
- or CheckDeadUni12("a5",0x01EB,0x01EA)
- or CheckDeadUni12("c1",0x00F4,0x00D4)
- or CheckDeadUni12("c2",0x01D2,0x01D1)
- or CheckDeadUni12("c3",0x014F,0x014E)
- or CheckDeadUni12("t1",0x00F5,0x00D5)
- or CheckDeadUni12("t2",0x014D,0x014C)
- or CheckDeadAsc12("t3","ö","Ö")
- or CheckDeadUni12("t4",0x00F8,0x00D8)
- or CheckDeadUni12("t5",0x0151,0x0150)))
+ if (Ebene12 and !(CheckDeadUni12("c1",0x00F4,0x00D4)
+ or CheckDeadUni12("c2",0x00F5,0x00D5)
+ or CheckDeadUni12("c4",0x01D2,0x01D1)
+ or CheckDeadUni12("c5",0x014F,0x014E)
+ or CheckDeadUni12("c6",0x014D,0x014C)
+ or CheckDeadUni12("g1",0x00F2,0x00D2)
+ or CheckDeadAsc12("g3","ö","Ö")
+ or CheckDeadUni12("a1",0x00F3,0x00D3)
+ or CheckDeadUni12("a2",0x01EB,0x01EA)
+ or CheckDeadUni12("a3",0x00F8,0x00D8)
+ or CheckDeadUni12("a4",0x0151,0x0150)))
OutputChar12("o","O","o","O")
else if (Ebene = 3)
OutputChar("*", "asterisk")
@@ -296,9 +298,9 @@ return neo_p:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E57,0x1E56)))
+ if (Ebene12 and !(CheckDeadUni12("a6",0x1E57,0x1E56)))
OutputChar12("p","P","p","P")
- else if ((Ebene = 3) and !(CheckDeadUni("t1",0x2248)))
+ else if ((Ebene = 3) and !(CheckDeadUni("c2",0x2248)))
OutputChar("~", "asciitilde")
else if (Ebene = 4)
OutputChar("{Enter}", "Return")
@@ -315,8 +317,8 @@ neo_q: else if (Ebene = 3)
OutputChar("{&}", "ampersand")
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x207A)
- or CheckDeadUni("c5",0x208A)))
- OutputChar("{NumPadAdd}", "plus") ; !!!
+ or CheckDeadUni("a3",0x208A)))
+ OutputChar("{NumPadAdd}", "KP_Add")
else if (Ebene = 5)
SendUnicodeChar(0x03D5, "U03D5") ; phi symbol (varphi)
else if (Ebene = 6)
@@ -325,16 +327,16 @@ return neo_r:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x0155,0x0154)
- or CheckDeadUni12("a3",0x0157,0x0156)
- or CheckDeadUni12("a4",0x0E59,0x0E58)
- or CheckDeadUni12("c2",0x0159,0x0158)
- or CheckDeadUni12("t3",0x1E5B,0x1E5A)))
+ if (Ebene12 and !(CheckDeadUni12("c4",0x0159,0x0158)
+ or CheckDeadUni12("g3",0x1E5B,0x1E5A)
+ or CheckDeadUni12("a1",0x0155,0x0154)
+ or CheckDeadUni12("a2",0x0157,0x0156)
+ or CheckDeadUni12("a6",0x0E59,0x0E58)))
OutputChar12("r","R","r","R")
else if (Ebene = 3)
OutputChar(")", "parenright")
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2075)
- or CheckDeadUni("t4",0x2085)))
+ or CheckDeadUni("a3",0x2085)))
OutputChar("{Numpad5}", "KP_5")
else if (Ebene = 5)
SendUnicodeChar(0x03F1, "U03F1") ; rho symbol (varrho)
@@ -344,12 +346,12 @@ return neo_s:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x015B,0x015A)
- or CheckDeadUni12("a3",0x015F,0x015E)
- or CheckDeadUni12("a4",0x1E61,0x1E60)
+ if (Ebene12 and !LangSTastatur and !(CheckDeadUni12("a1",0x015B,0x015A)
+ or CheckDeadUni12("a2",0x015F,0x015E)
+ or CheckDeadUni12("a6",0x1E61,0x1E60)
or CheckDeadUni12("c1",0x015D,0x015C)
- or CheckDeadUni12("c2",0x0161,0x0160)
- or CheckDeadUni12("c6",0x1E63,0x1A62))) {
+ or CheckDeadUni12("c4",0x0161,0x0160)
+ or CheckDeadUni12("a6",0x1E63,0x1A62))) {
if LangSTastatur and (Ebene = 1)
SendUnicodeChar(0x017F, "17F") ; langes s
else OutputChar12("s","S","s","S")
@@ -369,12 +371,10 @@ return neo_t:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a3",0x0163,0x0162)
- or CheckDeadUni12("a4",0x1E6B,0x1E6A)
- or CheckDeadUni12("c2",0x0165,0x0164)
- or CheckDeadUni12("c5",0x0167,0x0166)
- or CheckDeadUni12("t4",0x1E6D,0x1E6C)
- or CheckDeadUni("t3",0x1E97)))
+ if (Ebene12 and !(CheckDeadUni12("a2",0x0163,0x0162)
+ or CheckDeadUni12("a6",0x1E6B,0x1E6A)
+ or CheckDeadUni12("c4",0x0165,0x0164)
+ or CheckDeadUni( "g3",0x1E97)))
OutputChar12("t","T","t","T")
else if (Ebene = 3)
OutputChar("-", "minus") ; Bisstrich
@@ -389,17 +389,17 @@ return neo_u:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00FA,0x00DA)
- or CheckDeadUni12("a2",0x00F9,0x00D9)
- or CheckDeadUni12("a5",0x0173,0x0172)
- or CheckDeadUni12("a6",0x016F,0x016E)
- or CheckDeadUni12("c1",0x00FB,0x00DB)
- or CheckDeadUni12("c2",0x01D4,0x01D3)
- or CheckDeadUni12("c3",0x016D,0x016C)
- or CheckDeadUni12("t1",0x0169,0x0168)
- or CheckDeadUni12("t2",0x016B,0x016A)
- or CheckDeadAsc12("t3","ü","Ü")
- or CheckDeadUni12("t5",0x0171,0x0170)))
+ if (Ebene12 and !(CheckDeadUni12("c1",0x00FB,0x00DB)
+ or CheckDeadUni12("c2",0x0169,0x0168)
+ or CheckDeadUni12("c3",0x016F,0x016E)
+ or CheckDeadUni12("c4",0x01D4,0x01D3)
+ or CheckDeadUni12("c5",0x016D,0x016C)
+ or CheckDeadUni12("c6",0x016B,0x016A)
+ or CheckDeadUni12("g1",0x00F9,0x00D9)
+ or CheckDeadAsc12("g3","ü","Ü")
+ or CheckDeadUni12("a1",0x00FA,0x00DA)
+ or CheckDeadUni12("a2",0x0173,0x0172)
+ or CheckDeadUni12("a4",0x0171,0x0170)))
OutputChar12("u","U","u","U")
else if (Ebene = 3)
OutputChar("\", "backslash")
@@ -411,7 +411,7 @@ return neo_v:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("c6",0x1E7F,0x1E7E)))
+ if (Ebene12 and !(CheckDeadUni12("a6",0x1E7F,0x1E7E)))
OutputChar12("v","V","v","V")
else if (Ebene = 3)
OutputChar("_","underscore")
@@ -451,9 +451,9 @@ return neo_y:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00FD,0x00DD)
- or CheckDeadUni12("c1",0x0177,0x0176)
- or CheckDeadAsc12("t3","ÿ","Ÿ")))
+ if (Ebene12 and !(CheckDeadUni12("c1",0x0177,0x0176)
+ or CheckDeadAsc12("g3","ÿ","Ÿ")
+ or CheckDeadUni12("a1",0x00FD,0x00DD)))
OutputChar12("y","Y","y","Y")
else if (Ebene = 3)
OutputChar("@", "at")
@@ -468,12 +468,13 @@ return neo_z:
EbeneAktualisieren()
if (Ebene12 and !(CheckDeadUni12("a1",0x017A,0x0179)
- or CheckDeadUni12("a4",0x017C,0x017B)
- or CheckDeadUni12("c2",0x017E,0x017D)
- or CheckDeadUni12("c6",0x1E93,0x1E92)))
+ or CheckDeadUni12("a6",0x017C,0x017B)
+ or CheckDeadUni12("c4",0x017E,0x017D)))
OutputChar12("z","Z","z","Z")
else if (Ebene = 3)
OutputChar("``{space}", "grave") ; untot
+ else if (Ebene = 4)
+ send {Ctrl down}z{Ctrl up}
else if (Ebene = 5)
SendUnicodeChar(0x03B6, "Greek_zeta") ; zeta
else if (Ebene = 6)
@@ -482,7 +483,7 @@ return neo_ä:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("t2",0x01DF,0x01DE)))
+ if (Ebene12 and !(CheckDeadUni12("c6",0x01DF,0x01DE)))
OutputChar12("ä","Ä","adiaeresis","Adiaeresis")
else if (Ebene = 3)
OutputChar("|", "bar")
@@ -496,7 +497,7 @@ return neo_ö:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("t2",0x022B,0x022A)))
+ if (Ebene12 and !(CheckDeadUni12("c6",0x022B,0x022A)))
OutputChar12("ö","Ö","odiaeresis","Odiaeresis")
else if (Ebene = 3)
OutputChar("$", "dollar")
@@ -509,9 +510,9 @@ return neo_ü:
EbeneAktualisieren()
if (Ebene12 and !(CheckDeadUni12("a1",0x01D8,0x01D7)
- or CheckDeadUni12("a2",0x01DC,0x01DB)
- or CheckDeadUni12("c2",0x01DA,0x01D9)
- or CheckDeadUni12("t2",0x01D6,0x01D5)))
+ or CheckDeadUni12("g1",0x01DC,0x01DB)
+ or CheckDeadUni12("c4",0x01DA,0x01D9)
+ or CheckDeadUni12("c6",0x01D6,0x01D5)))
OutputChar12("ü","Ü","udiaeresis","Udiaeresis")
else if (Ebene = 3)
if isMod2Locked
diff --git a/windows/autohotkey/Source/Keys-NumPad.ahk b/windows/autohotkey/Source/Keys-NumPad.ahk index a9fdaef..293447d 100644 --- a/windows/autohotkey/Source/Keys-NumPad.ahk +++ b/windows/autohotkey/Source/Keys-NumPad.ahk @@ -203,7 +203,7 @@ return neo_NumpadSub:
EbeneAktualisieren()
if (Ebene12 and !(CheckDeadUni("c1",0x207B)
- or CheckDeadUni("t4",0x208B)))
+ or CheckDeadUni("a3",0x208B)))
send {blind}{NumpadSub}
else if (Ebene = 3)
SendUnicodeChar(0x2212, "U2212") ; Echtes Minus
@@ -218,7 +218,7 @@ return neo_NumpadAdd:
EbeneAktualisieren()
if (Ebene12 and !(CheckDeadUni("c1",0x207A)
- or CheckDeadUni("c5",0x208A)))
+ or CheckDeadUni("a3",0x208A)))
send {blind}{NumpadAdd}
else if (Ebene = 3)
OutputChar("±", "plusminus")
diff --git a/windows/autohotkey/Source/Keys-Numbers.ahk b/windows/autohotkey/Source/Keys-Numbers.ahk index 26f70f6..e4f5641 100644 --- a/windows/autohotkey/Source/Keys-Numbers.ahk +++ b/windows/autohotkey/Source/Keys-Numbers.ahk @@ -2,12 +2,12 @@ neo_0: noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x2070) ; Hochgestellte 0
- or CheckDeadUni("c5",0x2080)) ; Tiefgestellte 0
+ or CheckDeadUni("a3",0x2080)) ; Tiefgestellte 0
OutputChar12(0,"”",0,"rightdoublequotemark")
else if (Ebene = 3)
OutputChar("’", "rightsingleqoutemark")
else if (Ebene = 4)
- OutputChar("{NumpadSub}", "minus") ; s. Mail vom Sun, 14 Sep 2008 00:33:47 +0200
+ OutputChar("{NumpadSub}", "KP_Minus")
else if (Ebene = 6)
SendUnicodeChar(0x2205, "emptyset") ; leere Menge
return
@@ -16,7 +16,7 @@ neo_1: noCaps=1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x00B9) ; Hochgestellte 1
- or CheckDeadUni("c5",0x2081)) ; Tiefgestellte 1
+ or CheckDeadUni("a3",0x2081)) ; Tiefgestellte 1
OutputChar12(1,"°",1,"degree")
else if (Ebene = 3)
SendUnicodeChar(0x00B9, "onesuperior") ; Hochgestellte 1
@@ -32,7 +32,7 @@ neo_2: noCaps = 1
EbeneAktualisieren()
if (Ebene = 1 and !(CheckDeadUni("c1",0x00B2) ; Hochgestellte 2
- or CheckDeadUni("c5",0x2082))) ; Tiefgestellte 2
+ or CheckDeadUni("a3",0x2082))) ; Tiefgestellte 2
OutputChar(2,2)
else if (Ebene = 2)
SendUnicodeChar(0x2116, "numerosign") ; Numero
@@ -50,7 +50,7 @@ neo_3: noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x00B3) ; Hochgestellte 3
- or CheckDeadUni("c5",0x2083)) ; Tiefgestellte 3
+ or CheckDeadUni("a3",0x2083)) ; Tiefgestellte 3
OutputChar12(3,"§",3,"section")
else if (Ebene = 3)
SendUnicodeChar(0x00B3, "threesuperior") ; Hochgestellte 3
@@ -66,7 +66,7 @@ neo_4: noCaps = 1
EbeneAktualisieren()
if (Ebene = 1) and !(CheckDeadUni("c1",0x2074) ; Hochgestellte 4
- or CheckDeadUni("c5",0x2084)) ; Tiefgestellte 4
+ or CheckDeadUni("a3",0x2084)) ; Tiefgestellte 4
OutputChar(4,4)
else if (Ebene = 2)
SendUnicodeChar(0x00BB, "guillemotright") ; Double guillemot right
@@ -84,7 +84,7 @@ neo_5: noCaps = 1
EbeneAktualisieren()
if (Ebene = 1) and !(CheckDeadUni("c1",0x2075) ; Hochgestellte 5
- or CheckDeadUni("c5",0x2085)) ; Tiefgestellte 5
+ or CheckDeadUni("a3",0x2085)) ; Tiefgestellte 5
OutputChar(5,5)
else if (Ebene = 2)
SendUnicodeChar(0x00AB, "guillemotleft") ; Double guillemot left
@@ -100,7 +100,7 @@ neo_6: noCaps = 1
EbeneAktualisieren()
if (Ebene = 1) and !(CheckDeadUni("c1",0x2076) ; Hochgestellte 6
- or CheckDeadUni("c5",0x2086)) ; Tiefgestellte 6
+ or CheckDeadUni("a3",0x2086)) ; Tiefgestellte 6
OutputChar(6,6)
else if (Ebene = 2)
SendUnicodeChar(0x20AC, "EuroSign")
@@ -118,7 +118,7 @@ neo_7: noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x2077) ; Hochgestellte 7
- or CheckDeadUni("c5",0x2087)) ; Tiefgestellte 7
+ or CheckDeadUni("a3",0x2087)) ; Tiefgestellte 7
OutputChar12(7,"$",7,"dollar")
else if (Ebene = 3)
OutputChar("¥", "yen")
@@ -134,7 +134,7 @@ neo_8: noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x2078) ; Hochgestellte 8
- or CheckDeadUni("c5",0x2088)) ; Tiefgestellte 8
+ or CheckDeadUni("a3",0x2088)) ; Tiefgestellte 8
OutputChar12(8,"„",8,"doublelowquotemark")
else if (Ebene = 3)
OutputChar("‚", "singlelowquotemark")
@@ -150,7 +150,7 @@ neo_9: noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x2079) ; Hochgestellte 9
- or CheckDeadUni("c5",0x2089)) ; Tiefgestellte 9
+ or CheckDeadUni("a3",0x2089)) ; Tiefgestellte 9
OutputChar12(9,"“",9,"leftdoublequotemark")
else if (Ebene = 3)
OutputChar("‘", "leftsinglequotemark")
diff --git a/windows/autohotkey/Source/Keys-Special.ahk b/windows/autohotkey/Source/Keys-Special.ahk index 87e8623..c9633b8 100644 --- a/windows/autohotkey/Source/Keys-Special.ahk +++ b/windows/autohotkey/Source/Keys-Special.ahk @@ -65,12 +65,12 @@ return neo_SpaceUp:
EbeneAktualisieren()
- if (Ebene = 1) and !CheckDeadUni("t4",0x2010) ; Echter Bindestrich
+ if (Ebene = 1) and !CheckDeadUni("a3",0x2010) ; Echter Bindestrich
OutputChar("{Space}", "Space")
else if (Ebene = 2) or (Ebene = 3)
Send {blind}{Space}
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2070)
- or CheckDeadUni("c5",0x2080)))
+ or CheckDeadUni("a3",0x2080)))
OutputChar("{Numpad0}", "KP_0")
else if (Ebene = 5)
SendUnicodeChar(0x00A0, "U00A0") ; geschütztes Leerzeichen
diff --git a/windows/autohotkey/neo20.ahk b/windows/autohotkey/neo20.ahk index 623b0c6..62e1058 100644 --- a/windows/autohotkey/neo20.ahk +++ b/windows/autohotkey/neo20.ahk @@ -754,260 +754,235 @@ VK09SC00F::goto neo_tab *VK2ESC053::goto neo_NumpadDot ; NumPadIns
-/*
- Die eigentliche NEO-Belegung und der Hauptteil des AHK-Treibers.
-
- Reihe 1
-*/
-
-neo_tot1:
- noCaps = 1
- EbeneAktualisieren()
- if (Ebene = 1) and !CheckDeadUni("c1",0x0302)
- deadUni(0x02C6, "dead_circumflex", "c1") ; Zirkumflex, tot
- else if (Ebene = 2) and !CheckDeadUni("c2",0x0303)
- deadUni(0x02DC, "dead_tilde", "c2") ; Tilde, tot
- else if (Ebene = 3) and !CheckDeadUni("c3",0x030A)
- deadUni(0x02DA, "dead_breve", "c3") ; Ring, tot
- else if (Ebene = 4) and !CheckDeadUni("c4",0x030C)
- deadUni(0x02C7, "dead_caron", "c4") ; Caron, tot
- else if (Ebene = 5) and !CheckDeadUni("c5",0x0306)
- deadUni(0x02D8, "dead_breve", "c5") ; Brevis, tot
- else if (Ebene = 6) and !CheckDeadUni("c6",0x0304)
- deadUni(0x00AF, "dead_macron", "c6") ; Makron, tot
-return
-
-neo_1:
- noCaps=1
+neo_a:
EbeneAktualisieren()
- if Ebene12 and !(CheckDeadUni("c1",0x00B9) ; Hochgestellte 1
- or CheckDeadUni("c5",0x2081)) ; Tiefgestellte 1
- OutputChar12(1,"°",1,"degree")
+ if (Ebene12 and !(CheckDeadUni12("c1",0x00E2,0x00C2)
+ or CheckDeadUni12("c2",0x00E3,0x00C3)
+ or CheckDeadAsc12("c3","å","Å")
+ or CheckDeadUni12("c4",0x01CE,0x01CD)
+ or CheckDeadUni12("c5",0x0103,0x0102)
+ or CheckDeadUni12("c6",0x0101,0x0100)
+ or CheckDeadUni12("g1",0x00E0,0x00C0)
+ or CheckDeadUni12("g2",0x0201,0x0200)
+ or CheckDeadAsc12("g3","ä","Ä")
+ or CheckDeadUni12("g5",0x1F01,0x1F09)
+ or CheckDeadUni12("a1",0x00E1,0x00C1)
+ or CheckDeadUni12("a2",0x0105,0x0104)
+ or CheckDeadUni12("a3",0x2C65,0x023A)
+ or CheckDeadUni12("a5",0x1F00,0x1F08)
+ or CheckDeadUni12("a6",0x0227,0x0226)))
+ OutputChar12("a","A","a","A")
else if (Ebene = 3)
- SendUnicodeChar(0x00B9, "onesuperior") ; Hochgestellte 1
+ OutputChar("{{}", "braceleft")
else if (Ebene = 4)
- SendUnicodeChar(0x2022, "enfilledcircbullet") ; Bullet
- else if (Ebene = 5)
- SendUnicodeChar(0x2081, "U2081") ; Tiefgestellte 1
+ OutputChar("{Down}", "Down")
+ else if (Ebene = 5 and !(CheckDeadUni("c1",0x1FB6)
+ or CheckDeadUni("c5",0x1FB0)
+ or CheckDeadUni("c6",0x1FB1)
+ or CheckDeadUni("g1",0x1F70)
+ or CheckDeadUni("g5",0x1F01)
+ or CheckDeadUni("a1",0x03AC)
+ or CheckDeadUni("a2",0x1FB3)
+ or CheckDeadUni("a5",0x1F00)))
+ SendUnicodeChar(0x03B1, "Greek_alpha") ; alpha
else if (Ebene = 6)
- SendUnicodeChar(0x00AC, "notsign") ; Nicht-Symbol
+ SendUnicodeChar(0x2200, "U2200") ; für alle
return
-neo_2:
- noCaps = 1
+neo_b:
EbeneAktualisieren()
- if (Ebene = 1 and !(CheckDeadUni("c1",0x00B2) ; Hochgestellte 2
- or CheckDeadUni("c5",0x2082))) ; Tiefgestellte 2
- OutputChar(2,2)
- else if (Ebene = 2)
- SendUnicodeChar(0x2116, "numerosign") ; Numero
+ if (Ebene12 and !(CheckDeadUni12("c6",0x1E07,0x1E06)
+ or CheckDeadUni12("a6",0x1E03,0x1E02)))
+ OutputChar12("b","B","b","B")
else if (Ebene = 3)
- SendUnicodeChar(0x00B2, "twosuperior") ; Hochgestellte 2
+ if isMod2Locked
+ OutputChar("{Shift Up}{+}{Shift down}", "plus")
+ else OutputChar("{blind}{+}", "plus")
else if (Ebene = 4)
- SendUnicodeChar(0x2023, "U2023") ; Aufzählungspfeil
+ OutputChar(":", "colon")
else if (Ebene = 5)
- SendUnicodeChar(0x2082, "U2082") ; Tiefgestellte 2
+ SendUnicodeChar(0x03B2, "Greek_beta") ; beta
else if (Ebene = 6)
- SendUnicodeChar(0x2228, "logicalor") ; Logisches Oder
+ SendUnicodeChar(0x21D2, "implies") ; Doppel-Pfeil rechts
return
-neo_3:
- noCaps = 1
+neo_c:
EbeneAktualisieren()
- if Ebene12 and !(CheckDeadUni("c1",0x00B3) ; Hochgestellte 3
- or CheckDeadUni("c5",0x2083)) ; Tiefgestellte 3
- OutputChar12(3,"§",3,"section")
+ if (Ebene12 and !(CheckDeadUni12("c1",0x0109,0x0108)
+ or CheckDeadUni12("c4",0x010D,0x010C)
+ or CheckDeadUni12("a1",0x0107,0x0106)
+ or CheckDeadUni12("a2",0x00E7,0x00E6)
+ or CheckDeadUni12("a6",0x010B,0x010A)))
+ OutputChar12("c","C","c","C")
else if (Ebene = 3)
- SendUnicodeChar(0x00B3, "threesuperior") ; Hochgestellte 3
- else if (Ebene = 4)
- SendUnicodeChar(0x266B, "U226B") ; 2 Achtelnoten
+ OutputChar("]", "bracketright")
+ else if (Ebene = 4) and (!lernModus or lernModus_neo_Entf)
+ OutputChar("{Del}", "Delete")
else if (Ebene = 5)
- SendUnicodeChar(0x2083, "U2083") ; Tiefgestellte 3
+ SendUnicodeChar(0x03C7, "Greek_chi") ; chi
else if (Ebene = 6)
- SendUnicodeChar(0x2227, "logicaland") ; Logisches Und
+ SendUnicodeChar(0x2102, "U2102") ; C (Komplexe Zahlen)]
return
-neo_4:
- noCaps = 1
- EbeneAktualisieren()
- if (Ebene = 1) and !(CheckDeadUni("c1",0x2074) ; Hochgestellte 4
- or CheckDeadUni("c5",0x2084)) ; Tiefgestellte 4
- OutputChar(4,4)
- else if (Ebene = 2)
- SendUnicodeChar(0x00BB, "guillemotright") ; Double guillemot right
- else if (Ebene = 3)
- OutputChar("›", "U230A") ; Single guillemot right
- else if (Ebene = 4)
- OutputChar("{PgUp}", "Prior") ; Bild auf
- else if (Ebene = 5)
- SendUnicodeChar(0x2113, "U2213") ; Script small L
- else if (Ebene = 6)
- SendUnicodeChar(0x22A5, "uptack") ; Senkrecht
+neo_d:
+ EbeneAktualisieren()
+ if (Ebene12 and !(CheckDeadUni12("c1",0x1E13,0x1E12)
+ or CheckDeadUni( "c2",0x1D6D)
+ or CheckDeadUni12("c4",0x010F,0x010E)
+ or CheckDeadUni12("g3",0x1E0D,0x1E0C)
+ or CheckDeadUni12("a1",0x00F0,0x00D0)
+ or CheckDeadUni12("a2",0x1E11,0x1E10)
+ or CheckDeadUni12("a3",0x0111,0x0110)
+ or CheckDeadUni12("a6",0x1E0B,0x1E0A)))
+ OutputChar12("d","D","d","D")
+ else if (Ebene = 3)
+ OutputChar(":", "colon")
+ else if (Ebene = 4)
+ OutputChar("{NumpadDot}", "comma")
+ else if (Ebene = 5)
+ SendUnicodeChar(0x03B4, "Greek_delta") ; delta
+ else if (Ebene = 6)
+ SendUnicodeChar(0x0394, "Greek_DELTA") ; Delta
return
-neo_5:
- noCaps = 1
+neo_e:
EbeneAktualisieren()
- if (Ebene = 1) and !(CheckDeadUni("c1",0x2075) ; Hochgestellte 5
- or CheckDeadUni("c5",0x2085)) ; Tiefgestellte 5
- OutputChar(5,5)
- else if (Ebene = 2)
- SendUnicodeChar(0x00AB, "guillemotleft") ; Double guillemot left
+ if (Ebene12 and !(CheckDeadUni12("a1",0x00E9,0x00C9)
+ or CheckDeadUni12("a2",0x00E8,0x00C8)
+ or CheckDeadUni12("a4",0x0117,0x0116)
+ or CheckDeadUni12("a5",0x0119,0x0118)
+ or CheckDeadUni12("c1",0x00EA,0x00CA)
+ or CheckDeadUni12("c2",0x011B,0x011A)
+ or CheckDeadUni12("c3",0x0115,0x0114)
+ or CheckDeadUni12("t1",0x1EBD,0x1EBC)
+ or CheckDeadUni12("t2",0x0113,0x0112)
+ or CheckDeadAsc12("t3","ë","Ë")))
+ OutputChar12("e","E","e","E")
else if (Ebene = 3)
- OutputChar("‹", "U2039") ; Single guillemot left
+ OutputChar("{}}", "braceright")
+ else if (Ebene = 4)
+ OutputChar("{Right}", "Right")
else if (Ebene = 5)
- SendUnicodeChar(0x0AF8, "femalesymbol") ; Kreuz (Dagger)
+ SendUnicodeChar(0x03B5, "Greek_epsilon") ; epsilon
else if (Ebene = 6)
- SendUnicodeChar(0x2221, "U2221") ; Winkel
+ SendUnicodeChar(0x2203, "U2203") ; es existiert
return
-neo_6:
- noCaps = 1
+neo_f:
EbeneAktualisieren()
- if (Ebene = 1) and !(CheckDeadUni("c1",0x2076) ; Hochgestellte 6
- or CheckDeadUni("c5",0x2086)) ; Tiefgestellte 6
- OutputChar(6,6)
- else if (Ebene = 2)
- SendUnicodeChar(0x20AC, "EuroSign")
- else if (Ebene = 3)
- OutputChar("¢", "cent")
- else if (Ebene = 4)
- OutputChar("£", "sterling")
+ if (Ebene12 and !(CheckDeadUni12("a6",0x1E1F,0x1E1E)))
+ OutputChar12("f","F","f","F")
+ else if ((Ebene = 3) and !(CheckDeadUni("c1",0x2259) ; entspricht
+ or CheckDeadUni("c2",0x2245) ; ungefähr gleich
+ or CheckDeadUni("c3",0x2257) ; ring equal to
+ or CheckDeadUni("c4",0x225A) ; EQUIANGULAR TO
+ or CheckDeadUni("c6",0x2261) ; identisch
+ or CheckDeadUni("a3",0x2260))) ; ungleich
+ OutputChar("`=", "equal")
+ else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2079)
+ or CheckDeadUni("a3",0x2089)))
+ OutputChar("{Numpad9}", "KP_9")
else if (Ebene = 5)
- SendUnicodeChar(0x0AF7, "malesymbol")
+ SendUnicodeChar(0x03C6, "Greek_phi") ; phi
else if (Ebene = 6)
- SendUnicodeChar(0x2225, "U2225") ; parallel
+ SendUnicodeChar(0x03A6, "Greek_PHI") ; Phi
return
-neo_7:
- noCaps = 1
+neo_g:
EbeneAktualisieren()
- if Ebene12 and !(CheckDeadUni("c1",0x2077) ; Hochgestellte 7
- or CheckDeadUni("c5",0x2087)) ; Tiefgestellte 7
- OutputChar12(7,"$",7,"dollar")
- else if (Ebene = 3)
- OutputChar("¥", "yen")
- else if (Ebene = 4)
- OutputChar("¤", "currency")
+ if (Ebene12 and !(CheckDeadUni12("c1",0x011D,0x011C)
+ or CheckDeadUni12("c5",0x011F,0x011E)
+ or CheckDeadUni12("a2",0x0123,0x0122)
+ or CheckDeadUni12("a6",0x0121,0x0120)))
+ OutputChar12("g","G","g","G")
+ else if ((Ebene = 3) and !(CheckDeadUni("a3",0x2265))) ; größer gleich
+ OutputChar(">", "greater")
+ else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2078)
+ or CheckDeadUni("a3",0x2088)))
+ OutputChar("{Numpad8}", "KP_8")
else if (Ebene = 5)
- SendUnicodeChar(0x03BA, "Greek_kappa") ; greek small letter kappa
+ SendUnicodeChar(0x03B3, "Greek_gamma") ; gamma
else if (Ebene = 6)
- SendUnicodeChar(0x2209, "notelementof") ; nicht Element von
+ SendUnicodeChar(0x0393, "Greek_GAMMA") ; Gamma
return
-neo_8:
- noCaps = 1
+neo_h:
EbeneAktualisieren()
- if Ebene12 and !(CheckDeadUni("c1",0x2078) ; Hochgestellte 8
- or CheckDeadUni("c5",0x2088)) ; Tiefgestellte 8
- OutputChar12(8,"„",8,"doublelowquotemark")
- else if (Ebene = 3)
- OutputChar("‚", "singlelowquotemark")
- else if (Ebene = 4)
- OutputChar("{NumpadDiv}", "KP_Divide")
+ if (Ebene12 and !(CheckDeadUni12("c1",0x0125,0x0124)
+ or CheckDeadUni12("a3",0x0127,0x0126)
+ or CheckDeadUni12("a6",0x1E23,0x1E22)))
+ OutputChar12("h","H","h","H")
+ else if ((Ebene = 3) and !(CheckDeadUni("a3",0x2264))) ; kleiner gleich
+ OutputChar("<", "less")
+ else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2077)
+ or CheckDeadUni("a3",0x2087)))
+ OutputChar("{Numpad7}", "KP_7")
else if (Ebene = 5)
- SendUnicodeChar(0x27E8, "U27E8") ; bra (öffnende spitze Klammer)
+ SendUnicodeChar(0x03C8, "Greek_psi") ; psi
else if (Ebene = 6)
- SendUnicodeChar(0x2204, "U2204") ; es existiert nicht
+ SendUnicodeChar(0x03A8, "Greek_PSI") ; Psi
return
-neo_9:
- noCaps = 1
+neo_i:
EbeneAktualisieren()
- if Ebene12 and !(CheckDeadUni("c1",0x2079) ; Hochgestellte 9
- or CheckDeadUni("c5",0x2089)) ; Tiefgestellte 9
- OutputChar12(9,"“",9,"leftdoublequotemark")
+ if (Ebene12 and !(CheckDeadUni12("c1",0x00EE,0x00CE)
+ or CheckDeadUni12("c2",0x0129,0x0128)
+ or CheckDeadUni12("c4",0x01D0,0x01CF)
+ or CheckDeadUni12("c5",0x012D,0x012C)
+ or CheckDeadUni12("c6",0x012B,0x012A)
+ or CheckDeadUni12("g1",0x00EC,0x00CC)
+ or CheckDeadAsc12("g3","ï","Ï")
+ or CheckDeadUni12("a1",0x00ED,0x00CD)
+ or CheckDeadUni12("a2",0x0131,0x0130)
+ or CheckDeadUni12("a6",0x012F,0x012E)))
+ OutputChar12("i","I","i","I")
else if (Ebene = 3)
- OutputChar("‘", "leftsinglequotemark")
+ OutputChar("`/", "slash")
else if (Ebene = 4)
- OutputChar("{NumpadMult}", "KP_Multiply")
+ OutputChar("{Left}", "Left")
else if (Ebene = 5)
- SendUnicodeChar(0x27E9, "U27E9") ; ket (schließende spitze Klammer)
+ SendUnicodeChar(0x03B9, "Greek_iota") ; iota
else if (Ebene = 6)
- SendUnicodeChar(0x2226, "U2226") ; nicht parallel
-return
-
-neo_0:
- noCaps = 1
- EbeneAktualisieren()
- if Ebene12 and !(CheckDeadUni("c1",0x2070) ; Hochgestellte 0
- or CheckDeadUni("c5",0x2080)) ; Tiefgestellte 0
- OutputChar12(0,"”",0,"rightdoublequotemark")
- else if (Ebene = 3)
- OutputChar("’", "rightsingleqoutemark")
- else if (Ebene = 4)
- OutputChar("{NumpadSub}", "minus") ; s. Mail vom Sun, 14 Sep 2008 00:33:47 +0200
- else if (Ebene = 6)
- SendUnicodeChar(0x2205, "emptyset") ; leere Menge
+ SendUnicodeChar(0x222B, "integral") ; integral
return
-neo_strich:
- noCaps = 1
+neo_j:
EbeneAktualisieren()
- if (Ebene = 1)
- OutputChar("-", "minus") ; Bindestrich-Minus
- else if (Ebene = 2)
- SendUnicodeChar(0x2013, "endash") ; Gedankenstrich
+ if (Ebene12 and !(CheckDeadUni12("c1",0x0135,0x0134)
+ or CheckDeadUni( "c4",0x01F0)))
+ OutputChar12("j","J","j","J")
else if (Ebene = 3)
- SendUnicodeChar(0x2014, "emdash") ; Englischer Gedankenstrich (Geviertstrich)
+ OutputChar("`;", "semicolon")
+ else if (Ebene = 4)
+ OutputChar("`;", "semicolon")
else if (Ebene = 5)
- SendUnicodeChar(0x2011, "U2011") ; geschützter Bindestrich (Bindestrich ohne Zeilenumbruch)
+ SendUnicodeChar(0x03B8, "Greek_theta") ; theta
else if (Ebene = 6)
- SendUnicodeChar(0x00AD, "hyphen") ; weicher Bindestrich
-return
-
-neo_tot2:
- noCaps = 1
- EbeneAktualisieren()
- if (Ebene = 1) and !CheckDeadUni("a1",0x0300)
- deadAsc("``{space}", "dead_grave", "a1") ; Gravis, tot
- else if (Ebene = 3) and !CheckDeadUni("a3",0x0308)
- deadAsc(0x00A8, "dead_diaeresis", "a3") ; Diärese, tot
- else if (Ebene = 5) and !CheckDeadUni("a5",0x0485)
- deadUni(0x1FFE, "dead_dasia", "a5") ; Ogonek
+ SendUnicodeChar(0x2261, "identical") ; identisch
return
-
-/*
-
- Reihe 2
-
-*/
-
-neo_x:
+neo_k:
EbeneAktualisieren()
- if Ebene12
- OutputChar12("x","X","x","X")
+ if (Ebene12 and !(CheckDeadUni12("a2",0x0137,0x0136)
+ or CheckDeadUni12("a6",0x1E33,0x1E32)))
+ OutputChar12("k","K","k","K")
else if (Ebene = 3)
- SendUnicodeChar(0x2026, "ellipsis") ; Ellipse horizontal
+ OutputChar("{!}", "exclam")
else if (Ebene = 4)
- SendUnicodeChar(0x22EE, "U22EE") ; Ellipse vertikal
+ OutputChar("¡", "exclamdown")
else if (Ebene = 5)
- SendUnicodeChar(0x03BE, "Greek_xi") ; xi
- else if (Ebene = 6)
- SendUnicodeChar(0x039E, "Greek_XI") ; Xi
-return
-
-neo_v:
- EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("c6",0x1E7F,0x1E7E)))
- OutputChar12("v","V","v","V")
- else if (Ebene = 3)
- OutputChar("_","underscore")
- else if (Ebene = 4) and (!lernModus or lernModus_neo_Backspace)
- OutputChar("{Backspace}", "BackSpace")
+ SendUnicodeChar(0x03F0, "U03F0") ; kappa symbol (varkappa)
else if (Ebene = 6)
- SendUnicodeChar(0x2259, "U2259") ; estimates/entspricht
+ SendUnicodeChar(0x221A, "radical") ; Wurzel
return
neo_l:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x013A,0x0139)
- or CheckDeadUni12("a3",0x013C,0x013B)
- or CheckDeadUni12("c2",0x013E,0x013D)
- or CheckDeadUni12("c4",0x0140,0x013F)
- or CheckDeadUni12("c6",0x1E37,0x1E36)
- or CheckDeadUni12("t4",0x0142,0x0141)))
+ if (Ebene12 and !(CheckDeadUni12("c4",0x013E,0x013D)
+ or CheckDeadUni12("a1",0x013A,0x0139)
+ or CheckDeadUni12("a2",0x013C,0x013B)
+ or CheckDeadUni12("a3",0x0142,0x0141)
+ or CheckDeadUni12("a6",0x1E37,0x1E36)))
OutputChar12("l","L","l","L")
else if (Ebene = 3)
OutputChar("[", "bracketleft")
@@ -1019,108 +994,76 @@ neo_l: SendUnicodeChar(0x039B, "Greek_LAMBDA") ; Lambda
return
-neo_c:
+neo_m:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x0107,0x0106)
- or CheckDeadUni12("a3",0x00E7,0x00E6)
- or CheckDeadUni12("a4",0x010B,0x010A)
- or CheckDeadUni12("c1",0x0109,0x0108)
- or CheckDeadUni12("c2",0x010D,0x010C)))
- OutputChar12("c","C","c","C")
+ if (Ebene12 and !CheckDeadUni12("a6",0x1E41,0x1E40))
+ OutputChar12("m","M","m","M")
else if (Ebene = 3)
- OutputChar("]", "bracketright")
- else if (Ebene = 4) and (!lernModus or lernModus_neo_Entf)
- OutputChar("{Del}", "Delete")
+ OutputChar("`%", "percent")
+ else if ((Ebene = 4) and !(CheckDeadUni("c1",0x00B9)
+ or CheckDeadUni("a3",0x2081)))
+ OutputChar("{Numpad1}", "KP_1")
else if (Ebene = 5)
- SendUnicodeChar(0x03C7, "Greek_chi") ; chi
+ SendUnicodeChar(0x03BC, "Greek_mu") ; griechisch mu, micro wäre 0x00B5
else if (Ebene = 6)
- SendUnicodeChar(0x2102, "U2102") ; C (Komplexe Zahlen)]
+ SendUnicodeChar(0x21D4, "ifonlyif") ; doppelter Doppelpfeil (genau dann wenn)
return
-neo_w:
+neo_n:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("c1",0x0175,0x0174)))
- OutputChar12("w","W","w","W")
+ if (Ebene12 and !(CheckDeadUni12("c2",0x00F1,0x00D1)
+ or CheckDeadUni12("c4",0x0148,0x0147)
+ or CheckDeadUni12("a1",0x0144,0x0143)
+ or CheckDeadUni12("a2",0x0146,0x0145)
+ or CheckDeadUni12("a6",0x1E45,0x1E44)))
+ OutputChar12("n","N","n","N")
else if (Ebene = 3)
- SendUnicodeChar(0x005E, "asciicircum") ; Zirkumflex
- else if (Ebene = 4)
- OutputChar("{Insert}", "Insert") ; Einfg
+ OutputChar("(", "parenleft")
+ else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2074)
+ or CheckDeadUni("a3",0x2084)))
+ OutputChar("{Numpad4}", "KP_4")
else if (Ebene = 5)
- SendUnicodeChar(0x03C9, "Greek_omega") ; omega
+ SendUnicodeChar(0x03BD, "Greek_nu") ; nu
else if (Ebene = 6)
- SendUnicodeChar(0x03A9, "Greek_OMEGA") ; Omega
+ SendUnicodeChar(0x2115, "U2115") ; N (natürliche Zahlen)
return
-neo_k:
+neo_o:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a3",0x0137,0x0136)
- or CheckDeadUni12("c6",0x1E33,0x1E32)))
- OutputChar12("k","K","k","K")
+ if (Ebene12 and !(CheckDeadUni12("c1",0x00F4,0x00D4)
+ or CheckDeadUni12("c2",0x00F5,0x00D5)
+ or CheckDeadUni12("c4",0x01D2,0x01D1)
+ or CheckDeadUni12("c5",0x014F,0x014E)
+ or CheckDeadUni12("c6",0x014D,0x014C)
+ or CheckDeadUni12("g1",0x00F2,0x00D2)
+ or CheckDeadAsc12("g3","ö","Ö")
+ or CheckDeadUni12("a1",0x00F3,0x00D3)
+ or CheckDeadUni12("a2",0x01EB,0x01EA)
+ or CheckDeadUni12("a3",0x00F8,0x00D8)
+ or CheckDeadUni12("a4",0x0151,0x0150)))
+ OutputChar12("o","O","o","O")
else if (Ebene = 3)
- OutputChar("{!}", "exclam")
+ OutputChar("*", "asterisk")
else if (Ebene = 4)
- OutputChar("¡", "exclamdown")
- else if (Ebene = 5)
- SendUnicodeChar(0x03F0, "U03F0") ; kappa symbol (varkappa)
- else if (Ebene = 6)
- SendUnicodeChar(0x221A, "radical") ; Wurzel
-return
-
-neo_h:
- EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E23,0x1E22)
- or CheckDeadUni12("c1",0x0125,0x0124)
- or CheckDeadUni12("c5",0x0127,0x0126)
- or CheckDeadUni12("c6",0x1E25,0x1E24)))
- OutputChar12("h","H","h","H")
- else if ((Ebene = 3) and !(CheckDeadUni("t4",0x2264))) ; kleiner gleich
- OutputChar("<", "less")
- else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2077)
- or CheckDeadUni("t4",0x2087)))
- OutputChar("{Numpad7}", "KP_7")
- else if (Ebene = 5)
- SendUnicodeChar(0x03C8, "Greek_psi") ; psi
- else if (Ebene = 6)
- SendUnicodeChar(0x03A8, "Greek_PSI") ; Psi
-return
-
-neo_g:
- EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a3",0x0123,0x0122)
- or CheckDeadUni12("a4",0x0121,0x0120)
- or CheckDeadUni12("c1",0x011D,0x011C)
- or CheckDeadUni12("c3",0x011F,0x011E)))
- OutputChar12("g","G","g","G")
- else if ((Ebene = 3) and !(CheckDeadUni("t4",0x2265))) ; größer gleich
- OutputChar(">", "greater")
- else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2078)
- or CheckDeadUni("t4",0x2088)))
- OutputChar("{Numpad8}", "KP_8")
+ OutputChar("{End}", "End")
else if (Ebene = 5)
- SendUnicodeChar(0x03B3, "Greek_gamma") ; gamma
+ SendUnicodeChar(0x03BF, "Greek_omicron") ; omicron
else if (Ebene = 6)
- SendUnicodeChar(0x0393, "Greek_GAMMA") ; Gamma
+ SendUnicodeChar(0x2208, "elementof") ; element of
return
-neo_f:
+neo_p:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E1F,0x1E1E)
- or CheckDeadUni12("t4",0x0192,0x0191)))
- OutputChar12("f","F","f","F")
- else if ((Ebene = 3) and !(CheckDeadUni("a6",0x2257) ; ring equal to
- or CheckDeadUni("c1",0x2259) ; entspricht
- or CheckDeadUni("c2",0x225A) ; EQUIANGULAR TO
- or CheckDeadUni("t2",0x2261) ; identisch
- or CheckDeadUni("t1",0x2245) ; ungefähr gleich
- or CheckDeadUni("t4",0x2260))) ; ungleich
- OutputChar("`=", "equal")
- else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2079)
- or CheckDeadUni("t4",0x2089)))
- OutputChar("{Numpad9}", "KP_9")
+ if (Ebene12 and !(CheckDeadUni12("a6",0x1E57,0x1E56)))
+ OutputChar12("p","P","p","P")
+ else if ((Ebene = 3) and !(CheckDeadUni("c2",0x2248)))
+ OutputChar("~", "asciitilde")
+ else if (Ebene = 4)
+ OutputChar("{Enter}", "Return")
else if (Ebene = 5)
- SendUnicodeChar(0x03C6, "Greek_phi") ; phi
+ SendUnicodeChar(0x03C0, "Greek_pi") ; pi
else if (Ebene = 6)
- SendUnicodeChar(0x03A6, "Greek_PHI") ; Phi
+ SendUnicodeChar(0x03A0, "Greek_PI") ; Pi
return
neo_q:
@@ -1130,70 +1073,89 @@ neo_q: else if (Ebene = 3)
OutputChar("{&}", "ampersand")
else if ((Ebene = 4) and !(CheckDeadUni("c1",0x207A)
- or CheckDeadUni("c5",0x208A)))
- OutputChar("{NumPadAdd}", "plus") ; !!!
+ or CheckDeadUni("a3",0x208A)))
+ OutputChar("{NumPadAdd}", "KP_Add")
else if (Ebene = 5)
SendUnicodeChar(0x03D5, "U03D5") ; phi symbol (varphi)
else if (Ebene = 6)
SendUnicodeChar(0x211A, "U211A") ; Q (rationale Zahlen)
return
-neo_sz:
+neo_r:
EbeneAktualisieren()
- if (Ebene = 1)
- if LangSTastatur
- OutputChar("s", "s")
- else OutputChar("ß", "ssharp")
- else if (Ebene = 2)
- SendUnicodeChar(0x1E9E, "U1E9E") ; versal-ß
+ if (Ebene12 and !(CheckDeadUni12("c4",0x0159,0x0158)
+ or CheckDeadUni12("g3",0x1E5B,0x1E5A)
+ or CheckDeadUni12("a1",0x0155,0x0154)
+ or CheckDeadUni12("a2",0x0157,0x0156)
+ or CheckDeadUni12("a6",0x0E59,0x0E58)))
+ OutputChar12("r","R","r","R")
else if (Ebene = 3)
- if LangSTastatur
- OutputChar("ß", "ssharp")
- else SendUnicodeChar(0x017F, "17F") ; langes s
+ OutputChar(")", "parenright")
+ else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2075)
+ or CheckDeadUni("a3",0x2085)))
+ OutputChar("{Numpad5}", "KP_5")
else if (Ebene = 5)
- SendUnicodeChar(0x03C2, "Greek_finalsmallsigma") ; varsigma
+ SendUnicodeChar(0x03F1, "U03F1") ; rho symbol (varrho)
else if (Ebene = 6)
- SendUnicodeChar(0x2218, "jot") ; Verknüpfungsoperator
+ SendUnicodeChar(0x211D, "U221D") ; R (reelle Zahlen)
return
-
-neo_tot3:
- noCaps = 1
+neo_s:
EbeneAktualisieren()
- if (Ebene = 1) and !CheckDeadUni("t1",0x0301)
- deadUni({´}{space}, "dead_acute", "t1") ; Akut, tot
- else if (Ebene = 2) and !CheckDeadUni("t2",0x0327)
- deadUni("¸", "dead_cedilla", "t2") ; Cedille, tot
- else if (Ebene = 3) and !CheckDeadUni("t3",0x0337)
- deadUni(0x002F, "dead_stroke", "t3") ; Strich, tot
- else if (Ebene = 4) and !CheckDeadUni("t4",0x0338)
- deadUni(0x02DD, "dead_doubleacute", "t4") ; Doppelakut, tot
- else if (Ebene = 5) and !CheckDeadUni("t5",0x0486)
- deadUni(0x1FBF, "", "t5") ; Spiritus lenis, tot
- else if (Ebene = 6) and !CheckDeadUni("t6",0x0307)
- deadUni(0x02D9, "dead_abovedot", "t6") ; Punkt darüber, tot
+ if (Ebene12 and !LangSTastatur and !(CheckDeadUni12("a1",0x015B,0x015A)
+ or CheckDeadUni12("a2",0x015F,0x015E)
+ or CheckDeadUni12("a6",0x1E61,0x1E60)
+ or CheckDeadUni12("c1",0x015D,0x015C)
+ or CheckDeadUni12("c4",0x0161,0x0160)
+ or CheckDeadUni12("a6",0x1E63,0x1A62))) {
+ if LangSTastatur and (Ebene = 1)
+ SendUnicodeChar(0x017F, "17F") ; langes s
+ else OutputChar12("s","S","s","S")
+ } else if (Ebene = 3)
+ OutputChar("?", "question")
+ else if Ebene7 {
+ if LangSTastatur
+ OutputChar("s", "s")
+ else SendUnicodeChar(0x017F, "17F")
+ } else if (Ebene = 4)
+ OutputChar("¿", "questiondown")
+ else if (Ebene = 5)
+ SendUnicodeChar(0x03C3, "Greek_sigma") ;sigma
+ else if (Ebene = 6)
+ SendUnicodeChar(0x03A3, "Greek_SIGMA") ;Sigma
return
-
-/*
-
- Reihe 3
-
-*/
+neo_t:
+ EbeneAktualisieren()
+ if (Ebene12 and !(CheckDeadUni12("a2",0x0163,0x0162)
+ or CheckDeadUni12("a6",0x1E6B,0x1E6A)
+ or CheckDeadUni12("c4",0x0165,0x0164)
+ or CheckDeadUni( "g3",0x1E97)))
+ OutputChar12("t","T","t","T")
+ else if (Ebene = 3)
+ OutputChar("-", "minus") ; Bisstrich
+ else if (Ebene = 4) and !(CheckDeadUni("c1",0x2076)
+ or CheckDeadUni("c5",0x2086))
+ OutputChar("{Numpad6}", "KP_6")
+ else if (Ebene = 5)
+ SendUnicodeChar(0x03C4, "Greek_tau") ; tau
+ else if (Ebene = 6)
+ SendUnicodeChar(0x2202, "partialderivative") ; partielle Ableitung
+return
neo_u:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00FA,0x00DA)
- or CheckDeadUni12("a2",0x00F9,0x00D9)
- or CheckDeadUni12("a5",0x0173,0x0172)
- or CheckDeadUni12("a6",0x016F,0x016E)
- or CheckDeadUni12("c1",0x00FB,0x00DB)
- or CheckDeadUni12("c2",0x01D4,0x01D3)
- or CheckDeadUni12("c3",0x016D,0x016C)
- or CheckDeadUni12("t1",0x0169,0x0168)
- or CheckDeadUni12("t2",0x016B,0x016A)
- or CheckDeadAsc12("t3","ü","Ü")
- or CheckDeadUni12("t5",0x0171,0x0170)))
+ if (Ebene12 and !(CheckDeadUni12("c1",0x00FB,0x00DB)
+ or CheckDeadUni12("c2",0x0169,0x0168)
+ or CheckDeadUni12("c3",0x016F,0x016E)
+ or CheckDeadUni12("c4",0x01D4,0x01D3)
+ or CheckDeadUni12("c5",0x016D,0x016C)
+ or CheckDeadUni12("c6",0x016B,0x016A)
+ or CheckDeadUni12("g1",0x00F9,0x00D9)
+ or CheckDeadAsc12("g3","ü","Ü")
+ or CheckDeadUni12("a1",0x00FA,0x00DA)
+ or CheckDeadUni12("a2",0x0173,0x0172)
+ or CheckDeadUni12("a4",0x0171,0x0170)))
OutputChar12("u","U","u","U")
else if (Ebene = 3)
OutputChar("\", "backslash")
@@ -1203,342 +1165,301 @@ neo_u: SendUnicodeChar(0x222E, "U222E") ; contour integral
return
-neo_i:
+neo_v:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00ED,0x00CD)
- or CheckDeadUni12("a2",0x00EC,0x00CC)
- or CheckDeadUni12("a4",0x012F,0x012E)
- or CheckDeadUni12("a5",0x0131,0x0130)
- or CheckDeadUni12("c1",0x00EE,0x00CE)
- or CheckDeadUni12("c2",0x01D0,0x01CF)
- or CheckDeadUni12("c3",0x012D,0x012C)
- or CheckDeadUni12("t1",0x0129,0x0128)
- or CheckDeadUni12("t2",0x012B,0x012A)
- or CheckDeadAsc12("t3","ï","Ï")))
- OutputChar12("i","I","i","I")
+ if (Ebene12 and !(CheckDeadUni12("a6",0x1E7F,0x1E7E)))
+ OutputChar12("v","V","v","V")
else if (Ebene = 3)
- OutputChar("`/", "slash")
+ OutputChar("_","underscore")
+ else if (Ebene = 4) and (!lernModus or lernModus_neo_Backspace)
+ OutputChar("{Backspace}", "BackSpace")
+ else if (Ebene = 6)
+ SendUnicodeChar(0x2259, "U2259") ; estimates/entspricht
+return
+
+neo_w:
+ EbeneAktualisieren()
+ if (Ebene12 and !(CheckDeadUni12("c1",0x0175,0x0174)))
+ OutputChar12("w","W","w","W")
+ else if (Ebene = 3)
+ SendUnicodeChar(0x005E, "asciicircum") ; Zirkumflex
else if (Ebene = 4)
- OutputChar("{Left}", "Left")
+ OutputChar("{Insert}", "Insert") ; Einfg
else if (Ebene = 5)
- SendUnicodeChar(0x03B9, "Greek_iota") ; iota
+ SendUnicodeChar(0x03C9, "Greek_omega") ; omega
else if (Ebene = 6)
- SendUnicodeChar(0x222B, "integral") ; integral
+ SendUnicodeChar(0x03A9, "Greek_OMEGA") ; Omega
return
-neo_a:
+neo_x:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00E1,0x00C1)
- or CheckDeadUni12("a2",0x00E0,0x00C0)
- or CheckDeadUni12("a5",0x0105,0x0104)
- or CheckDeadAsc12("a6","å","Å")
- or CheckDeadUni12("c1",0x00E2,0x00C2)
- or CheckDeadUni12("c2",0x01CE,0x01CD)
- or CheckDeadUni12("c3",0x0103,0x0102)
- or CheckDeadUni12("t1",0x00E3,0x00C3)
- or CheckDeadUni12("t2",0x0101,0x0100)
- or CheckDeadAsc12("t3","ä","Ä")))
- OutputChar12("a","A","a","A")
+ if Ebene12
+ OutputChar12("x","X","x","X")
else if (Ebene = 3)
- OutputChar("{{}", "braceleft")
+ SendUnicodeChar(0x2026, "ellipsis") ; Ellipse horizontal
else if (Ebene = 4)
- OutputChar("{Down}", "Down")
+ SendUnicodeChar(0x22EE, "U22EE") ; Ellipse vertikal
else if (Ebene = 5)
- SendUnicodeChar(0x03B1, "Greek_alpha") ; alpha
+ SendUnicodeChar(0x03BE, "Greek_xi") ; xi
else if (Ebene = 6)
- SendUnicodeChar(0x2200, "U2200") ; für alle
+ SendUnicodeChar(0x039E, "Greek_XI") ; Xi
return
-neo_e:
+neo_y:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00E9,0x00C9)
- or CheckDeadUni12("a2",0x00E8,0x00C8)
- or CheckDeadUni12("a4",0x0117,0x0116)
- or CheckDeadUni12("a5",0x0119,0x0118)
- or CheckDeadUni12("c1",0x00EA,0x00CA)
- or CheckDeadUni12("c2",0x011B,0x011A)
- or CheckDeadUni12("c3",0x0115,0x0114)
- or CheckDeadUni12("t1",0x1EBD,0x1EBC)
- or CheckDeadUni12("t2",0x0113,0x0112)
- or CheckDeadAsc12("t3","ë","Ë")))
- OutputChar12("e","E","e","E")
+ if (Ebene12 and !(CheckDeadUni12("c1",0x0177,0x0176)
+ or CheckDeadAsc12("g3","ÿ","Ÿ")
+ or CheckDeadUni12("a1",0x00FD,0x00DD)))
+ OutputChar12("y","Y","y","Y")
else if (Ebene = 3)
- OutputChar("{}}", "braceright")
+ OutputChar("@", "at")
else if (Ebene = 4)
- OutputChar("{Right}", "Right")
+ OutputChar(".", "period")
else if (Ebene = 5)
- SendUnicodeChar(0x03B5, "Greek_epsilon") ; epsilon
+ SendUnicodeChar(0x03C5, "Greek_upsilon") ; upsilon
else if (Ebene = 6)
- SendUnicodeChar(0x2203, "U2203") ; es existiert
+ SendUnicodeChar(0x2207, "nabla") ; nabla
return
-neo_o:
+neo_z:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00F3,0x00D3)
- or CheckDeadUni12("a2",0x00F2,0x00D2)
- or CheckDeadUni12("a5",0x01EB,0x01EA)
- or CheckDeadUni12("c1",0x00F4,0x00D4)
- or CheckDeadUni12("c2",0x01D2,0x01D1)
- or CheckDeadUni12("c3",0x014F,0x014E)
- or CheckDeadUni12("t1",0x00F5,0x00D5)
- or CheckDeadUni12("t2",0x014D,0x014C)
- or CheckDeadAsc12("t3","ö","Ö")
- or CheckDeadUni12("t4",0x00F8,0x00D8)
- or CheckDeadUni12("t5",0x0151,0x0150)))
- OutputChar12("o","O","o","O")
+ if (Ebene12 and !(CheckDeadUni12("a1",0x017A,0x0179)
+ or CheckDeadUni12("a6",0x017C,0x017B)
+ or CheckDeadUni12("c4",0x017E,0x017D)))
+ OutputChar12("z","Z","z","Z")
else if (Ebene = 3)
- OutputChar("*", "asterisk")
+ OutputChar("``{space}", "grave") ; untot
else if (Ebene = 4)
- OutputChar("{End}", "End")
+ send {Ctrl down}z{Ctrl up}
else if (Ebene = 5)
- SendUnicodeChar(0x03BF, "Greek_omicron") ; omicron
+ SendUnicodeChar(0x03B6, "Greek_zeta") ; zeta
else if (Ebene = 6)
- SendUnicodeChar(0x2208, "elementof") ; element of
+ SendUnicodeChar(0x2124, "U2124") ; Z (ganze Zahlen)
return
-neo_s:
+neo_ä:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x015B,0x015A)
- or CheckDeadUni12("a3",0x015F,0x015E)
- or CheckDeadUni12("a4",0x1E61,0x1E60)
- or CheckDeadUni12("c1",0x015D,0x015C)
- or CheckDeadUni12("c2",0x0161,0x0160)
- or CheckDeadUni12("c6",0x1E63,0x1A62))) {
- if LangSTastatur and (Ebene = 1)
- SendUnicodeChar(0x017F, "17F") ; langes s
- else OutputChar12("s","S","s","S")
- } else if (Ebene = 3)
- OutputChar("?", "question")
- else if Ebene7 {
- if LangSTastatur
- OutputChar("s", "s")
- else SendUnicodeChar(0x017F, "17F")
- } else if (Ebene = 4)
- OutputChar("¿", "questiondown")
+ if (Ebene12 and !(CheckDeadUni12("c6",0x01DF,0x01DE)))
+ OutputChar12("ä","Ä","adiaeresis","Adiaeresis")
+ else if (Ebene = 3)
+ OutputChar("|", "bar")
+ else if (Ebene = 4)
+ OutputChar("{PgDn}", "Next")
else if (Ebene = 5)
- SendUnicodeChar(0x03C3, "Greek_sigma") ;sigma
+ SendUnicodeChar(0x03B7, "Greek_eta") ; eta
else if (Ebene = 6)
- SendUnicodeChar(0x03A3, "Greek_SIGMA") ;Sigma
+ SendUnicodeChar(0x211C, "U221C") ; Fraktur R
return
-neo_n:
+neo_ö:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x0144,0x0143)
- or CheckDeadUni12("a3",0x0146,0x0145)
- or CheckDeadUni12("a4",0x1E45,0x1E44)
- or CheckDeadUni12("c2",0x0148,0x0147)
- or CheckDeadUni12("t1",0x00F1,0x00D1)))
- OutputChar12("n","N","n","N")
+ if (Ebene12 and !(CheckDeadUni12("c6",0x022B,0x022A)))
+ OutputChar12("ö","Ö","odiaeresis","Odiaeresis")
else if (Ebene = 3)
- OutputChar("(", "parenleft")
- else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2074)
- or CheckDeadUni("t4",0x2084)))
- OutputChar("{Numpad4}", "KP_4")
- else if (Ebene = 5)
- SendUnicodeChar(0x03BD, "Greek_nu") ; nu
+ OutputChar("$", "dollar")
+ else if (Ebene = 4)
+ OutputChar("{Tab}", "Tab")
else if (Ebene = 6)
- SendUnicodeChar(0x2115, "U2115") ; N (natürliche Zahlen)
+ SendUnicodeChar(0x2111, "U2221") ; Fraktur I
return
-neo_r:
+neo_ü:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x0155,0x0154)
- or CheckDeadUni12("a3",0x0157,0x0156)
- or CheckDeadUni12("a4",0x0E59,0x0E58)
- or CheckDeadUni12("c2",0x0159,0x0158)
- or CheckDeadUni12("t3",0x1E5B,0x1E5A)))
- OutputChar12("r","R","r","R")
+ if (Ebene12 and !(CheckDeadUni12("a1",0x01D8,0x01D7)
+ or CheckDeadUni12("g1",0x01DC,0x01DB)
+ or CheckDeadUni12("c4",0x01DA,0x01D9)
+ or CheckDeadUni12("c6",0x01D6,0x01D5)))
+ OutputChar12("ü","Ü","udiaeresis","Udiaeresis")
else if (Ebene = 3)
- OutputChar(")", "parenright")
- else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2075)
- or CheckDeadUni("t4",0x2085)))
- OutputChar("{Numpad5}", "KP_5")
- else if (Ebene = 5)
- SendUnicodeChar(0x03F1, "U03F1") ; rho symbol (varrho)
+ if isMod2Locked
+ OutputChar("{Shift Up}{#}", "numbersign")
+ else OutputChar("{blind}{#}", "numbersign")
+ else if (Ebene = 4)
+ OutputChar("{Esc}", "Escape")
else if (Ebene = 6)
- SendUnicodeChar(0x211D, "U221D") ; R (reelle Zahlen)
+ SendUnicodeChar(0x221D, "variation") ; proportional
return
-neo_t:
+neo_sz:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a3",0x0163,0x0162)
- or CheckDeadUni12("a4",0x1E6B,0x1E6A)
- or CheckDeadUni12("c2",0x0165,0x0164)
- or CheckDeadUni12("c5",0x0167,0x0166)
- or CheckDeadUni12("t4",0x1E6D,0x1E6C)
- or CheckDeadUni("t3",0x1E97)))
- OutputChar12("t","T","t","T")
+ if (Ebene = 1)
+ if LangSTastatur
+ OutputChar("s", "s")
+ else OutputChar("ß", "ssharp")
+ else if (Ebene = 2)
+ SendUnicodeChar(0x1E9E, "U1E9E") ; versal-ß
else if (Ebene = 3)
- OutputChar("-", "minus") ; Bisstrich
- else if (Ebene = 4) and !(CheckDeadUni("c1",0x2076)
- or CheckDeadUni("c5",0x2086))
- OutputChar("{Numpad6}", "KP_6")
+ if LangSTastatur
+ OutputChar("ß", "ssharp")
+ else SendUnicodeChar(0x017F, "17F") ; langes s
else if (Ebene = 5)
- SendUnicodeChar(0x03C4, "Greek_tau") ; tau
+ SendUnicodeChar(0x03C2, "Greek_finalsmallsigma") ; varsigma
else if (Ebene = 6)
- SendUnicodeChar(0x2202, "partialderivative") ; partielle Ableitung
+ SendUnicodeChar(0x2218, "jot") ; Verknüpfungsoperator
return
-neo_d:
- EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E0B,0x1E0A)
- or CheckDeadUni12("c2",0x010F,0x010E)
- or CheckDeadUni12("t2",0x0111,0x0110)
- or CheckDeadUni12("t3",0x1E0D,0x1E0C)
- or CheckDeadUni12("t4",0x00F0,0x00D0)))
- OutputChar12("d","D","d","D")
+neo_0:
+ noCaps = 1
+ EbeneAktualisieren()
+ if Ebene12 and !(CheckDeadUni("c1",0x2070) ; Hochgestellte 0
+ or CheckDeadUni("a3",0x2080)) ; Tiefgestellte 0
+ OutputChar12(0,"”",0,"rightdoublequotemark")
else if (Ebene = 3)
- OutputChar(":", "colon")
+ OutputChar("’", "rightsingleqoutemark")
else if (Ebene = 4)
- OutputChar("{NumpadDot}", "comma")
- else if (Ebene = 5)
- SendUnicodeChar(0x03B4, "Greek_delta") ; delta
+ OutputChar("{NumpadSub}", "KP_Minus")
else if (Ebene = 6)
- SendUnicodeChar(0x0394, "Greek_DELTA") ; Delta
+ SendUnicodeChar(0x2205, "emptyset") ; leere Menge
return
-neo_y:
+neo_1:
+ noCaps=1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x00FD,0x00DD)
- or CheckDeadUni12("c1",0x0177,0x0176)
- or CheckDeadAsc12("t3","ÿ","Ÿ")))
- OutputChar12("y","Y","y","Y")
+ if Ebene12 and !(CheckDeadUni("c1",0x00B9) ; Hochgestellte 1
+ or CheckDeadUni("a3",0x2081)) ; Tiefgestellte 1
+ OutputChar12(1,"°",1,"degree")
else if (Ebene = 3)
- OutputChar("@", "at")
+ SendUnicodeChar(0x00B9, "onesuperior") ; Hochgestellte 1
else if (Ebene = 4)
- OutputChar(".", "period")
+ SendUnicodeChar(0x2022, "enfilledcircbullet") ; Bullet
else if (Ebene = 5)
- SendUnicodeChar(0x03C5, "Greek_upsilon") ; upsilon
+ SendUnicodeChar(0x2081, "U2081") ; Tiefgestellte 1
else if (Ebene = 6)
- SendUnicodeChar(0x2207, "nabla") ; nabla
+ SendUnicodeChar(0x00AC, "notsign") ; Nicht-Symbol
return
-/*
-
- Reihe 4
-
-*/
-
-neo_ü:
+neo_2:
+ noCaps = 1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x01D8,0x01D7)
- or CheckDeadUni12("a2",0x01DC,0x01DB)
- or CheckDeadUni12("c2",0x01DA,0x01D9)
- or CheckDeadUni12("t2",0x01D6,0x01D5)))
- OutputChar12("ü","Ü","udiaeresis","Udiaeresis")
+ if (Ebene = 1 and !(CheckDeadUni("c1",0x00B2) ; Hochgestellte 2
+ or CheckDeadUni("a3",0x2082))) ; Tiefgestellte 2
+ OutputChar(2,2)
+ else if (Ebene = 2)
+ SendUnicodeChar(0x2116, "numerosign") ; Numero
else if (Ebene = 3)
- if isMod2Locked
- OutputChar("{Shift Up}{#}", "numbersign")
- else OutputChar("{blind}{#}", "numbersign")
+ SendUnicodeChar(0x00B2, "twosuperior") ; Hochgestellte 2
else if (Ebene = 4)
- OutputChar("{Esc}", "Escape")
+ SendUnicodeChar(0x2023, "U2023") ; Aufzählungspfeil
+ else if (Ebene = 5)
+ SendUnicodeChar(0x2082, "U2082") ; Tiefgestellte 2
else if (Ebene = 6)
- SendUnicodeChar(0x221D, "variation") ; proportional
+ SendUnicodeChar(0x2228, "logicalor") ; Logisches Oder
return
-neo_ö:
+neo_3:
+ noCaps = 1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("t2",0x022B,0x022A)))
- OutputChar12("ö","Ö","odiaeresis","Odiaeresis")
+ if Ebene12 and !(CheckDeadUni("c1",0x00B3) ; Hochgestellte 3
+ or CheckDeadUni("a3",0x2083)) ; Tiefgestellte 3
+ OutputChar12(3,"§",3,"section")
else if (Ebene = 3)
- OutputChar("$", "dollar")
+ SendUnicodeChar(0x00B3, "threesuperior") ; Hochgestellte 3
else if (Ebene = 4)
- OutputChar("{Tab}", "Tab")
+ SendUnicodeChar(0x266B, "U226B") ; 2 Achtelnoten
+ else if (Ebene = 5)
+ SendUnicodeChar(0x2083, "U2083") ; Tiefgestellte 3
else if (Ebene = 6)
- SendUnicodeChar(0x2111, "U2221") ; Fraktur I
+ SendUnicodeChar(0x2227, "logicaland") ; Logisches Und
return
-neo_ä:
+neo_4:
+ noCaps = 1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("t2",0x01DF,0x01DE)))
- OutputChar12("ä","Ä","adiaeresis","Adiaeresis")
+ if (Ebene = 1) and !(CheckDeadUni("c1",0x2074) ; Hochgestellte 4
+ or CheckDeadUni("a3",0x2084)) ; Tiefgestellte 4
+ OutputChar(4,4)
+ else if (Ebene = 2)
+ SendUnicodeChar(0x00BB, "guillemotright") ; Double guillemot right
else if (Ebene = 3)
- OutputChar("|", "bar")
+ OutputChar("›", "U230A") ; Single guillemot right
else if (Ebene = 4)
- OutputChar("{PgDn}", "Next")
+ OutputChar("{PgUp}", "Prior") ; Bild auf
else if (Ebene = 5)
- SendUnicodeChar(0x03B7, "Greek_eta") ; eta
+ SendUnicodeChar(0x2113, "U2213") ; Script small L
else if (Ebene = 6)
- SendUnicodeChar(0x211C, "U221C") ; Fraktur R
+ SendUnicodeChar(0x22A5, "uptack") ; Senkrecht
return
-neo_p:
+neo_5:
+ noCaps = 1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E57,0x1E56)))
- OutputChar12("p","P","p","P")
- else if ((Ebene = 3) and !(CheckDeadUni("t1",0x2248)))
- OutputChar("~", "asciitilde")
- else if (Ebene = 4)
- OutputChar("{Enter}", "Return")
+ if (Ebene = 1) and !(CheckDeadUni("c1",0x2075) ; Hochgestellte 5
+ or CheckDeadUni("a3",0x2085)) ; Tiefgestellte 5
+ OutputChar(5,5)
+ else if (Ebene = 2)
+ SendUnicodeChar(0x00AB, "guillemotleft") ; Double guillemot left
+ else if (Ebene = 3)
+ OutputChar("‹", "U2039") ; Single guillemot left
else if (Ebene = 5)
- SendUnicodeChar(0x03C0, "Greek_pi") ; pi
+ SendUnicodeChar(0x0AF8, "femalesymbol") ; Kreuz (Dagger)
else if (Ebene = 6)
- SendUnicodeChar(0x03A0, "Greek_PI") ; Pi
+ SendUnicodeChar(0x2221, "U2221") ; Winkel
return
-neo_z:
+neo_6:
+ noCaps = 1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a1",0x017A,0x0179)
- or CheckDeadUni12("a4",0x017C,0x017B)
- or CheckDeadUni12("c2",0x017E,0x017D)
- or CheckDeadUni12("c6",0x1E93,0x1E92)))
- OutputChar12("z","Z","z","Z")
+ if (Ebene = 1) and !(CheckDeadUni("c1",0x2076) ; Hochgestellte 6
+ or CheckDeadUni("a3",0x2086)) ; Tiefgestellte 6
+ OutputChar(6,6)
+ else if (Ebene = 2)
+ SendUnicodeChar(0x20AC, "EuroSign")
else if (Ebene = 3)
- OutputChar("``{space}", "grave") ; untot
+ OutputChar("¢", "cent")
+ else if (Ebene = 4)
+ OutputChar("£", "sterling")
else if (Ebene = 5)
- SendUnicodeChar(0x03B6, "Greek_zeta") ; zeta
+ SendUnicodeChar(0x0AF7, "malesymbol")
else if (Ebene = 6)
- SendUnicodeChar(0x2124, "U2124") ; Z (ganze Zahlen)
+ SendUnicodeChar(0x2225, "U2225") ; parallel
return
-neo_b:
+neo_7:
+ noCaps = 1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E03,0x1E02)))
- OutputChar12("b","B","b","B")
+ if Ebene12 and !(CheckDeadUni("c1",0x2077) ; Hochgestellte 7
+ or CheckDeadUni("a3",0x2087)) ; Tiefgestellte 7
+ OutputChar12(7,"$",7,"dollar")
else if (Ebene = 3)
- if isMod2Locked
- OutputChar("{Shift Up}{+}", "plus")
- else OutputChar("{blind}{+}", "plus")
+ OutputChar("¥", "yen")
else if (Ebene = 4)
- OutputChar(":", "colon")
+ OutputChar("¤", "currency")
else if (Ebene = 5)
- SendUnicodeChar(0x03B2, "Greek_beta") ; beta
+ SendUnicodeChar(0x03BA, "Greek_kappa") ; greek small letter kappa
else if (Ebene = 6)
- SendUnicodeChar(0x21D2, "implies") ; Doppel-Pfeil rechts
+ SendUnicodeChar(0x2209, "notelementof") ; nicht Element von
return
-neo_m:
+neo_8:
+ noCaps = 1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("a4",0x1E41,0x1E40)
- or CheckDeadUni12("c6",0x1E43,0x1E42)))
- OutputChar12("m","M","m","M")
+ if Ebene12 and !(CheckDeadUni("c1",0x2078) ; Hochgestellte 8
+ or CheckDeadUni("a3",0x2088)) ; Tiefgestellte 8
+ OutputChar12(8,"„",8,"doublelowquotemark")
else if (Ebene = 3)
- OutputChar("`%", "percent")
- else if ((Ebene = 4) and !(CheckDeadUni("c1",0x00B9)
- or CheckDeadUni("t4",0x2081)))
- OutputChar("{Numpad1}", "KP_1")
+ OutputChar("‚", "singlelowquotemark")
+ else if (Ebene = 4)
+ OutputChar("{NumpadDiv}", "KP_Divide")
else if (Ebene = 5)
- SendUnicodeChar(0x03BC, "Greek_mu") ; griechisch mu, micro wäre 0x00B5
+ SendUnicodeChar(0x27E8, "U27E8") ; bra (öffnende spitze Klammer)
else if (Ebene = 6)
- SendUnicodeChar(0x21D4, "ifonlyif") ; doppelter Doppelpfeil (genau dann wenn)
+ SendUnicodeChar(0x2204, "U2204") ; es existiert nicht
return
-neo_komma:
+neo_9:
noCaps = 1
EbeneAktualisieren()
- if (Ebene = 1)
- OutputChar(",", "comma")
- else if (Ebene = 2)
- SendUnicodeChar(0x22EE, "U22EE") ; vertikale Ellipse
+ if Ebene12 and !(CheckDeadUni("c1",0x2079) ; Hochgestellte 9
+ or CheckDeadUni("a3",0x2089)) ; Tiefgestellte 9
+ OutputChar12(9,"“",9,"leftdoublequotemark")
else if (Ebene = 3)
- OutputChar(Chr(34), "quotedbl")
- else if ((Ebene = 4) and !(CheckDeadUni("c1",0x00B2)
- or CheckDeadUni("c5",0x2082)))
- OutputChar("{Numpad2}", "KP_2")
+ OutputChar("‘", "leftsinglequotemark")
+ else if (Ebene = 4)
+ OutputChar("{NumpadMult}", "KP_Multiply")
else if (Ebene = 5)
- SendUnicodeChar(0x03C1, "Greek_rho") ; rho
+ SendUnicodeChar(0x27E9, "U27E9") ; ket (schließende spitze Klammer)
else if (Ebene = 6)
- SendUnicodeChar(0x21D0, "U21D0") ; Doppelpfeil links
+ SendUnicodeChar(0x2226, "U2226") ; nicht parallel
return
neo_punkt:
@@ -1559,150 +1480,227 @@ neo_punkt: SendUnicodeChar(0x0398, "Greek_THETA") ; Theta
return
-
-neo_j:
+neo_komma:
+ noCaps = 1
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni12("c1",0x0135,0x0134)
- or CheckDeadUni("c2",0x01F0)))
- OutputChar12("j","J","j","J")
+ if (Ebene = 1)
+ OutputChar(",", "comma")
+ else if (Ebene = 2)
+ SendUnicodeChar(0x22EE, "U22EE") ; vertikale Ellipse
else if (Ebene = 3)
- OutputChar("`;", "semicolon")
- else if (Ebene = 4)
- OutputChar("`;", "semicolon")
+ OutputChar(Chr(34), "quotedbl")
+ else if ((Ebene = 4) and !(CheckDeadUni("c1",0x00B2)
+ or CheckDeadUni("c5",0x2082)))
+ OutputChar("{Numpad2}", "KP_2")
else if (Ebene = 5)
- SendUnicodeChar(0x03B8, "Greek_theta") ; theta
+ SendUnicodeChar(0x03C1, "Greek_rho") ; rho
else if (Ebene = 6)
- SendUnicodeChar(0x2261, "identical") ; identisch
+ SendUnicodeChar(0x21D0, "U21D0") ; Doppelpfeil links
return
-/*
-
- Numpad
-
-*/
-
-neo_NumLock:
+neo_strich:
+ noCaps = 1
EbeneAktualisieren()
- if Ebene12
- OutputChar("{Tab}", "Tab")
+ if (Ebene = 1)
+ OutputChar("-", "minus") ; Bindestrich-Minus
+ else if (Ebene = 2)
+ SendUnicodeChar(0x2013, "endash") ; Gedankenstrich
else if (Ebene = 3)
- OutputChar("`=", "equal")
- else if (Ebene = 4)
- SendUnicodeChar(0x2260, "notequal") ; Ungleich zu
+ SendUnicodeChar(0x2014, "emdash") ; Englischer Gedankenstrich (Geviertstrich)
else if (Ebene = 5)
- SendUnicodeChar(0x2248, "approxeq") ; Fast gleich
+ SendUnicodeChar(0x2011, "U2011") ; geschützter Bindestrich (Bindestrich ohne Zeilenumbruch)
else if (Ebene = 6)
- SendUnicodeChar(0x2261, "identical")
+ SendUnicodeChar(0x00AD, "hyphen") ; weicher Bindestrich
return
-neo_NumpadDiv:
- EbeneAktualisieren()
- if Ebene12
- OutputChar("{NumpadDiv}", "KP_Divide")
- else if (Ebene = 3)
- OutputChar("÷", "division")
- else if (Ebene = 4)
- SendUnicodeChar(0x2300, "U2300") ; diameter
- else if (Ebene = 5)
- SendUnicodeChar(0x2223, "U2223") ; divides
- else if (Ebene = 6)
- SendUnicodeChar(0x2044, "U2044") ; fraction slash
+*space::
+ if einHandNeo
+ spacepressed := 1
+ else goto neo_SpaceUp
return
-neo_NumpadMult:
+*space up::
+ if einHandNeo
+ if keypressed {
+ keypressed := 0
+ spacepressed := 0
+ } else goto neo_SpaceUp
+ return
+
+neo_SpaceUp:
EbeneAktualisieren()
- if Ebene12
- send {blind}{NumpadMult}
- else if (Ebene = 3)
- SendUnicodeChar(0x22C5, "U22C5") ; multiplication dot
- else if (Ebene = 4)
- SendUnicodeChar(0x2299, "U2299") ; circled dot
+ if (Ebene = 1) and !CheckDeadUni("a3",0x2010) ; Echter Bindestrich
+ OutputChar("{Space}", "Space")
+ else if (Ebene = 2) or (Ebene = 3)
+ Send {blind}{Space}
+ else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2070)
+ or CheckDeadUni("a3",0x2080)))
+ OutputChar("{Numpad0}", "KP_0")
else if (Ebene = 5)
- OutputChar("×", "multiply")
+ SendUnicodeChar(0x00A0, "U00A0") ; geschütztes Leerzeichen
else if (Ebene = 6)
- SendUnicodeChar(0x2297, "U2297") ; circled times
+ SendUnicodeChar(0x202F, "U202F") ; schmales geschütztes Leerzeichen
+ DeadKey := ""
+ CompKey := ""
+ spacepressed := 0
+ keypressed := 0
return
-neo_NumpadSub:
+*Enter::
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni("c1",0x207B)
- or CheckDeadUni("t4",0x208B)))
- send {blind}{NumpadSub}
- else if (Ebene = 3)
- SendUnicodeChar(0x2212, "U2212") ; Echtes Minus
- else if (Ebene = 4)
- SendUnicodeChar(0x2296, "U2296") ; circled minus
- else if (Ebene = 5)
- SendUnicodeChar(0x2216, "U2216") ; set minus
- else if (Ebene = 6)
- SendUnicodeChar(0x2238, "U2238") ; dot minus
+ if !lernModus or lernModus_std_Return {
+ if (Ebene = 4)
+ send {blind}{NumpadEnter}
+ else send {blind}{Enter}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*Backspace::
+ if !lernModus or lernModus_std_Backspace {
+ send {Blind}{Backspace}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*Del::
+ if !lernModus or lernModus_std_Entf
+ send {Blind}{Del}
return
-neo_NumpadAdd:
+*Ins::
+ if !lernModus or lernModus_std_Einf
+ send {Blind}{Ins}
+return
+
+neo_tab:
+ if (IsMod3Pressed()) { ; Compose!
+ DeadKey := "comp"
+ CompKey := ""
+ } else {
+ OutputChar("{Tab}","Tab")
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*Home::
+ if !lernModus or lernModus_std_Pos1 {
+ send {Blind}{Home}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*End::
+ if !lernModus or lernModus_std_Ende {
+ send {Blind}{End}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*PgUp::
+ if !lernModus or lernModus_std_PgUp {
+ send {Blind}{PgUp}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*PgDn::
+ if !lernModus or lernModus_std_PgDn {
+ send {Blind}{PgDn}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*Up::
+ if !lernModus or lernModus_std_Hoch {
+ send {Blind}{Up}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*Down::
+ if !lernModus or lernModus_std_Runter {
+ send {Blind}{Down}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*Left::
+ if !lernModus or lernModus_std_Links {
+ send {Blind}{Left}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+*Right::
+ if !lernModus or lernModus_std_Rechts {
+ send {Blind}{Right}
+ DeadKey := ""
+ CompKey := ""
+ } return
+
+neo_Numpad0:
EbeneAktualisieren()
- if (Ebene12 and !(CheckDeadUni("c1",0x207A)
- or CheckDeadUni("c5",0x208A)))
- send {blind}{NumpadAdd}
+ if (Ebene = 1)
+ OutputChar("{Numpad0}", "KP_0")
+ else if (Ebene = 2)
+ SendUnicodeChar(0x2423, "U2423") ; space sign
else if (Ebene = 3)
- OutputChar("±", "plusminus")
+ SendUnicodeChar(0x0025, "percent") ; Prozent
else if (Ebene = 4)
- SendUnicodeChar(0x2295, "U2295") ; circled plus
+ send {blind}{NumpadIns}
else if (Ebene = 5)
- SendUnicodeChar(0x2213, "U2213") ; minus-plus
+ SendUnicodeChar(0x2030, "U2030") ; Promille
else if (Ebene = 6)
- SendUnicodeChar(0x2214, "U2214") ; dot plus
-return
-
-neo_NumpadEnter:
- send {blind}{NumpadEnter}
+ SendUnicodeChar(0x25A1, "U25A1") ; white square
return
-neo_Numpad7:
+neo_Numpad1:
EbeneAktualisieren()
if (Ebene = 1)
- OutputChar("{Numpad7}", "KP_7")
+ OutputChar("{Numpad1}", "KP_1")
else if (Ebene = 2)
- SendUnicodeChar(0x2714, "U2714") ; check mark
+ SendUnicodeChar(0x2666, "diamond") ; Karo
else if (Ebene = 3)
- SendUnicodeChar(0x2195, "U2195") ; Hoch-Runter-Pfeil
+ SendUnicodeChar(0x2194, "U2194") ; Links-Rechts-Pfeil
else if (Ebene = 4)
- send {blind}{NumpadHome}
+ send {blind}{NumpadEnd}
else if (Ebene = 5)
- SendUnicodeChar(0x230A, "downstile") ;linke Untergrenze
+ SendUnicodeChar(0x226A, "U226A") ; much less
else if (Ebene = 6)
- SendUnicodeChar(0x2308, "upstile") ; linke Obergrenze
+ SendUnicodeChar(0x2264, "lessthanequal")
return
-neo_Numpad8:
+neo_Numpad2:
EbeneAktualisieren()
if (Ebene = 1)
- OutputChar("{Numpad8}", "KP_8")
+ OutputChar("{Numpad2}", "KP_2")
else if (Ebene = 2)
- SendUnicodeChar(0x2718, "U2718") ; ballot x
+ SendUnicodeChar(0x2265, "heart")
else if (Ebene = 3)
- SendUnicodeChar(0x2191, "uparrow") ; Hochpfeil
+ SendUnicodeChar(0x2192, "downarrow")
else if (Ebene = 4)
- send {blind}{NumpadUp}
+ send {blind}{NumpadDown}
else if (Ebene = 5)
- SendUnicodeChar(0x2229, "intersection") ; Durchschnitt
+ SendUnicodeChar(0x222A, "union") ; Vereinigung
else if (Ebene = 6)
- SendUnicodeChar(0x22C2, "U22C2") ; n-ary intersection
+ SendUnicodeChar(0x22C3, "U22C3") ; n-ary union
return
-neo_Numpad9:
+neo_Numpad3:
EbeneAktualisieren()
if (Ebene = 1)
- OutputChar("{Numpad9}", "KP_9")
+ OutputChar("{Numpad3}", "KP_3")
else if (Ebene = 2)
- SendUnicodeChar(0x2020, "dagger") ; Kreuz
+ SendUnicodeChar(0x2660, "U2660") ; Pik
else if (Ebene = 3)
- SendUnicodeChar(0x20D7, "U20D7") ; Vektor
+ SendUnicodeChar(0x21CC, "U21CC") ; Harpune
else if (Ebene = 4)
- send {blind}{NumpadPgUp}
+ send {blind}{NumpadPgDn}
else if (Ebene = 5)
- SendUnicodeChar(0x230B, "U230B") ; rechte Untergrenze
+ SendUnicodeChar(0x226B, "U226B") ; much greater
else if (Ebene = 6)
- SendUnicodeChar(0x2309, "U2309") ; rechte Obergrenze
+ SendUnicodeChar(0x2265, "greaterthanequal")
return
neo_Numpad4:
@@ -1753,68 +1751,128 @@ neo_Numpad6: SendUnicodeChar(0x2287, "U2287") ; Obermenge-gleich
return
-neo_Numpad1:
+neo_Numpad7:
EbeneAktualisieren()
if (Ebene = 1)
- OutputChar("{Numpad1}", "KP_1")
+ OutputChar("{Numpad7}", "KP_7")
else if (Ebene = 2)
- SendUnicodeChar(0x2666, "diamond") ; Karo
+ SendUnicodeChar(0x2714, "U2714") ; check mark
else if (Ebene = 3)
- SendUnicodeChar(0x2194, "U2194") ; Links-Rechts-Pfeil
+ SendUnicodeChar(0x2195, "U2195") ; Hoch-Runter-Pfeil
else if (Ebene = 4)
- send {blind}{NumpadEnd}
+ send {blind}{NumpadHome}
else if (Ebene = 5)
- SendUnicodeChar(0x226A, "U226A") ; much less
+ SendUnicodeChar(0x230A, "downstile") ;linke Untergrenze
else if (Ebene = 6)
- SendUnicodeChar(0x2264, "lessthanequal")
+ SendUnicodeChar(0x2308, "upstile") ; linke Obergrenze
return
-neo_Numpad2:
+neo_Numpad8:
EbeneAktualisieren()
if (Ebene = 1)
- OutputChar("{Numpad2}", "KP_2")
+ OutputChar("{Numpad8}", "KP_8")
else if (Ebene = 2)
- SendUnicodeChar(0x2265, "heart")
+ SendUnicodeChar(0x2718, "U2718") ; ballot x
else if (Ebene = 3)
- SendUnicodeChar(0x2192, "downarrow")
+ SendUnicodeChar(0x2191, "uparrow") ; Hochpfeil
else if (Ebene = 4)
- send {blind}{NumpadDown}
+ send {blind}{NumpadUp}
else if (Ebene = 5)
- SendUnicodeChar(0x222A, "union") ; Vereinigung
+ SendUnicodeChar(0x2229, "intersection") ; Durchschnitt
else if (Ebene = 6)
- SendUnicodeChar(0x22C3, "U22C3") ; n-ary union
+ SendUnicodeChar(0x22C2, "U22C2") ; n-ary intersection
return
-neo_Numpad3:
+neo_Numpad9:
EbeneAktualisieren()
if (Ebene = 1)
- OutputChar("{Numpad3}", "KP_3")
+ OutputChar("{Numpad9}", "KP_9")
else if (Ebene = 2)
- SendUnicodeChar(0x2660, "U2660") ; Pik
+ SendUnicodeChar(0x2020, "dagger") ; Kreuz
else if (Ebene = 3)
- SendUnicodeChar(0x21CC, "U21CC") ; Harpune
+ SendUnicodeChar(0x20D7, "U20D7") ; Vektor
else if (Ebene = 4)
- send {blind}{NumpadPgDn}
+ send {blind}{NumpadPgUp}
else if (Ebene = 5)
- SendUnicodeChar(0x226B, "U226B") ; much greater
+ SendUnicodeChar(0x230B, "U230B") ; rechte Untergrenze
else if (Ebene = 6)
- SendUnicodeChar(0x2265, "greaterthanequal")
+ SendUnicodeChar(0x2309, "U2309") ; rechte Obergrenze
return
-neo_Numpad0:
+neo_NumLock:
EbeneAktualisieren()
- if (Ebene = 1)
- OutputChar("{Numpad0}", "KP_0")
- else if (Ebene = 2)
- SendUnicodeChar(0x2423, "U2423") ; space sign
+ if Ebene12
+ OutputChar("{Tab}", "Tab")
else if (Ebene = 3)
- SendUnicodeChar(0x0025, "percent") ; Prozent
+ OutputChar("`=", "equal")
else if (Ebene = 4)
- send {blind}{NumpadIns}
+ SendUnicodeChar(0x2260, "notequal") ; Ungleich zu
else if (Ebene = 5)
- SendUnicodeChar(0x2030, "U2030") ; Promille
+ SendUnicodeChar(0x2248, "approxeq") ; Fast gleich
else if (Ebene = 6)
- SendUnicodeChar(0x25A1, "U25A1") ; white square
+ SendUnicodeChar(0x2261, "identical")
+return
+
+neo_NumpadDiv:
+ EbeneAktualisieren()
+ if Ebene12
+ OutputChar("{NumpadDiv}", "KP_Divide")
+ else if (Ebene = 3)
+ OutputChar("÷", "division")
+ else if (Ebene = 4)
+ SendUnicodeChar(0x2300, "U2300") ; diameter
+ else if (Ebene = 5)
+ SendUnicodeChar(0x2223, "U2223") ; divides
+ else if (Ebene = 6)
+ SendUnicodeChar(0x2044, "U2044") ; fraction slash
+return
+
+neo_NumpadMult:
+ EbeneAktualisieren()
+ if Ebene12
+ send {blind}{NumpadMult}
+ else if (Ebene = 3)
+ SendUnicodeChar(0x22C5, "U22C5") ; multiplication dot
+ else if (Ebene = 4)
+ SendUnicodeChar(0x2299, "U2299") ; circled dot
+ else if (Ebene = 5)
+ OutputChar("×", "multiply")
+ else if (Ebene = 6)
+ SendUnicodeChar(0x2297, "U2297") ; circled times
+return
+
+neo_NumpadSub:
+ EbeneAktualisieren()
+ if (Ebene12 and !(CheckDeadUni("c1",0x207B)
+ or CheckDeadUni("a3",0x208B)))
+ send {blind}{NumpadSub}
+ else if (Ebene = 3)
+ SendUnicodeChar(0x2212, "U2212") ; Echtes Minus
+ else if (Ebene = 4)
+ SendUnicodeChar(0x2296, "U2296") ; circled minus
+ else if (Ebene = 5)
+ SendUnicodeChar(0x2216, "U2216") ; set minus
+ else if (Ebene = 6)
+ SendUnicodeChar(0x2238, "U2238") ; dot minus
+return
+
+neo_NumpadAdd:
+ EbeneAktualisieren()
+ if (Ebene12 and !(CheckDeadUni("c1",0x207A)
+ or CheckDeadUni("a3",0x208A)))
+ send {blind}{NumpadAdd}
+ else if (Ebene = 3)
+ OutputChar("±", "plusminus")
+ else if (Ebene = 4)
+ SendUnicodeChar(0x2295, "U2295") ; circled plus
+ else if (Ebene = 5)
+ SendUnicodeChar(0x2213, "U2213") ; minus-plus
+ else if (Ebene = 6)
+ SendUnicodeChar(0x2214, "U2214") ; dot plus
+return
+
+neo_NumpadEnter:
+ send {blind}{NumpadEnter}
return
neo_NumpadDot:
@@ -1833,148 +1891,81 @@ neo_NumpadDot: SendUnicodeChar(0x2033, "seconds")
return
-/*
+neo_tot1:
+ noCaps = 1
+ EbeneAktualisieren()
+ if (Ebene = 1) and !CheckDeadUni("c1",0x0302) ; Zirkumflex, tot
- Sondertasten
+ deadUni(0x02C6, "dead_circumflex", "c1")
-*/
+ else if (Ebene = 2) and !CheckDeadUni("c2",0x0303) ; Tilde, tot
-*space::
- if einHandNeo
- spacepressed := 1
- else goto neo_SpaceUp
-return
+ deadUni(0x02DC, "dead_tilde", "c2")
-*space up::
- if einHandNeo
- if keypressed {
- keypressed := 0
- spacepressed := 0
- } else goto neo_SpaceUp
- return
+ else if (Ebene = 3) and !CheckDeadUni("c3",0x030A) ; Ring, tot
-neo_SpaceUp:
- EbeneAktualisieren()
- if (Ebene = 1) and !CheckDeadUni("t4",0x2010) ; Echter Bindestrich
- OutputChar("{Space}", "Space")
- else if (Ebene = 2) or (Ebene = 3)
- Send {blind}{Space}
- else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2070)
- or CheckDeadUni("c5",0x2080)))
- OutputChar("{Numpad0}", "KP_0")
- else if (Ebene = 5)
- SendUnicodeChar(0x00A0, "U00A0") ; geschütztes Leerzeichen
- else if (Ebene = 6)
- SendUnicodeChar(0x202F, "U202F") ; schmales geschütztes Leerzeichen
- DeadKey := ""
- CompKey := ""
- spacepressed := 0
- keypressed := 0
-return
+ deadUni(0x02DA, "dead_breve", "c3")
-/*
- Folgende Tasten sind nur aufgeführt, um DeadKey zu leeren.
- Irgendwie sieht das noch nicht schön aus. Vielleicht lässt sich dieses
- Problem auch eleganter lösen...
-*/
+ else if (Ebene = 4) and !CheckDeadUni("c4",0x030C) ; Caron, tot
-*Enter::
- EbeneAktualisieren()
- if !lernModus or lernModus_std_Return {
- if (Ebene = 4)
- send {blind}{NumpadEnter}
- else send {blind}{Enter}
- DeadKey := ""
- CompKey := ""
- } return
+ deadUni(0x02C7, "dead_caron", "c4")
-*Backspace::
- if !lernModus or lernModus_std_Backspace {
- send {Blind}{Backspace}
- DeadKey := ""
- CompKey := ""
- } return
+ else if (Ebene = 5) and !CheckDeadUni("c5",0x0306) ; Brevis, tot
-*Del::
- if !lernModus or lernModus_std_Entf
- send {Blind}{Del}
+ deadUni(0x02D8, "dead_breve", "c5")
+
+ else if (Ebene = 6) and !CheckDeadUni("c6",0x0304) ; Makron, tot
+
+ deadAsc("¯", "dead_macron", "c6")
return
-*Ins::
- if !lernModus or lernModus_std_Einf
- send {Blind}{Ins}
+neo_tot2:
+ noCaps = 1
+ EbeneAktualisieren()
+ if (Ebene = 1) and !CheckDeadUni("g1",0x0300) ; Gravis, tot
+
+ deadAsc("``{space}", "dead_grave", "g1")
+
+ if (Ebene = 2) and !CheckDeadUni("g2",0x030F) ; Doppelgravis, tot
+
+ deadUni(0x02F5, "dead_doublegrave", "g2")
+
+ else if (Ebene = 3) and !CheckDeadUni("g3",0x0308) ; Diärese, tot
+
+ deadUni(0x00A8, "dead_diaeresis", "g3")
+
+ else if (Ebene = 5) and !CheckDeadUni("g5",0x0485) ; Spiritus asper, tot
+
+ deadUni(0x1FFE, "U1FFE", "g5")
return
-/*
-Auf Mod3+Tab liegt Compose.
-*/
+neo_tot3:
+ noCaps = 1
+ EbeneAktualisieren()
+ if (Ebene = 1) and !CheckDeadUni("a1",0x0301) ; Akut, tot
-neo_tab:
- if (IsMod3Pressed()) {
- DeadKey := "comp"
- CompKey := ""
- } else {
- OutputChar("{Tab}","Tab")
- DeadKey := ""
- CompKey := ""
- } return
+ deadAsc("{´}{space}", "dead_acute", "a1")
-*Home::
- if !lernModus or lernModus_std_Pos1 {
- send {Blind}{Home}
- DeadKey := ""
- CompKey := ""
- } return
+ else if (Ebene = 2) and !CheckDeadUni("a2",0x0327) ; Cedille, tot
-*End::
- if !lernModus or lernModus_std_Ende {
- send {Blind}{End}
- DeadKey := ""
- CompKey := ""
- } return
+ deadAsc("¸", "dead_cedilla", "a2")
-*PgUp::
- if !lernModus or lernModus_std_PgUp {
- send {Blind}{PgUp}
- DeadKey := ""
- CompKey := ""
- } return
+ else if (Ebene = 3) and !CheckDeadUni("a3",0x0337) ; Strich, tot
-*PgDn::
- if !lernModus or lernModus_std_PgDn {
- send {Blind}{PgDn}
- DeadKey := ""
- CompKey := ""
- } return
+ deadUni(0x002F, "dead_stroke", "a3")
-*Up::
- if !lernModus or lernModus_std_Hoch {
- send {Blind}{Up}
- DeadKey := ""
- CompKey := ""
- } return
+ else if (Ebene = 4) and !CheckDeadUni("a4",0x0338) ; Doppelakut, tot
-*Down::
- if !lernModus or lernModus_std_Runter {
- send {Blind}{Down}
- DeadKey := ""
- CompKey := ""
- } return
+ deadUni(0x02DD, "dead_doubleacute", "a4")
-*Left::
- if !lernModus or lernModus_std_Links {
- send {Blind}{Left}
- DeadKey := ""
- CompKey := ""
- } return
+ else if (Ebene = 5) and !CheckDeadUni("a5",0x0486) ; Spiritus lenis, tot
-*Right::
- if !lernModus or lernModus_std_Rechts {
- send {Blind}{Right}
- DeadKey := ""
- CompKey := ""
- } return
+ deadUni(0x1FBF, "U1FBF", "a5")
+ else if (Ebene = 6) and !CheckDeadUni("a6",0x0307) ; Punkt darüber, tot
+
+ deadUni(0x02D9, "dead_abovedot", "a6")
+return
/*
------------------------------------------------------
@@ -2088,6 +2079,7 @@ deadAsc(val1, val2, a) { global
if !DeadSilence
OutputChar(val1, val2)
+ else CheckComp(val2)
DeadKey := a
}
@@ -2095,6 +2087,7 @@ deadUni(val1, val2, a) { global
if !DeadSilence
SendUnicodeChar(val1, val2)
+ else CheckComp(val2)
DeadKey := a
}
diff --git a/windows/autohotkey/neo20.exe b/windows/autohotkey/neo20.exe Binary files differindex 4323102..0f1117d 100644 --- a/windows/autohotkey/neo20.exe +++ b/windows/autohotkey/neo20.exe |