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

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).

Browse source 
git-svn-id: https://svn.neo-layout.org@1675 b9310e46-f624-0410-8ea1-cfbb3a30dc96
This commit is contained in:
mösi 2009-02-20 11:09:29 +00:00
parent 97b7ec4504
commit 23475691bb
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")