Römische Ziffern angepasst.

Skript modularisiert.

git-svn-id: https://svn.neo-layout.org@1064 b9310e46-f624-0410-8ea1-cfbb3a30dc96

4 files changed, 289 insertions, 295 deletions

diff --git a/windows/neo-vars/keydefinitions.ahk b/windows/neo-vars/keydefinitions.ahk
new file mode 100644
index 0000000..c5319ff
--- /dev/null
+++ b/windows/neo-vars/keydefinitions.ahk
@@ -0,0 +1,120 @@
+; Reihe 1

+ED("VKDCSC029","Tcflx","Ttlde","Tobrg","Tcron","Tbrve","Tmcrn") ; circumflex

+ED("VK31SC002","U0031","U00B0","U00B9","U00BA","U2081","U00AC") ; 1

+ED("VK32SC003","U0032","U00A7","U00B2","U00AA","U2082","U2228") ; 2

+ED("VK33SC004","U0033","U2113","U00B3","U2116","U2083","U2227") ; 3

+ED("VK34SC005","U0034","U00BB","U203A","SPgUp","U2020","U22A5") ; 4

+ED("VK35SC006","U0035","U00AB","U2039",""     ,"U2640","U2221") ; 5

+ED("VK36SC007","U0036","U20AC","U00A2","U00A3","U2642","U2225") ; 6

+ED("VK37SC008","U0037","U0024","U00A5","U00A4","U03BA","U2209") ; 7

+ED("VK38SC009","U0038","U201E","U201A","SNDiv","U27E8","U2204") ; 8

+ED("VK39SC00A","U0039","U201C","U2018","SNMul","U27E9","U2226") ; 9

+ED("VK30SC00B","U0030","U201D","U2019","SNSub","U2080","U2205") ; 0

+ED("VKDBSC00C","U002D","U2013","U2014",""     ,"U2011","U00AD") ; -

+ED("VKDDSC00D","Tgrav",""     ,"Tdrss","Tdgrv","U1FFE",""     ) ; grave

+; Reihe 2

+ED("VK51SC010","U0078","U0058","U2026","U22EE","U03BE","U039E") ; x

+ED("VK57SC011","U0076","U0056","U005F","U0008",""     ,"U2259") ; v

+ED("VK45SC012","U006C","U004C","U005B","S__Up","U03BB","U039B") ; l

+ED("VK52SC013","U0063","U0043","U005D","S_Del","U03C7","U2102") ; c

+ED("VK54SC014","U0077","U0057","U005E","S_Ins","U03C9","U03A9") ; w

+ED("VK5ASC015","U006B","U004B","U0021","U00A1","U03F0","U221A") ; k

+ED("VK55SC016","U0068","U0048","U003C","SN__7","U03C8","U03A8") ; h

+ED("VK49SC017","U0067","U0047","U003E","SN__8","U03B3","U0393") ; g

+ED("VK4FSC018","U0066","U0046","U003D","SN__9","U03C6","U03A6") ; f

+ED("VK50SC019","U0071","U0051","U0026","SNAdd","U03D5","U211A") ; q

+ED("VKBASC01A","U00DF","U1E9E","U017F",""     ,"U03C2","U2218") ; ß

+ED("VKBBSC01B","Tacut","Tcedi","Tstrk","Tdbac","U1FBF","Tabdt") ; acute

+; Reihe 3

+ED("VK41SC01E","U0075","U0055","U005C","SHome","P_Uni","U222E") ; u

+ED("VK53SC01F","U0069","U0049","U002F","SLeft","U03B9","U222B") ; i

+ED("VK44SC020","U0061","U0041","U007B","SDown","U03B1","U2200") ; a

+ED("VK46SC021","U0065","U0045","U007D","SRght","U03B5","U2203") ; e

+ED("VK47SC022","U006F","U004F","U002A","S_End","U03BF","U2208") ; o

+ED("VK48SC023","U0073","U0053","U003F","U00BF","U03C3","U03A3","U017F") ; s

+ED("VK4ASC024","U006E","U004E","U0028","SN__4","U03BD","U2115") ; n

+ED("VK4BSC025","U0072","U0052","U0029","SN__5","U03F1","U211D") ; r

+ED("VK4CSC026","U0074","U0054","U002D","SN__6","U03C4","U2202") ; t

+ED("VKC0SC027","U0064","U0044","U003A","SNDot","U03B4","U0394") ; d

+ED("VKDESC028","U0079","U0059","U0040","U002E","U03C5","U2207") ; y

+; Reihe 4

+ED("VK59SC02C","U00FC","U00DC","U0023","S_Esc",""     ,"U221C") ; ü

+ED("VK58SC02D","U00F6","U00D6","U0024","U0009",""     ,"U2111") ; ö

+ED("VK43SC02E","U00E4","U00C4","U007C","SPgDn","U03B7","U2135") ; ä

+ED("VK56SC02F","U0070","U0050","U007E","U000D","U03C0","U03A0") ; p

