archive/neo
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Überflüssigen Code entfernt, Code gestrafft

Browse source 
git-svn-id: https://svn.neo-layout.org@812 b9310e46-f624-0410-8ea1-cfbb3a30dc96
This commit is contained in:
martin_r 2008-08-27 17:13:08 +00:00
parent aff07a4e81
commit 20f0f35ab4
10 changed files with 327 additions and 489 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
windows/autohotkey/Changelog-and-Todo.txt
View file

@ -24,6 +24,9 @@ Matthias Wächter <matthias (at) waechter.wiz. a t>
=== Änderungshistorie === === Änderungshistorie ===
Revision 812 (von Martin Roppelt)
- Überflüssigen Code entfernt.
- Code gestrafft.
Revision 810 (von Martin Roppelt) Revision 810 (von Martin Roppelt)
- DeadCompose implementiert, uncomp…-Methoden gelöscht, »return 0«-Zeilen entfernt (wird sowieso gemacht). - DeadCompose implementiert, uncomp…-Methoden gelöscht, »return 0«-Zeilen entfernt (wird sowieso gemacht).
- checkComp ausgebessert: »global« hatte gefehlt. - checkComp ausgebessert: »global« hatte gefehlt.

8
windows/autohotkey/Source/All.ahk
View file

@ -1,13 +1,7 @@
/* /*
------------------------------------------------------
All.ahk: All.ahk:
Diese Datei ist für Entwickler zum schnellen Testen von Änderungen vorgesehen. Bei Syntaxfehlern bietet sie zudem den Vorteil, dass die Zeilennummern relativ zu den einzelnen Modulen angezeigt werden. Diese Datei ist für Entwickler zum schnellen Testen von Änderungen vorgesehen. Bei Syntaxfehlern bietet sie zudem den Vorteil, dass die Zeilennummern relativ zu den einzelnen Modulen angezeigt werden.
Die Reihenfolge der Includes *ist* relevant! Die Reihenfolge der Includes *ist* relevant! Denn: Vor dem Menü in der Global-Part.ahk dürfen keine Tastenkombinationen definiert werden. Ansonsten können Sie die Dateien hier beliebig anordnen.
Denn: Vor dem Menü in der Global-Part.ahk dürfen keine Tastenkombinationen definiert werden. Ansonsten können Sie die Dateien hier beliebig anordnen. :-)
Siehe auch:
http://www.autohotkey.com/docs/commands/_Include.htm
------------------------------------------------------
*/ */
#Include %a_scriptdir%\Warning.ahk #Include %a_scriptdir%\Warning.ahk

43
windows/autohotkey/Source/Global-Part.ahk
View file

@ -20,7 +20,7 @@ enable=Aktiviere %name%
disable=Deaktiviere %name% disable=Deaktiviere %name%
#usehook on #usehook on
#singleinstance force #singleinstance force
#LTrim ; Quelltext kann eingerückt werden, #LTrim ; Quelltext kann eingerückt werden
Process,Priority,,High Process,Priority,,High
SendMode Input SendMode Input
@ -29,14 +29,14 @@ SendMode Input
***************** *****************
*/ */
; Setzt den Pfad zu einem temporären Verzeichnis ; Setzt den Pfad zu einem temporären Verzeichnis
EnvGet, WindowsEnvTempFolder, TEMP EnvGet,WindowsEnvTempFolder,TEMP
ResourceFolder = %WindowsEnvTempFolder%\NEO2 ResourceFolder = %WindowsEnvTempFolder%\NEO2
FileCreateDir, %ResourceFolder% FileCreateDir,%ResourceFolder%
; Setzt den Pfad zu den NEO-Anwendungsdateien ; Setzt den Pfad zu den NEO-Anwendungsdateien
EnvGet, WindowsEnvAppDataFolder, APPDATA EnvGet,WindowsEnvAppDataFolder,APPDATA
ApplicationFolder = %WindowsEnvAppDataFolder%\NEO2 ApplicationFolder = %WindowsEnvAppDataFolder%\NEO2
FileCreateDir, %ApplicationFolder% FileCreateDir,%ApplicationFolder%
ini = %ApplicationFolder%\NEO2.ini ini = %ApplicationFolder%\NEO2.ini
/******************* /*******************
@ -45,7 +45,8 @@ ini = %ApplicationFolder%\NEO2.ini
*/ */
; Im folgenden gilt (soweit nicht anders angegeben) Ja = 1, Nein = 0: ; Im folgenden gilt (soweit nicht anders angegeben) Ja = 1, Nein = 0:
; 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) ; 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 bildschirmTastaturEinbinden := 1
; Syntaxhinweis: IniRead, Variable, InputFilename, Section, Key [, DefaultValue] ; Syntaxhinweis: IniRead, Variable, InputFilename, Section, Key [, DefaultValue]
@ -73,32 +74,32 @@ IniRead,DeadSilence,%ini%,Global,DeadSilence,0
;Sollen Compose-Tasten blind angezeigt werden? ;Sollen Compose-Tasten blind angezeigt werden?
IniRead,DeadCompose,%ini%,Global,DeadCompose,0 IniRead,DeadCompose,%ini%,Global,DeadCompose,0
:Soll der Mod2Lock auch auf die Akzente, die Ziffernreihe und das Numpad angewandt werden? ;Soll der Mod2Lock auch auf die Akzente, die Ziffernreihe und das Numpad angewandt werden?
IniRead,striktesMod2Lock,%ini%,Global,striktesMod2Lock,0 IniRead,striktesMod2Lock,%ini%,Global,striktesMod2Lock,0
/*********************** /***********************
* Recourcen-Verwaltung * * Recourcen-Verwaltung *
************************ ************************
*/ */
if (FileExist("ResourceFolder")<>false) { if (FileExist("ResourceFolder") <> false) {
; Versuche, alle möglicherweise in die EXE eingebundenen Dateien zu extrahieren ; Versuche, alle möglicherweise in die EXE eingebundenen Dateien zu extrahieren
FileInstall,neo.ico,%ResourceFolder%\neo.ico,1 FileInstall,neo.ico,%ResourceFolder%\neo.ico,1
FileInstall,neo_disabled.ico,%ResourceFolder%\neo_disabled.ico,1 FileInstall,neo_disabled.ico,%ResourceFolder%\neo_disabled.ico,1
iconBenutzen=1 iconBenutzen=1
if (bildschirmTastaturEinbinden=1) { if (bildschirmTastaturEinbinden = 1) {
FileInstall,ebene1.png,%ResourceFolder%\ebene1.png,1 FileInstall,ebene1.png,%ResourceFolder%\ebene1.png,1
FileInstall,ebene2.png,%ResourceFolder%\ebene2.png,1 FileInstall,ebene2.png,%ResourceFolder%\ebene2.png,1
FileInstall,ebene3.png,%ResourceFolder%\ebene3.png,1 FileInstall,ebene3.png,%ResourceFolder%\ebene3.png,1
FileInstall,ebene4.png,%ResourceFolder%\ebene4.png,1 FileInstall,ebene4.png,%ResourceFolder%\ebene4.png,1
FileInstall,ebene5.png,%ResourceFolder%\ebene5.png,1 FileInstall,ebene5.png,%ResourceFolder%\ebene5.png,1
FileInstall,ebene6.png,%ResourceFolder%\ebene6.png,1 FileInstall,ebene6.png,%ResourceFolder%\ebene6.png,1
zeigeBildschirmTastatur=1 zeigeBildschirmTastatur = 1
} }
} }
; Benutze die Dateien auch dann, wenn sie eventuell im aktuellen Verzeichnis vorhanden sind ; Benutze die Dateien auch dann, wenn sie eventuell im aktuellen Verzeichnis vorhanden sind
if (FileExist("ebene1.png")&&FileExist("ebene2.png")&&FileExist("ebene3.png")&&FileExist("ebene4.png")&&FileExist("ebene5.png")&&FileExist("ebene6.png")) if (FileExist("ebene1.png")&&FileExist("ebene2.png")&&FileExist("ebene3.png")&&FileExist("ebene4.png")&&FileExist("ebene5.png")&&FileExist("ebene6.png"))
zeigeBildschirmTastatur=1 zeigeBildschirmTastatur = 1
if (FileExist("neo.ico")&&FileExist("neo_disabled.ico")) if (FileExist("neo.ico")&&FileExist("neo_disabled.ico"))
iconBenutzen=1 iconBenutzen=1
@ -147,7 +148,7 @@ menu,tray,add,Bearbeiten,edit
menu,tray,add,Neu Laden,reload menu,tray,add,Neu Laden,reload
menu,tray,add menu,tray,add
menu,tray,add,Nicht im Systray anzeigen,hide menu,tray,add,Nicht im Systray anzeigen,hide
menu,tray,add,%name% beenden, exitprogram menu,tray,add,%name% beenden,exitprogram
menu,tray,default,%disable% menu,tray,default,%disable%
menu,tray,tip,%name% menu,tray,tip,%name%
@ -261,7 +262,7 @@ Suspend, Permit
else send {blind}{pause} else send {blind}{pause}
return return
^,::lernModus := not(lernModus) ^,::lernModus := !lernModus
^.::einHandNeo := !einHandNeo ^.::einHandNeo := !einHandNeo
@ -271,17 +272,17 @@ return
*/ */
togglesuspend: togglesuspend:
if A_IsSuspended { if A_IsSuspended {
menu, tray, rename, %enable%, %disable% menu,tray,rename,%enable%,%disable%
menu, tray, tip, %name% menu,tray,tip,%name%
if (iconBenutzen) if (iconBenutzen)
menu, tray, icon, %ResourceFolder%\neo.ico,,1 menu,tray,icon,%ResourceFolder%\neo.ico,,1
suspend , off ; Schaltet Suspend aus -> NEO suspend,off ; Schaltet Suspend aus -> NEO
} else { } else {
menu, tray, rename, %disable%, %enable% menu,tray,rename,%disable%, %enable%
menu, tray, tip, %name% : Deaktiviert menu,tray,tip,%name% : Deaktiviert
if (iconBenutzen) if (iconBenutzen)
menu, tray, icon, %ResourceFolder%\neo_disabled.ico,,1 menu,tray,icon, %ResourceFolder%\neo_disabled.ico,,1
suspend , on ; Schaltet Suspend ein -> QWERTZ suspend,on ; Schaltet Suspend ein -> QWERTZ
} return } return
help: help:

