diff options
| author | david <david@b9310e46-f624-0410-8ea1-cfbb3a30dc96> | 2007-06-12 03:22:21 +0000 |
|---|---|---|
| committer | david <david@b9310e46-f624-0410-8ea1-cfbb3a30dc96> | 2007-06-12 03:22:21 +0000 |
| commit | 3015f5a2dcbe5bc75dd6e5f61ab89ab82926f1c6 (patch) | |
| tree | bb16c55f8e05962d95966a1630001276e13a11f6 | |
| parent | 0c0405c7e148101ab9c9ba8e96901980184bdbf5 (diff) | |
Syntaxfehler behoben
git-svn-id: https://svn.neo-layout.org@161 b9310e46-f624-0410-8ea1-cfbb3a30dc96
| -rw-r--r-- | windows/XP/autohotkey/neo20-all-in-one.ahk | 699 |
1 files changed, 355 insertions, 344 deletions
diff --git a/windows/XP/autohotkey/neo20-all-in-one.ahk b/windows/XP/autohotkey/neo20-all-in-one.ahk index 5bf4883..a92785a 100644 --- a/windows/XP/autohotkey/neo20-all-in-one.ahk +++ b/windows/XP/autohotkey/neo20-all-in-one.ahk @@ -1,18 +1,20 @@ /*
Titel: NEO Autohotkey-Treiber
- Version: 0.04 beta
- Datum: 29.05.2007
+ Version: 0.05 beta
+ Datum: 12.06.2007
Basiert auf: neo20.ahk und neo20-remap.ahk vom 25.05.2007
TODO: - ausgiebig testen...
- - DeadKeys tot machen (?)
- Men des Tasksymbols
- - Symbol ndern (?)
- - wenn mglich, "sendinput {blind}" verwenden (?)
+ - Bessere Lsung fr das leeren von PriorDeadKey finden, damit die Sondertasten
+ nicht mehr abgefangen werden mssen.
+
+ Ideen:
+ - DeadKeys tot machen
+ - Symbol ndern
+ - wenn mglich, "sendinput {blind}" verwenden
(gibt es irgendwelche Probleme bei "sendinput {blind}" ?)
- bei Ebene 5 rechte Hand (Numpad) z.B. Numpad5 statt 5 senden
- - Bessere Lsung fr das leeren von myPriorHotkey finden, damit die Sondertasten
- nicht mehr abgefangen werden mssen.
*/
; aus Nora's script kopiert:
@@ -63,7 +65,7 @@ if inputlocale <> 00000407 */
Ebene = 1
-myPriorHotkey = ""
+PriorDeadKey := ""
/*
@@ -101,12 +103,12 @@ return /*
Ablauf bei toten Tasten:
1. Ebene Aktualisieren
- 2. Abhngig von der Variablen "Ebene" Zeichen ausgeben und die Variable "myPriorHotkey" setzen
+ 2. Abhngig von der Variablen "Ebene" Zeichen ausgeben und die Variable "PriorDeadKey" setzen
Ablauf bei "lebenden" (sagt man das?) Tasten:
1. Ebene Aktualisieren
- 2. Abhngig von den Variablen "Ebene" und "myPriorHotkey" Zeichen ausgeben
- 3. "myPriorHotkey" mit leerem String berschreiben
+ 2. Abhngig von den Variablen "Ebene" und "PriorDeadKey" Zeichen ausgeben
+ 3. "PriorDeadKey" mit leerem String berschreiben
------------------------------------------------------
Reihe 1
@@ -118,32 +120,32 @@ return if Ebene = 1
{
Unicode("ˆ") ; circumflex, tot
- myPriorHotkey = "c1"
+ PriorDeadKey := "c1"
}
else if Ebene = 2
{
Unicode("ˇ") ; caron, tot
- myPriorHotkey = "c2"
+ PriorDeadKey := "c2"
}
else if Ebene = 3
{
Unicode("˘") ; brevis
- myPriorHotkey = "c3"
+ PriorDeadKey := "c3"
}
else if Ebene = 4
{
send - ; querstrich, tot
- myPriorHotkey = "c4"
+ PriorDeadKey := "c4"
}
else if Ebene = 5
{
Unicode("·") ; Mittenpunkt, tot
- myPriorHotkey = "c5"
+ PriorDeadKey := "c5"
}
else if Ebene = 6
{
Send . ; punkt darunter
- myPriorHotkey = "c6"
+ PriorDeadKey := "c6"
}
return
@@ -151,7 +153,7 @@ return EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex 1
+ If (PriorDeadKey = "c1") ; circumflex 1
BSUnicode("¹")
Else
send 1
@@ -162,14 +164,14 @@ return send
else if Ebene = 5
Unicode("⅛") ; 1/8
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*2::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("²")
Else
send 2
@@ -178,14 +180,14 @@ return send
else if Ebene = 4
send
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*3::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("³")
Else
send 3
@@ -196,7 +198,7 @@ return send
else if Ebene = 5
Unicode("⅜") ; 3/8
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*4::
@@ -213,7 +215,7 @@ return Send {PgUp} ; Prev
else if Ebene = 6
Send +{Prev}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*5::
@@ -230,7 +232,7 @@ return Unicode("⅝") ; 5/8
else if Ebene = 6
Unicode("⇒") ; Implikation
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*6::
@@ -245,7 +247,7 @@ return send
else if Ebene = 6
Unicode("⇔") ; quivalenz
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*7::
@@ -260,7 +262,7 @@ return send
else if Ebene = 5
Unicode("⅞") ; 7/8
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*8::
@@ -277,7 +279,7 @@ return Send /
else if Ebene = 6
Unicode("∃") ; Existenzquantor
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*9::
@@ -294,7 +296,7 @@ return Send *
else if Ebene = 6
Unicode("∀") ; Allquantor
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*0::
@@ -311,7 +313,7 @@ return Send -
else if Ebene = 6
Send
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*::
@@ -326,7 +328,7 @@ return send
else if Ebene = 6
Unicode("∨") ; logisch oder
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*::
@@ -334,32 +336,32 @@ return if Ebene = 1
{
send {}{space} ; akut, tot
- myPriorHotkey = "a1"
+ PriorDeadKey := "a1"
}
else if Ebene = 2
{
send ``{space}
- myPriorHotkey = "a2"
+ PriorDeadKey := "a2"
}
else if Ebene = 3
{
send ; cedilla
- myPriorHotkey = "a3"
+ PriorDeadKey := "a3"
}
else if Ebene = 4
{
Unicode("˛") ; ogonek
- myPriorHotkey = "a4"
+ PriorDeadKey := "a4"
}
else if Ebene = 5
{
Unicode("˙") ; punkt oben drber
- myPriorHotkey = "a5"
+ PriorDeadKey := "a5"
}
else if Ebene = 6
{
Unicode("˚") ; ring obendrauf
- myPriorHotkey = "a6"
+ PriorDeadKey := "a6"
}
return
@@ -382,7 +384,7 @@ return Unicode("ξ") ;xi
else if Ebene = 6
Unicode("Ξ") ; Xi
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
@@ -390,14 +392,14 @@ return EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c6" ; punkt darunter
+ If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ṿ")
Else
sendinput {blind}v
}
else if Ebene = 2
{
- If myPriorHotkey = "c6" ; punkt darunter
+ If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ṿ")
Else
sendinput {blind}V
@@ -408,7 +410,7 @@ return Send {Backspace}
else if Ebene = 6
Unicode("Λ") ; Lambda
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
@@ -417,34 +419,34 @@ return EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "t5" ; Schrgstrich
+ If (PriorDeadKey = "t5") ; Schrgstrich
BSUnicode("ł")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("ĺ")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("ľ")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("ļ")
- Else If myPriorHotkey = "c5" ; Mittenpunkt
+ Else If (PriorDeadKey = "c5") ; Mittenpunkt
BSUnicode("ŀ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ḷ")
Else
sendinput {blind}l
}
else if Ebene = 2
{
- If myPriorHotkey = "a1" ; akut
+ If (PriorDeadKey = "a1") ; akut
BSUnicode("Ĺ")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("Ľ")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("Ļ")
- Else If myPriorHotkey = "t5" ; Schrgstrich
+ Else If (PriorDeadKey = "t5") ; Schrgstrich
BSUnicode("Ł")
- Else If myPriorHotkey = "c5" ; Mittenpunkt
+ Else If (PriorDeadKey = "c5") ; Mittenpunkt
BSUnicode("Ŀ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ḷ")
Else
sendinput {blind}L
@@ -457,7 +459,7 @@ return Sendinput {Blind}{Up}
else if Ebene = 6
Sendinput {Blind}+{Up}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
@@ -465,30 +467,30 @@ return EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ĉ")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("č")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("ć")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("ç")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ċ")
Else
sendinput {blind}c
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Ĉ")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("Č")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Ć")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("Ç")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ċ")
Else
sendinput {blind}C
@@ -501,21 +503,21 @@ return Send {Tab}
else if Ebene = 6
Send +{Tab}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*t::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ŵ")
Else
sendinput {blind}w
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ŵ")
Else
sendinput {blind}W
@@ -526,25 +528,25 @@ return Send {Insert}
else if Ebene = 6
Send +{Insert}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*z::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "a3" ; cedilla
+ If (PriorDeadKey = "a3") ; cedilla
BSUnicode("ķ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ḳ")
Else
sendinput {blind}k
}
else if Ebene = 2
{
- If myPriorHotkey = "a3" ; cedilla
+ If (PriorDeadKey = "a3") ; cedilla
BSUnicode("Ķ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ḳ")
Else
sendinput {blind}K
@@ -557,38 +559,38 @@ return Send
else if Ebene = 6
Send
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*u::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ĥ")
- Else If myPriorHotkey = "c4" ; Querstrich
+ Else If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("ħ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ḣ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ḥ")
Else sendinput {blind}h
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Ĥ")
- Else If myPriorHotkey = "c4" ; Querstrich
+ Else If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("Ħ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ḣ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ḥ")
Else sendinput {blind}H
}
else if Ebene = 3
{
- If myPriorHotkey = "c4" ; Querstrich
+ If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("≤")
Else
send <
@@ -599,38 +601,38 @@ return Send 7
else if Ebene = 6
Unicode("Ψ") ; Phi
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*i::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ĝ")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("ğ")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("ģ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ġ")
Else sendinput {blind}g
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Ĝ")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("Ğ")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("Ģ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ġ")
Else sendinput {blind}G
}
else if Ebene = 3
{
- If myPriorHotkey = "c4" ; Querstrich
+ If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("≥")
Else
send >
@@ -641,40 +643,40 @@ return Send 8
else if Ebene = 6
Unicode("Γ") ; Gamma
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*o::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "t5" ; durchgestrichen
+ If (PriorDeadKey = "t5") ; durchgestrichen
BSUnicode("ƒ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ḟ")
Else sendinput {blind}f
}
else if Ebene = 2
{
- If myPriorHotkey = "t5" ; durchgestrichen
+ If (PriorDeadKey = "t5") ; durchgestrichen
BSUnicode("₣")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ḟ")
Else sendinput {blind}F
}
else if Ebene = 3
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("≙")
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("≅")
- Else If myPriorHotkey = "t5" ; Schrgstrich
+ Else If (PriorDeadKey = "t5") ; Schrgstrich
BSUnicode("≠")
- Else If myPriorHotkey = "c4" ; Querstrich
+ Else If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("≡")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("≚")
- Else If myPriorHotkey = "a6" ; ring drber
+ Else If (PriorDeadKey = "a6") ; ring drber
BSUnicode("≗")
@@ -694,7 +696,7 @@ return Send 9
else if Ebene = 6
Unicode("Φ") ; Psi
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*p::
@@ -709,7 +711,7 @@ return Send {+}
else if Ebene = 6
Unicode("∧") ; logisches Und
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*::
@@ -726,7 +728,7 @@ return Unicode("ə") ; schwa
else if Ebene = 6
Unicode("Ə") ; Schwa
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
@@ -735,32 +737,32 @@ return if Ebene = 1
{
Unicode("˜") ; tilde, tot
- myPriorHotkey = "t1"
+ PriorDeadKey := "t1"
}
else if Ebene = 2
{
Unicode("ˉ") ; macron, tot
- myPriorHotkey = "t2"
+ PriorDeadKey := "t2"
}
else if Ebene = 3
{
Unicode("¨") ; Diaerese
- myPriorHotkey = "t3"
+ PriorDeadKey := "t3"
}
else if Ebene = 4
{
send " ;doppelakut
- myPriorHotkey = "t4"
+ PriorDeadKey := "t4"
}
else if Ebene = 5
{
Unicode("/") ; Schrgstrich, tot
- myPriorHotkey = "t5"
+ PriorDeadKey := "t5"
}
else if Ebene = 6
{
Unicode("ˏ") ; komma drunter, tot
- myPriorHotkey = "t6"
+ PriorDeadKey := "t6"
}
return
@@ -775,54 +777,54 @@ return EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("û")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("ú")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("ù")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
Send, {bs}
- Else If myPriorHotkey = "t4" ; doppelakut
+ Else If (PriorDeadKey = "t4") ; doppelakut
BSUnicode("ű")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("ŭ")
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("ū")
- Else If myPriorHotkey = "a4" ; ogonek
+ Else If (PriorDeadKey = "a4") ; ogonek
BSUnicode("ų")
- Else If myPriorHotkey = "a6" ; Ring
+ Else If (PriorDeadKey = "a6") ; Ring
BSUnicode("ů")
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("ũ")
Else
sendinput {blind}u
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Û")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Ú")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("Ù")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
Send, {bs}
- Else If myPriorHotkey = "a6" ; Ring
+ Else If (PriorDeadKey = "a6") ; Ring
BSUnicode("Ů")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("Ŭ")
- Else If myPriorHotkey = "t4" ; doppelakut
+ Else If (PriorDeadKey = "t4") ; doppelakut
BSUnicode("Ű")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("Ů")
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("Ū")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("Ŭ")
- Else If myPriorHotkey = "a4" ; ogonek
+ Else If (PriorDeadKey = "a4") ; ogonek
BSUnicode("Ų")
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("Ũ")
Else
sendinput {blind}U
@@ -833,53 +835,53 @@ return Send {Home}
else if Ebene = 6
Send +{Home}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*s::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("î")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("í")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("ì")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
Send, {bs}
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("ī")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("ĭ")
- Else If myPriorHotkey = "a4" ; ogonek
+ Else If (PriorDeadKey = "a4") ; ogonek
BSUnicode("į")
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("ĩ")
- Else If myPriorHotkey = "a5" ; (ohne) punkt darber
+ Else If (PriorDeadKey = "a5") ; (ohne) punkt darber
BSUnicode("ı")
Else
sendinput {blind}i
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Î")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Í")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("Ì")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
Send, {bs}
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("Ī")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("Ĭ")
- Else If myPriorHotkey = "a4" ; ogonek
+ Else If (PriorDeadKey = "a4") ; ogonek
BSUnicode("Į")
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("Ĩ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("İ")
Else
sendinput {blind}I
@@ -892,53 +894,53 @@ return Sendinput {Blind}{Left}
else if Ebene = 6
Sendinput {Blind}+{Left}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*d::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("â")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("á")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("à")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
send {bs}
- Else If myPriorHotkey = "a6" ; Ring
+ Else If (PriorDeadKey = "a6") ; Ring
Send {bs}
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("ã")
- Else If myPriorHotkey = "a4" ; ogonek
+ Else If (PriorDeadKey = "a4") ; ogonek
BSUnicode("ą")
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("ā")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("ă")
Else
sendinput {blind}a
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Â")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Á")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("À")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
send {bs}
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("Ã")
- Else If myPriorHotkey = "a6" ; Ring
+ Else If (PriorDeadKey = "a6") ; Ring
Send {bs}
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("Ā")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("Ă")
- Else If myPriorHotkey = "a4" ; ogonek
+ Else If (PriorDeadKey = "a4") ; ogonek
BSUnicode("Ą")
Else
sendinput {blind}A
@@ -951,53 +953,53 @@ return Sendinput {Blind}{Down}
else if Ebene = 6
Sendinput {Blind}+{Down}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*f::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ê")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("é")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("è")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
Send, {bs}
- Else If myPriorHotkey = "a4" ; ogonek
+ Else If (PriorDeadKey = "a4") ; ogonek
BSUnicode("ę")
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("ē")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("ĕ")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("ě")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ė")
Else
sendinput {blind}e
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Ê")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("É")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("È")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
Send, {bs}
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("Ě")
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("Ē")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("Ĕ")
- Else If myPriorHotkey = "a4" ; ogonek
+ Else If (PriorDeadKey = "a4") ; ogonek
BSUnicode("Ę")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ė")
Else
sendinput {blind}E
@@ -1010,53 +1012,53 @@ return Sendinput {Blind}{Right}
else if Ebene = 6
Sendinput {Blind}+{Right}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*g::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ô")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("ó")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("ò")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
Send, {bs}
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("õ")
- Else If myPriorHotkey = "t4" ; doppelakut
+ Else If (PriorDeadKey = "t4") ; doppelakut
BSUnicode("ő")
- Else If myPriorHotkey = "t5" ; Schrgstrich
+ Else If (PriorDeadKey = "t5") ; Schrgstrich
BSUnicode("ø")
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("ō")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("ŏ")
Else
sendinput {blind}o
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Ô")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Ó")
- Else If myPriorHotkey = "a2" ; grave
+ Else If (PriorDeadKey = "a2") ; grave
BSUnicode("Ò")
- Else If myPriorHotkey = "t5" ; Schrgstrich
+ Else If (PriorDeadKey = "t5") ; Schrgstrich
BSUnicode("Ø")
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("Õ")
- Else If myPriorHotkey = "t4" ; doppelakut
+ Else If (PriorDeadKey = "t4") ; doppelakut
BSUnicode("Ő")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
send {bs}
- Else If myPriorHotkey = "t2" ; macron
+ Else If (PriorDeadKey = "t2") ; macron
BSUnicode("Ō")
- Else If myPriorHotkey = "c3" ; brevis
+ Else If (PriorDeadKey = "c3") ; brevis
BSUnicode("Ŏ")
Else
sendinput {blind}O
@@ -1069,41 +1071,41 @@ return Send {End}
else if Ebene = 6
Send +{End}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*h::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ŝ")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("ś")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("š")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("ş")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ṡ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ṣ")
Else
sendinput {blind}s
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Ŝ")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("Š")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Ś")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("Ş")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ṣ")
Else
sendinput {blind}S
@@ -1116,37 +1118,37 @@ return Send
else if Ebene = 6
Unicode("Σ") ; Sigma
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*j::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "a1" ; akut
+ If (PriorDeadKey = "a1") ; akut
BSUnicode("ń")
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("ñ")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("ň")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("ņ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ṅ")
Else
sendinput {blind}n
}
else if Ebene = 2
{
- If myPriorHotkey = "c2" ; caron
+ If (PriorDeadKey = "c2") ; caron
BSUnicode("Ň")
- Else If myPriorHotkey = "t1" ; tilde
+ Else If (PriorDeadKey = "t1") ; tilde
BSUnicode("Ñ")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Ń")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("Ņ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ṅ")
Else
sendinput {blind}N
@@ -1159,37 +1161,37 @@ return Send 4
else if Ebene = 6
Unicode("№") ; No
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*k::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "a1" ; akut
+ If (PriorDeadKey = "a1") ; akut
BSUnicode("ŕ")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("ř")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("ŗ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ṙ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ṛ")
Else
sendinput {blind}r
}
else if Ebene = 2
{
- If myPriorHotkey = "c2" ; caron
+ If (PriorDeadKey = "c2") ; caron
BSUnicode("Ř")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Ŕ")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("Ŗ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ṙ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ṛ")
Else
sendinput {blind}R
@@ -1202,37 +1204,37 @@ return Send 5
else if Ebene = 6
Unicode("®") ; (R)
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*l::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c2" ; caron
+ If (PriorDeadKey = "c2") ; caron
BSUnicode("ť")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("ţ")
- Else If myPriorHotkey = "c4" ; Querstrich
+ Else If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("ŧ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ṫ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ṭ")
Else
sendinput {blind}t
}
else if Ebene = 2
{
- If myPriorHotkey = "c2" ; caron
+ If (PriorDeadKey = "c2") ; caron
BSUnicode("Ť")
- Else If myPriorHotkey = "a3" ; cedilla
+ Else If (PriorDeadKey = "a3") ; cedilla
BSUnicode("Ţ")
- Else If myPriorHotkey = "c4" ; Querstrich
+ Else If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("Ŧ")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ṫ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ṭ")
Else
sendinput {blind}T
@@ -1245,37 +1247,37 @@ return Send 6
else if Ebene = 6
Unicode("™") ; TM
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c4" ; Querstrich
+ If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("đ")
- Else If myPriorHotkey = "t5" ; Schrgstrich
+ Else If (PriorDeadKey = "t5") ; Schrgstrich
BSUnicode("ð")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("ď")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ḋ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ḍ")
Else
sendinput {blind}d
}
else if Ebene = 2
{
- If myPriorHotkey = "c4" ; Querstrich
+ If (PriorDeadKey = "c4") ; Querstrich
BSUnicode("Đ")
- Else If myPriorHotkey = "t5" ; Schrgstrich
+ Else If (PriorDeadKey = "t5") ; Schrgstrich
BSUnicode("Ð")
- Else If myPriorHotkey = "c2" ; caron
+ Else If (PriorDeadKey = "c2") ; caron
BSUnicode("Ď")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ḋ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ḍ")
Else sendinput {blind}D
}
@@ -1287,29 +1289,29 @@ return Send `,
else if Ebene = 6
Unicode("Δ") ; Delta
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "t3" ; Diaerese
+ If (PriorDeadKey = "t3") ; Diaerese
Send {bs}
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("ý")
- Else If myPriorHotkey = "c1" ; circumflex
+ Else If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ŷ")
Else
sendinput {blind}y
}
else if Ebene = 2
{
- If myPriorHotkey = "a1" ; akut
+ If (PriorDeadKey = "a1") ; akut
BSUnicode("Ý")
- Else If myPriorHotkey = "t3" ; Diaerese
+ Else If (PriorDeadKey = "t3") ; Diaerese
Send {bs}
- Else If myPriorHotkey = "c1" ; circumflex
+ Else If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Ŷ")
Else
sendinput {blind}Y
@@ -1320,7 +1322,7 @@ return Send ; thorn
else if Ebene = 6
Send ; Thorn
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
;SC02B (#) wird zu Mod3
@@ -1344,7 +1346,7 @@ return send {#}
else if Ebene = 5
Send {Esc}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*x::
@@ -1359,7 +1361,7 @@ return Send {Del}
else if Ebene = 6
Unicode("∫") ; Int
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*c::
@@ -1376,28 +1378,28 @@ return Send {PgDn} ; Next
else if Ebene = 6
Send +{PgDn}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*v::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "a5" ; punkt darber
+ If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ṗ")
Else
sendinput {blind}p
}
else if Ebene = 2
{
- If myPriorHotkey = "a5" ; punkt darber
+ If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ṗ")
Else
sendinput {blind}P
}
else if Ebene = 3
{
- If myPriorHotkey = "t1" ; tilde
+ If (PriorDeadKey = "t1") ; tilde
BSUnicode("≈")
Else
sendraw ~
@@ -1408,31 +1410,31 @@ return Send {Enter}
else if Ebene = 6
Unicode("Π") ; Pi
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*b::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c2" ; caron
+ If (PriorDeadKey = "c2") ; caron
BSUnicode("ž")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("ź")
- Else If myPriorHotkey = "a5" ; punkt drber
+ Else If (PriorDeadKey = "a5") ; punkt drber
BSUnicode("ż")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ż")
Else
sendinput {blind}z
}
else if Ebene = 2
{
- If myPriorHotkey = "c2" ; caron
+ If (PriorDeadKey = "c2") ; caron
BSUnicode("Ž")
- Else If myPriorHotkey = "a1" ; akut
+ Else If (PriorDeadKey = "a1") ; akut
BSUnicode("Ź")
- Else If myPriorHotkey = "a5" ; punkt darber
+ Else If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ż")
Else
sendinput {blind}Z
@@ -1443,21 +1445,21 @@ return Unicode("ζ") ;zeta
else if Ebene = 6
Unicode("Ω") ; Omega
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*n::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "a5" ; punkt darber
+ If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ḃ")
Else
sendinput {blind}b
}
else if Ebene = 2
{
- If myPriorHotkey = "a5" ; punkt darber
+ If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ḃ")
Else
sendinput {blind}B
@@ -1470,25 +1472,25 @@ return Unicode("∞") ;infty
else if Ebene = 6
Unicode("•") ; bullet
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*m::
EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "a5" ; punkt darber
+ If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("ṁ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("ṃ")
Else
sendinput {blind}m
}
else if Ebene = 2
{
- If myPriorHotkey = "a5" ; punkt darber
+ If (PriorDeadKey = "a5") ; punkt darber
BSUnicode("Ṁ")
- Else If myPriorHotkey = "c6" ; punkt darunter
+ Else If (PriorDeadKey = "c6") ; punkt darunter
BSUnicode("Ṃ")
Else
sendinput {blind}M
@@ -1499,7 +1501,7 @@ return Unicode("µ") ;micro, mu wre μ
else if Ebene = 5
Send 1
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*,::
@@ -1514,7 +1516,7 @@ return Send 2
else if Ebene = 6
Unicode("√") ; sqrt
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*.::
@@ -1531,7 +1533,7 @@ return Send 3
else if Ebene = 6
Unicode("Θ") ; Theta
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
@@ -1539,14 +1541,14 @@ return EbeneAktualisieren()
if Ebene = 1
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("ĵ")
Else
sendinput {blind}j
}
else if Ebene = 2
{
- If myPriorHotkey = "c1" ; circumflex
+ If (PriorDeadKey = "c1") ; circumflex
BSUnicode("Ĵ")
Else
sendinput {blind}J
@@ -1557,7 +1559,7 @@ return Send .
else if Ebene = 6
Unicode("∇") ; Nabla
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
/*
@@ -1577,7 +1579,7 @@ return send
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("∕") ; slash
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadMult::
@@ -1588,7 +1590,7 @@ return send
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("⋅") ; cdot
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadSub::
@@ -1597,7 +1599,7 @@ return send {NumpadSub}
else if Ebene = 3
send -
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadAdd::
@@ -1608,7 +1610,7 @@ return send
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("∓") ; -+
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadEnter::
@@ -1619,7 +1621,7 @@ return Unicode("≠") ; neq
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≈") ; approx
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
/*
@@ -1637,7 +1639,7 @@ return send {NumpadHome}
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≪") ; ll
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad8::
@@ -1650,7 +1652,7 @@ return Unicode("↑") ; uparrow
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("∩") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad9::
@@ -1661,7 +1663,7 @@ return send {NumpadPgUp}
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≫") ; gg
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad4::
@@ -1674,7 +1676,7 @@ return Unicode("←") ; leftarrow
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("⊂") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad5::
@@ -1687,7 +1689,7 @@ return send
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("∊") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad6::
@@ -1700,7 +1702,7 @@ return Unicode("→") ; rightarrow
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("⊃") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad1::
@@ -1711,7 +1713,7 @@ return send {NumpadEnd}
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≤") ; leq
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad2::
@@ -1724,7 +1726,7 @@ return Unicode("↓") ; downarrow
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("∪") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad3::
@@ -1735,7 +1737,7 @@ return send {NumpadPgDn}
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≥") ; geq
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Numpad0::
@@ -1748,7 +1750,7 @@ return send `%
else if ( (Ebene = 4) or (Ebene = 5) )
send
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadDot::
@@ -1761,7 +1763,7 @@ return send .
else if ( (Ebene = 4) or (Ebene = 5) )
send `,
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
/*
@@ -1776,7 +1778,7 @@ return send {Numpad7}
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≪") ; ll
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadUp::
@@ -1789,7 +1791,7 @@ return Unicode("↑") ; uparrow
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("∩") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadPgUp::
@@ -1800,7 +1802,7 @@ return send {Numpad9}
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≫") ; gg
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadLeft::
@@ -1813,7 +1815,7 @@ return Unicode("←") ; leftarrow
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("⊂") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadClear::
@@ -1826,7 +1828,7 @@ return send
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("∊") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadRight::
@@ -1839,7 +1841,7 @@ return Unicode("→") ; rightarrow
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("⊃") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadEnd::
@@ -1850,7 +1852,7 @@ return send {Numpad1}
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≤") ; leq
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadDown::
@@ -1863,7 +1865,7 @@ return Unicode("↓") ; downarrow
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("∪") ;
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadPgDn::
@@ -1874,7 +1876,7 @@ return send {Numpad3}
else if ( (Ebene = 4) or (Ebene = 5) )
Unicode("≥") ; geq
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadIns::
@@ -1887,7 +1889,7 @@ return send `%
else if ( (Ebene = 4) or (Ebene = 5) )
send
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*NumpadDel::
@@ -1900,7 +1902,7 @@ return send .
else if ( (Ebene = 4) or (Ebene = 5) )
send `,
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
@@ -1921,11 +1923,11 @@ return SendUnicodeChar(0x2009) ; schmales Leerzeichen
else
Send {blind}{Space}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
/*
- Folgende Tasten sind nur aufgefhrt, um myPriorHotkey zu leeren.
+ Folgende Tasten sind nur aufgefhrt, um PriorDeadKey zu leeren.
Irgendwie sieht das noch nicht schn aus. Vielleicht lsst sich dieses
Problem irgendwie eleganter lsen...
@@ -1936,12 +1938,12 @@ return *Enter::
sendinput {Blind}{Enter}
- myPriorhotkey = ""
+ PriorDeadKey := ""
return
*Backspace::
sendinput {Blind}{Backspace}
- myPriorhotkey = ""
+ PriorDeadKey := ""
return
@@ -1953,49 +1955,49 @@ einem DeadKey drckt... *Tab::
send {Blind}{Tab}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*/
*Home::
sendinput {Blind}{Home}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*End::
sendinput {Blind}{End}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*PgUp::
sendinput {Blind}{PgUp}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*PgDn::
sendinput {Blind}{PgDn}
- myPriorHotkey = ""
+ PriorDeadKey := ""
return
*Up::
sendinput {Blind}{Up}
- myPriorhotkey = ""
+ PriorDeadKey := ""
return
*Down::
sendinput {Blind}{Down}
- myPriorhotkey = ""
+ PriorDeadKey := ""
return
*Left::
sendinput {Blind}{Left}
- myPriorhotkey = ""
+ PriorDeadKey := ""
return
*Right::
sendinput {Blind}{Right}
- myPriorhotkey = ""
+ PriorDeadKey := ""
return
@@ -2062,4 +2064,13 @@ SendUnicodeChar(charCode) EncodeInteger(ref, val)
{
DllCall("ntdll\RtlFillMemoryUlong", "Uint", ref, "Uint", 4, "Uint", val)
-}
\ No newline at end of file +}
+
+
+/*
+ ------------------------------------------------------
+ Shift+Pause "pausiert" das Script.
+ ------------------------------------------------------
+*/
+
++pause::suspend
\ No newline at end of file |