+ED("VK42SC030","U007A","U005A","U0060",""     ,"U03B6","U2124") ; z

+ED("VK4ESC031","U0062","U0042","U002B","U003A","U03B2","U21D0") ; b

+ED("VK4DSC032","U006D","U004D","U0025","SN__1","U03BC","U21D4") ; m

+ED("VKBCSC033","U002C","U2022","U0022","SN__2","U03C1","U21D2") ; ,

+ED("VKBESC034","U002E","U2023","U0027","SN__3","U03D1","U0398") ; .

+ED("VKBDSC035","U006A","U004A","U003B","U003B","U03B8","U221D") ; j

+; Numpad

+ED("VK90SC145","U0009","U0009","U003D","U2260","U2248","U2261") ; NumLock

+ED("VK6FSC135","SNDiv","SNDiv","U00F7","U2300","U2223","U2044") ; NumpadDiv

+ED("VK6ASC037","SNMul","SNMul","U22C5","U00D7","U2299","U2297") ; NumpadMult

+ED("VK6DSC04A","SNSub","SNSub","U2212","U2216","U2296","U2238") ; NumpadSub

+ED("VK6BSC04E","SNAdd","SNAdd","U00B1","U2213","U2295","U2214") ; NumpadAdd

+

+EDN("VK67SC047","VK24SC047","SN__7","U2714","U2195","SNHom","U226A","U2308") ; Numpad7, NumpadHome

+EDN("VK68SC048","VK26SC048","SN__8","U2718","U2191","SN_Up","U2229","U22C2") ; Numpad8, NumpadUp

+EDN("VK69SC049","VK21SC049","SN__9",""     ,"U20D7","SNPUp","U226B","U2309") ; Numpad9, NumpadPgUp

+

+EDN("VK64SC04B","VK25SC04B","SN__4","U2663","U2190","SN_Le","U2282","U2286") ; Numpad4, NumpadLeft

+EDN("VK65SC04C","VK0CSC04C","SN__5","U20AC","U00A6","SNClr","U22B6","U22B7") ; Numpad5, NumpadClear

+EDN("VK66SC04D","VK27SC04D","SN__6",""     ,"U2192","SN_Ri","U2283","U2287") ; Numpad6, NumpadRight

+

+EDN("VK61SC04F","VK23SC04F","SN__1","U2666","U2194","SNEnd","U2264","U230A") ; Numpad1, NumpadEnd

+EDN("VK62SC050","VK28SC050","SN__2","U2665","U2193","SN_Dn","U222A","U22C3") ; Numpad2, NumpadDown

+EDN("VK63SC051","VK22SC051","SN__3","U2660","U21CC","SNPDn","U2265","U230B") ; Numpad3, NumpadPgDn

+

+EDN("VK60SC052","VK2DSC052","SN__0","U2423","U0025","SNIns","U2030","U25A1") ; Numpad0, NumpadIns

+EDN("VK6ESC053","VK2ESC053","SNDot","U002E","U002C","SNDel","U2032","U2033") ; NumpadDot, NumpadDel

+

+; other chars

+ED("space","U0020","U0020","U0020","SN__0","U00A0","U202F")

+ED("esc"  ,"U001B","U001B","U001B","PRlod","U001B","U001B")

+ED("tab"  ,"U0009","U0009","SComp","U0009","U0009","U0009")

+ED("F10"  ,"S_F10","S_F10","S_F10","P_VMt","S_F10","S_F10")

+ED("F11"  ,"S_F11","S_F11","S_F11","PLnSt","S_F11","S_F11")

+ED1("enter"    ,"U000D")

+ED1("backspace","U0008")

+ED1("del"      ,"S_Del")

+ED1("ins"      ,"S_Ins")

+ED1("home"     ,"SHome")

+ED1("end"      ,"S_End")

+ED1("pgup"     ,"SPgUp")

+ED1("pgdn"     ,"SPgDn")

+ED1("up"       ,"S__Up")

+ED1("down"     ,"SDown")

+ED1("left"     ,"SLeft")

+ED1("right"    ,"SRght")

+ED1("numpadenter","SNEnt")

+

+ED(pos,e1,e2,e3,e4,e5,e6,e7="",e8="") {

+  global

+  if (e1 != "") 

+    CP1%pos% := e1

+  if (e2 != "") 

+    CP2%pos% := e2

+  if (e3 != "") 

+    CP3%pos% := e3

+  if (e4 != "") 

+    CP4%pos% := e4

+  if (e5 != "") 

+    CP5%pos% := e5

+  if (e6 != "") 

+    CP6%pos% := e6

+  if (e7 != "") 

+    CP7%pos% := e7

+  if (e8 != "") 

+    CP8%pos% := e8

+}

+

+EDN(pos1,pos2,e1,e2,e3,e4,e5,e6) {

+  ED(pos1,e1,e2,e3,e4,e5,e6)

+  ED(pos2,e1,e2,e3,e4,e5,e6)

+}

