TobiPlusPlus
/
neo-layout
forked from neo/neo-layout
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Die Compose-Sequenzen sind jetzt in eine eigene Funktion ausgelagert. Das eröffnet neue Möglichkeiten in Bezug auf die Wahlfreiheit, die fertigen Sequenzen zu verwenden, oder sie beim Start dynamisch erzeugen zu lassen (das ist aber noch nicht implementiert).

This commit is contained in:
mösi 2009-02-20 11:09:29 +00:00
parent 13be1a0c6a
commit e9e3e8e4d6
3 changed files with 15290 additions and 15268 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30543
windows/neo-vars/src/source/compose.generated.ahk
View File

File diff suppressed because it is too large Load Diff

2
windows/neo-vars/src/source/initialize.ahk
View File

@ -83,4 +83,4 @@ IsMod4LPressed := 0
IsMod4Pressed := 0
IsMod4Locked := 0
EbeneAktualisieren()
LoadDefaultCompose()

13
windows/neo-vars/src/source/makecompose.ahk
View File

@ -1907,7 +1907,7 @@ EncodeUnicodeFile(FFrom,FTo) {
if (ReplaceLeft != "") {
if (CM%modkeys% != 1) {
CM%modkeys% := 1
Composita := Composita . "CM" modkeys . ":=1`r`n"
Composita := Composita . " CM" modkeys . ":=1`r`n"
}
}
else
@ -1921,11 +1921,11 @@ EncodeUnicodeFile(FFrom,FTo) {
}
if (modkeys != "") {
ressymb := EncodeUni(ReplaceRight)
Composita .= "CD" . modkeys . ":=""" . ressymb . """`r`n"
Composita .= " CD" . modkeys . ":=""" . ressymb . """`r`n"
if (StrLen(ressymb)==5)
Composita .= "CRC" . ressymb . ".="" " . modkeys . """`r`n"
Composita .= " CRC" . ressymb . ".="" " . modkeys . """`r`n"
} else {
Composita .= "; illegal " . Xkbsym . " in " . A_LoopField . "`r`n"
Composita .= " `; illegal " . Xkbsym . " in " . A_LoopField . "`r`n"
Miss := Miss + 1
}
}
@ -1945,7 +1945,7 @@ CompRevision = %1%
OutputFile = %2%
FileDelete,%OutputFile%
FileAppend,CompRevision := "%CompRevision%"`r`n, %OutputFile%
FileAppend,CompRevision := "%CompRevision%"`r`n`r`nLoadDefaultCompose() {`r`n global`r`n`r`n, %OutputFile% ; }
loop %Numpars% {
if (A_Index < 3)
@ -1953,6 +1953,9 @@ loop %Numpars% {
EncodeUnicodeFile(%A_Index%, OutputFile)
}
; {
FileAppend,},%OutputFile%
; MsgBox % EncodeUni(DecodeUni("U20ACU0041U0070"))
; MsgBox % ConvertXkbsym("KP_5") . ConvertXkbsym("a")