294
windows/autohotkey/Source/Keys-Neo.ahk
View file

@ -41,11 +41,11 @@ neo_1:
or CheckComp3Uni("r_1",0x217A) ; Römisch xi or CheckComp3Uni("r_1",0x217A) ; Römisch xi
or CheckComp3Uni("R_1",0x216A)) ; Römisch XI or CheckComp3Uni("R_1",0x216A)) ; Römisch XI
outputChar(1,"°") outputChar(1,"°")
if !(checkComp(1)) if !checkComp(1)
if (PriorCompKey == "r") if (PriorCompKey == "r")
CompKey := "r_1" CompKey := "r_1"
else if (PriorCompkey == "R") else if (PriorCompkey == "R")
CompKey := "R_1" CompKey := "R_1"
} else if (Ebene = 3) } else if (Ebene = 3)
SendUnicodeChar(0x00B9) ; Hochgestellte 1 SendUnicodeChar(0x00B9) ; Hochgestellte 1
else if (Ebene = 4) else if (Ebene = 4)
@ -320,7 +320,7 @@ neo_v:
else if (Ebene = 4) and (!lernModus or lernModus_neo_Backspace) else if (Ebene = 4) and (!lernModus or lernModus_neo_Backspace)
Send {blind}{Backspace} Send {blind}{Backspace}
else if (Ebene = 6) else if (Ebene = 6)
SendUnicodeChar(0x2259) ; estimates SendUnicodeChar(0x2259) ; estimates/entspricht
return return
@ -887,10 +887,7 @@ neo_komma:
noCaps = 1 noCaps = 1
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene = 1) if (Ebene = 1)
if isMod2Locked send {blind},
send {blind}{Shift down} , {Shift up}
else
send {blind},
else if (Ebene = 2) else if (Ebene = 2)
SendUnicodeChar(0x22EE) ; vertikale ellipse SendUnicodeChar(0x22EE) ; vertikale ellipse
else if (Ebene = 3) else if (Ebene = 3)
@ -908,10 +905,7 @@ neo_punkt:
noCaps = 1 noCaps = 1
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene = 1) if (Ebene = 1)
if isMod2Locked send {blind}.
send {blind}{Shift down} . {Shift up}
else
send {blind}.
else if (Ebene = 2) else if (Ebene = 2)
SendUnicodeChar(0x2026) ; ellipse SendUnicodeChar(0x2026) ; ellipse
else if (Ebene = 3) else if (Ebene = 3)
@ -929,13 +923,13 @@ return
neo_j: neo_j:
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene12 and !(CheckDeadUni12("c1",0x0135,0x0134) if (Ebene12 and !(CheckDeadUni12("c1",0x0135,0x0134)
or CheckDeadUni12("c2",0x01F0,"") or CheckDeadUni12("c2",0x01F0,"")
or CheckCompUni("i",0x0133) ; ij or CheckCompUni("i",0x0133) ; ij
or CheckCompUni("l",0x01C9) ; lj or CheckCompUni("l",0x01C9) ; lj
or CheckCompUni("n",0x01CC) ; nj or CheckCompUni("n",0x01CC) ; nj
or CheckCompUni("I",0x0132) ; IJ or CheckCompUni("I",0x0132) ; IJ
or CheckCompUni12("L",0x01C8,0x01C7) ; Lj/LJ or CheckCompUni12("L",0x01C8,0x01C7) ; Lj/LJ
or CheckCompUni12("N",0x01CB,0x01CA))) ; Nj/NJ or CheckCompUni12("N",0x01CB,0x01CA))) ; Nj/NJ
OutputChar("j","J") OutputChar("j","J")
else if (Ebene = 3) else if (Ebene = 3)
send {blind}`; send {blind}`;
@ -957,10 +951,6 @@ neo_NumLock:
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene = 1) if (Ebene = 1)
send `= send `=
if (Ebene = 2) { ; Funktioniert nicht
SetNumLockState
send {NumLock}
}
if (Ebene = 3) if (Ebene = 3)
SendUnicodeChar(0x2248) ; Fast gleich SendUnicodeChar(0x2248) ; Fast gleich
if (Ebene = 4) if (Ebene = 4)
@ -1014,21 +1004,14 @@ return
neo_Numpad7: neo_Numpad7:
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene = 1) { if (Ebene = 1) {
if NumLock send {blind}{Numpad7}
send {blind}{Numpad7} checkComp(7)
else
send {blind) {Shift up}{Numpad7}
if (PriorDeadKey = "comp")
CompKey := "7"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x2020) ; Kreuz SendUnicodeChar(0x2020) ; Kreuz
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x2195) ; Hoch-Runter-Pfeil SendUnicodeChar(0x2195) ; Hoch-Runter-Pfeil
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadHome}
send {blind}{Shift up}{NumpadHome}
else
send {blind}{NumpadHome}
return return
neo_Numpad8: neo_Numpad8:
@ -1037,62 +1020,41 @@ neo_Numpad8:
or CheckCompUni("3",0x215C) ; 3/8 or CheckCompUni("3",0x215C) ; 3/8
or CheckCompUni("5",0x215D) ; 5/8 or CheckCompUni("5",0x215D) ; 5/8
or CheckCompUni("7",0x215E))) { ; 7/8 or CheckCompUni("7",0x215E))) { ; 7/8
if NumLock send {blind}{Numpad8}
send {blind}{Numpad8} checkComp(8)
else
send {blind) {Shift up}{Numpad8}
if (PriorDeadKey = "comp")
CompKey := "8"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x2229) ; Durchschnitt SendUnicodeChar(0x2229) ; Durchschnitt
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x2191) ; Hochpfeil SendUnicodeChar(0x2191) ; Hochpfeil
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadUp}
send {blind}{Shift up}{NumpadUp}
else
send {blind}{NumpadUp}
return return
neo_Numpad9: neo_Numpad9:
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene = 1) { if (Ebene = 1) {
if NumLock send {blind}{Numpad9}
send {blind}{Numpad9} checkComp(9)
else
send {blind) {Shift up}{Numpad9}
if (PriorDeadKey = "comp")
CompKey := "9"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x2297) ; Tensorprodukt / Vektor in die Ebene zeigend SendUnicodeChar(0x2297) ; Tensorprodukt / Vektor in die Ebene zeigend
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x220D) ; Kleines umgekehrtes Elementzeichen SendUnicodeChar(0x220D) ; Kleines umgekehrtes Elementzeichen
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadPgUp}
send {blind}{Shift up}{NumpadPgUp}
else
send {blind}{NumpadPgUp}
return return
neo_Numpad4: neo_Numpad4:
EbeneAktualisieren() EbeneAktualisieren()
if ((Ebene = 1) and !(CheckCompUni("1",0x00BC) ; 1/4 if ((Ebene = 1) and !(CheckCompUni("1",0x00BC) ; 1/4
or CheckCompUni("3",0x00BE))) { ; 3/4 or CheckCompUni("3",0x00BE))) { ; 3/4
if NumLock send {blind}{Numpad4}
send {blind}{Numpad4} checkComp(4)
else
send {blind) {Shift up}{Numpad4}
if (PriorDeadKey = "comp")
CompKey := "4"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x2282) ; Teilmenge SendUnicodeChar(0x2282) ; Teilmenge
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x2190) ; Linkspfeil SendUnicodeChar(0x2190) ; Linkspfeil
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadLeft}
send {blind}{Shift up}{NumpadLeft}
else
send {blind}{NumpadLeft}
return return
neo_Numpad5: neo_Numpad5:
@ -1101,141 +1063,93 @@ neo_Numpad5:
or CheckCompUni("2",0x2156) ; 2/5 or CheckCompUni("2",0x2156) ; 2/5
or CheckCompUni("3",0x2157) ; 3/5 or CheckCompUni("3",0x2157) ; 3/5
or CheckCompUni("4",0x2158))) { ; 4/5 or CheckCompUni("4",0x2158))) { ; 4/5
if NumLock send {blind}{Numpad5}
send {blind}{Numpad5} checkComp(5)
else } else if (Ebene = 2)
send {blind) {Shift up}{Numpad5}
if (PriorDeadKey = "comp")
CompKey := "5"
} else if (Ebene = 3)
SendUnicodeChar(0x221E) ; Unendlich
else if (Ebene = 2)
SendUnicodeChar(0x20AC) ; Euro SendUnicodeChar(0x20AC) ; Euro
else if (Ebene = 3)
SendUnicodeChar(0x221E) ; Unendlich
else if (Ebene = 4) ; Beg else if (Ebene = 4) ; Beg
if NumLock send {blind}{NumPadClear}
send {NumPad5}
else
send {Shift}{Numpad5}
return return
neo_Numpad6: neo_Numpad6:
EbeneAktualisieren() EbeneAktualisieren()
if ((Ebene = 1) and !(CheckCompUni("1",0x2159) ; 1/6 if ((Ebene = 1) and !(CheckCompUni("1",0x2159) ; 1/6
or CheckCompUni("5",0x215a))) { ; 5/6 or CheckCompUni("5",0x215a))) { ; 5/6
if NumLock send {blind}{Numpad6}
send {blind}{Numpad6} checkComp(6)
else
send {blind) {Shift up}{Numpad6}
if (PriorDeadKey = "comp")
CompKey := "6"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x2283) ; Obermenge SendUnicodeChar(0x2283) ; Obermenge
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x2192) ; Rechtspfeil SendUnicodeChar(0x2192) ; Rechtspfeil
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadRight}
send {blind}{Shift up}{NumpadRight}
else
send {blind}{NumpadRight}
return return
neo_Numpad1: neo_Numpad1:
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene = 1) { if (Ebene = 1) {
if NumLock send {blind}{Numpad1}
send {blind}{Numpad1} checkComp(1)
else
send {blind) {Shift up}{Numpad1}
if (PriorDeadKey = "comp")
CompKey := "1"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x2714) ; Häkchen SendUnicodeChar(0x2714) ; Häkchen
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x2194) ; Links-Rechts-Pfeil SendUnicodeChar(0x2194) ; Links-Rechts-Pfeil
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadEnd}
send {blind}{Shift up}{NumpadEnd}
else
send {blind}{NumpadEnd}
return return
neo_Numpad2: neo_Numpad2:
EbeneAktualisieren() EbeneAktualisieren()
if ((Ebene = 1) and !(CheckCompUni("1",0x00BD))) { ; 1/2 if ((Ebene = 1) and !(CheckCompUni("1",0x00BD))) { ; 1/2
if NumLock send {blind}{Numpad2}
send {blind}{Numpad2} checkComp(2)
else
send {blind) {Shift up}{Numpad2}
if (PriorDeadKey = "comp")
CompKey := "2"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x222A) ; Vereinigung SendUnicodeChar(0x222A) ; Vereinigung
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x2192) ; Untenpfeil SendUnicodeChar(0x2192) ; Untenpfeil
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadDown}
send {blind}{Shift up}{NumpadDown}
else
send {blind}{NumpadDown}
return return
neo_Numpad3: neo_Numpad3:
EbeneAktualisieren() EbeneAktualisieren()
if ((Ebene = 1) and !(CheckCompUni("1",0x2153) ; 1/3 if ((Ebene = 1) and !(CheckCompUni("1",0x2153) ; 1/3
or CheckCompUni("5",0x2154))) { ; 2/3 or CheckCompUni("5",0x2154))) { ; 2/3
if NumLock send {blind}{Numpad3}
send {blind}{Numpad3} checkComp(2)
else
send {blind) {Shift up}{Numpad3}
if (PriorDeadKey = "comp")
CompKey := "3"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x2718) ; Kreuzchen SendUnicodeChar(0x2718) ; Kreuzchen
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x2192) ; Rechtspfeil SendUnicodeChar(0x2192) ; Rechtspfeil
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadPgDn}
send {blind}{Shift up}{NumpadPgDn}
else
send {blind}{NumpadPgDn}
return return
neo_Numpad0: neo_Numpad0:
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene = 1) { if (Ebene = 1) {
if NumLock send {blind}{Numpad0}
send {blind}{Numpad0} checkComp(0)
else
send {blind) {Shift up}{Numpad0}
if (PriorDeadKey = "comp")
CompKey := "0"
} else if (Ebene = 2) } else if (Ebene = 2)
SendUnicodeChar(0x2030) ; Promille SendUnicodeChar(0x2030) ; Promille
else if (Ebene = 3) else if (Ebene = 3)
SendUnicodeChar(0x0025) ; Prozent SendUnicodeChar(0x0025) ; Prozent
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadIns}
send {blind}{Shift up}{NumpadIns}
else
send {blind}{NumpadIns}
return return
neo_NumpadDot: neo_NumpadDot:
EbeneAktualisieren() EbeneAktualisieren()
if (Ebene = 1) { if (Ebene = 1)
if NumLock send {blind}{NumpadDot}
send {blind}{NumpadDot} else if (Ebene = 2)
else
send {blind) {Shift up}{NumpadDot}
} else if (Ebene = 2)
send `, send `,
else if (Ebene = 3) else if (Ebene = 3)
send {blind}. send {blind}.
else if (Ebene = 4) else if (Ebene = 4)
if NumLock send {blind}{NumpadDel}
send {blind}{Shift up}{NumpadDel}
else
send {blind}{NumpadDel}
return return
/* /*
@ -1245,41 +1159,35 @@ return
*/ */
*space:: *space::
if ((einHandNeo)) if einHandNeo
spacepressed := 1 spacepressed := 1
else else goto neo_SpaceUp
goto neo_SpaceUp
return return
*space up:: *space up::
if ((einHandNeo)) { if einHandNeo
if ((keypressed)) if keypressed {
{
keypressed := 0 keypressed := 0
spacepressed := 0 spacepressed := 0
} else } else goto neo_SpaceUp
{ return
goto neo_SpaceUp
}
} else
{} ;do nothing
return
neo_SpaceUp: neo_SpaceUp:
EbeneAktualisieren() EbeneAktualisieren()
if ((Ebene = 1) and !(CheckComp3Uni("r_1",0x2170) ; Römisch i if (Ebene = 1) and !(CheckComp3Uni("r_1",0x2170) ; Römisch i
or CheckComp3Uni("R_1",0x2160))) ; Römisch I or CheckComp3Uni("R_1",0x2160)) ; Römisch I
Send {blind}{Space} Send {blind}{Space}
else if ((Ebene = 2) or (Ebene = 3)) else if (Ebene = 2) or (Ebene = 3)
Send {blind}{Space} Send {blind}{Space}
else if (Ebene = 4 and !(CheckDeadUni("c1",0x2070) else if ((Ebene = 4) and !(CheckDeadUni("c1",0x2070)
or CheckDeadUni("c5",0x2080))) or CheckDeadUni("c5",0x2080)))
Send {blind}{NumPad0} Send {blind}{NumPad0}
else if (Ebene = 5) else if (Ebene = 5)
SendUnicodeChar(0x00A0) ; geschütztes Leerzeichen SendUnicodeChar(0x00A0) ; geschütztes Leerzeichen
else if (Ebene = 6) else if (Ebene = 6)
SendUnicodeChar(0x202F) ; schmales geschütztes Leerzeichen SendUnicodeChar(0x202F) ; schmales geschütztes Leerzeichen
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
spacepressed := 0 spacepressed := 0
keypressed := 0 keypressed := 0
return return
@ -1291,24 +1199,26 @@ return
*/ */
*Enter:: *Enter::
if (not(lernModus) or lernModus_std_Return) { if !lernModus or lernModus_std_Return {
send {Blind}{Enter} send {Blind}{Enter}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*Backspace:: *Backspace::
if (not(lernModus) or lernModus_std_Backspace) { if !lernModus or lernModus_std_Backspace {
send {Blind}{Backspace} send {Blind}{Backspace}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*Del:: *Del::
if (not(lernModus) or lernModus_std_Entf) if !lernModus or lernModus_std_Entf
send {Blind}{Del} send {Blind}{Del}
return return
*Ins:: *Ins::
if (not(lernModus) or lernModus_std_Einf) if !lernModus or lernModus_std_Einf
send {Blind}{Ins} send {Blind}{Ins}
return return
@ -1327,49 +1237,57 @@ neo_tab:
} return } return
*Home:: *Home::
if (not(lernModus) or lernModus_std_Pos1) { if !lernModus or lernModus_std_Pos1 {
send {Blind}{Home} send {Blind}{Home}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*End:: *End::
if (not(lernModus) or lernModus_std_Ende) { if !lernModus or lernModus_std_Ende {
send {Blind}{End} send {Blind}{End}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*PgUp:: *PgUp::
if (not(lernModus) or lernModus_std_PgUp) { if !lernModus or lernModus_std_PgUp {
send {Blind}{PgUp} send {Blind}{PgUp}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*PgDn:: *PgDn::
if (not(lernModus) or lernModus_std_PgDn) { if !lernModus or lernModus_std_PgDn {
send {Blind}{PgDn} send {Blind}{PgDn}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*Up:: *Up::
if (not(lernModus) or lernModus_std_Hoch) { if !lernModus or lernModus_std_Hoch {
send {Blind}{Up} send {Blind}{Up}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*Down:: *Down::
if (not(lernModus) or lernModus_std_Runter) { if !lernModus or lernModus_std_Runter {
send {Blind}{Down} send {Blind}{Down}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*Left:: *Left::
if (not(lernModus) or lernModus_std_Links) { if !lernModus or lernModus_std_Links {
send {Blind}{Left} send {Blind}{Left}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return
*Right:: *Right::
if (not(lernModus) or lernModus_std_Rechts) { if !lernModus or lernModus_std_Rechts {
send {Blind}{Right} send {Blind}{Right}
DeadKey := "" CompKey := "" DeadKey := ""
CompKey := ""
} return } return

312
windows/autohotkey/Source/Keys-Qwert-to-Neo.ahk
View file

@ -13,266 +13,200 @@
*VK35SC006::goto neo_5 *VK35SC006::goto neo_5
*VK36SC007::goto neo_6 *VK36SC007::goto neo_6
*VK37SC008:: *VK37SC008::
if (!(einHandNeo) or !(spacepressed)) if !einHandNeo or !spacepressed
goto neo_7 goto neo_7
else { else {
keypressed := 1 keypressed := 1
goto %gespiegelt_7% goto %gespiegelt_7%
} }
*VK38SC009:: *VK38SC009::
if(!(einHandNeo) or !(spacepressed)) if !einHandNeo or !spacepressed
goto neo_8 goto neo_8
else { else {
keypressed := 1 keypressed := 1
goto %gespiegelt_8% goto %gespiegelt_8%
} }
*VK39SC00A:: *VK39SC00A::
if(!(einHandNeo) or !(spacepressed)) if !einHandNeo or !spacepressed
goto neo_9 goto neo_9
else { else {
keypressed := 1 keypressed := 1
goto %gespiegelt_9% goto %gespiegelt_9%
} }
*VK30SC00B:: *VK30SC00B::
if(!(einHandNeo) or !(spacepressed)) if !einHandNeo or !spacepressed
goto neo_0 goto neo_0
else { else {
keypressed := 1 keypressed := 1
goto %gespiegelt_0% goto %gespiegelt_0%
} }
*VKDBSC00C:: ; ß *VKDBSC00C:: ; ß
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_strich
goto neo_strich else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_strich%
goto %gespiegelt_strich% }
}
} else goto neo_sz
*VKDDSC00D::goto neo_tot2 ; Akut *VKDDSC00D::goto neo_tot2 ; Akut
; Reihe 2 ; Reihe 2
VK09SC00F::goto neo_tab VK09SC00F::goto neo_tab
*VK51SC010:: ; q (x) *VK51SC010:: ; q (x)
if !ahkTreiberKombi goto neo_x
goto neo_x
else goto neo_q
*VK57SC011:: ; w (v) *VK57SC011:: ; w (v)
if !ahkTreiberKombi goto neo_v
goto neo_v
else goto neo_w
*VK45SC012:: ; e (l) *VK45SC012:: ; e (l)
if !ahkTreiberKombi goto neo_l
goto neo_l
else goto neo_e
*VK52SC013:: ; r (c) *VK52SC013:: ; r (c)
if !ahkTreiberKombi goto neo_c
goto neo_c
else goto neo_r
*VK54SC014:: ; t (w) *VK54SC014:: ; t (w)
if !ahkTreiberKombi goto neo_w
goto neo_w
else goto neo_t
*VK5ASC015:: ; z (k) *VK5ASC015:: ; z (k)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_k
goto neo_k else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_k%
goto %gespiegelt_k%
}
} }
else goto neo_z
*VK55SC016:: ; u (h) *VK55SC016:: ; u (h)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_h
goto neo_h else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_h%
goto %gespiegelt_h% }
}
} else goto neo_u
*VK49SC017:: ; i (g) *VK49SC017:: ; i (g)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_g
goto neo_g else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_g%
goto %gespiegelt_g%
}
} }
else goto neo_i
*VK4FSC018:: ; o (f) *VK4FSC018:: ; o (f)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_f
goto neo_f else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_f%
goto %gespiegelt_f%
}
} }
else goto neo_o
*VK50SC019:: ; p (q) *VK50SC019:: ; p (q)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_q
goto neo_q else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_q%
goto %gespiegelt_q%
}
} }
else goto neo_p
*VKBASC01A:: ; ü (ß) *VKBASC01A:: ; ü (ß)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_sz
goto neo_sz else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_sz%
goto %gespiegelt_sz% }
}
} else goto neo_ü
*VKBBSC01B:: ; + (tot3) *VKBBSC01B:: ; + (tot3)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_tot3
goto neo_tot3 else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_tot3%
goto %gespiegelt_tot3%
}
} }
; Reihe 3 ; Reihe 3
*VK41SC01E:: ; a (u) *VK41SC01E:: ; a (u)
if !ahkTreiberKombi goto neo_u
goto neo_u
else goto neo_a
*VK53SC01F:: ; s (i) *VK53SC01F:: ; s (i)
if !ahkTreiberKombi goto neo_i
goto neo_i
else goto neo_s
*VK44SC020:: ; d (a) *VK44SC020:: ; d (a)
if !ahkTreiberKombi goto neo_a
goto neo_a
else goto neo_d
*VK46SC021:: ; f (e) *VK46SC021:: ; f (e)
if !ahkTreiberKombi goto neo_e
goto neo_e
else goto neo_f
*VK47SC022:: ; g (o) *VK47SC022:: ; g (o)
if !ahkTreiberKombi goto neo_o
goto neo_o
else goto neo_g
*VK48SC023:: ; h (s) *VK48SC023:: ; h (s)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_s
goto neo_s else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_s%
goto %gespiegelt_s% }
}
} else goto neo_h
*VK4ASC024:: ; j (n) *VK4ASC024:: ; j (n)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_n
goto neo_n else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_n%
goto %gespiegelt_n% }
}
} else goto neo_j
*VK4BSC025:: ; k (r) *VK4BSC025:: ; k (r)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_r
goto neo_r else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_r%
goto %gespiegelt_r% }
}
} else goto neo_k
*VK4CSC026:: ; l (t) *VK4CSC026:: ; l (t)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_t
goto neo_t else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_t%
goto %gespiegelt_t% }
}
} else goto neo_l
*VKC0SC027:: ; ö (d) *VKC0SC027:: ; ö (d)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_d
goto neo_d else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_d%
goto %gespiegelt_d% }
}
} else goto neo_ö
*VKDESC028:: ; ä (y) *VKDESC028:: ; ä (y)
if !ahkTreiberKombi
goto neo_y goto neo_y
else goto neo_ä
; Reihe 4 ; Reihe 4
*VK59SC02C:: ; y (ü) *VK59SC02C:: ; y (ü)
if !ahkTreiberKombi goto neo_ü
goto neo_ü
else goto neo_y
*VK58SC02D:: ; x (ö) *VK58SC02D:: ; x (ö)
if !ahkTreiberKombi goto neo_ö
goto neo_ö *VK43SC02E:: ; c (ä)
else goto neo_x goto neo_ä
*VK43SC02E:: ; c (ä)
if !ahkTreiberKombi
goto neo_ä
else goto neo_c
*VK56SC02F:: ; v (p) *VK56SC02F:: ; v (p)
if !ahkTreiberKombi goto neo_p
goto neo_p
else goto neo_v
*VK42SC030:: ; b (z) *VK42SC030:: ; b (z)
if !ahkTreiberKombi goto neo_z
goto neo_z
else goto neo_b
*VK4ESC031:: ; n (b) *VK4ESC031:: ; n (b)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_b
goto neo_b else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_b%
goto %gespiegelt_b% }
}
} else goto neo_n
*VK4DSC032:: ; m (m) *VK4DSC032:: ; m (m)
if(!(einHandNeo) or !(spacepressed)) if !einHandNeo or !spacepressed
goto neo_m goto neo_m
else { else {
keypressed := 1 keypressed := 1
goto %gespiegelt_m% goto %gespiegelt_m%
} }
*VKBCSC033:: ; , (,) *VKBCSC033:: ; , (,)
if(!(einHandNeo) or !(spacepressed)) if !einHandNeo or !spacepressed
goto neo_komma goto neo_komma
else { else {
keypressed := 1 keypressed := 1
goto %gespiegelt_komma% goto %gespiegelt_komma%
} }
*VKBESC034:: ; . (.) *VKBESC034:: ; . (.)
if(!(einHandNeo) or !(spacepressed)) if !einHandNeo or !spacepressed
goto neo_punkt goto neo_punkt
else { else {
keypressed := 1 keypressed := 1
goto %gespiegelt_punkt% goto %gespiegelt_punkt%
} }
*VKBDSC035:: ; - (j) *VKBDSC035:: ; - (j)
if !ahkTreiberKombi { if !einHandNeo or !spacepressed
if(!(einHandNeo) or !(spacepressed)) goto neo_j
goto neo_j else {
else { keypressed := 1
keypressed := 1 goto %gespiegelt_j%
goto %gespiegelt_j% }
}
} else goto neo_strich
; Numpad ; Numpad
*VK90SC145::goto neo_NumLock *VK90SC145::goto neo_NumLock