+

+ED1(pos,e1) {

+ ED(pos,e1,e1,e1,e1,e1,e1)

+}

diff --git a/windows/neo-vars/neo20-vars.ahk b/windows/neo-vars/neo20-vars.ahk
index 09317fb..03b9ef2 100644
--- a/windows/neo-vars/neo20-vars.ahk
+++ b/windows/neo-vars/neo20-vars.ahk
@@ -1,4 +1,5 @@
 #MaxThreadsPerHotKey 4

+

 /*

 CM* == 1: Await more compose chars after this sequence? 

 CD*     : Replace compose sequence by this character

@@ -12,284 +13,10 @@ PR*     : release code for key *
 ; ein wenig COMPOSE

 #Include %a_scriptdir%\en_us.ahk

 #Include %a_scriptdir%\neocomp.ahk

-CMSCompU002D := 1

-CDSCompU002DSLeft := "U2190"

-CDSCompU002DS__Up := "U2191"

-CDSCompU002DSRght := "U2192"

-CDSCompU002DSDown := "U2193"

-CDSCompU002DSHome := "U2196"

-CDSCompU002DSPgUp := "U2197"

-CDSCompU002DSPgDn := "U2198"

-CDSCompU002DS_End := "U2199"

-CMSCompU003D := 1

-CDSCompU003DSLeft := "U21D0"

-CDSCompU003DS__Up := "U21D1"

-CDSCompU003DSRght := "U21D2"

-CDSCompU003DSDown := "U21D3"

-CDSCompU003DSHome := "U21D6"

-CDSCompU003DSPgUp := "U21D7"

-CDSCompU003DSPgDn := "U21D8"

-CDSCompU003DS_End := "U21D9"

-CDSCompSComp := "U266B"

-CDSCompU000D := "U240D"

-CDSCompSNEnt := "U2318"

-

-CDSCompU0072U0072 := "P_rom"

-CDSCompU0072U0052 := "P_rom"

-CDSCompU0052U0072 := "P_Rom"

-CDSCompU0052U0052 := "P_Rom"

-CMSCompU0075 := 1

-CMSCompU0055 := 1

-CDSCompU0075U0075 := "P_Uni"

-CDSCompU0075U0055 := "P_Uni"

-CDSCompU0055U0075 := "P_Uni"

-CDSCompU0055U0055 := "P_Uni"

-CMSCompU0064 := 1

-CMSCompU0044 := 1

-CDSCompU0064U0064 := "PDUni"

-CDSCompU0064U0044 := "PDUni"

-CDSCompU0044U0064 := "PDUni"

-CDSCompU0044U0044 := "PDUni"

-

-ED(pos,e1,e2,e3,e4,e5,e6,e7="",e8="") {

-  global

-  if (e1 != "") 

-    CP1%pos% := e1

-  if (e2 != "") 

-    CP2%pos% := e2

-  if (e3 != "") 

-    CP3%pos% := e3

-  if (e4 != "") 

-    CP4%pos% := e4

-  if (e5 != "") 

-    CP5%pos% := e5

-  if (e6 != "") 

-    CP6%pos% := e6

-  if (e7 != "") 

-    CP7%pos% := e7

-  if (e8 != "") 

-    CP8%pos% := e8

-}

-

-EDN(pos1,pos2,e1,e2,e3,e4,e5,e6) {

-  ED(pos1,e1,e2,e3,e4,e5,e6)

-  ED(pos2,e1,e2,e3,e4,e5,e6)

-}

-

-ED1(pos,e1) {

- ED(pos,e1,e1,e1,e1,e1,e1)

-}

-

-/*

-******************************************************

-*** HIER KOMMT NEO!

-******************************************************

-*/

-; Reihe 1

-ED("VKDCSC029","Tcflx","Ttlde","Tobrg","Tcron","Tbrve","Tmcrn") ; circumflex

-ED("VK31SC002","U0031","U00B0","U00B9","U00BA","U2081","U00AC") ; 1

-ED("VK32SC003","U0032","U00A7","U00B2","U00AA","U2082","U2228") ; 2

-ED("VK33SC004","U0033","U2113","U00B3","U2116","U2083","U2227") ; 3

-ED("VK34SC005","U0034","U00BB","U203A","SPgUp","U2020","U22A5") ; 4

-ED("VK35SC006","U0035","U00AB","U2039",""     ,"U2640","U2221") ; 5

-ED("VK36SC007","U0036","U20AC","U00A2","U00A3","U2642","U2225") ; 6

-ED("VK37SC008","U0037","U0024","U00A5","U00A4","U03BA","U2209") ; 7

-ED("VK38SC009","U0038","U201E","U201A","SNDiv","U27E8","U2204") ; 8

-ED("VK39SC00A","U0039","U201C","U2018","SNMul","U27E9","U2226") ; 9

-ED("VK30SC00B","U0030","U201D","U2019","SNSub","U2080","U2205") ; 0

