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

1 files 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)

+      }

     }

 }

+

+GuiAddKeyS(sc,x,y) {

+  global

+  GuiAddKey(vksc%sc%,x,y)

 }

 

-GuiAddKey(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()