From fb1b6624e162f23228a137fa975586ce0f0b398d Mon Sep 17 00:00:00 2001 From: martin_r Date: Thu, 30 Oct 2008 00:59:52 +0000 Subject: Römische Ziffern angepasst. Skript modularisiert. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://svn.neo-layout.org@1064 b9310e46-f624-0410-8ea1-cfbb3a30dc96 --- windows/neo-vars/keydefinitions.ahk | 120 ++++++++++++++ windows/neo-vars/neo20-vars.ahk | 315 +++--------------------------------- windows/neo-vars/neovarscomp.ahk | 38 +++++ windows/neo-vars/shortcuts.ahk | 111 +++++++++++++ 4 files changed, 289 insertions(+), 295 deletions(-) create mode 100644 windows/neo-vars/keydefinitions.ahk create mode 100644 windows/neo-vars/neovarscomp.ahk create mode 100644 windows/neo-vars/shortcuts.ahk (limited to 'windows/neo-vars') 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 := "" -- cgit v1.2.3