-ED("VKDBSC00C","U002D","U2013","U2014",""     ,"U2011","U00AD") ; -

-ED("VKDDSC00D","Tgrav",""     ,"Tdrss","Tdgrv","U1FFE",""     ) ; grave

-; Reihe 2

-ED("VK51SC010","U0078","U0058","U2026","U22EE","U03BE","U039E") ; x

-ED("VK57SC011","U0076","U0056","U005F","U0008",""     ,"U2259") ; v

-ED("VK45SC012","U006C","U004C","U005B","S__Up","U03BB","U039B") ; l

-ED("VK52SC013","U0063","U0043","U005D","S_Del","U03C7","U2102") ; c

-ED("VK54SC014","U0077","U0057","U005E","S_Ins","U03C9","U03A9") ; w

-ED("VK5ASC015","U006B","U004B","U0021","U00A1","U03F0","U221A") ; k

-ED("VK55SC016","U0068","U0048","U003C","SN__7","U03C8","U03A8") ; h

-ED("VK49SC017","U0067","U0047","U003E","SN__8","U03B3","U0393") ; g

-ED("VK4FSC018","U0066","U0046","U003D","SN__9","U03C6","U03A6") ; f

-ED("VK50SC019","U0071","U0051","U0026","SNAdd","U03D5","U211A") ; q

-ED("VKBASC01A","U00DF","U1E9E","U017F",""     ,"U03C2","U2218") ; ß

-ED("VKBBSC01B","Tacut","Tcedi","Tstrk","Tdbac","U1FBF","Tabdt") ; acute

-; Reihe 3

-ED("VK41SC01E","U0075","U0055","U005C","SHome","P_Uni","U222E") ; u

-ED("VK53SC01F","U0069","U0049","U002F","SLeft","U03B9","U222B") ; i

-ED("VK44SC020","U0061","U0041","U007B","SDown","U03B1","U2200") ; a

-ED("VK46SC021","U0065","U0045","U007D","SRght","U03B5","U2203") ; e

-ED("VK47SC022","U006F","U004F","U002A","S_End","U03BF","U2208") ; o

-ED("VK48SC023","U0073","U0053","U003F","U00BF","U03C3","U03A3","U017F") ; s

-ED("VK4ASC024","U006E","U004E","U0028","SN__4","U03BD","U2115") ; n

-ED("VK4BSC025","U0072","U0052","U0029","SN__5","U03F1","U211D") ; r

-ED("VK4CSC026","U0074","U0054","U002D","SN__6","U03C4","U2202") ; t

-ED("VKC0SC027","U0064","U0044","U003A","SNDot","U03B4","U0394") ; d

-ED("VKDESC028","U0079","U0059","U0040","U002E","U03C5","U2207") ; y

-; Reihe 4

-ED("VK59SC02C","U00FC","U00DC","U0023","S_Esc",""     ,"U221C") ; ü

-ED("VK58SC02D","U00F6","U00D6","U0024","U0009",""     ,"U2111") ; ö

-ED("VK43SC02E","U00E4","U00C4","U007C","SPgDn","U03B7","U2135") ; ä

-ED("VK56SC02F","U0070","U0050","U007E","U000D","U03C0","U03A0") ; p

-ED("VK42SC030","U007A","U005A","U0060",""     ,"U03B6","U2124") ; z

-ED("VK4ESC031","U0062","U0042","U002B","U003A","U03B2","U21D0") ; b

-ED("VK4DSC032","U006D","U004D","U0025","SN__1","U03BC","U21D4") ; m

-ED("VKBCSC033","U002C","U2022","U0022","SN__2","U03C1","U21D2") ; ,

-ED("VKBESC034","U002E","U2023","U0027","SN__3","U03D1","U0398") ; .

-ED("VKBDSC035","U006A","U004A","U003B","U003B","U03B8","U221D") ; j

-; Numpad

-ED("VK90SC145","U0009","U0009","U003D","U2260","U2248","U2261") ; NumLock

-ED("VK6FSC135","SNDiv","SNDiv","U00F7","U2300","U2223","U2044") ; NumpadDiv

-ED("VK6ASC037","SNMul","SNMul","U22C5","U00D7","U2299","U2297") ; NumpadMult

-ED("VK6DSC04A","SNSub","SNSub","U2212","U2216","U2296","U2238") ; NumpadSub

-ED("VK6BSC04E","SNAdd","SNAdd","U00B1","U2213","U2295","U2214") ; NumpadAdd

-

-EDN("VK67SC047","VK24SC047","SN__7","U2714","U2195","SNHom","U226A","U2308") ; Numpad7, NumpadHome

-EDN("VK68SC048","VK26SC048","SN__8","U2718","U2191","SN_Up","U2229","U22C2") ; Numpad8, NumpadUp

-EDN("VK69SC049","VK21SC049","SN__9",""     ,"U20D7","SNPUp","U226B","U2309") ; Numpad9, NumpadPgUp

