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/autohotkey/Source/Keys-Neo.ahk | 544 --------------------------------- 1 file changed, 544 deletions(-) delete mode 100644 windows/autohotkey/Source/Keys-Neo.ahk (limited to 'windows/autohotkey/Source/Keys-Neo.ahk') diff --git a/windows/autohotkey/Source/Keys-Neo.ahk b/windows/autohotkey/Source/Keys-Neo.ahk deleted file mode 100644 index cd610e7..0000000 --- a/windows/autohotkey/Source/Keys-Neo.ahk +++ /dev/null @@ -1,544 +0,0 @@ -neo_a: - EbeneAktualisieren() - if (((Ebene = 2) and !(CheckDeadUni("a5g1",0x1F02) - or CheckDeadUni("g5g1",0x1F03))) - or (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 CheckDeadAsc12("g3","ä","Ä") - or CheckDeadUni12("g4",0x0201,0x0200) - or CheckDeadUni12("a1",0x00E1,0x00C1) - or CheckDeadUni12("a2",0x0105,0x0104) - or CheckDeadUni12("a3",0x2C65,0x023A) - or CheckDeadUni12("a6",0x0227,0x0226)))) - OutputChar12("a","A","a","A") - else if (Ebene = 3) - OutputChar("{{}", "braceleft") - else if (Ebene = 4) - 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(0x2200, "U2200") ; für alle -return - -neo_b: - EbeneAktualisieren() - if (Ebene12 and !(CheckDeadUni12("c6",0x1E07,0x1E06) - or CheckDeadUni12("a6",0x1E03,0x1E02))) - OutputChar12("b","B","b","B") - else if (Ebene = 3) - if isMod2Locked - OutputChar("{Shift Up}{+}{Shift down}", "plus") - else OutputChar("{blind}{+}", "plus") - else if (Ebene = 4) - OutputChar(":", "colon") - else if (Ebene = 5) - SendUnicodeChar(0x03B2, "Greek_beta") ; beta - else if (Ebene = 6) - SendUnicodeChar(0x21D0, "U21D0") ; Doppelpfeil links -return - -neo_c: - EbeneAktualisieren() - 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) - OutputChar("]", "bracketright") - else if (Ebene = 4) and (!lernModus or lernModus_neo_Entf) - OutputChar("{Del}", "Delete") - else if (Ebene = 5) - SendUnicodeChar(0x03C7, "Greek_chi") ; chi - else if (Ebene = 6) - SendUnicodeChar(0x2102, "U2102") ; C (Komplexe Zahlen)] -return - -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_e: - EbeneAktualisieren() - if (Ebene12 and !(CheckDeadUni12("c1",0x00EA,0x00CA) - or CheckDeadUni12("c2",0x1EBD,0x1EBC) - or CheckDeadUni12("c4",0x011B,0x011A) - or CheckDeadUni12("c5",0x0115,0x0114) - or CheckDeadUni12("c6",0x0113,0x0112) - or CheckDeadUni12("g1",0x00E8,0x00C8) - or CheckDeadAsc12("g3","ë","Ë") - or CheckDeadUni12("g4",0x0205,0x0204) - or CheckDeadUni12("a1",0x00E9,0x00C9) - or CheckDeadUni12("a2",0x0119,0x0118) - or CheckDeadUni12("a6",0x0117,0x0116))) - OutputChar12("e","E","e","E") - else if (Ebene = 3) - OutputChar("{}}", "braceright") - else if (Ebene = 4) - OutputChar("{Right}", "Right") - else if (Ebene = 5) - SendUnicodeChar(0x03B5, "Greek_epsilon") ; epsilon - else if (Ebene = 6) - SendUnicodeChar(0x2203, "U2203") ; es existiert -return - -neo_f: - EbeneAktualisieren() - 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(0x03C6, "Greek_phi") ; phi - else if (Ebene = 6) - SendUnicodeChar(0x03A6, "Greek_PHI") ; Phi -return - -neo_g: - EbeneAktualisieren() - 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(0x03B3, "Greek_gamma") ; gamma - else if (Ebene = 6) - SendUnicodeChar(0x0393, "Greek_GAMMA") ; Gamma -return - -neo_h: - EbeneAktualisieren() - 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(0x03C8, "Greek_psi") ; psi - else if (Ebene = 6) - SendUnicodeChar(0x03A8, "Greek_PSI") ; Psi -return - -neo_i: - EbeneAktualisieren() - 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("g4",0x0209,0x0208) - or CheckDeadUni12("a1",0x00ED,0x00CD) - or CheckDeadUni12("a2",0x012F,0x012E) - or CheckDeadUni12("a3",0x0268,0x0197) - or CheckDeadUni12("a6",0x0131,0x0130))) - OutputChar12("i","I","i","I") - else if (Ebene = 3) - OutputChar("`/", "slash") - else if (Ebene = 4) - OutputChar("{Left}", "Left") - else if (Ebene = 5) - SendUnicodeChar(0x03B9, "Greek_iota") ; iota - else if (Ebene = 6) - SendUnicodeChar(0x222B, "integral") ; integral -return - -neo_j: - EbeneAktualisieren() - if (Ebene12 and !(CheckDeadUni12("c1",0x0135,0x0134) - or CheckDeadUni( "c4",0x01F0) - or CheckDeadUni12("a3",0x0249,0x0248))) - OutputChar12("j","J","j","J") - else if (Ebene = 3) - OutputChar("`;", "semicolon") - else if (Ebene = 4) - OutputChar("`;", "semicolon") - else if (Ebene = 5) - SendUnicodeChar(0x03B8, "Greek_theta") ; theta - else if (Ebene = 6) - SendUnicodeChar(0x221D, "variation") ; proportional -return - -neo_k: - EbeneAktualisieren() - if (Ebene12 and !(CheckDeadUni12("a2",0x0137,0x0136) - or CheckDeadUni12("a6",0x1E33,0x1E32))) - OutputChar12("k","K","k","K") - else if (Ebene = 3) - OutputChar("{!}", "exclam") - 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_l: - EbeneAktualisieren() - 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") - else if (Ebene = 4) - OutputChar("{Up}", "Up") - else if (Ebene = 5) - SendUnicodeChar(0x03BB, "Greek_lambda") ; lambda - else if (Ebene = 6) - SendUnicodeChar(0x039B, "Greek_LAMBDA") ; Lambda -return - -neo_m: - EbeneAktualisieren() - 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("a3",0x2081))) - OutputChar("{Numpad1}", "KP_1") - else if (Ebene = 5) - SendUnicodeChar(0x03BC, "Greek_mu") ; griechisch mu, micro wäre 0x00B5 - else if (Ebene = 6) - SendUnicodeChar(0x21D4, "ifonlyif") ; doppelter Doppelpfeil (genau dann wenn) -return - -neo_n: - EbeneAktualisieren() - 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("a3",0x2084))) - OutputChar("{Numpad4}", "KP_4") - else if (Ebene = 5) - SendUnicodeChar(0x03BD, "Greek_nu") ; nu - else if (Ebene = 6) - SendUnicodeChar(0x2115, "U2115") ; N (natürliche Zahlen) -return - -neo_o: - EbeneAktualisieren() - 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") - else if (Ebene = 4) - OutputChar("{End}", "End") - else if (Ebene = 5) - SendUnicodeChar(0x03BF, "Greek_omicron") ; omicron - else if (Ebene = 6) - SendUnicodeChar(0x2208, "elementof") ; element of -return - -neo_p: - EbeneAktualisieren() - 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(0x03C0, "Greek_pi") ; pi - else if (Ebene = 6) - SendUnicodeChar(0x03A0, "Greek_PI") ; Pi -return - -neo_q: - EbeneAktualisieren() - if (Ebene12) - OutputChar12("q","Q","q","Q") - else if (Ebene = 3) - OutputChar("{&}", "ampersand") - else if ((Ebene = 4) and !(CheckDeadUni("c1",0x207A) - 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_r: - EbeneAktualisieren() - 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("a3",0x2085))) - OutputChar("{Numpad5}", "KP_5") - else if (Ebene = 5) - SendUnicodeChar(0x03F1, "U03F1") ; rho symbol (varrho) - else if (Ebene = 6) - SendUnicodeChar(0x211D, "U221D") ; R (reelle Zahlen) -return - -neo_s: - EbeneAktualisieren() - if (Ebene12 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 (Ebene = 4) - OutputChar("¿", "questiondown") - else if (Ebene = 5) - SendUnicodeChar(0x03C3, "Greek_sigma") ;sigma - else if (Ebene = 6) - SendUnicodeChar(0x03A3, "Greek_SIGMA") ;Sigma -return - -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("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") - else if (Ebene = 4) - OutputChar("{Home}", "Home") - else if (Ebene = 6) - SendUnicodeChar(0x222E, "U222E") ; contour integral -return - -neo_v: - EbeneAktualisieren() - if (Ebene12 and !(CheckDeadUni12("a6",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") - 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) - OutputChar("{^}{space}", "asciicircum") ; Zirkumflex - else if (Ebene = 4) - OutputChar("{Insert}", "Insert") ; Einfg - else if (Ebene = 5) - SendUnicodeChar(0x03C9, "Greek_omega") ; omega - else if (Ebene = 6) - SendUnicodeChar(0x03A9, "Greek_OMEGA") ; Omega -return - -neo_x: - EbeneAktualisieren() - if Ebene12 - OutputChar12("x","X","x","X") - else if (Ebene = 3) - OutputChar("…", "ellipsis") ; Ellipse horizontal - else if (Ebene = 4) - SendUnicodeChar(0x22EE, "U22EE") ; Ellipse vertikal - else if (Ebene = 5) - SendUnicodeChar(0x03BE, "Greek_xi") ; xi - else if (Ebene = 6) - SendUnicodeChar(0x039E, "Greek_XI") ; Xi -return - -neo_y: - EbeneAktualisieren() - 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") - else if (Ebene = 4) - OutputChar(".", "period") - else if (Ebene = 5) - SendUnicodeChar(0x03C5, "Greek_upsilon") ; upsilon - else if (Ebene = 6) - SendUnicodeChar(0x2207, "nabla") ; nabla -return - -neo_z: - EbeneAktualisieren() - 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("``{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) - SendUnicodeChar(0x2124, "U2124") ; Z (ganze Zahlen) -return - -neo_ä: - EbeneAktualisieren() - 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(0x03B7, "Greek_eta") ; eta - else if (Ebene = 6) - SendUnicodeChar(0x2135, "U2135") ; Kardinalzahlen, Aleph-Symbol -return - -neo_ö: - EbeneAktualisieren() - if (Ebene12 and !(CheckDeadUni12("c6",0x022B,0x022A))) - OutputChar12("ö","Ö","odiaeresis","Odiaeresis") - else if (Ebene = 3) - OutputChar("$", "dollar") - else if (Ebene = 4) - OutputChar("{Tab}", "Tab") - else if (Ebene = 6) - SendUnicodeChar(0x2111, "U2221") ; Fraktur I -return - -neo_ü: - EbeneAktualisieren() - 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) - if isMod2Locked - OutputChar("{Shift Up}{#}", "numbersign") - else OutputChar("{blind}{#}", "numbersign") - else if (Ebene = 4) - OutputChar("{Esc}", "Escape") - else if (Ebene = 6) - SendUnicodeChar(0x211C, "U221C") ; Fraktur R -return - -neo_sz: - EbeneAktualisieren() - if (Ebene = 1) - if LangSTastatur - OutputChar("s", "s") - else OutputChar("ß", "ssharp") - else if (Ebene = 2) - SendUnicodeChar(0x1E9E, "U1E9E") ; versal-ß - else if (Ebene = 3) - if LangSTastatur - OutputChar("ß", "ssharp") - else SendUnicodeChar(0x017F, "17F") ; langes s - else if (Ebene = 5) - SendUnicodeChar(0x03C2, "Greek_finalsmallsigma") ; varsigma - else if (Ebene = 6) - SendUnicodeChar(0x2218, "jot") ; Verknüpfungsoperator -return - -- cgit v1.2.3