From 83a93f0fd93a5dcca4c0d74f40dad2ebb9c22495 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?m=C3=B6si?= Date: Fri, 12 Feb 2010 11:22:56 +0000 Subject: Tastenfeld bis auf die Modifier und den Zahlenblock komplett. Anzeige von Symbolen anstelle von echten oder Sonder-Zeichen implementiert. git-svn-id: https://svn.neo-layout.org@2159 b9310e46-f624-0410-8ea1-cfbb3a30dc96 --- windows/neo-vars/src/source/screenkeyboard_new.ahk | 228 +++++++++++++++------ 1 file changed, 170 insertions(+), 58 deletions(-) diff --git a/windows/neo-vars/src/source/screenkeyboard_new.ahk b/windows/neo-vars/src/source/screenkeyboard_new.ahk index a1cb677..82c5afa 100644 --- a/windows/neo-vars/src/source/screenkeyboard_new.ahk +++ b/windows/neo-vars/src/source/screenkeyboard_new.ahk @@ -1,3 +1,5 @@ +; -*- encoding:utf-8 -*- + BSTNguiErstellt := 0 BSTNalwaysOnTop := 1 @@ -25,8 +27,7 @@ BSTNUpdate() { VarSetCapacity(ptrU,20) loop,parse,GuiKeyList,`, { - sc := A_LoopField - GuiPhysKey := vksc%sc% + GuiPhysKey := A_LoopField if (EbeneC<3) { if (NOC%GuiPhysKey%==1) { GuiEb := EbeneNC @@ -36,7 +37,9 @@ BSTNUpdate() { } else GuiEb := EbeneC GuiComp := Comp . CP%GuiEb%%GuiPhysKey% - if (CD%GuiComp% != "") { + if (GSYM%GuiComp% != "") { + GuiComp := GSYM%GuiComp% + } else if (CD%GuiComp% != "") { GuiComp := CD%GuiComp% } else if (CM%GuiComp% == 1) { GuiComp := "U00002A" @@ -62,15 +65,20 @@ BSTNUpdate() { GuiComp := SubStr(GuiComp,8) } NumPut(0x0 ,ptrU,GuiPos,"UShort") ; End of string - DllCall("SendMessageW", "UInt",GuiKey%sc%, "UInt",WM_SETTEXT, "UInt",0, "Uint",&ptrU) + DllCall("SendMessageW", "UInt",GuiKey%GuiPhysKey%, "UInt",WM_SETTEXT, "UInt",0, "Uint",&ptrU) } } } -GuiAddKey(sc,x,y) { +GuiAddKeyS(sc,x,y) { + global + GuiAddKey(vksc%sc%,x,y) +} + +GuiAddKey(key,x,y) { global - Gui, Add, Text, x%x% y%y% Center hwndGuiKey%sc%, MM - GuiKeyList := GuiKeyList . sc . "," + Gui, Add, Text, x%x% y%y% Center hwndGuiKey%key%, MM + GuiKeyList := GuiKeyList . key . "," } BSTNToggle() { @@ -109,58 +117,63 @@ BSTNToggle() { yPosition := WorkAreaBottom - 230 Gui, Color, FFFFFF Gui, Add, Picture,AltSubmit x0 y0 vPicture0, % ResourceFolder . "\ebene0.png" - Gui, Font, s10 bold, %UniFontName% + Gui, Font, s12 bold, %UniFontName% GuiKeyList := "" - GuiAddKey("029",12,8) - GuiAddKey("002",52,8) - GuiAddKey("003",90,8) - GuiAddKey("004",128,8) - GuiAddKey("005",166,8) - GuiAddKey("006",204,8) - GuiAddKey("007",242,8) - GuiAddKey("008",280,8) - GuiAddKey("009",318,8) - GuiAddKey("00A",356,8) - GuiAddKey("00B",394,8) - GuiAddKey("00C",432,8) - GuiAddKey("00D",470,8) - - GuiAddKey("010",64,48) - GuiAddKey("011",102,48) - GuiAddKey("012",140,48) - GuiAddKey("013",178,48) - GuiAddKey("014",216,48) - GuiAddKey("015",254,48) - GuiAddKey("016",292,48) - GuiAddKey("017",330,48) - GuiAddKey("018",368,48) - GuiAddKey("019",406,48) - GuiAddKey("01A",444,48) - GuiAddKey("01B",484,48) - GuiAddKey("00D",532,48) - - GuiAddKey("01E",82,88) - GuiAddKey("01F",120,88) - GuiAddKey("020",158,88) - GuiAddKey("021",196,88) - GuiAddKey("022",234,88) - GuiAddKey("023",272,88) - GuiAddKey("024",310,88) - GuiAddKey("025",348,88) - GuiAddKey("026",386,88) - GuiAddKey("027",424,88) - GuiAddKey("028",462,88) - - GuiAddKey("02C",94,128) - GuiAddKey("02D",132,128) - GuiAddKey("02E",170,128) - GuiAddKey("02F",208,128) - GuiAddKey("030",246,128) - GuiAddKey("031",284,128) - GuiAddKey("032",322,128) - GuiAddKey("033",360,128) - GuiAddKey("034",398,128) - GuiAddKey("035",436,128) + GuiAddKeyS("029",12,8) + GuiAddKeyS("002",52,8) + GuiAddKeyS("003",90,8) + GuiAddKeyS("004",128,8) + GuiAddKeyS("005",166,8) + GuiAddKeyS("006",204,8) + GuiAddKeyS("007",242,8) + GuiAddKeyS("008",280,8) + GuiAddKeyS("009",318,8) + GuiAddKeyS("00A",356,8) + GuiAddKeyS("00B",394,8) + GuiAddKeyS("00C",432,8) + GuiAddKeyS("00D",470,8) + GuiAddKey("backspace",508,8) + + GuiAddKey("tab",26,48) + GuiAddKeyS("010",64,48) + GuiAddKeyS("011",102,48) + GuiAddKeyS("012",140,48) + GuiAddKeyS("013",178,48) + GuiAddKeyS("014",216,48) + GuiAddKeyS("015",254,48) + GuiAddKeyS("016",292,48) + GuiAddKeyS("017",330,48) + GuiAddKeyS("018",368,48) + GuiAddKeyS("019",406,48) + GuiAddKeyS("01A",444,48) + GuiAddKeyS("01B",484,48) + GuiAddKey("enter",532,48) + a + GuiAddKeyS("01E",82,88) + GuiAddKeyS("01F",120,88) + GuiAddKeyS("020",158,88) + GuiAddKeyS("021",196,88) + GuiAddKeyS("022",234,88) + GuiAddKeyS("023",272,88) + GuiAddKeyS("024",310,88) + GuiAddKeyS("025",348,88) + GuiAddKeyS("026",386,88) + GuiAddKeyS("027",424,88) + GuiAddKeyS("028",462,88) + + GuiAddKeyS("02C",94,128) + GuiAddKeyS("02D",132,128) + GuiAddKeyS("02E",170,128) + GuiAddKeyS("02F",208,128) + GuiAddKeyS("030",246,128) + GuiAddKeyS("031",284,128) + GuiAddKeyS("032",322,128) + GuiAddKeyS("033",360,128) + GuiAddKeyS("034",398,128) + GuiAddKeyS("035",436,128) + + GuiAddKey("space",246,168) + Gui, +AlwaysOnTop +ToolWindow Gui, Show, y%yposition% w776 h200 NoActivate, NEO-Bildschirmtastatur (neu!) BSTNguiErstellt := 1 @@ -192,3 +205,102 @@ CharProc_BSTNA() { if (BSTNguiErstellt) BSTNToggleAlwaysOnTop() } + +GUISYM(sym,chars) { + global + GSYM%sym% := EncodeUniComposeA(chars) +} + +BSTNSymbols() { + global + ; diverse Symbole für Spezialzeichen + GUISYM("T__cflx","◌̂") + GUISYM("T__tlde","◌̃") + GUISYM("T__obrg","◌̊") + GUISYM("T__cron","◌̌") + GUISYM("T__brve","◌̆") + GUISYM("T__mcrn","◌̄") + + GUISYM("T__grav","◌̀") + GUISYM("T__turn","↻") + GUISYM("T__drss","◌̈") + GUISYM("T__dgrv","◌") + GUISYM("T__hook","◌") + + GUISYM("T__acut","◌́") + GUISYM("T__cedi","◌̧") + GUISYM("T__strk","◌̷") + GUISYM("T__dbac","◌̋") + GUISYM("T__abdt","◌̇") + + GUISYM("S__Sh_L","⇧") + GUISYM("S__Sh_R","⇧") + GUISYM("S__Caps","⇪") + GUISYM("S___Del","⌦") + GUISYM("S___Ins","⎀") + GUISYM("S____Up","↑") + GUISYM("S__Down","↓") + GUISYM("S__Rght","→") + GUISYM("S__Left","←") + GUISYM("S__PgUp","⇞") + GUISYM("S__PgDn","⇟") + GUISYM("S__Home","↸") + GUISYM("S___End","⇲") + + GUISYM("S__N__0","0") + GUISYM("S__N__1","1") + GUISYM("S__N__2","2") + GUISYM("S__N__3","3") + GUISYM("S__N__4","4") + GUISYM("S__N__5","5") + GUISYM("S__N__6","6") + GUISYM("S__N__7","7") + GUISYM("S__N__8","8") + GUISYM("S__N__9","9") + GUISYM("S__NDiv","÷") + GUISYM("S__NMul","×") + GUISYM("S__NSub","-") + GUISYM("S__NAdd","+") + GUISYM("S__NDot",",") + GUISYM("S__NEnt","⏎") + + GUISYM("S__NDel","⌦") + GUISYM("S__NIns","⎀") + GUISYM("S__N_Up","↑") + GUISYM("S__N_Dn","↓") + GUISYM("S__N_Ri","→") + GUISYM("S__N_Le","←") + GUISYM("S__NPUp","⇞") + GUISYM("S__NPDn","⇟") + GUISYM("S__NHom","↸") + GUISYM("S__NEnd","⇲") + + GUISYM("S_SNDel","⌦") + GUISYM("S_SNIns","⎀") + GUISYM("S_SN_Up","↑") + GUISYM("S_SN_Dn","↓") + GUISYM("S_SN_Ri","→") + GUISYM("S_SN_Le","←") + GUISYM("S_SNPUp","⇞") + GUISYM("S_SNPDn","⇟") + GUISYM("S_SNHom","↸") + GUISYM("S_SNEnd","⇲") + + GUISYM("U00001B","ESC") + GUISYM("U000008","⌫") + GUISYM("U000009","↹") + GUISYM("U00000D","⏎") + + GUISYM("P__M2LD","⇧") + GUISYM("P__M2RD","⇧") + GUISYM("P__M3LD","M3") + GUISYM("P__M3RD","M3") + GUISYM("P__M4LD","M4") + GUISYM("P__M4RD","M4") + + GUISYM("U000020","␣") + GUISYM("U0000A0","⍽") + GUISYM("U00202F",">⍽<") +} + +BSTNSymbols() -- cgit v1.2.3