-

-EDN("VK64SC04B","VK25SC04B","SN__4","U2663","U2190","SN_Le","U2282","U2286") ; Numpad4, NumpadLeft

-EDN("VK65SC04C","VK0CSC04C","SN__5","U20AC","U00A6","SNClr","U22B6","U22B7") ; Numpad5, NumpadClear

-EDN("VK66SC04D","VK27SC04D","SN__6",""     ,"U2192","SN_Ri","U2283","U2287") ; Numpad6, NumpadRight

-

-EDN("VK61SC04F","VK23SC04F","SN__1","U2666","U2194","SNEnd","U2264","U230A") ; Numpad1, NumpadEnd

-EDN("VK62SC050","VK28SC050","SN__2","U2665","U2193","SN_Dn","U222A","U22C3") ; Numpad2, NumpadDown

-EDN("VK63SC051","VK22SC051","SN__3","U2660","U21CC","SNPDn","U2265","U230B") ; Numpad3, NumpadPgDn

-

-EDN("VK60SC052","VK2DSC052","SN__0","U2423","U0025","SNIns","U2030","U25A1") ; Numpad0, NumpadIns

-EDN("VK6ESC053","VK2ESC053","SNDot","U002E","U002C","SNDel","U2032","U2033") ; NumpadDot, NumpadDel

-

-

-; other chars

-ED("space","U0020","U0020","U0020","SN__0","U00A0","U202F")

-ED("esc"  ,"U001B","U001B","U001B","PRlod","U001B","U001B")

-ED("tab"  ,"U0009","U0009","SComp","U0009","U0009","U0009")

-ED("F10"  ,"S_F10","S_F10","S_F10","P_VMt","S_F10","S_F10")

-ED("F11"  ,"S_F11","S_F11","S_F11","PLnSt","S_F11","S_F11")

-ED1("enter"    ,"U000D")

-ED1("backspace","U0008")

-ED1("del"      ,"S_Del")

-ED1("ins"      ,"S_Ins")

-ED1("home"     ,"SHome")

-ED1("end"      ,"S_End")

-ED1("pgup"     ,"SPgUp")

-ED1("pgdn"     ,"SPgDn")

-ED1("up"       ,"S__Up")

-ED1("down"     ,"SDown")

-ED1("left"     ,"SLeft")

-ED1("right"    ,"SRght")

-ED1("numpadenter","SNEnt")

-

-; ###### Shortcuts für alle ASCII-Zeichen (0x21 bis 0x7E)

-SetFormat, integer, hex

-char := 0x21

-loop {

-  s1 := SubStr(char,3)

-  CSU00%s1% := chr(char)

-  char += 1

-  if (char = 0x7E)

-    break

-}

-SetFormat, integer, d

-

-; #### weitere Shortcuts

-CSU0009 := "tab"

-CSU001B := "esc"

-CSU0020 := "space"

-DNCSU005E := "{^}{space}"

-DNCSU0060 := "{``}{space}"

-DNCSU007D := "{}}"                 ; "{} down}" geht nicht, warum auch immer

-DNCSU00B4 := "{´}{space}"

-CSU20AC := chr(128)   ; €

-; CSU201A := chr(130) ; ‚

-; CSU0192 := chr(131) ; ƒ

-; CSU201E := chr(132) ; „

-; CSU2026 := chr(133) ; …

-; CSU2020 := chr(134) ; †

-; CSU2021 := chr(135) ; ‡

-; CSU02C6 := chr(136) ; ˆ

-; CSU2030 := chr(137) ; ‰

-; CSU0160 := chr(138) ; Š

-; CSU2039 := chr(139) ; ‹

-; CSU0152 := chr(140) ; Œ

-; CSU017D := chr(142) ; Ž

-; CSU2018 := chr(145) ; ‘

-; CSU2019 := chr(146) ; ’

-; CSU201C := chr(147) ; “

-; CSU201D := chr(148) ; ”

-; CSU2022 := chr(149) ; •

-; CSU2013 := chr(150) ; –

-; CSU2014 := chr(151) ; —

-; CSU02DC := chr(152) ; ˜

-; CSU2122 := chr(153) ; ™

-; CSU0161 := chr(154) ; š

-; CSU203A := chr(155) ; ›

-; CSU0153 := chr(156) ; œ

-; CSU017E := chr(158) ; ž

-; CSU0178 := chr(159) ; Ÿ

-CSU00A7 := chr(167)   ; §

-CSU00B0 := chr(176)   ; °

-CSU00B2 := chr(178)   ; ²

-CSU00B3 := chr(179)   ; ³

-; CSU00B4 := chr(180)   ; ´

-CSU00B5 := chr(181)   ; µ

-CSU00C4 := chr(196)   ; Ä

-CSU00D6 := chr(214)   ; Ö

-CSU00DC := chr(220)   ; Ü

-CSU00DF := chr(223)   ; ß

-CSU00E4 := chr(228)   ; ä