5
windows/autohotkey/Source/Methods-Layers.ahk
View file

@ -11,7 +11,7 @@
isMod2Locked = 0 isMod2Locked = 0
VKA1SC136 & VKA0SC02A:: ; RShift, dann LShift VKA1SC136 & VKA0SC02A:: ; RShift, dann LShift
VKA0SC02A & VKA1SC136:: ; LShift, dann RShift VKA0SC02A & VKA1SC136:: ; LShift, dann RShift
if (GetKeyState("VKA1SC136", "P") and GetKeyState("VKA0SC02A", "P")) { if GetKeyState("VKA1SC136", "P") and GetKeyState("VKA0SC02A", "P") {
if isMod2Locked { if isMod2Locked {
isMod2Locked = 0 isMod2Locked = 0
KeyboardLED(4,"off") KeyboardLED(4,"off")
@ -23,6 +23,7 @@ VKA0SC02A & VKA1SC136:: ; LShift, dann RShift
return return
;Mod3-Tasten (Wichtig, sie werden sonst nicht verarbeitet!) ;Mod3-Tasten (Wichtig, sie werden sonst nicht verarbeitet!)
;Auf Mod3+Mod3 liegt zusätzlich zu Mod3+Tab Compose
*VKBFSC02B:: ; # *VKBFSC02B:: ; #
*VK14SC03A:: ; CapsLock *VK14SC03A:: ; CapsLock
if (GetKeyState("VKBFSC02B", "P") and GetKeyState("VK14SC03A", "P")) { if (GetKeyState("VKBFSC02B", "P") and GetKeyState("VK14SC03A", "P")) {
@ -40,7 +41,7 @@ return
IsMod4Locked := 0 IsMod4Locked := 0
*VKA5SC138:: *VKA5SC138::
*VKE2SC056:: *VKE2SC056::
if (GetKeyState("VKA5SC138", "P") and GetKeyState("VKE2SC056", "P")) { if GetKeyState("VKA5SC138", "P") and GetKeyState("VKE2SC056", "P") {
if IsMod4Locked { if IsMod4Locked {
if zeigeLockBox if zeigeLockBox
MsgBox Mod4-Feststellung aufgebehoben! MsgBox Mod4-Feststellung aufgebehoben!

27
windows/autohotkey/Source/Methods-Lights.ahk
View file

@ -20,10 +20,9 @@
------------------------------------------------------ ------------------------------------------------------
*/ */
KeyboardLED(LEDvalue, Cmd){ ; LEDvalue: ScrollLock=1, NumLock=2, CapsLock=4 ; Cmd = on/off/switch KeyboardLED(LEDvalue, Cmd) { ; LEDvalue: ScrollLock=1, NumLock=2, CapsLock=4 ; Cmd = on/off/switch
Static h_device Static h_device
If ! h_device ; initialise If !(h_device) { ; initialise
{
device=\Device\KeyBoardClass0 device=\Device\KeyBoardClass0
SetUnicodeStrLED(fn,device) SetUnicodeStrLED(fn,device)
h_device:=NtCreateFileLED(fn,0+0x00000100+0x00000080+0x00100000,1,1,0x00000040+0x00000020,0) h_device:=NtCreateFileLED(fn,0+0x00000100+0x00000080+0x00100000,1,1,0x00000040+0x00000020,0)
@ -35,15 +34,15 @@ KeyboardLED(LEDvalue, Cmd){ ; LEDvalue: ScrollLock=1, NumLock=2, CapsLock=4 ; Cm
KeyLED:=LEDvalue KeyLED:=LEDvalue
If Cmd=on ;forces all choosen LED's to ON (LEDvalue= 0 ->LED's according to keystate) If Cmd=on ;forces all choosen LED's to ON (LEDvalue= 0 ->LED's according to keystate)
KeyLED:=LEDvalue | (GetKeyState("ScrollLock", "T") + 2*GetKeyState("NumLock", "T") + 4*GetKeyState("CapsLock", "T")) KeyLED:=LEDvalue | (GetKeyState("ScrollLock", "T") + 2*GetKeyState("NumLock", "T") + 4*GetKeyState("CapsLock", "T"))
If Cmd=off ;forces all choosen LED's to OFF (LEDvalue= 0 ->LED's according to keystate) If (Cmd=off) { ;forces all choosen LED's to OFF (LEDvalue= 0 ->LED's according to keystate)
{
LEDvalue:=LEDvalue ^ 7 LEDvalue:=LEDvalue ^ 7
KeyLED:=LEDvalue & (GetKeyState("ScrollLock","T") + 2*GetKeyState("NumLock","T") + 4*GetKeyState("CapsLock","T")) KeyLED:=LEDvalue & (GetKeyState("ScrollLock","T") + 2*GetKeyState("NumLock","T") + 4*GetKeyState("CapsLock","T"))
} }
; EncodeIntegerLED(KeyLED,1,&input,2) ;input bit pattern (KeyLED): bit 0 = scrolllock ;bit 1 = numlock ;bit 2 = capslock ; EncodeIntegerLED(KeyLED,1,&input,2) ;input bit pattern (KeyLED): bit 0 = scrolllock ;bit 1 = numlock ;bit 2 = capslock
input:=Chr(1) Chr(1) Chr(KeyLED) input := Chr(1) Chr(1) Chr(KeyLED)
input:=Chr(1) input := Chr(1)
input= input =
; ???
success:=DllCall("DeviceIoControl" success:=DllCall("DeviceIoControl"
, "uint", h_device , "uint", h_device
, "uint", CTL_CODE_LED( 0x0000000b ; FILE_DEVICE_KEYBOARD , "uint", CTL_CODE_LED( 0x0000000b ; FILE_DEVICE_KEYBOARD
@ -58,8 +57,8 @@ KeyboardLED(LEDvalue, Cmd){ ; LEDvalue: ScrollLock=1, NumLock=2, CapsLock=4 ; Cm
, "uint", 0 ) , "uint", 0 )
} }
CTL_CODE_LED(p_device_type,p_function,p_method,p_access ){ CTL_CODE_LED(p_device_type,p_function,p_method,p_access ) {
Return, ( p_device_type << 16 ) | ( p_access << 14 ) | ( p_function << 2 ) | p_method Return,( p_device_type << 16 ) | ( p_access << 14 ) | ( p_function << 2 ) | p_method
} }
NtCreateFileLED(ByRef wfilename,desiredaccess,sharemode,createdist,flags,fattribs){ NtCreateFileLED(ByRef wfilename,desiredaccess,sharemode,createdist,flags,fattribs){
@ -78,14 +77,14 @@ NtCreateFileLED(ByRef wfilename,desiredaccess,sharemode,createdist,flags,fattrib
return ExtractIntegerLED(fh) return ExtractIntegerLED(fh)
} }
SetUnicodeStrLED(ByRef out, str_){ SetUnicodeStrLED(ByRef out, str_) {
VarSetCapacity(st1, 8, 0) VarSetCapacity(st1, 8, 0)
InsertIntegerLED(0x530025, st1) InsertIntegerLED(0x530025, st1)
VarSetCapacity(out, (StrLen(str_)+1)*2, 0) VarSetCapacity(out, (StrLen(str_)+1)*2, 0)
DllCall("wsprintfW", "str", out, "str", st1, "str", str_, "Cdecl UInt") DllCall("wsprintfW", "str", out, "str", st1, "str", str_, "Cdecl UInt")
} }
ExtractIntegerLED(ByRef pSource, pOffset = 0, pIsSigned = false, pSize = 4){ ExtractIntegerLED(ByRef pSource, pOffset = 0, pIsSigned = false, pSize = 4) {
; pSource is a string (buffer) whose memory area contains a raw/binary integer at pOffset. ; pSource is a string (buffer) whose memory area contains a raw/binary integer at pOffset.
; The caller should pass true for pSigned to interpret the result as signed vs. unsigned. ; The caller should pass true for pSigned to interpret the result as signed vs. unsigned.
; pSize is the size of PSource's integer in bytes (e.g. 4 bytes for a DWORD or Int). ; pSize is the size of PSource's integer in bytes (e.g. 4 bytes for a DWORD or Int).
@ -99,7 +98,7 @@ ExtractIntegerLED(ByRef pSource, pOffset = 0, pIsSigned = false, pSize = 4){
return -(0xFFFFFFFF - result + 1) return -(0xFFFFFFFF - result + 1)
} }
InsertIntegerLED(pInteger, ByRef pDest, pOffset = 0, pSize = 4){ InsertIntegerLED(pInteger, ByRef pDest, pOffset = 0, pSize = 4) {
; The caller must ensure that pDest has sufficient capacity. To preserve any existing contents in pDest, ; The caller must ensure that pDest has sufficient capacity. To preserve any existing contents in pDest,
; only pSize number of bytes starting at pOffset are altered in it. ; only pSize number of bytes starting at pOffset are altered in it.
Loop %pSize% ; Copy each byte in the integer into the structure as raw binary data. Loop %pSize% ; Copy each byte in the integer into the structure as raw binary data.

2
windows/autohotkey/Source/Methods-Other.ahk
View file

@ -101,7 +101,7 @@ CheckCompUni12(d,val1,val2){
if (Ebene = 1) and (val1 != "") { if (Ebene = 1) and (val1 != "") {
SendUnicodeChar(val1) SendUnicodeChar(val1)
return 1 return 1
}else if (Ebene = 2) and (val2 != "") { } else if (Ebene = 2) and (val2 != "") {
SendUnicodeChar(val2) SendUnicodeChar(val2)
return 1 return 1
} }

120
windows/autohotkey/Source/Methods-ScreenKeyboard.ahk
View file

@ -8,55 +8,55 @@ guiErstellt = 0
alwaysOnTop = 1 alwaysOnTop = 1
*F1:: *F1::
if(isMod4Pressed()&&zeigeBildschirmTastatur) if (isMod4Pressed()&&zeigeBildschirmTastatur)
goto Switch1 goto Switch1
else send {blind}{F1} else send {blind}{F1}
return return
*F2:: *F2::
if(isMod4Pressed()&&zeigeBildschirmTastatur) if (isMod4Pressed()&&zeigeBildschirmTastatur)
goto Switch2 goto Switch2
else send {blind}{F2} else send {blind}{F2}
return return
*F3:: *F3::
if(isMod4Pressed()&&zeigeBildschirmTastatur) if (isMod4Pressed()&&zeigeBildschirmTastatur)
goto Switch3 goto Switch3
else send {blind}{F3} else send {blind}{F3}
return return
*F4:: *F4::
if(isMod4Pressed()&&zeigeBildschirmTastatur) if (isMod4Pressed()&&zeigeBildschirmTastatur)
goto Switch4 goto Switch4
else send {blind}{F4} else send {blind}{F4}
return return
*F5:: *F5::
if(isMod4Pressed()&&zeigeBildschirmTastatur) if (isMod4Pressed()&&zeigeBildschirmTastatur)
goto Switch5 goto Switch5
else send {blind}{F5} else send {blind}{F5}
return return
*F6:: *F6::
if(isMod4Pressed()&&zeigeBildschirmTastatur) if (isMod4Pressed()&&zeigeBildschirmTastatur)
goto Switch6 goto Switch6
else send {blind}{F6} else send {blind}{F6}
return return
*F7:: *F7::
if(isMod4Pressed()&&zeigeBildschirmTastatur) if (isMod4Pressed()&&zeigeBildschirmTastatur)
goto Show goto Show
else send {blind}{F7} else send {blind}{F7}
return return
*F8:: *F8::
if(isMod4Pressed()&&zeigeBildschirmTastatur) if (isMod4Pressed()&&zeigeBildschirmTastatur)
goto ToggleAlwaysOnTop goto ToggleAlwaysOnTop
else send {blind}{F8} else send {blind}{F8}
return return
Switch1: Switch1:
tImage:=ResourceFolder . "\ebene1.png" tImage := ResourceFolder . "\ebene1.png"
goto Switch goto Switch
Return Return
@ -86,83 +86,71 @@ Switch6:
Return Return
Switch: Switch:
if (guiErstellt) if guiErstellt {
{ if (Image = tImage)
if (Image = tImage) goto Close
goto Close else {
else Image := tImage
{ SetTimer, Refresh
Image := tImage }
SetTimer, Refresh } else {
}
}
else
{
Image := tImage Image := tImage
goto Show goto Show
} }
Return Return
Show: Show:
if (guiErstellt) if guiErstellt {
{
goto Close goto Close
} } else {
else if (Image = "") {
{
if (Image = "")
{
Image := ResourceFolder . "\ebene1.png" Image := ResourceFolder . "\ebene1.png"
} }
yPosition := A_ScreenHeight -270 yPosition := A_ScreenHeight -270
Gui, Color, FFFFFF Gui,Color,FFFFFF
Gui, Add, Button, xm+5 gSwitch1, F1 Gui,Add,Button,xm+5 gSwitch1,F1
Gui, Add, Text, x+5, kleine Buchstaben Gui,Add,Text,x+5,kleine Buchstaben
Gui, Add, Button, xm+5 gSwitch2, F2 Gui,Add,Button,xm+5 gSwitch2,F2
Gui, Add, Text, x+5, große Buchstaben Gui,Add,Text,x+5,große Buchstaben
Gui, Add, Button, xm+5 gSwitch3, F3 Gui,Add,Button,xm+5 gSwitch3,F3
Gui, Add, Text, x+5, Satz-/Sonderzeichen Gui,Add,Text,x+5,Satz-/Sonderzeichen
Gui, Add, Button, xm+5 gSwitch4, F4 Gui,Add,Button,xm+5 gSwitch4,F4
Gui, Add, Text, x+5, Zahlen / Steuerung Gui,Add,Text,x+5,Zahlen / Steuerung
Gui, Add, Button, xm+5 gSwitch5, F5 Gui,Add,Button,xm+5 gSwitch5,F5
Gui, Add, Text, x+5, Sprachen Gui,Add,Text,x+5,Sprachen
Gui, Add, Button, xm+5 gSwitch6, F6 Gui,Add,Button,xm+5 gSwitch6,F6
Gui, Add, Text, x+5, Mathesymbole Gui,Add,Text,x+5,Mathesymbole
Gui, Add, Button, xm+5 gShow, F7 Gui,Add,Button,xm+5 gShow,F7
Gui, Add, Text, x+5, An / Gui,Add,Text,x+5,An /
Gui, Add, Text, y+3, Aus Gui,Add,Text,y+3,Aus
Gui, Add, Button, x+10 y+-30 gShow, F8 Gui,Add,Button,x+10 y+-30 gShow,F8
Gui, Add, Text, x+5, OnTop Gui,Add,Text,x+5,OnTop
Gui, Add, Picture,AltSubmit ys w564 h200 vPicture, %Image% Gui,Add,Picture,AltSubmit ys w564 h200 vPicture,%Image%
Gui, +AlwaysOnTop Gui,+AlwaysOnTop
Gui, Show, y%yposition% Autosize Gui,Show,y%yposition% Autosize
; SetTimer, Refresh ; SetTimer,Refresh
guiErstellt = 1 guiErstellt = 1
} }
Return Return
Close: Close:
guiErstellt = 0 guiErstellt = 0
Gui, Destroy Gui,Destroy
Return Return
Refresh: Refresh:
If (Image != OldImage) If (Image != OldImage) {
{ GuiControl,,Picture,%Image%
GuiControl, , Picture, %Image% OldImage := Image
OldImage := Image }
}
Return Return
ToggleAlwaysOnTop: ToggleAlwaysOnTop:
if (alwaysOnTop) if alwaysOnTop {
{ Gui, -AlwaysOnTop
Gui, -AlwaysOnTop alwaysOnTop = 0
alwaysOnTop = 0 } else {
} Gui, +AlwaysOnTop
else alwaysOnTop = 1
{ }
Gui, +AlwaysOnTop
alwaysOnTop = 1
}
Return Return

2
windows/autohotkey/neo20.ahk
View file

@ -261,7 +261,7 @@ Suspend, Permit
else send {blind}{pause} else send {blind}{pause}
return return
^,::lernModus := not(lernModus) ^,::lernModus := !lernModus
^.::einHandNeo := !einHandNeo ^.::einHandNeo := !einHandNeo