From 15b42908ddc1634edb485e449fa77e7ed2a8169c Mon Sep 17 00:00:00 2001 From: martin_r Date: Tue, 12 Aug 2008 00:03:21 +0000 Subject: Zerschossene Lang-s-Tastatur wiederhergestellt Esc(4) setzt Tastatur zurück Variablen Ebene7 und Ebene8 zum Abfragen eingeführt #(2L)-Bug behoben Korrektur gelesen MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://svn.neo-layout.org@746 b9310e46-f624-0410-8ea1-cfbb3a30dc96 --- windows/autohotkey/Source/Global-Part.ahk | 168 +++++++++++++++++------------- 1 file changed, 93 insertions(+), 75 deletions(-) (limited to 'windows/autohotkey/Source/Global-Part.ahk') diff --git a/windows/autohotkey/Source/Global-Part.ahk b/windows/autohotkey/Source/Global-Part.ahk index 06d051f..d5e7e35 100644 --- a/windows/autohotkey/Source/Global-Part.ahk +++ b/windows/autohotkey/Source/Global-Part.ahk @@ -1,8 +1,8 @@ -/******************** - Verzeichnisse * -********************* +/**************** +* Verzeichnisse * +***************** */ ; Setzt den Pfad zu einem temporären Verzeichnis EnvGet, WindowsEnvTempFolder, TEMP @@ -16,15 +16,14 @@ FileCreateDir, %ApplicationFolder% -/****************** - Globale Schalter * -******************* +/******************* +* Globale Schalter * +******************** */ ; Im folgenden gilt (soweit nicht anders angegeben) Ja = 1, Nein = 0: ; Syntaxhinweis: IniRead, Variable, InputFilename, Section, Key [, DefaultValue] - ; Sollen die Bilder für die Bildschirmtastatur in die compilierte EXE-Datei miteingebunden werden? (Nachteil: grössere Dateigrösse, Vorteil: Referenz für Anfänger stets einfach verfügbar) bildschirmTastaturEinbinden := 1 @@ -37,36 +36,40 @@ IniRead, einHandNeo, %ApplicationFolder%\NEO2.ini, Global, einHandNeo, 0 ; Soll der Lernmodus aktiviert werden? IniRead, lernModus, %ApplicationFolder%\NEO2.ini, Global, lernModus, 0 -; Aktivierter Mod4-Lock wird über die Rollen-LED des Keybord angezeigt (analog zu CapsLock) +; Soll aktivierter Mod4-Lock über die Rollen-LED des Keybord angezeigt werden (analog zu CapsLock)? IniRead, UseMod4Light, %ApplicationFolder%\NEO2.ini, Global, UseMod4Light, 1 -; Soll Lang-s auf s, s auf ß und ß auf Mod3+ß gelegt (bzw. vertauscht) werden? +; Soll Lang-s auf s, s auf ß und ß auf Lang-s gelegt (bzw. vertauscht) werden? IniRead, LangSTastatur, %ApplicationFolder%\NEO2.ini, Global, LangSTastatur, 0 +; Sollen tote Tasten blind angezeigt werden? +IniRead, DeadCompose, %ApplicationFolder%\NEO2.ini, Global, DeadCompose, 0 +;Sollen Compose-Tasten blind angezeigt werden? +IniRead, DeadSilence, %ApplicationFolder%\NEO2.ini, Global, DeadSilence, 0 -/************************* - Recourcen-Verwaltung * -************************** -*/ +/*********************** +* Recourcen-Verwaltung * +************************ +*/ if(FileExist("ResourceFolder") <> false) { - ; Versuche, alle möglicherweise in die EXE eingebundenen Dateien zu extrahieren - FileInstall, neo.ico, %ResourceFolder%\neo.ico, 1 - FileInstall, neo_disabled.ico, %ResourceFolder%\neo_disabled.ico, 1 - iconBenutzen = 1 - if (bildschirmTastaturEinbinden==1) { - FileInstall, ebene1.png, %ResourceFolder%\ebene1.png, 1 - FileInstall, ebene2.png, %ResourceFolder%\ebene2.png, 1 - FileInstall, ebene3.png, %ResourceFolder%\ebene3.png, 1 - FileInstall, ebene4.png, %ResourceFolder%\ebene4.png, 1 - FileInstall, ebene5.png, %ResourceFolder%\ebene5.png, 1 - FileInstall, ebene6.png, %ResourceFolder%\ebene6.png, 1 - zeigeBildschirmTastatur = 1 - } + ; Versuche, alle möglicherweise in die EXE eingebundenen Dateien zu extrahieren + FileInstall, neo.ico, %ResourceFolder%\neo.ico, 1 + FileInstall, neo_disabled.ico, %ResourceFolder%\neo_disabled.ico, 1 + iconBenutzen = 1 + if (bildschirmTastaturEinbinden==1) { + FileInstall, ebene1.png, %ResourceFolder%\ebene1.png, 1 + FileInstall, ebene2.png, %ResourceFolder%\ebene2.png, 1 + FileInstall, ebene3.png, %ResourceFolder%\ebene3.png, 1 + FileInstall, ebene4.png, %ResourceFolder%\ebene4.png, 1 + FileInstall, ebene5.png, %ResourceFolder%\ebene5.png, 1 + FileInstall, ebene6.png, %ResourceFolder%\ebene6.png, 1 + zeigeBildschirmTastatur = 1 + } } else { - MsgBox, "Das Verzeichnis %ResourceFolder% konnte nicht angelegt werden!" ; Diese Zeile dient nur der eventuellen Fehlersuche und sollte eigentlich niemals auftauchen. + MsgBox, "Das Verzeichnis %ResourceFolder% konnte nicht angelegt werden!" ; Diese Zeile dient nur der eventuellen Fehlersuche und sollte eigentlich niemals auftauchen. } ; Benutze die Dateien auch dann, wenn sie eventuell im aktuellen Verzeichnis vorhanden sind @@ -76,16 +79,15 @@ if ( FileExist("neo.ico") && FileExist("neo_disabled.ico") ) iconBenutzen = 1 -/************************* - lernModus Konfiguration * - nur relevant wenn * - lernModus = 1 * - Strg+Komma schaltet um * -************************** +/************************** +* lernModus Konfiguration * +* nur relevant wenn * +* lernModus = 1 * +* Strg+Komma schaltet um * +*************************** */ ; 0 = aus, 1 = an - ; die Nachfolgenden sind nützlich um sich die Qwertz-Tasten abzugewöhnen, da alle auf der 4. Ebene vorhanden. lernModus_std_Return = 0 lernModus_std_Backspace = 0 @@ -101,29 +103,20 @@ lernModus_std_Links = 0 lernModus_std_Rechts = 0 lernModus_std_ZahlenReihe = 0 - - ; im folgenden kann man auch noch ein paar Tasten der 4. Ebene deaktivieren ; nützlich um sich zu zwingen, richtig zu schreiben lernModus_neo_Backspace = 0 lernModus_neo_Entf = 1 - - - -; aus Noras script kopiert: - +; aus Noras Skript kopiert: Process,Priority,,High - #usehook on #singleinstance force #LTrim ; Quelltext kann eingerückt werden, ; msgbox ist trotzdem linksbündig - SetTitleMatchMode 2 SendMode Input - name = Neo 2.0 enable = Aktiviere %name% disable = Deaktiviere %name% @@ -138,39 +131,38 @@ if inputlocalealias <> inputlocale = %inputlocalealias% if inputlocale <> 00000407 { - suspend - regread, inputlocale, HKEY_LOCAL_MACHINE - , SYSTEM\CurrentControlSet\Control\Keyboard Layouts\%inputlocale% - , Layout Text - msgbox, 48, Warnung!, - ( - Nicht kompatibles Tastaturlayout: - `t%inputlocale% - `nDas deutsche QWERTZ muss als Standardlayout eingestellt - sein, damit %name% wie erwartet funktioniert. - `nÄndern Sie die Tastatureinstellung unter - `tSystemsteuerung - `t-> Regions- und Sprachoptionen - `t-> Sprachen - `t-> Details... `n - ) - exitapp + suspend + regread, inputlocale, HKEY_LOCAL_MACHINE + , SYSTEM\CurrentControlSet\Control\Keyboard Layouts\%inputlocale% + , Layout Text + msgbox, 48, Warnung!, + ( + Nicht kompatibles Tastaturlayout: + `t%inputlocale% + `nDas deutsche QWERTZ muss als Standardlayout eingestellt + sein, damit %name% wie erwartet funktioniert. + `nÄndern Sie die Tastatureinstellung unter + `tSystemsteuerung + `t-> Regions- und Sprachoptionen + `t-> Sprachen + `t-> Details... `n + ) + exitapp } - ; Menü des Systray-Icons ; ---------------------- if (iconBenutzen) - menu, tray, icon, %ResourceFolder%\neo.ico,,1 + menu, tray, icon, %ResourceFolder%\neo.ico,,1 menu, tray, nostandard menu, tray, add, Öffnen, open - menu, helpmenu, add, About, about - menu, helpmenu, add, Autohotkey-Hilfe, help - menu, helpmenu, add - menu, helpmenu, add, http://&autohotkey.com/, autohotkey - menu, helpmenu, add, http://www.neo-layout.org/, neo + menu, helpmenu, add, About, about + menu, helpmenu, add, Autohotkey-Hilfe, help + menu, helpmenu, add + menu, helpmenu, add, http://&autohotkey.com/, autohotkey + menu, helpmenu, add, http://www.neo-layout.org/, neo menu, tray, add, Hilfe, :helpmenu menu, tray, add menu, tray, add, %disable%, togglesuspend @@ -185,7 +177,7 @@ menu, tray, tip, %name% /* - Variablen initialisieren + Variablen initialisieren */ DeadKey = "" @@ -193,14 +185,12 @@ CompKey = "" PriorDeadKey = "" PriorCompKey = "" Ebene12 = 0 -EbeneAktualisieren() - - +EbeneAktualisieren() /* - EinHandNeo + EinHandNeo */ spacepressed := 0 keypressed:= 0 @@ -237,5 +227,33 @@ gespiegelt_punkt = neo_ gespiegelt_j = neo_ü - - +;Blinde/Sichtbare Tote Tasten +*F9:: + if (isMod4pressed()) + DeadSilence := not(DeadSilence) + else + send {blind}{F9} +return + +;Blinde/Sichtbare Compose +*F10:: + if (isMod4pressed()) + DeadCompose := not(DeadCompose) + else + send {blind}{F10} +return + +;Lang-s-Tastatur: +*F11:: + if (isMod4pressed()) + LangSTastatur := not(LangSTastatur) ; schaltet die Lang-s-Tastatur ein und aus + else + send {blind}{F11} +return + +*Esc:: + if (isMod4pressed()) + reload + else + send {blind}{Esc} +return -- cgit v1.2.3