-CSU00F6 := chr(246)   ; ö

-CSU00FC := chr(252)   ; ü

-CSU00FF := chr(255)   ; ÿ

-

-CSU000D := "Enter"

-CSS_Esc := "Esc"

-CSU0008 := "Backspace"

-CSS_Del := "Delete"

-CSS_Ins := "Insert"

-CSS__Up := "Up"

-CSSDown := "Down"

-CSSRght := "Right"

-CSSLeft := "Left"

-CSSPgUp := "PgUp"

-CSSPgDn := "PgDn"

-CSSHome := "Home"

-CSS_End := "End"

-CSS_F10 := "F10"

-CSS_F11 := "F11"

-

-CSSN__0 := "Numpad0"

-CSSN__1 := "Numpad1"

-CSSN__2 := "Numpad2"

-CSSN__3 := "Numpad3"

-

-CSSN__4 := "Numpad4"

-CSSN__5 := "Numpad5"

-CSSN__6 := "Numpad6"

-

-CSSN__7 := "Numpad7"

-CSSN__8 := "Numpad8"

-CSSN__9 := "Numpad9"

-

-CSSNDiv := "NumpadDiv"

-CSSNMul := "NumpadMult"

-CSSNSub := "NumpadSub"

-CSSNAdd := "NumpadAdd"

-CSSNDot := "NumpadDot"

-CSSNEnt := "NumpadEnter"

-

-CSSNDel := "NumpadDel"

-CSSNIns := "NumpadIns"

-CSSN_Up := "NumpadUp"

-CSSN_Dn := "NumpadDown"

-CSSN_Ri := "NumpadRight"

-CSSN_Le := "NumpadLeft"

-CSSNPUp := "NumpadPgUp"

-CSSNPDn := "NumpadPgDn"

-CSSNHom := "NumpadHome"

-CSSNEnd := "NumpadEnd"

-CSSNClr := "NumpadClear"

-

-Comp := ""

+#Include %a_scriptdir%\neovarscomp.ahk

 

+#Include %a_scriptdir%\keydefinitions.ahk

+#Include %a_scriptdir%\shortcuts.ahk

 #Include %a_scriptdir%\recycle.ahk

 

 AllStar(This_HotKey) {

@@ -525,14 +252,14 @@ PressHookProc(HookRoutine, PhysKey, ActKey, Char) {
           RomanDigit := mod(RomanSum,10)

           RomanSum := RomanSum//10

           RomanStr := GenRomanDigit(RomanPos,RomanDigit,1,"U2160","U2169","U216D","U216F","U2182","U2188") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,2,"U2161","U2169U2169","U216DU216D","U216FU216F","U2182U2182","U2188U2188") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,3,"U2162","U2169U2169U2169","U216DU216DU216D","U216FU216FU216F","U2182U2182U2182","U2188U2188U2188") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,4,"U2163","U2169U216C","U216DU216E","U2180U2181","U2182U2187","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,2,"U2160U2160","U2169U2169","U216DU216D","U216FU216F","U2182U2182","U2188U2188") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,3,"U2160U2160U2160","U2169U2169U2169","U216DU216DU216D","U216FU216FU216F","U2182U2182U2182","U2188U2188U2188") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,4,"U2160U2164","U2169U216C","U216DU216E","U2180U2181","U2182U2187","") . RomanStr

           RomanStr := GenRomanDigit(RomanPos,RomanDigit,5,"U2164","U216C","U216E","U2181","U2187","") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,6,"U2165","U216CU2169","U216EU216D","U2181U2180","U2187U2182","") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,7,"U2166","U216CU2169U2169","U216EU216DU216D","U2181U2180U2180","U2187U2182U2182","") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,8,"U2167","U216CU2169U2169U2169","U216EU216DU216DU216D","U2181U2180U2180U2180","U2187U2182U2182U2182","") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,9,"U2168","U2169U216D","U216DU216F","U2180U2182","U2182U2188","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,6,"U2164U2160","U216CU2169","U216EU216D","U2181U2180","U2187U2182","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,7,"U2164U2160U2160","U216CU2169U2169","U216EU216DU216D","U2181U2180U2180","U2187U2182U2182","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,8,"U2164U2160U2160U2160","U216CU2169U2169U2169","U216EU216DU216DU216D","U2181U2180U2180U2180","U2187U2182U2182U2182","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,9,"U2160U2169","U2169U216D","U216DU216F","U2180U2182","U2182U2188","") . RomanStr

           if (RomanSum == 0)

             break

           RomanPos := RomanPos + 1

