From 6649cd6544c7d6d0cad1facffa422c31e9f5507e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?m=C3=B6si?= Date: Tue, 23 Feb 2010 13:40:20 +0000 Subject: =?UTF-8?q?=E2=80=A2=20Die=20Bildschirmtastatur=20=E2=80=93=20neu?= =?UTF-8?q?=20wie=20alt=20=E2=80=93=20bekommt=20jetzt=20auch=20richtig=20m?= =?UTF-8?q?it,=20wenn=20das=20Fenster=20mit=20der=20Maus=20geschlossen=20w?= =?UTF-8?q?ird.=20=E2=80=A2=20Die=20neue=20BST=20kann=20nun=20=C3=BCber=20?= =?UTF-8?q?einen=20INI-Eintrag=20beim=20Start=20automatisch=20aktiviert=20?= =?UTF-8?q?werden=20([global]=20=E2=80=9EuseBSTN=3D1=E2=80=9C)?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://svn.neo-layout.org@2169 b9310e46-f624-0410-8ea1-cfbb3a30dc96 --- windows/neo-vars/src/source/keyhooks.ahk | 10 + windows/neo-vars/src/source/levelfunctions.ahk | 2 +- windows/neo-vars/src/source/screenkeyboard.ahk | 11 + windows/neo-vars/src/source/screenkeyboard_new.ahk | 693 +++++++++++---------- windows/neo-vars/src/source/varsfunctions.ahk | 2 +- 5 files changed, 379 insertions(+), 339 deletions(-) diff --git a/windows/neo-vars/src/source/keyhooks.ahk b/windows/neo-vars/src/source/keyhooks.ahk index b5b3505..ff4d71b 100644 --- a/windows/neo-vars/src/source/keyhooks.ahk +++ b/windows/neo-vars/src/source/keyhooks.ahk @@ -12,3 +12,13 @@ return allstarhook: AllStar(A_ThisHotkey) return + +; Ein paar andere Hooks kommen hier auch noch. GUIs springen hier her, wenn +; sich bei ihnen etwas auf die entsprechende Art tut. + +GuiClose: + if (GuiCurrent!="") + %GuiCurrent%OnClose() + else + Gui, Destroy +return diff --git a/windows/neo-vars/src/source/levelfunctions.ahk b/windows/neo-vars/src/source/levelfunctions.ahk index 129c95a..c7150dc 100644 --- a/windows/neo-vars/src/source/levelfunctions.ahk +++ b/windows/neo-vars/src/source/levelfunctions.ahk @@ -28,7 +28,7 @@ NEOEbeneAktualisieren() { else BSTSwitch(EbeneNC) } - if (BSTNguiErstellt) + if (useBSTN) BSTNUpdate() } diff --git a/windows/neo-vars/src/source/screenkeyboard.ahk b/windows/neo-vars/src/source/screenkeyboard.ahk index 7033e10..b4e2199 100644 --- a/windows/neo-vars/src/source/screenkeyboard.ahk +++ b/windows/neo-vars/src/source/screenkeyboard.ahk @@ -32,10 +32,20 @@ BSTSwitch(Eb) { } } +BSTOnClose() { + global + if (BSTguiErstellt) { + BSTguiErstellt := 0 + GuiCurrent := "" + Gui, Destroy + } +} + BSTToggle() { global if (BSTguiErstellt) { BSTguiErstellt := 0 + GuiCurrent := "" Gui, Destroy } else { SysGet, WorkArea, MonitorWorkArea @@ -55,6 +65,7 @@ BSTToggle() { BSTguiErstellt := 1 BSTSwitch(EbeneNC) BSTalwaysOnTop := 1 + GuiCurrent := "BST" } } diff --git a/windows/neo-vars/src/source/screenkeyboard_new.ahk b/windows/neo-vars/src/source/screenkeyboard_new.ahk index ab3a85b..e29e877 100644 --- a/windows/neo-vars/src/source/screenkeyboard_new.ahk +++ b/windows/neo-vars/src/source/screenkeyboard_new.ahk @@ -1,342 +1,361 @@ -; -*- encoding:utf-8 -*- - -BSTNguiErstellt := 0 -BSTNalwaysOnTop := 1 - -CP3F2 := "P_BSTNt" - +; -*- encoding:utf-8 -*- + +BSTNguiErstellt := 0 +BSTNalwaysOnTop := 1 + UnZipLocalFile := ResourceFolder . "\unzip.exe" -UnZipSourceLink := "http://stahlworks.com/dev/unzip.exe" - -UniFontVersion := "2.30" -UniFontFilename := "DejaVuSans-Bold.ttf" -UniFontName := "DejaVu Sans" - -UniFontZipFilename := "dejavu-fonts-ttf-" . UniFontVersion . ".zip" +UnZipSourceLink := "http://stahlworks.com/dev/unzip.exe" + +UniFontVersion := "2.30" +UniFontFilename := "DejaVuSans-Bold.ttf" +UniFontName := "DejaVu Sans" + +UniFontZipFilename := "dejavu-fonts-ttf-" . UniFontVersion . ".zip" UniFontZipLocalFile := ResourceFolder . "\" . UniFontZipFilename - -UniFontZipSourceLink := "http://downloads.sourceforge.net/project/dejavu/dejavu/" . UniFontVersion . "/" . UniFontZipFilename - + +UniFontZipSourceLink := "http://downloads.sourceforge.net/project/dejavu/dejavu/" . UniFontVersion . "/" . UniFontZipFilename + UniFontLocalFilePath := ApplicationFolder UniFontLocalFile := UniFontLocalFilePath . "/" . UniFontFilename -UniFontZipFontPath := "dejavu-fonts-ttf-" . UniFontVersion . "/ttf/" . UniFontFilename - -BSTNUpdate() { - global - static WM_SETTEXT := 0x0C - { - VarSetCapacity(ptrU,20) - loop,parse,GuiKeyList,`, - { - GuiPhysKey := A_LoopField - if (EbeneC<3) { - if (NOC%GuiPhysKey%==1) { - GuiEb := EbeneNC - } else { - GuiEb := EbeneC - } - } else - GuiEb := EbeneC - GuiComp := Comp . CP%GuiEb%%GuiPhysKey% - if (GSYM%GuiComp% != "") { - GuiComp := GSYM%GuiComp% - } else if (CD%GuiComp% != "") { - GuiComp := CD%GuiComp% - } else if (CM%GuiComp% == 1) { - GuiComp := "U00002A" - } else if (Comp != "") { - GuiComp := "" - } - GuiPos := 0 - loop { - if (GuiComp=="") - break - if (SubStr(GuiComp,1,1)=="U") { - Charcode := "0x" . Substr(GuiComp,2,6) - if (charCode < 0x10000) { - NumPut(CharCode, ptrU, GuiPos, "UShort") - } else { - ; surrogates - NumPut(0xD800|((charCode-0x10000)/1024) , ptrU, GuiPos, "UShort") - GuiPos := GuiPos + 2 - NumPut(0xDC00|((charCode-0x10000)&0x3FF), ptrU, GuiPos, "UShort") - } - GuiPos := GuiPos + 2 - } - GuiComp := SubStr(GuiComp,8) - } - NumPut(0x0 ,ptrU,GuiPos,"UShort") ; End of string - DllCall("SendMessageW", "UInt",GuiKey%GuiPhysKey%, "UInt",WM_SETTEXT, "UInt",0, "Uint",&ptrU) - } - } - GuiControl,MoveDraw,Picture0 +UniFontZipFontPath := "dejavu-fonts-ttf-" . UniFontVersion . "/ttf/" . UniFontFilename + +BSTNUpdate() { + global + static WM_SETTEXT := 0x0C + { + VarSetCapacity(ptrU,20) + loop,parse,GuiKeyList,`, + { + GuiPhysKey := A_LoopField + if (EbeneC<3) { + if (NOC%GuiPhysKey%==1) { + GuiEb := EbeneNC + } else { + GuiEb := EbeneC + } + } else + GuiEb := EbeneC + GuiComp := Comp . CP%GuiEb%%GuiPhysKey% + if (GSYM%GuiComp% != "") { + GuiComp := GSYM%GuiComp% + } else if (CD%GuiComp% != "") { + GuiComp := CD%GuiComp% + } else if (CM%GuiComp% == 1) { + GuiComp := "U00002A" + } else if (Comp != "") { + GuiComp := "" + } + GuiPos := 0 + loop { + if (GuiComp=="") + break + if (SubStr(GuiComp,1,1)=="U") { + Charcode := "0x" . Substr(GuiComp,2,6) + if (charCode < 0x10000) { + NumPut(CharCode, ptrU, GuiPos, "UShort") + } else { + ; surrogates + NumPut(0xD800|((charCode-0x10000)/1024) , ptrU, GuiPos, "UShort") + GuiPos := GuiPos + 2 + NumPut(0xDC00|((charCode-0x10000)&0x3FF), ptrU, GuiPos, "UShort") + } + GuiPos := GuiPos + 2 + } + GuiComp := SubStr(GuiComp,8) + } + NumPut(0x0 ,ptrU,GuiPos,"UShort") ; End of string + DllCall("SendMessageW", "UInt",GuiKey%GuiPhysKey%, "UInt",WM_SETTEXT, "UInt",0, "Uint",&ptrU) + } + } + GuiControl,MoveDraw,Picture0 +} + +GuiAddKeyS(sc,x,y) { + global + GuiAddKey(vksc%sc%,x,y) +} + +GuiAddKeySN(sc,x,y) { + global + GuiAddKey(vkscn1%sc%,x,y) +} + +GuiAddKey(key,x,y) { + global + Gui, Add, Text, x%x% y%y% Center hwndGuiKey%key% BackgroundTrans, MM + GuiKeyList := GuiKeyList . key . "," +} + +CharProc_BSTNt() { + global + ; Bildschirmtastatur togglen + useBSTN := !(useBSTN) + if (useBSTN) + CharProc_BSTN1() + else + CharProc_BSTN0() } - -GuiAddKeyS(sc,x,y) { - global - GuiAddKey(vksc%sc%,x,y) -} - -GuiAddKeySN(sc,x,y) { - global - GuiAddKey(vkscn1%sc%,x,y) -} - -GuiAddKey(key,x,y) { - global - Gui, Add, Text, x%x% y%y% Center hwndGuiKey%key% BackgroundTrans, MM - GuiKeyList := GuiKeyList . key . "," -} - -BSTNToggle() { - global - if (BSTNguiErstellt) { - BSTNguiErstellt := 0 - Gui, Destroy - DllCall( "GDI32.DLL\RemoveFontResourceEx", Str, UniFontLocalFile ,UInt,(FR_PRIVATE:=0x10), Int,0) - } else { - if (FileExist(ResourceFolder)!="") { - FileInstall,ebene0.png,%ResourceFolder%\ebene0.png,1 - } - - if (FileExist(UniFontLocalFile)=="") { - if (FileExist(UnZipLocalFile)=="") { - Progress,0,,Herunterladen des Entpack-Programms ... - UrlDownloadToFile,%UnZipSourceLink%,%UnZipLocalFile% - if (FileExist(UnZipLocalFile)=="") { - Msgbox,Konnte Unzip-Programm nicht finden und nicht installieren! - } - } - - if (FileExist(UniFontZipLocalFile)=="") { - Progress,20,Herunterladen des Fonts ... - UrlDownloadToFile,%UniFontZipSourceLink%,%UniFontZipLocalFile% - } - - Progress,80,Entpacken des Archivs ... - RunWait,% """" . UnZipLocalFile . """ -j """ . UniFontZipLocalFile . """ """ . UniFontZipFontPath . """",%UniFontLocalFilePath%,Hide - Progress,OFF - } - - DllCall( "GDI32.DLL\AddFontResourceEx", Str, UniFontLocalFile ,UInt,(FR_PRIVATE:=0x10), Int,0) - - - SysGet, WorkArea, MonitorWorkArea - yPosition := WorkAreaBottom - 230 - Gui, Color, FFFFFF - Gui, Add, Picture,AltSubmit x0 y0 vPicture0, % ResourceFolder . "\ebene0.png" - Gui, Font, s12 bold, %UniFontName% - GuiKeyList := "" - GuiAddKeyS("029",6,9) - GuiAddKeyS("002",44,9) - GuiAddKeyS("003",82,9) - GuiAddKeyS("004",120,9) - GuiAddKeyS("005",158,9) - GuiAddKeyS("006",196,9) - GuiAddKeyS("007",234,9) - GuiAddKeyS("008",272,9) - GuiAddKeyS("009",310,9) - GuiAddKeyS("00A",348,9) - GuiAddKeyS("00B",386,9) - GuiAddKeyS("00C",424,9) - GuiAddKeyS("00D",462,9) - GuiAddKey("backspace",510,9) - - GuiAddKey("tab",10,48) - GuiAddKeyS("010",58,48) - GuiAddKeyS("011",96,48) - GuiAddKeyS("012",134,48) - GuiAddKeyS("013",172,48) - GuiAddKeyS("014",210,48) - GuiAddKeyS("015",248,48) - GuiAddKeyS("016",286,48) - GuiAddKeyS("017",324,48) - GuiAddKeyS("018",362,48) - GuiAddKeyS("019",400,48) - GuiAddKeyS("01A",438,48) - GuiAddKeyS("01B",476,48) - GuiAddKey("enter",526,68) - - GuiAddKeyS("03A",18,88) - GuiAddKeyS("01E",75,88) - GuiAddKeyS("01F",113,88) - GuiAddKeyS("020",151,88) - GuiAddKeyS("021",189,88) - GuiAddKeyS("022",227,88) - GuiAddKeyS("023",265,88) - GuiAddKeyS("024",303,88) - GuiAddKeyS("025",341,88) - GuiAddKeyS("026",379,88) - GuiAddKeyS("027",417,88) - GuiAddKeyS("028",455,88) - GuiAddKeyS("02B",493,88) - - GuiAddKeyS("02A",8,128) - GuiAddKeyS("056",50,128) - GuiAddKeyS("02C",88,128) - GuiAddKeyS("02D",126,128) - GuiAddKeyS("02E",164,128) - GuiAddKeyS("02F",202,128) - GuiAddKeyS("030",240,128) - GuiAddKeyS("031",278,128) - GuiAddKeyS("032",316,128) - GuiAddKeyS("033",354,128) - GuiAddKeyS("034",392,128) - GuiAddKeyS("035",430,128) - GuiAddKeyS("136",498,128) - - GuiAddKey("space",264,168) - GuiAddKeyS("138",430,168) - - GuiAddKeyS("145",582,9) - GuiAddKeyS("135",620,9) - GuiAddKeyS("037",658,9) - GuiAddKeyS("04A",696,9) - - GuiAddKeySN("047",582,48) - GuiAddKeySN("048",620,48) - GuiAddKeySN("049",658,48) - GuiAddKeyS("04E",696,68) - - GuiAddKeySN("04B",582,88) - GuiAddKeySN("04C",620,88) - GuiAddKeySN("04D",658,88) - - GuiAddKeySN("04F",582,128) - GuiAddKeySN("050",620,128) - GuiAddKeySN("051",658,128) - GuiAddKey("numpadenter",696,148) - - GuiAddKeySN("052",601,168) - GuiAddKeySN("053",658,168) - - Gui, +AlwaysOnTop +ToolWindow - Gui, Show, y%yposition% w776 h200 NoActivate, NEO-Bildschirmtastatur (neu!) - BSTNguiErstellt := 1 - BSTNUpdate() - BSTNalwaysOnTop := 1 - } -} - -BSTNToggleAlwaysOnTop() { - global - if (BSTNalwaysOnTop) { - Gui, -AlwaysOnTop - BSTNalwaysOnTop := 0 - } else { - Gui, +AlwaysOnTop - BSTNalwaysOnTop := 1 - } -} - -CharProc_BSTNt() { - global - ; Bildschirmtastatur Ein/Aus - BSTNToggle() -} - -CharProc_BSTNA() { - global - ; Bildschirmtastatur AlwaysOnTop - 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() + +BSTNOnClose() { + global + useBSTN := 0 + CharProc_BSTN0() +} + +CharProc_BSTN0() { + global + GuiCurrent := "" + Gui, Destroy + DllCall( "GDI32.DLL\RemoveFontResourceEx", Str, UniFontLocalFile ,UInt,(FR_PRIVATE:=0x10), Int,0) +} + +CharProc_BSTN1() { + global + if (FileExist(ResourceFolder)!="") { + FileInstall,ebene0.png,%ResourceFolder%\ebene0.png,1 + } + + if (FileExist(UniFontLocalFile)=="") { + if (FileExist(UnZipLocalFile)=="") { + Progress,0,,Herunterladen des Entpack-Programms ... + UrlDownloadToFile,%UnZipSourceLink%,%UnZipLocalFile% + if (FileExist(UnZipLocalFile)=="") { + Msgbox,Konnte Unzip-Programm nicht finden und nicht installieren! + } + } + + if (FileExist(UniFontZipLocalFile)=="") { + Progress,20,Herunterladen des Fonts ... + UrlDownloadToFile,%UniFontZipSourceLink%,%UniFontZipLocalFile% + } + + Progress,80,Entpacken des Archivs ... + RunWait,% """" . UnZipLocalFile . """ -j """ . UniFontZipLocalFile . """ """ . UniFontZipFontPath . """",%UniFontLocalFilePath%,Hide + Progress,OFF + } + + DllCall( "GDI32.DLL\AddFontResourceEx", Str, UniFontLocalFile ,UInt,(FR_PRIVATE:=0x10), Int,0) + + + SysGet, WorkArea, MonitorWorkArea + yPosition := WorkAreaBottom - 230 + Gui, Color, FFFFFF + Gui, Add, Picture,AltSubmit x0 y0 vPicture0, % ResourceFolder . "\ebene0.png" + Gui, Font, s12 bold, %UniFontName% + GuiKeyList := "" + GuiAddKeyS("029",6,9) + GuiAddKeyS("002",44,9) + GuiAddKeyS("003",82,9) + GuiAddKeyS("004",120,9) + GuiAddKeyS("005",158,9) + GuiAddKeyS("006",196,9) + GuiAddKeyS("007",234,9) + GuiAddKeyS("008",272,9) + GuiAddKeyS("009",310,9) + GuiAddKeyS("00A",348,9) + GuiAddKeyS("00B",386,9) + GuiAddKeyS("00C",424,9) + GuiAddKeyS("00D",462,9) + GuiAddKey("backspace",510,9) + + GuiAddKey("tab",10,48) + GuiAddKeyS("010",58,48) + GuiAddKeyS("011",96,48) + GuiAddKeyS("012",134,48) + GuiAddKeyS("013",172,48) + GuiAddKeyS("014",210,48) + GuiAddKeyS("015",248,48) + GuiAddKeyS("016",286,48) + GuiAddKeyS("017",324,48) + GuiAddKeyS("018",362,48) + GuiAddKeyS("019",400,48) + GuiAddKeyS("01A",438,48) + GuiAddKeyS("01B",476,48) + GuiAddKey("enter",526,68) + + GuiAddKeyS("03A",18,88) + GuiAddKeyS("01E",75,88) + GuiAddKeyS("01F",113,88) + GuiAddKeyS("020",151,88) + GuiAddKeyS("021",189,88) + GuiAddKeyS("022",227,88) + GuiAddKeyS("023",265,88) + GuiAddKeyS("024",303,88) + GuiAddKeyS("025",341,88) + GuiAddKeyS("026",379,88) + GuiAddKeyS("027",417,88) + GuiAddKeyS("028",455,88) + GuiAddKeyS("02B",493,88) + + GuiAddKeyS("02A",8,128) + GuiAddKeyS("056",50,128) + GuiAddKeyS("02C",88,128) + GuiAddKeyS("02D",126,128) + GuiAddKeyS("02E",164,128) + GuiAddKeyS("02F",202,128) + GuiAddKeyS("030",240,128) + GuiAddKeyS("031",278,128) + GuiAddKeyS("032",316,128) + GuiAddKeyS("033",354,128) + GuiAddKeyS("034",392,128) + GuiAddKeyS("035",430,128) + GuiAddKeyS("136",498,128) + + GuiAddKey("space",264,168) + GuiAddKeyS("138",430,168) + + GuiAddKeyS("145",582,9) + GuiAddKeyS("135",620,9) + GuiAddKeyS("037",658,9) + GuiAddKeyS("04A",696,9) + + GuiAddKeySN("047",582,48) + GuiAddKeySN("048",620,48) + GuiAddKeySN("049",658,48) + GuiAddKeyS("04E",696,68) + + GuiAddKeySN("04B",582,88) + GuiAddKeySN("04C",620,88) + GuiAddKeySN("04D",658,88) + + GuiAddKeySN("04F",582,128) + GuiAddKeySN("050",620,128) + GuiAddKeySN("051",658,128) + GuiAddKey("numpadenter",696,148) + + GuiAddKeySN("052",601,168) + GuiAddKeySN("053",658,168) + Gui, +AlwaysOnTop +ToolWindow + Gui, Show, y%yposition% w776 h200 NoActivate, NEO-Bildschirmtastatur (neu!) + BSTNUpdate() + BSTNalwaysOnTop := 1 + GuiCurrent := "BSTN" +} + +BSTNToggleAlwaysOnTop() { + global + if (BSTNalwaysOnTop) { + Gui, -AlwaysOnTop + BSTNalwaysOnTop := 0 + } else { + Gui, +AlwaysOnTop + BSTNalwaysOnTop := 1 + } +} + +CharProc_BSTNA() { + global + ; Bildschirmtastatur AlwaysOnTop + 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",">⍽<") +} + +BSTNRegister() { + global + + CP3F2 := "P_BSTNt" + BSTNSymbols() + + IniRead,useBSTN,%ini%,Global,useBSTN,0 + if (useBSTN) + CharProc_BSTN1() +} + +BSTNRegister() diff --git a/windows/neo-vars/src/source/varsfunctions.ahk b/windows/neo-vars/src/source/varsfunctions.ahk index 0532a64..5d05505 100644 --- a/windows/neo-vars/src/source/varsfunctions.ahk +++ b/windows/neo-vars/src/source/varsfunctions.ahk @@ -124,7 +124,7 @@ rerun: CharOutUp(PR%PhysKey%) PR%PhysKey% := "" } - if (BSTNguiErstellt) + if (useBSTN) BSTNUpdate() } -- cgit v1.2.3