From 6d0b9db7e1dfa23ee0204b0a57847c4126e2500a Mon Sep 17 00:00:00 2001 From: dennis Date: Sat, 10 Jan 2009 16:33:14 +0000 Subject: Der »alte« AHK-Treiber ist als »deprecated« einzustufen. Der Namenswechsel des Verzeichnis soll dies wiederspielen und eventuelle »Gewohnheitsfehler« vermeiden. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://svn.neo-layout.org@1423 b9310e46-f624-0410-8ea1-cfbb3a30dc96 --- windows/ahk-auslaufend/Source/Keys-Numbers.ahk | 166 +++++++++++++++++++++++++ 1 file changed, 166 insertions(+) create mode 100644 windows/ahk-auslaufend/Source/Keys-Numbers.ahk (limited to 'windows/ahk-auslaufend/Source/Keys-Numbers.ahk') diff --git a/windows/ahk-auslaufend/Source/Keys-Numbers.ahk b/windows/ahk-auslaufend/Source/Keys-Numbers.ahk new file mode 100644 index 0000000..4f47afb --- /dev/null +++ b/windows/ahk-auslaufend/Source/Keys-Numbers.ahk @@ -0,0 +1,166 @@ +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("’", "rightsingleqoutemark") + else if (Ebene = 4) + OutputChar("{NumpadSub}", "KP_Minus") + else if (Ebene = 5) + SendUnicodeChar(0x2080, "U2080") + else if (Ebene = 6) + SendUnicodeChar(0x2205, "emptyset") ; leere Menge +return + +neo_1: + noCaps=1 + EbeneAktualisieren() + if Ebene12 and !(CheckDeadUni("c1",0x00B9) ; Hochgestellte 1 + or CheckDeadUni("a3",0x2081)) ; Tiefgestellte 1 + OutputChar12(1,"°",1,"degree") + else if (Ebene = 3) + OutputChar("¹", "onesuperior") ; Hochgestellte 1 + else if (Ebene = 4) + OutputChar("º", "U00BA") ; männlicher Ordinalindikator (º) + else if (Ebene = 5) + SendUnicodeChar(0x2081, "U2081") ; Tiefgestellte 1 + else if (Ebene = 6) + OutputChar("¬", "notsign") ; Nicht-Symbol +return + +neo_2: + noCaps = 1 + EbeneAktualisieren() + if Ebene12 and !(CheckDeadUni("c1",0x00B2) ; Hochgestellte 2 + or CheckDeadUni("a3",0x2082)) ; Tiefgestellte 2 + OutputChar12(2,"§",2,"section") + else if (Ebene = 3) + OutputChar("²", "twosuperior") ; Hochgestellte 2 + else if (Ebene = 4) + OutputChar("ª", "U00AA") ; weiblicher Ordinalindikator (ª) + else if (Ebene = 5) + SendUnicodeChar(0x2082, "U2082") ; Tiefgestellte 2 + else if (Ebene = 6) + SendUnicodeChar(0x2228, "logicalor") ; Logisches Oder +return + +neo_3: + noCaps = 1 + EbeneAktualisieren() + if (Ebene = 1) and !(CheckDeadUni("c1",0x00B3) ; Hochgestellte 3 + or CheckDeadUni("a3",0x2083)) ; Tiefgestellte 3 + OutputChar(3,3) + else if (Ebene = 2) + SendUnicodeChar(0x2113, "U2113") ; kleines l (Skript) + else if (Ebene = 3) + OutputChar("³", "threesuperior") ; Hochgestellte 3 + else if (Ebene = 4) + SendUnicodeChar(0x2116, "numerosign") ; Numero + else if (Ebene = 5) + SendUnicodeChar(0x2083, "U2083") ; Tiefgestellte 3 + else if (Ebene = 6) + SendUnicodeChar(0x2227, "logicaland") ; Logisches Und +return + +neo_4: + noCaps = 1 + EbeneAktualisieren() + if (Ebene = 1) and !(CheckDeadUni("c1",0x2074) ; Hochgestellte 4 + or CheckDeadUni("a3",0x2084)) ; Tiefgestellte 4 + OutputChar(4,4) + else if (Ebene = 2) + OutputChar("»", "guillemotright") + else if (Ebene = 3) + OutputChar("›", "U230A") ; Single guillemot right + else if (Ebene = 4) + OutputChar("{PgUp}", "Prior") ; Bild auf + else if (Ebene = 5) + OutputChar("†", "dagger") ; Kreuz + else if (Ebene = 6) + SendUnicodeChar(0x22A5, "uptack") ; Senkrecht +return + +neo_5: + noCaps = 1 + EbeneAktualisieren() + if (Ebene = 1) and !(CheckDeadUni("c1",0x2075) ; Hochgestellte 5 + or CheckDeadUni("a3",0x2085)) ; Tiefgestellte 5 + OutputChar(5,5) + else if (Ebene = 2) + OutputChar("«", "guillemotleft") ; Double guillemot left + else if (Ebene = 3) + OutputChar("‹", "U2039") ; Single guillemot left + else if (Ebene = 5) + SendUnicodeChar(0x2640, "femalesymbol") + else if (Ebene = 6) + SendUnicodeChar(0x2221, "U2221") ; Winkel +return + +neo_6: + noCaps = 1 + EbeneAktualisieren() + 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("¢", "cent") + else if (Ebene = 4) + OutputChar("£", "sterling") + else if (Ebene = 5) + SendUnicodeChar(0x2642, "malesymbol") + else if (Ebene = 6) + SendUnicodeChar(0x2225, "U2225") ; parallel +return + +neo_7: + noCaps = 1 + EbeneAktualisieren() + if Ebene12 and !(CheckDeadUni("c1",0x2077) ; Hochgestellte 7 + or CheckDeadUni("a3",0x2087)) ; Tiefgestellte 7 + OutputChar12(7,"$",7,"dollar") + else if (Ebene = 3) + OutputChar("¥", "yen") + else if (Ebene = 4) + OutputChar("¤", "currency") + else if (Ebene = 5) + SendUnicodeChar(0x03BA, "Greek_kappa") ; greek small letter kappa + else if (Ebene = 6) + SendUnicodeChar(0x2192, "rightarrow") ; Rechtspfeil +return + +neo_8: + noCaps = 1 + EbeneAktualisieren() + if Ebene12 and !(CheckDeadUni("c1",0x2078) ; Hochgestellte 8 + or CheckDeadUni("a3",0x2088)) ; Tiefgestellte 8 + OutputChar12(8,"„",8,"doublelowquotemark") + else if (Ebene = 3) + OutputChar("‚", "singlelowquotemark") + else if (Ebene = 4) + OutputChar("{NumpadDiv}", "KP_Divide") + else if (Ebene = 5) + SendUnicodeChar(0x27E8, "U27E8") ; bra (öffnende spitze Klammer) + else if (Ebene = 6) + SendUnicodeChar(0x221E, "infinity") +return + +neo_9: + noCaps = 1 + EbeneAktualisieren() + if Ebene12 and !(CheckDeadUni("c1",0x2079) ; Hochgestellte 9 + or CheckDeadUni("a3",0x2089)) ; Tiefgestellte 9 + OutputChar12(9,"“",9,"leftdoublequotemark") + else if (Ebene = 3) + OutputChar("‘", "leftsinglequotemark") + else if (Ebene = 4) + OutputChar("{NumpadMult}", "KP_Multiply") + else if (Ebene = 5) + SendUnicodeChar(0x27E9, "U27E9") ; ket (schließende spitze Klammer) + else if (Ebene = 6) + SendUnicodeChar(0x2226, "U2226") ; nicht parallel +return + -- cgit v1.2.3