@@ -542,13 +269,13 @@ PressHookProc(HookRoutine, PhysKey, ActKey, Char) {
           RomanDigit := mod(RomanSum,10)

           RomanSum := RomanSum//10

           RomanStr := GenRomanDigit(RomanPos,RomanDigit,1,"U2170","U2179","U217D","U217F","U2182","U2188") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,2,"U2171","U2179U2179","U217DU217D","U217FU217F","U2182U2182","U2188U2188") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,3,"U2172","U2179U2179U2179","U217DU217DU217D","U217FU217FU217F","U2182U2182U2182","U2188U2188U2188") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,4,"U2173","U2179U217C","U217DU217E","U2180U2181","U2182U2187","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,2,"U2170U2170","U2179U2179","U217DU217D","U217FU217F","U2182U2182","U2188U2188") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,3,"U2170U2170U2170","U2179U2179U2179","U217DU217DU217D","U217FU217FU217F","U2182U2182U2182","U2188U2188U2188") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,4,"U2170U2174","U2179U217C","U217DU217E","U2180U2181","U2182U2187","") . RomanStr

           RomanStr := GenRomanDigit(RomanPos,RomanDigit,5,"U2174","U217C","U217E","U2181","U2187","") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,6,"U2175","U217CU2179","U217EU217D","U2181U2180","U2187U2182","") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,7,"U2176","U217CU2179U2179","U217EU217DU217D","U2181U2180U2180","U2187U2182U2182","") . RomanStr

-          RomanStr := GenRomanDigit(RomanPos,RomanDigit,8,"U2177","U217CU2179U2179U2179","U217EU217DU217DU217D","U2181U2180U2180U2180","U2187U2182U2182U2182","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,6,"U2174U2170","U217CU2179","U217EU217D","U2181U2180","U2187U2182","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,7,"U2174U2170U2170","U217CU2179U2179","U217EU217DU217D","U2181U2180U2180","U2187U2182U2182","") . RomanStr

+          RomanStr := GenRomanDigit(RomanPos,RomanDigit,8,"U2174U2170U2170U2170","U217CU2179U2179U2179","U217EU217DU217DU217D","U2181U2180U2180U2180","U2187U2182U2182U2182","") . RomanStr

           RomanStr := GenRomanDigit(RomanPos,RomanDigit,9,"U2178","U2179U217D","U217DU217F","U2180U2182","U2182U2188","") . RomanStr

           if (RomanSum == 0)

             break

@@ -556,7 +283,7 @@ PressHookProc(HookRoutine, PhysKey, ActKey, Char) {
         }

       loop {

         if (RomanStr == "") 

-          break                ; erledigt

+          break ; erledigt

         CharOut(SubStr(RomanStr,1,5))

         RomanStr := SubStr(RomanStr,6)

       }

@@ -608,7 +335,7 @@ PressHookProc(HookRoutine, PhysKey, ActKey, Char) {
     OutStr := EncodeUni(Char)

     loop {

       if (OutStr == "") 

-        break                ; erledigt

+        break ; erledigt

       CharOut(SubStr(OutStr,1,5))

       OutStr := SubStr(OutStr,6)

     }

@@ -660,14 +387,12 @@ SetFormat, Integer, hex
     if (str == "")

       break

   }

-SetFormat, Integer, d

+  SetFormat, Integer, d

   StringUpper,result,result

   return result

 }

 

-

 Transform(key) {

   global

   return key

 }

-

diff --git a/windows/neo-vars/neovarscomp.ahk b/windows/neo-vars/neovarscomp.ahk
new file mode 100644
index 0000000..4ea7526
--- /dev/null
+++ b/windows/neo-vars/neovarscomp.ahk
@@ -0,0 +1,38 @@
+CMSCompU002D := 1

+CDSCompU002DSLeft := "U2190"

+CDSCompU002DS__Up := "U2191"

+CDSCompU002DSRght := "U2192"

+CDSCompU002DSDown := "U2193"

+CDSCompU002DSHome := "U2196"

+CDSCompU002DSPgUp := "U2197"

+CDSCompU002DSPgDn := "U2198"

+CDSCompU002DS_End := "U2199"

+CMSCompU003D := 1

+CDSCompU003DSLeft := "U21D0"

+CDSCompU003DS__Up := "U21D1"

+CDSCompU003DSRght := "U21D2"

+CDSCompU003DSDown := "U21D3"

+CDSCompU003DSHome := "U21D6"

+CDSCompU003DSPgUp := "U21D7"

+CDSCompU003DSPgDn := "U21D8"

+CDSCompU003DS_End := "U21D9"

+CDSCompSComp := "U266B"

+CDSCompU000D := "U240D"

+CDSCompSNEnt := "U2318"

+

+CDSCompU0072U0072 := "P_rom"

+CDSCompU0072U0052 := "P_rom"

+CDSCompU0052U0072 := "P_Rom"

+CDSCompU0052U0052 := "P_Rom"

+CMSCompU0075 := 1

+CMSCompU0055 := 1

+CDSCompU0075U0075 := "P_Uni"

+CDSCompU0075U0055 := "P_Uni"

+CDSCompU0055U0075 := "P_Uni"

+CDSCompU0055U0055 := "P_Uni"

+CMSCompU0064 := 1

+CMSCompU0044 := 1

+CDSCompU0064U0064 := "PDUni"

+CDSCompU0064U0044 := "PDUni"

+CDSCompU0044U0064 := "PDUni"

+CDSCompU0044U0044 := "PDUni"

diff --git a/windows/neo-vars/shortcuts.ahk b/windows/neo-vars/shortcuts.ahk
new file mode 100644
index 0000000..6aeeacc
--- /dev/null
+++ b/windows/neo-vars/shortcuts.ahk
@@ -0,0 +1,111 @@
+; ###### Shortcuts für alle ASCII-Zeichen (0x21 bis 0x7E)

+SetFormat, integer, hex

+char := 0x21

+loop {

+  s1 := SubStr(char,3)

+  CSU00%s1% := chr(char)

+  char += 1

+  if (char = 0x7E)

+    break

+}

+SetFormat, integer, d

+

+; #### weitere Shortcuts

+CSU0009 := "tab"

+CSU001B := "esc"

+CSU0020 := "space"

+DNCSU005E := "{^}{space}"

+DNCSU0060 := "{``}{space}"

+DNCSU007D := "{}}"                 ; "{} down}" geht nicht, warum auch immer

+DNCSU00B4 := "{´}{space}"

+CSU20AC := chr(128)   ; €

+; CSU201A := chr(130) ; ‚

+; CSU0192 := chr(131) ; ƒ

+; CSU201E := chr(132) ; „

+; CSU2026 := chr(133) ; …

+; CSU2020 := chr(134) ; †

+; CSU2021 := chr(135) ; ‡

+; CSU02C6 := chr(136) ; ˆ

+; CSU2030 := chr(137) ; ‰

+; CSU0160 := chr(138) ; Š

+; CSU2039 := chr(139) ; ‹

+; CSU0152 := chr(140) ; Œ

+; CSU017D := chr(142) ; Ž

+; CSU2018 := chr(145) ; ‘

+; CSU2019 := chr(146) ; ’

+; CSU201C := chr(147) ; “

+; CSU201D := chr(148) ; ”

+; CSU2022 := chr(149) ; •

+; CSU2013 := chr(150) ; –

+; CSU2014 := chr(151) ; —

+; CSU02DC := chr(152) ; ˜

+; CSU2122 := chr(153) ; ™

+; CSU0161 := chr(154) ; š

+; CSU203A := chr(155) ; ›

+; CSU0153 := chr(156) ; œ

+; CSU017E := chr(158) ; ž

+; CSU0178 := chr(159) ; Ÿ

+CSU00A7 := chr(167)   ; §

+CSU00B0 := chr(176)   ; °

+CSU00B2 := chr(178)   ; ²

+CSU00B3 := chr(179)   ; ³

+; CSU00B4 := chr(180)   ; ´

+CSU00B5 := chr(181)   ; µ

+CSU00C4 := chr(196)   ; Ä

+CSU00D6 := chr(214)   ; Ö

+CSU00DC := chr(220)   ; Ü

+CSU00DF := chr(223)   ; ß

+CSU00E4 := chr(228)   ; ä

+CSU00F6 := chr(246)   ; ö

+CSU00FC := chr(252)   ; ü

+CSU00FF := chr(255)   ; ÿ

+

+CSU000D := "Enter"

+CSS_Esc := "Esc"

+CSU0008 := "Backspace"

+CSS_Del := "Delete"

+CSS_Ins := "Insert"

+CSS__Up := "Up"

+CSSDown := "Down"

+CSSRght := "Right"

+CSSLeft := "Left"

+CSSPgUp := "PgUp"

+CSSPgDn := "PgDn"

+CSSHome := "Home"

+CSS_End := "End"

+CSS_F10 := "F10"

+CSS_F11 := "F11"

+

+CSSN__0 := "Numpad0"

+CSSN__1 := "Numpad1"

+CSSN__2 := "Numpad2"

+CSSN__3 := "Numpad3"

+

+CSSN__4 := "Numpad4"

+CSSN__5 := "Numpad5"

+CSSN__6 := "Numpad6"

+

+CSSN__7 := "Numpad7"

+CSSN__8 := "Numpad8"

+CSSN__9 := "Numpad9"

+

+CSSNDiv := "NumpadDiv"

+CSSNMul := "NumpadMult"

+CSSNSub := "NumpadSub"

+CSSNAdd := "NumpadAdd"

+CSSNDot := "NumpadDot"

+CSSNEnt := "NumpadEnter"

+

+CSSNDel := "NumpadDel"

+CSSNIns := "NumpadIns"

+CSSN_Up := "NumpadUp"

+CSSN_Dn := "NumpadDown"

+CSSN_Ri := "NumpadRight"

+CSSN_Le := "NumpadLeft"

+CSSNPUp := "NumpadPgUp"

+CSSNPDn := "NumpadPgDn"

+CSSNHom := "NumpadHome"

+CSSNEnd := "NumpadEnd"

+CSSNClr := "NumpadClear"

+

+Comp := ""