UltimateKEYS SW - 2020-05-01.ahk

   1 ; UltimateKEYS SW - 2020-05-01.ahk
   2
   3 ; Created by :  Pieter Degroote
   4
   5 ; License :  GNU General Public License Version 3
   6
   7 ; Website :  https://github.com/pieter-degroote/UltimateKEYS
   8
   9
  10 ; Requirements :
  11
  12 ; Keyboard layout (on Windows OS) :  US QWERTY
  13
  14 ; AutoHotkey v1.1 (https://www.autohotkey.com/)
  15
  16
  17
  18 ; Dead Key :  Circumflex Accent
  19
  20 dkCircumflex := ComObjCreate("Scripting.Dictionary")
  21 dkCircumflex.item("a") := "â"  ; a with circumflex
  22 dkCircumflex.item("A") := "Â"  ; A with circumflex
  23 dkCircumflex.item("c") := "ĉ"  ; c with circumflex
  24 dkCircumflex.item("C") := "Ĉ"  ; C with circumflex
  25 dkCircumflex.item("e") := "ê"  ; e with circumflex
  26 dkCircumflex.item("E") := "Ê"  ; E with circumflex
  27 dkCircumflex.item("g") := "ĝ"  ; g with circumflex
  28 dkCircumflex.item("G") := "Ĝ"  ; G with circumflex
  29 dkCircumflex.item("h") := "ĥ"  ; h with circumflex
  30 dkCircumflex.item("H") := "Ĥ"  ; H with circumflex
  31 dkCircumflex.item("i") := "î"  ; i with circumflex
  32 dkCircumflex.item("I") := "Î"  ; I with circumflex
  33 dkCircumflex.item("j") := "ĵ"  ; j with circumflex
  34 dkCircumflex.item("J") := "Ĵ"  ; J with circumflex
  35 dkCircumflex.item("o") := "ô"  ; o with circumflex
  36 dkCircumflex.item("O") := "Ô"  ; O with circumflex
  37 dkCircumflex.item("s") := "ŝ"  ; s with circumflex
  38 dkCircumflex.item("S") := "Ŝ"  ; S with circumflex
  39 dkCircumflex.item("u") := "û"  ; u with circumflex
  40 dkCircumflex.item("U") := "Û"  ; U with circumflex
  41 dkCircumflex.item("w") := "ŵ"  ; w with circumflex
  42 dkCircumflex.item("W") := "Ŵ"  ; W with circumflex
  43 dkCircumflex.item("y") := "ŷ"  ; y with circumflex
  44 dkCircumflex.item("Y") := "Ŷ"  ; Y with circumflex
  45 dkCircumflex.item("z") := "ẑ"  ; z with circumflex
  46 dkCircumflex.item("Z") := "Ẑ"  ; Z with circumflex
  47 dkCircumflex.item("n") := "₦"  ; Nigerian naira
  48 dkCircumflex.item("N") := "₦"  ; Nigerian naira
  49 dkCircumflex.item("^") := "{^}"  ; circumflex accent
  50 dkCircumflex.item(" ") := "{^}"  ; circumflex accent
  51
  52
  53 ; Dead Key :  Caron
  54
  55 dkCaron := ComObjCreate("Scripting.Dictionary")
  56 dkCaron.item("a") := "ǎ"  ; a with caron
  57 dkCaron.item("A") := "Ǎ"  ; A with caron
  58 dkCaron.item("c") := "č"  ; c with caron
  59 dkCaron.item("C") := "Č"  ; C with caron
  60 dkCaron.item("d") := "ď"  ; d with caron
  61 dkCaron.item("D") := "Ď"  ; D with caron
  62 dkCaron.item("e") := "ě"  ; e with caron
  63 dkCaron.item("E") := "Ě"  ; E with caron
  64 dkCaron.item("g") := "ǧ"  ; g with caron
  65 dkCaron.item("G") := "Ǧ"  ; G with caron
  66 dkCaron.item("h") := "ȟ"  ; h with caron
  67 dkCaron.item("H") := "Ȟ"  ; H with caron
  68 dkCaron.item("i") := "ǐ"  ; i with caron
  69 dkCaron.item("I") := "Ǐ"  ; I with caron
  70 dkCaron.item("j") := "ǰ"  ; j with caron
  71 dkCaron.item("k") := "ǩ"  ; k with caron
  72 dkCaron.item("K") := "Ǩ"  ; K with caron
  73 dkCaron.item("l") := "ľ"  ; l with caron
  74 dkCaron.item("L") := "Ľ"  ; L with caron
  75 dkCaron.item("n") := "ň"  ; n with caron
  76 dkCaron.item("N") := "Ň"  ; N with caron
  77 dkCaron.item("o") := "ǒ"  ; o with caron
  78 dkCaron.item("O") := "Ǒ"  ; O with caron
  79 dkCaron.item("r") := "ř"  ; r with caron
  80 dkCaron.item("R") := "Ř"  ; R with caron
  81 dkCaron.item("s") := "š"  ; s with caron
  82 dkCaron.item("S") := "Š"  ; S with caron
  83 dkCaron.item("t") := "ť"  ; t with caron
  84 dkCaron.item("T") := "Ť"  ; T with caron
  85 dkCaron.item("u") := "ǔ"  ; u with caron
  86 dkCaron.item("U") := "Ǔ"  ; U with caron
  87 dkCaron.item("ü") := "ǚ"  ; u with diaeresis and caron
  88 dkCaron.item("Ü") := "Ǚ"  ; U with diaeresis and caron
  89 dkCaron.item("z") := "ž"  ; z with caron
  90 dkCaron.item("Z") := "Ž"  ; Z with caron
  91 dkCaron.item("#") := "ǯ"  ; small letter ezh with caron
  92 dkCaron.item("3") := "Ǯ"  ; capital letter ezh with caron
  93 dkCaron.item(" ") := "ˇ"  ; caron
  94
  95
  96 ; Dead Key :  Ring/Dot Above
  97
  98 dkRingDotAbove := ComObjCreate("Scripting.Dictionary")
  99 dkRingDotAbove.item("a") := "å"  ; a with ring above
 100 dkRingDotAbove.item("A") := "Å"  ; A with ring above
 101 dkRingDotAbove.item("ä") := "ȧ"  ; a with dot above
 102 dkRingDotAbove.item("Ä") := "Ȧ"  ; A with dot above
 103 dkRingDotAbove.item("b") := "ḃ"  ; b with dot above
 104 dkRingDotAbove.item("B") := "Ḃ"  ; B with dot above
 105 dkRingDotAbove.item("c") := "ċ"  ; c with dot above
 106 dkRingDotAbove.item("C") := "Ċ"  ; C with dot above
 107 dkRingDotAbove.item("d") := "ḋ"  ; d with dot above
 108 dkRingDotAbove.item("D") := "Ḋ"  ; D with dot above
 109 dkRingDotAbove.item("e") := "ė"  ; e with dot above
 110 dkRingDotAbove.item("E") := "Ė"  ; E with dot above
 111 dkRingDotAbove.item("f") := "ḟ"  ; f with dot above
 112 dkRingDotAbove.item("F") := "Ḟ"  ; F with dot above
 113 dkRingDotAbove.item("g") := "ġ"  ; g with dot above
 114 dkRingDotAbove.item("G") := "Ġ"  ; G with dot above
 115 dkRingDotAbove.item("h") := "ḣ"  ; h with dot above
 116 dkRingDotAbove.item("H") := "Ḣ"  ; H with dot above
 117 dkRingDotAbove.item("i") := "ı"  ; dotless i (Turkish, Azerbaijani)
 118 dkRingDotAbove.item("I") := "İ"  ; I with dot above (Turkish, Azerbaijani)
 119 dkRingDotAbove.item("j") := "ȷ"  ; dotless j
 120 dkRingDotAbove.item("l") := "ŀ"  ; l with middle dot
 121 dkRingDotAbove.item("L") := "Ŀ"  ; L with middle dot
 122 dkRingDotAbove.item("m") := "ṁ"  ; m with dot above
 123 dkRingDotAbove.item("M") := "Ṁ"  ; M with dot above
 124 dkRingDotAbove.item("n") := "ṅ"  ; n with dot above
 125 dkRingDotAbove.item("N") := "Ṅ"  ; N with dot above
 126 dkRingDotAbove.item("o") := "ȯ"  ; o with dot above
 127 dkRingDotAbove.item("O") := "Ȯ"  ; O with dot above
 128 dkRingDotAbove.item("p") := "ṗ"  ; p with dot above
 129 dkRingDotAbove.item("P") := "Ṗ"  ; P with dot above
 130 dkRingDotAbove.item("r") := "ṙ"  ; r with dot above
 131 dkRingDotAbove.item("R") := "Ṙ"  ; R with dot above
 132 dkRingDotAbove.item("s") := "ṡ"  ; s with dot above
 133 dkRingDotAbove.item("S") := "Ṡ"  ; S with dot above
 134 dkRingDotAbove.item("t") := "ṫ"  ; t with dot above
 135 dkRingDotAbove.item("T") := "Ṫ"  ; T with dot above
 136 dkRingDotAbove.item("u") := "ů"  ; u with ring above
 137 dkRingDotAbove.item("U") := "Ů"  ; U with ring above
 138 dkRingDotAbove.item("w") := "ẇ"  ; w with dot above
 139 dkRingDotAbove.item("W") := "Ẇ"  ; W with dot above
 140 dkRingDotAbove.item("å") := "ẘ"  ; w with ring above
 141 dkRingDotAbove.item("x") := "ẋ"  ; x with dot above
 142 dkRingDotAbove.item("X") := "Ẋ"  ; X with dot above
 143 dkRingDotAbove.item("y") := "ẏ"  ; y with dot above
 144 dkRingDotAbove.item("Y") := "Ẏ"  ; Y with dot above
 145 dkRingDotAbove.item("ÿ") := "ẙ"  ; y with ring above
 146 dkRingDotAbove.item("z") := "ż"  ; z with dot above
 147 dkRingDotAbove.item("Z") := "Ż"  ; Z with dot above
 148 dkRingDotAbove.item(" ") := "˙"  ; dot above
 149
 150
 151 ; Dead Key :  Macron/Stroke
 152
 153 dkMacronStroke := ComObjCreate("Scripting.Dictionary")
 154 dkMacronStroke.item("a") := "ā"  ; a with macron
 155 dkMacronStroke.item("A") := "Ā"  ; A with macron
 156 dkMacronStroke.item("æ") := "ǣ"  ; ae with macron
 157 dkMacronStroke.item("Æ") := "Ǣ"  ; AE with macron
 158 dkMacronStroke.item("b") := "ƀ"  ; b with stroke
 159 dkMacronStroke.item("B") := "Ƀ"  ; B with stroke
 160 dkMacronStroke.item("d") := "đ"  ; d with stroke
 161 dkMacronStroke.item("D") := "Đ"  ; D with stroke
 162 dkMacronStroke.item("e") := "ē"  ; e with macron
 163 dkMacronStroke.item("E") := "Ē"  ; E with macron
 164 dkMacronStroke.item("g") := "ǥ"  ; g with stroke (Skolt Sami)
 165 dkMacronStroke.item("G") := "Ǥ"  ; G with stroke (Skolt Sami)
 166 dkMacronStroke.item("é") := "ḡ"  ; g with macron
 167 dkMacronStroke.item("É") := "Ḡ"  ; G with macron
 168 dkMacronStroke.item("h") := "ħ"  ; h with stroke (Maltese)
 169 dkMacronStroke.item("H") := "Ħ"  ; H with stroke (Maltese)
 170 dkMacronStroke.item("i") := "ī"  ; i with macron
 171 dkMacronStroke.item("I") := "Ī"  ; I with macron
 172 dkMacronStroke.item("ï") := "ɨ"  ; i with stroke
 173 dkMacronStroke.item("Ï") := "Ɨ"  ; I with stroke
 174 dkMacronStroke.item("j") := "ɉ"  ; j with stroke
 175 dkMacronStroke.item("J") := "Ɉ"  ; J with stroke
 176 dkMacronStroke.item("l") := "ł"  ; l with stroke
 177 dkMacronStroke.item("L") := "Ł"  ; L with stroke
 178 dkMacronStroke.item("ø") := "ḻ"  ; l with line below
 179 dkMacronStroke.item("Ø") := "Ḻ"  ; L with line below
 180 dkMacronStroke.item("o") := "ō"  ; o with macron
 181 dkMacronStroke.item("O") := "Ō"  ; O with macron
 182 dkMacronStroke.item("ö") := "ǭ"  ; o with ogonek and macron
 183 dkMacronStroke.item("Ö") := "Ǭ"  ; O with ogonek and macron
 184 dkMacronStroke.item("p") := "ᵽ"  ; p with stroke
 185 dkMacronStroke.item("P") := "Ᵽ"  ; P with stroke
 186 dkMacronStroke.item("r") := "ɍ"  ; r with stroke
 187 dkMacronStroke.item("R") := "Ɍ"  ; R with stroke
 188 dkMacronStroke.item("t") := "ŧ"  ; t with stroke
 189 dkMacronStroke.item("T") := "Ŧ"  ; T with stroke
 190 dkMacronStroke.item("u") := "ū"  ; u with macron
 191 dkMacronStroke.item("U") := "Ū"  ; U with macron
 192 dkMacronStroke.item("ü") := "ʉ"  ; u with bar
 193 dkMacronStroke.item("Ü") := "Ʉ"  ; U with bar
 194 dkMacronStroke.item("y") := "ȳ"  ; y with macron
 195 dkMacronStroke.item("Y") := "Ȳ"  ; Y with macron
 196 dkMacronStroke.item("ÿ") := "ɏ"  ; y with stroke
 197 dkMacronStroke.item("Ÿ") := "Ɏ"  ; Y with stroke
 198 dkMacronStroke.item("z") := "ƶ"  ; z with stroke
 199 dkMacronStroke.item("Z") := "Ƶ"  ; Z with stroke
 200 dkMacronStroke.item(" ") := "¯"  ; macron
 201
 202
 203 ; Dead Key :  Cedilla/Ogonek
 204
 205 dkCedillaOgonek := ComObjCreate("Scripting.Dictionary")
 206 dkCedillaOgonek.item("a") := "ą"  ; a with ogonek
 207 dkCedillaOgonek.item("A") := "Ą"  ; A with ogonek
 208 dkCedillaOgonek.item("c") := "ç"  ; c with cedilla
 209 dkCedillaOgonek.item("C") := "Ç"  ; C with cedilla
 210 dkCedillaOgonek.item("d") := "ḑ"  ; d with cedilla
 211 dkCedillaOgonek.item("D") := "Ḑ"  ; D with cedilla
 212 dkCedillaOgonek.item("e") := "ę"  ; e with ogonek
 213 dkCedillaOgonek.item("E") := "Ę"  ; E with ogonek
 214 dkCedillaOgonek.item("ë") := "ȩ"  ; e with cedilla
 215 dkCedillaOgonek.item("Ë") := "Ȩ"  ; E with cedilla
 216 dkCedillaOgonek.item("g") := "ģ"  ; g with cedilla
 217 dkCedillaOgonek.item("G") := "Ģ"  ; G with cedilla
 218 dkCedillaOgonek.item("h") := "ḩ"  ; h with cedilla
 219 dkCedillaOgonek.item("H") := "Ḩ"  ; H with cedilla
 220 dkCedillaOgonek.item("i") := "į"  ; i with ogonek
 221 dkCedillaOgonek.item("I") := "Į"  ; I with ogonek
 222 dkCedillaOgonek.item("k") := "ķ"  ; k with cedilla
 223 dkCedillaOgonek.item("K") := "Ķ"  ; K with cedilla
 224 dkCedillaOgonek.item("l") := "ļ"  ; l with cedilla
 225 dkCedillaOgonek.item("L") := "Ļ"  ; L with cedilla
 226 dkCedillaOgonek.item("n") := "ņ"  ; n with cedilla
 227 dkCedillaOgonek.item("N") := "Ņ"  ; N with cedilla
 228 dkCedillaOgonek.item("o") := "ǫ"  ; o with ogonek
 229 dkCedillaOgonek.item("O") := "Ǫ"  ; O with ogonek
 230 dkCedillaOgonek.item("ö") := "ǭ"  ; o with ogonek and macron
 231 dkCedillaOgonek.item("Ö") := "Ǭ"  ; O with ogonek and macron
 232 dkCedillaOgonek.item("r") := "ŗ"  ; r with cedilla
 233 dkCedillaOgonek.item("R") := "Ŗ"  ; R with cedilla
 234 dkCedillaOgonek.item("s") := "ş"  ; s with cedilla
 235 dkCedillaOgonek.item("S") := "Ş"  ; S with cedilla
 236 dkCedillaOgonek.item("t") := "ţ"  ; t with cedilla
 237 dkCedillaOgonek.item("T") := "Ţ"  ; T with cedilla
 238 dkCedillaOgonek.item("u") := "ų"  ; u with ogonek
 239 dkCedillaOgonek.item("U") := "Ų"  ; U with ogonek
 240 dkCedillaOgonek.item("w") := "₩"  ; South Korean won
 241 dkCedillaOgonek.item("W") := "₩"  ; South Korean won
 242 dkCedillaOgonek.item("!") := "–"  ; en dash
 243 dkCedillaOgonek.item("1") := "–"  ; en dash
 244 dkCedillaOgonek.item("@") := "—"  ; em dash
 245 dkCedillaOgonek.item("2") := "—"  ; em dash
 246 dkCedillaOgonek.item("#") := "―"  ; horizontal bar
 247 dkCedillaOgonek.item("3") := "―"  ; horizontal bar
 248 dkCedillaOgonek.item("$") := "‐"  ; hyphen
 249 dkCedillaOgonek.item("4") := "‐"  ; hyphen
 250 dkCedillaOgonek.item("(") := "‒"  ; figure dash
 251 dkCedillaOgonek.item("9") := "‒"  ; figure dash
 252 dkCedillaOgonek.item(")") := ""  ; soft hyphen
 253 dkCedillaOgonek.item("0") := ""  ; soft hyphen
 254 dkCedillaOgonek.item("-") := "‑"  ; non-breaking hyphen
 255 dkCedillaOgonek.item(".") := "˛"  ; ogonek
 256 dkCedillaOgonek.item(" ") := "¸"  ; cedilla
 257
 258
 259 ; Dead Key :  Breve/Special
 260
 261 dkBreveSpecial := ComObjCreate("Scripting.Dictionary")
 262 dkBreveSpecial.item("a") := "ă"  ; a with breve
 263 dkBreveSpecial.item("A") := "Ă"  ; A with breve
 264 dkBreveSpecial.item("d") := "ɖ"  ; small letter d with tail
 265 dkBreveSpecial.item("D") := "Ɖ"  ; capital letter African D
 266 dkBreveSpecial.item("e") := "ĕ"  ; e with breve
 267 dkBreveSpecial.item("E") := "Ĕ"  ; E with breve
 268 dkBreveSpecial.item("ë") := "ǝ"  ; small turned e
 269 dkBreveSpecial.item("Ë") := "Ǝ"  ; capital reversed E
 270 dkBreveSpecial.item("f") := "ə"  ; small letter schwa (Azerbaijani)
 271 dkBreveSpecial.item("F") := "Ə"  ; capital letter schwa (Azerbaijani)
 272 dkBreveSpecial.item("g") := "ğ"  ; g with breve
 273 dkBreveSpecial.item("G") := "Ğ"  ; G with breve
 274 dkBreveSpecial.item("é") := "ꬶ"  ; cross-tailed g
 275 dkBreveSpecial.item("h") := "ɣ"  ; latin small gamma
 276 dkBreveSpecial.item("H") := "Ɣ"  ; latin capital gamma
 277 dkBreveSpecial.item("i") := "ĭ"  ; i with breve
 278 dkBreveSpecial.item("I") := "Ĭ"  ; I with breve
 279 dkBreveSpecial.item("j") := "ĳ"  ; ligature ij
 280 dkBreveSpecial.item("J") := "Ĳ"  ; ligature IJ
 281 dkBreveSpecial.item("k") := "ĸ"  ; small letter kra
 282 dkBreveSpecial.item("n") := "ŋ"  ; small letter eng(ma)
 283 dkBreveSpecial.item("N") := "Ŋ"  ; capital letter eng(ma)
 284 dkBreveSpecial.item("o") := "ŏ"  ; o with breve
 285 dkBreveSpecial.item("O") := "Ŏ"  ; O with breve
 286 dkBreveSpecial.item("ö") := "ɔ"  ; small open o
 287 dkBreveSpecial.item("Ö") := "Ɔ"  ; capital open O
 288 dkBreveSpecial.item("s") := "ș"  ; s with comma below (Romanian)
 289 dkBreveSpecial.item("S") := "Ș"  ; S with comma below (Romanian)
 290 dkBreveSpecial.item("t") := "ț"  ; t with comma below (Romanian)
 291 dkBreveSpecial.item("T") := "Ț"  ; T with comma below (Romanian)
 292 dkBreveSpecial.item("u") := "ŭ"  ; u with breve
 293 dkBreveSpecial.item("U") := "Ŭ"  ; U with breve
 294 dkBreveSpecial.item("v") := "ʊ"  ; latin small letter upsilon
 295 dkBreveSpecial.item("V") := "Ʊ"  ; latin capital letter upsilon
 296 dkBreveSpecial.item("w") := "ƿ"  ; small letter wynn
 297 dkBreveSpecial.item("W") := "Ƿ"  ; capital letter wynn
 298 dkBreveSpecial.item("y") := "ȝ"  ; small letter yogh
 299 dkBreveSpecial.item("Y") := "Ȝ"  ; capital letter yogh
 300 dkBreveSpecial.item("#") := "ʒ"  ; small letter ezh
 301 dkBreveSpecial.item("3") := "Ʒ"  ; capital letter ezh
 302 dkBreveSpecial.item(" ") := "˘"  ; breve
 303
 304
 305 ; Dead Key :  Acute Accent
 306
 307 dkAcuteAccent := ComObjCreate("Scripting.Dictionary")
 308 dkAcuteAccent.item("a") := "á"  ; a with acute
 309 dkAcuteAccent.item("A") := "Á"  ; A with acute
 310 dkAcuteAccent.item("b") := "ɓ"  ; b with hook
 311 dkAcuteAccent.item("B") := "Ɓ"  ; B with hook
 312 dkAcuteAccent.item("c") := "ć"  ; c with acute
 313 dkAcuteAccent.item("C") := "Ć"  ; C with acute
 314 dkAcuteAccent.item("ç") := "ḉ"  ; c with cedilla and acute
 315 dkAcuteAccent.item("Ç") := "Ḉ"  ; C with cedilla and acute
 316 dkAcuteAccent.item("d") := "ɗ"  ; d with hook
 317 dkAcuteAccent.item("D") := "Ɗ"  ; D with hook
 318 dkAcuteAccent.item("e") := "é"  ; e with acute
 319 dkAcuteAccent.item("E") := "É"  ; E with acute
 320 dkAcuteAccent.item("f") := "ƒ"  ; f with hook
 321 dkAcuteAccent.item("F") := "Ƒ"  ; F with hook
 322 dkAcuteAccent.item("g") := "ǵ"  ; g with acute
 323 dkAcuteAccent.item("G") := "Ǵ"  ; G with acute
 324 dkAcuteAccent.item("h") := "ɦ"  ; h with hook
 325 dkAcuteAccent.item("H") := "Ɦ"  ; H with hook
 326 dkAcuteAccent.item("i") := "í"  ; i with acute
 327 dkAcuteAccent.item("I") := "Í"  ; I with acute
 328 dkAcuteAccent.item("j") := "ĳ"  ; ligature ij
 329 dkAcuteAccent.item("J") := "Ĳ"  ; ligature IJ
 330 dkAcuteAccent.item("k") := "ƙ"  ; k with hook
 331 dkAcuteAccent.item("K") := "Ƙ"  ; K with hook
 332 dkAcuteAccent.item("l") := "ĺ"  ; l with acute
 333 dkAcuteAccent.item("L") := "Ĺ"  ; L with acute
 334 dkAcuteAccent.item("m") := "ḿ"  ; m with acute
 335 dkAcuteAccent.item("M") := "Ḿ"  ; M with acute
 336 dkAcuteAccent.item("n") := "ń"  ; n with acute
 337 dkAcuteAccent.item("N") := "Ń"  ; N with acute
 338 dkAcuteAccent.item("o") := "ó"  ; o with acute
 339 dkAcuteAccent.item("O") := "Ó"  ; O with acute
 340 dkAcuteAccent.item("ö") := "ő"  ; o with double acute
 341 dkAcuteAccent.item("Ö") := "Ő"  ; O with double acute
 342 dkAcuteAccent.item("p") := "ƥ"  ; p with hook
 343 dkAcuteAccent.item("P") := "Ƥ"  ; P with hook
 344 dkAcuteAccent.item("q") := "ɋ"  ; q with hook tail
 345 dkAcuteAccent.item("Q") := "Ɋ"  ; Q with hook tail
 346 dkAcuteAccent.item("r") := "ŕ"  ; r with acute
 347 dkAcuteAccent.item("R") := "Ŕ"  ; R with acute
 348 dkAcuteAccent.item("s") := "ś"  ; s with acute
 349 dkAcuteAccent.item("S") := "Ś"  ; S with acute
 350 dkAcuteAccent.item("t") := "ƭ"  ; t with hook
 351 dkAcuteAccent.item("T") := "Ƭ"  ; T with hook
 352 dkAcuteAccent.item("u") := "ú"  ; u with acute
 353 dkAcuteAccent.item("U") := "Ú"  ; U with acute
 354 dkAcuteAccent.item("ü") := "ű"  ; u with double acute
 355 dkAcuteAccent.item("Ü") := "Ű"  ; U with double acute
 356 dkAcuteAccent.item("v") := "ʋ"  ; v with hook
 357 dkAcuteAccent.item("V") := "Ʋ"  ; V with hook
 358 dkAcuteAccent.item("w") := "ẃ"  ; w with acute
 359 dkAcuteAccent.item("W") := "Ẃ"  ; W with acute
 360 dkAcuteAccent.item("y") := "ý"  ; y with acute
 361 dkAcuteAccent.item("Y") := "Ý"  ; Y with acute
 362 dkAcuteAccent.item("z") := "ź"  ; z with acute
 363 dkAcuteAccent.item("Z") := "Ź"  ; Z with acute
 364 dkAcuteAccent.item("å") := "ǻ"  ; a with ring above and acute
 365 dkAcuteAccent.item("Å") := "Ǻ"  ; A with ring above and acute
 366 dkAcuteAccent.item("æ") := "ǽ"  ; ae with acute
 367 dkAcuteAccent.item("Æ") := "Ǽ"  ; AE with acute
 368 dkAcuteAccent.item("ø") := "ǿ"  ; o with stroke and acute
 369 dkAcuteAccent.item("Ø") := "Ǿ"  ; O with stroke and acute
 370 dkAcuteAccent.item("@") := "♫"  ; beamed eighth notes
 371 dkAcuteAccent.item("2") := "♫"  ; beamed eighth notes
 372 dkAcuteAccent.item("#") := "⁂"  ; asterism
 373 dkAcuteAccent.item("3") := "⁂"  ; asterism
 374 dkAcuteAccent.item("$") := "★"  ; black star
 375 dkAcuteAccent.item("4") := "★"  ; black star
 376 dkAcuteAccent.item("%") := "☆"  ; white star
 377 dkAcuteAccent.item("5") := "☆"  ; white star
 378 dkAcuteAccent.item("^") := "✽"  ; heavy teardrop-spoked asterisk
 379 dkAcuteAccent.item("6") := "✽"  ; heavy teardrop-spoked asterisk
 380 dkAcuteAccent.item("&") := "✻"  ; teardrop-spoked asterisk
 381 dkAcuteAccent.item("7") := "✻"  ; teardrop-spoked asterisk
 382 dkAcuteAccent.item("*") := "♪"  ; eighth note
 383 dkAcuteAccent.item("8") := "♪"  ; eighth note
 384 dkAcuteAccent.item("'") := "´"  ; acute accent
 385 dkAcuteAccent.item(" ") := "´"  ; acute accent
 386
 387
 388 ; Dead Key :  Diaeresis
 389
 390 dkDiaeresis := ComObjCreate("Scripting.Dictionary")
 391 dkDiaeresis.item("a") := "ä"  ; a with diaeresis
 392 dkDiaeresis.item("A") := "Ä"  ; A with diaeresis
 393 dkDiaeresis.item("e") := "ë"  ; e with diaeresis
 394 dkDiaeresis.item("E") := "Ë"  ; E with diaeresis
 395 dkDiaeresis.item("h") := "ḧ"  ; h with diaeresis
 396 dkDiaeresis.item("H") := "Ḧ"  ; H with diaeresis
 397 dkDiaeresis.item("i") := "ï"  ; i with diaeresis
 398 dkDiaeresis.item("I") := "Ï"  ; I with diaeresis
 399 dkDiaeresis.item("o") := "ö"  ; o with diaeresis
 400 dkDiaeresis.item("O") := "Ö"  ; O with diaeresis
 401 dkDiaeresis.item("s") := "ß"  ; small sharp s (Eszett)
 402 dkDiaeresis.item("S") := "ẞ"  ; capital sharp S (capital Eszett)
 403 dkDiaeresis.item("t") := "ẗ"  ; t with diaeresis
 404 dkDiaeresis.item("u") := "ü"  ; u with diaeresis
 405 dkDiaeresis.item("U") := "Ü"  ; U with diaeresis
 406 dkDiaeresis.item("w") := "ẅ"  ; w with diaeresis
 407 dkDiaeresis.item("W") := "Ẅ"  ; W with diaeresis
 408 dkDiaeresis.item("x") := "ẍ"  ; x with diaeresis
 409 dkDiaeresis.item("X") := "Ẍ"  ; X with diaeresis
 410 dkDiaeresis.item("y") := "ÿ"  ; y with diaeresis
 411 dkDiaeresis.item("Y") := "Ÿ"  ; Y with diaeresis
 412 dkDiaeresis.item("""") := "¨" ; diaeresis
 413 dkDiaeresis.item(" ") := "¨"  ; diaeresis
 414
 415
 416 ; Dead Key :  Grave Accent
 417
 418 dkGraveAccent := ComObjCreate("Scripting.Dictionary")
 419 dkGraveAccent.item("a") := "à"  ; a with grave
 420 dkGraveAccent.item("A") := "À"  ; A with grave
 421 dkGraveAccent.item("e") := "è"  ; e with grave
 422 dkGraveAccent.item("E") := "È"  ; E with grave
 423 dkGraveAccent.item("i") := "ì"  ; i with grave
 424 dkGraveAccent.item("I") := "Ì"  ; I with grave
 425 dkGraveAccent.item("n") := "ǹ"  ; n with grave
 426 dkGraveAccent.item("N") := "Ǹ"  ; N with grave
 427 dkGraveAccent.item("o") := "ò"  ; o with grave
 428 dkGraveAccent.item("O") := "Ò"  ; O with grave
 429 dkGraveAccent.item("u") := "ù"  ; u with grave
 430 dkGraveAccent.item("U") := "Ù"  ; U with grave
 431 dkGraveAccent.item("w") := "ẁ"  ; w with grave
 432 dkGraveAccent.item("W") := "Ẁ"  ; W with grave
 433 dkGraveAccent.item("y") := "ỳ"  ; y with grave
 434 dkGraveAccent.item("Y") := "Ỳ"  ; Y with grave
 435 dkGraveAccent.item("ä") := "₳"  ; Argentine austral
 436 dkGraveAccent.item("Ä") := "₳"  ; Argentine austral
 437 dkGraveAccent.item("b") := "₿"  ; bitcoin
 438 dkGraveAccent.item("B") := "₿"  ; bitcoin
 439 dkGraveAccent.item("c") := "₡"  ; Costa Rican colón
 440 dkGraveAccent.item("C") := "₵"  ; Ghanaian cedi
 441 dkGraveAccent.item("ç") := "₢"  ; Brazilian cruzeiro
 442 dkGraveAccent.item("Ç") := "₢"  ; Brazilian cruzeiro
 443 dkGraveAccent.item("d") := "₫"  ; Vietnamese dong
 444 dkGraveAccent.item("D") := "₯"  ; Greek drachma
 445 dkGraveAccent.item("f") := "₣"  ; French franc
 446 dkGraveAccent.item("F") := "₣"  ; French franc
 447 dkGraveAccent.item("g") := "₲"  ; Paraguayan guaraní
 448 dkGraveAccent.item("G") := "₲"  ; Paraguayan guaraní
 449 dkGraveAccent.item("h") := "₴"  ; Ukrainian hryvnia
 450 dkGraveAccent.item("H") := "₴"  ; Ukrainian hryvnia
 451 dkGraveAccent.item("k") := "₭"  ; Laotian kip
 452 dkGraveAccent.item("K") := "₭"  ; Laotian kip
 453 dkGraveAccent.item("l") := "₺"  ; Turkish lira
 454 dkGraveAccent.item("L") := "₾"  ; Georgian lari
 455 dkGraveAccent.item("ø") := "₤"  ; lira
 456 dkGraveAccent.item("Ø") := "₤"  ; lira
 457 dkGraveAccent.item("m") := "₼"  ; Azerbaijani manat
 458 dkGraveAccent.item("M") := "₥"  ; mill sign
 459 dkGraveAccent.item("ñ") := "₦"  ; Nigerian naira
 460 dkGraveAccent.item("Ñ") := "₦"  ; Nigerian naira
 461 dkGraveAccent.item("p") := "₱"  ; Philippine peso
 462 dkGraveAccent.item("P") := "₱"  ; Philippine peso
 463 dkGraveAccent.item("r") := "₹"  ; Indian rupee
 464 dkGraveAccent.item("R") := "₽"  ; Russian ruble
 465 dkGraveAccent.item("s") := "₪"  ; Israeli new shekel
 466 dkGraveAccent.item("S") := "₪"  ; Israeli new shekel
 467 dkGraveAccent.item("t") := "₮"  ; Mongolian tögrög (tugrik)
 468 dkGraveAccent.item("T") := "₸"  ; Kazakh tenge
 469 dkGraveAccent.item("å") := "₩"  ; South Korean won
 470 dkGraveAccent.item("Å") := "₩"  ; South Korean won
 471 dkGraveAccent.item("!") := " "  ; en space
 472 dkGraveAccent.item("@") := " "  ; em space
 473 dkGraveAccent.item("#") := " "  ; three-per-em space
 474 dkGraveAccent.item("3") := " "  ; three-per-em space
 475 dkGraveAccent.item("$") := " "  ; four-per-em space
 476 dkGraveAccent.item("4") := " "  ; four-per-em space
 477 dkGraveAccent.item("%") := " "  ; punctuation space
 478 dkGraveAccent.item("5") := " "  ; punctuation space
 479 dkGraveAccent.item("^") := " "  ; six-per-em space
 480 dkGraveAccent.item("6") := " "  ; six-per-em space
 481 dkGraveAccent.item("&") := " "  ; thin space
 482 dkGraveAccent.item("7") := " "  ; thin space
 483 dkGraveAccent.item("*") := " "  ; hair space
 484 dkGraveAccent.item("8") := " "  ; hair space
 485 dkGraveAccent.item("(") := " "  ; figure space
 486 dkGraveAccent.item("9") := " "  ; figure space
 487 dkGraveAccent.item(")") := ""   ; zero-width space
 488 dkGraveAccent.item("0") := ""   ; zero-width space
 489 dkGraveAccent.item("-") := " "  ; non-breaking space
 490 dkGraveAccent.item("1") := " "  ; en quad
 491 dkGraveAccent.item("2") := " "  ; em quad
 492 dkGraveAccent.item("``") := "``"  ; grave accent
 493 dkGraveAccent.item(" ") := "``"   ; grave accent
 494
 495
 496 ; Dead Key :  Tilde
 497
 498 dkTilde := ComObjCreate("Scripting.Dictionary")
 499 dkTilde.item("a") := "ã"  ; a with tilde
 500 dkTilde.item("A") := "Ã"  ; A with tilde
 501 dkTilde.item("e") := "ẽ"  ; e with tilde
 502 dkTilde.item("E") := "Ẽ"  ; E with tilde
 503 dkTilde.item("i") := "ĩ"  ; i with tilde
 504 dkTilde.item("I") := "Ĩ"  ; I with tilde
 505 dkTilde.item("n") := "ñ"  ; n with tilde
 506 dkTilde.item("N") := "Ñ"  ; N with tilde
 507 dkTilde.item("o") := "õ"  ; o with tilde
 508 dkTilde.item("O") := "Õ"  ; O with tilde
 509 dkTilde.item("u") := "ũ"  ; u with tilde
 510 dkTilde.item("U") := "Ũ"  ; U with tilde
 511 dkTilde.item("v") := "ṽ"  ; v with tilde
 512 dkTilde.item("V") := "Ṽ"  ; V with tilde
 513 dkTilde.item("y") := "ỹ"  ; y with tilde
 514 dkTilde.item("Y") := "Ỹ"  ; Y with tilde
 515 dkTilde.item("~") := "~"  ; tilde
 516 dkTilde.item(" ") := "~"  ; tilde
 517
 518
 519 ; Dead Key :  Not Sign
 520
 521 dkNotSign := ComObjCreate("Scripting.Dictionary")
 522 dkNotSign.item("a") := "ª"  ; feminine ordinal indicator (Spanish, Portuguese, Italian, Galician)
 523 dkNotSign.item("A") := "ª"  ; feminine ordinal indicator (Spanish, Portuguese, Italian, Galician)
 524 dkNotSign.item("b") := "☐"  ; ballot box
 525 dkNotSign.item("B") := "☒"  ; ballot box with x
 526 dkNotSign.item("c") := "©"  ; copyright sign
 527 dkNotSign.item("C") := "¤"  ; currency sign
 528 dkNotSign.item("d") := "†"  ; dagger
 529 dkNotSign.item("D") := "‡"  ; double dagger
 530 dkNotSign.item("e") := "…"  ; ellipsis
 531 dkNotSign.item("E") := "℮"  ; estimated symbol
 532 dkNotSign.item("f") := "♀"  ; Venus symbol (female)
 533 dkNotSign.item("F") := "♀"  ; Venus symbol (female)
 534 dkNotSign.item("h") := "♡"  ; white heart suit
 535 dkNotSign.item("H") := "♥"  ; black heart suit
 536 dkNotSign.item("l") := "ℓ"  ; script small l
 537 dkNotSign.item("L") := "ℓ"  ; script small l
 538 dkNotSign.item("m") := "♂"  ; Mars symbol (male)
 539 dkNotSign.item("M") := "♂"  ; Mars symbol (male)
 540 dkNotSign.item("n") := "¬"  ; not sign
 541 dkNotSign.item("N") := "¬"  ; not sign
 542 dkNotSign.item("o") := "º"  ; masculine ordinal indicator (Spanish, Portuguese, Italian, Galician)
 543 dkNotSign.item("O") := "º"  ; masculine ordinal indicator (Spanish, Portuguese, Italian, Galician)
 544 dkNotSign.item("p") := "¶"  ; pilcrow sign
 545 dkNotSign.item("P") := "℗"  ; sound recording copyright
 546 dkNotSign.item("r") := "®"  ; registered sign
 547 dkNotSign.item("R") := "®"  ; registered sign
 548 dkNotSign.item("s") := "§"  ; section sign
 549 dkNotSign.item("S") := "℠"  ; service mark
 550 dkNotSign.item("t") := "™"  ; trademark symbol
 551 dkNotSign.item("T") := "™"  ; trademark symbol
 552 dkNotSign.item("v") := "✓"  ; check mark
 553 dkNotSign.item("V") := "✔"  ; heavy check mark
 554 dkNotSign.item("w") := "☑"  ; ballot box with check
 555 dkNotSign.item("W") := "☙"  ; reversed rotated floral heart bullet
 556 dkNotSign.item("x") := "✗"  ; ballot x
 557 dkNotSign.item("X") := "✘"  ; heavy ballot x
 558 dkNotSign.item("y") := "☺"  ; white smiling face
 559 dkNotSign.item("Y") := "☻"  ; black smiling face
 560 dkNotSign.item("!") := "←"  ; leftwards arrow
 561 dkNotSign.item("@") := "↓"  ; downwards arrow
 562 dkNotSign.item("#") := "↑"  ; upwards arrow
 563 dkNotSign.item("$") := "→"  ; rightwards arrow
 564 dkNotSign.item("%") := "↖"  ; north west arrow
 565 dkNotSign.item("^") := "↙"  ; south west arrow
 566 dkNotSign.item("&") := "↗"  ; north east arrow
 567 dkNotSign.item("*") := "↘"  ; south east arrow
 568 dkNotSign.item("(") := "↕"  ; up down arrow
 569 dkNotSign.item(")") := "↨"  ; up down arrow with base
 570 dkNotSign.item("=") := "↔"  ; left right arrow
 571 dkNotSign.item("1") := "⇐"  ; leftwards double arrow
 572 dkNotSign.item("2") := "⇓"  ; downwards double arrow
 573 dkNotSign.item("3") := "⇑"  ; upwards double arrow
 574 dkNotSign.item("4") := "⇒"  ; rightwards double arrow
 575 dkNotSign.item("5") := "⇖"  ; north west double arrow
 576 dkNotSign.item("6") := "⇙"  ; south west double arrow
 577 dkNotSign.item("7") := "⇗"  ; north east double arrow
 578 dkNotSign.item("8") := "⇘"  ; south east double arrow
 579 dkNotSign.item("9") := "⇕"  ; up down double arrow
 580 dkNotSign.item("0") := "↲"  ; downwards arrow with tip leftwards
 581 dkNotSign.item("+") := "⇔"  ; left right double arrow
 582 dkNotSign.item(".") := "•"  ; bullet
 583 dkNotSign.item("-") := "⁃"  ; hyphen bullet
 584 dkNotSign.item("/") := "‼"  ; double exclamation mark
 585 dkNotSign.item("?") := "‽"  ; interrobang
 586 dkNotSign.item("¿") := "⸘"  ; inverted interrobang
 587 dkNotSign.item("¶") := "⸮"  ; reversed question mark
 588 dkNotSign.item("\") := "⁞"  ; vertical four dots
 589 dkNotSign.item("|") := "⁞"  ; vertical four dots
 590 dkNotSign.item(" ") := "¬"  ; not sign
 591
 592
 593 ; Dead Key :  Broken Bar
 594
 595 dkBrokenBar := ComObjCreate("Scripting.Dictionary")
 596 dkBrokenBar.item("a") := "ɑ"  ; latin small letter alpha
 597 dkBrokenBar.item("A") := "Ɑ"  ; latin capital letter alpha
 598 dkBrokenBar.item("ä") := "ɒ"  ; latin small letter turned alpha
 599 dkBrokenBar.item("Ä") := "Ɒ"  ; latin capital letter turned alpha
 600 dkBrokenBar.item("c") := "ƈ"  ; c with hook
 601 dkBrokenBar.item("C") := "Ƈ"  ; C with hook
 602 dkBrokenBar.item("e") := "ɛ"  ; small open e (latin small epsilon)
 603 dkBrokenBar.item("E") := "Ɛ"  ; capital open E (latin capital epsilon)
 604 dkBrokenBar.item("f") := "❦"  ; floral heart
 605 dkBrokenBar.item("F") := "❧"  ; rotated floral heart bullet
 606 dkBrokenBar.item("g") := "ɠ"  ; g with hook
 607 dkBrokenBar.item("G") := "Ɠ"  ; G with hook
 608 dkBrokenBar.item("h") := "ꜧ"  ; small letter heng
 609 dkBrokenBar.item("H") := "Ꜧ"  ; capital letter heng
 610 dkBrokenBar.item("ù") := "ɧ"  ; small letter heng with hook
 611 dkBrokenBar.item("k") := "ḱ"  ; k with acute
 612 dkBrokenBar.item("K") := "Ḱ"  ; K with acute
 613 dkBrokenBar.item("m") := "ɱ"  ; m with hook
 614 dkBrokenBar.item("M") := "Ɱ"  ; M with hook
 615 dkBrokenBar.item("n") := "ɲ"  ; n with left hook
 616 dkBrokenBar.item("N") := "Ɲ"  ; N with left hook
 617 dkBrokenBar.item("o") := "ơ"  ; o with horn
 618 dkBrokenBar.item("O") := "Ơ"  ; O with horn
 619 dkBrokenBar.item("p") := "ṕ"  ; p with acute
 620 dkBrokenBar.item("P") := "Ṕ"  ; P with acute
 621 dkBrokenBar.item("s") := "ʃ"  ; small letter esh
 622 dkBrokenBar.item("S") := "Ʃ"  ; capital letter esh
 623 dkBrokenBar.item("ß") := "ſ"  ; small long s
 624 dkBrokenBar.item("u") := "ư"  ; u with horn
 625 dkBrokenBar.item("U") := "Ư"  ; U with horn
 626 dkBrokenBar.item("v") := "ʌ"  ; latin small letter turned v
 627 dkBrokenBar.item("V") := "Ʌ"  ; latin capital letter turned V
 628 dkBrokenBar.item("w") := "ⱳ"  ; w with hook
 629 dkBrokenBar.item("W") := "Ⱳ"  ; W with hook
 630 dkBrokenBar.item("y") := "ƴ"  ; y with hook
 631 dkBrokenBar.item("Y") := "Ƴ"  ; Y with hook
 632 dkBrokenBar.item("z") := "ȥ"  ; z with hook
 633 dkBrokenBar.item("Z") := "Ȥ"  ; Z with hook
 634 dkBrokenBar.item("!") := "№"  ; numero sign
 635 dkBrokenBar.item("1") := "№"  ; numero sign
 636 dkBrokenBar.item("@") := "½"  ; vulgar fraction 1/2
 637 dkBrokenBar.item("2") := "½"  ; vulgar fraction 1/2
 638 dkBrokenBar.item("#") := "⅓"  ; vulgar fraction 1/3
 639 dkBrokenBar.item("3") := "⅓"  ; vulgar fraction 1/3
 640 dkBrokenBar.item("$") := "¼"  ; vulgar fraction 1/4
 641 dkBrokenBar.item("4") := "¼"  ; vulgar fraction 1/4
 642 dkBrokenBar.item("%") := "⅔"  ; vulgar fraction 2/3
 643 dkBrokenBar.item("5") := "⅔"  ; vulgar fraction 2/3
 644 dkBrokenBar.item("^") := "¾"  ; vulgar fraction 3/4
 645 dkBrokenBar.item("6") := "¾"  ; vulgar fraction 3/4
 646 dkBrokenBar.item("&") := "⅛"  ; vulgar fraction 1/8
 647 dkBrokenBar.item("7") := "⅛"  ; vulgar fraction 1/8
 648 dkBrokenBar.item("*") := "⅜"  ; vulgar fraction 3/8
 649 dkBrokenBar.item("8") := "⅜"  ; vulgar fraction 3/8
 650 dkBrokenBar.item("(") := "⅝"  ; vulgar fraction 5/8
 651 dkBrokenBar.item("9") := "⅝"  ; vulgar fraction 5/8
 652 dkBrokenBar.item(")") := "⅞"  ; vulgar fraction 7/8
 653 dkBrokenBar.item("0") := "⅞"  ; vulgar fraction 7/8
 654 dkBrokenBar.item("\") := "¦"  ; broken bar
 655 dkBrokenBar.item("|") := "¦"  ; broken bar
 656 dkBrokenBar.item(" ") := "¦"  ; broken bar
 657
 658
 659 ; Dead Key :  Greek Alphabet
 660
 661 dkGreekAlphabet := ComObjCreate("Scripting.Dictionary")
 662 dkGreekAlphabet.item("a") := "α"  ; small alpha
 663 dkGreekAlphabet.item("A") := "Α"  ; capital alpha
 664 dkGreekAlphabet.item("b") := "β"  ; small beta
 665 dkGreekAlphabet.item("B") := "Β"  ; capital beta
 666 dkGreekAlphabet.item("v") := "β"  ; small beta
 667 dkGreekAlphabet.item("V") := "Β"  ; capital beta
 668 dkGreekAlphabet.item("g") := "γ"  ; small gamma
 669 dkGreekAlphabet.item("G") := "Γ"  ; capital gamma
 670 dkGreekAlphabet.item("d") := "δ"  ; small delta
 671 dkGreekAlphabet.item("D") := "Δ"  ; capital delta
 672 dkGreekAlphabet.item("e") := "ε"  ; small epsilon
 673 dkGreekAlphabet.item("E") := "Ε"  ; capital epsilon
 674 dkGreekAlphabet.item("z") := "ζ"  ; small zeta
 675 dkGreekAlphabet.item("Z") := "Ζ"  ; capital zeta
 676 dkGreekAlphabet.item("h") := "η"  ; small eta
 677 dkGreekAlphabet.item("H") := "Η"  ; capital eta
 678 dkGreekAlphabet.item("j") := "θ"  ; small theta
 679 dkGreekAlphabet.item("J") := "Θ"  ; capital theta
 680 dkGreekAlphabet.item("i") := "ι"  ; small iota
 681 dkGreekAlphabet.item("I") := "Ι"  ; capital iota
 682 dkGreekAlphabet.item("k") := "κ"  ; small kappa
 683 dkGreekAlphabet.item("K") := "Κ"  ; capital kappa
 684 dkGreekAlphabet.item("l") := "λ"  ; small lambda
 685 dkGreekAlphabet.item("L") := "Λ"  ; capital lambda
 686 dkGreekAlphabet.item("m") := "μ"  ; small mu
 687 dkGreekAlphabet.item("M") := "Μ"  ; capital mu
 688 dkGreekAlphabet.item("n") := "ν"  ; small nu
 689 dkGreekAlphabet.item("N") := "Ν"  ; capital nu
 690 dkGreekAlphabet.item("x") := "ξ"  ; small xi
 691 dkGreekAlphabet.item("X") := "Ξ"  ; capital xi
 692 dkGreekAlphabet.item("o") := "ο"  ; small omikron
 693 dkGreekAlphabet.item("O") := "Ο"  ; capital omikron
 694 dkGreekAlphabet.item("p") := "π"  ; small pi
 695 dkGreekAlphabet.item("P") := "Π"  ; capital pi
 696 dkGreekAlphabet.item("r") := "ρ"  ; small rho
 697 dkGreekAlphabet.item("R") := "Ρ"  ; capital rho
 698 dkGreekAlphabet.item("s") := "σ"  ; small sigma
 699 dkGreekAlphabet.item("S") := "Σ"  ; capital sigma
 700 dkGreekAlphabet.item(",") := "ς"  ; small sigma, in word-final position
 701 dkGreekAlphabet.item("ß") := "ς"  ; small sigma, in word-final position
 702 dkGreekAlphabet.item("t") := "τ"  ; small tau
 703 dkGreekAlphabet.item("T") := "Τ"  ; capital tau
 704 dkGreekAlphabet.item("u") := "υ"  ; small upsilon
 705 dkGreekAlphabet.item("U") := "Υ"  ; capital upsilon
 706 dkGreekAlphabet.item("y") := "υ"  ; small upsilon
 707 dkGreekAlphabet.item("Y") := "Υ"  ; capital upsilon
 708 dkGreekAlphabet.item("f") := "φ"  ; small phi
 709 dkGreekAlphabet.item("F") := "Φ"  ; capital phi
 710 dkGreekAlphabet.item("c") := "χ"  ; small chi
 711 dkGreekAlphabet.item("C") := "Χ"  ; capital chi
 712 dkGreekAlphabet.item("w") := "ψ"  ; small psi
 713 dkGreekAlphabet.item("W") := "Ψ"  ; capital psi
 714 dkGreekAlphabet.item("q") := "ω"  ; small omega
 715 dkGreekAlphabet.item("Q") := "Ω"  ; capital omega
 716 dkGreekAlphabet.item("!") := "¹"  ; superscript 1
 717 dkGreekAlphabet.item("@") := "²"  ; superscript 2
 718 dkGreekAlphabet.item("#") := "³"  ; superscript 3
 719 dkGreekAlphabet.item("$") := "⁴"  ; superscript 4
 720 dkGreekAlphabet.item("%") := "⁵"  ; superscript 5
 721 dkGreekAlphabet.item("^") := "⁶"  ; superscript 6
 722 dkGreekAlphabet.item("&") := "⁷"  ; superscript 7
 723 dkGreekAlphabet.item("*") := "⁸"  ; superscript 8
 724 dkGreekAlphabet.item("(") := "⁹"  ; superscript 9
 725 dkGreekAlphabet.item(")") := "⁰"  ; superscript 0
 726 dkGreekAlphabet.item("-") := "⁻"  ; superscript -
 727 dkGreekAlphabet.item("=") := "⁼"  ; superscript =
 728 dkGreekAlphabet.item("+") := "⁺"  ; superscript +
 729 dkGreekAlphabet.item("[") := "⁽"  ; superscript (
 730 dkGreekAlphabet.item("]") := "⁾"  ; superscript )
 731 dkGreekAlphabet.item("1") := "₁"  ; subscript 1
 732 dkGreekAlphabet.item("2") := "₂"  ; subscript 2
 733 dkGreekAlphabet.item("3") := "₃"  ; subscript 3
 734 dkGreekAlphabet.item("4") := "₄"  ; subscript 4
 735 dkGreekAlphabet.item("5") := "₅"  ; subscript 5
 736 dkGreekAlphabet.item("6") := "₆"  ; subscript 6
 737 dkGreekAlphabet.item("7") := "₇"  ; subscript 7
 738 dkGreekAlphabet.item("8") := "₈"  ; subscript 8
 739 dkGreekAlphabet.item("9") := "₉"  ; subscript 9
 740 dkGreekAlphabet.item("0") := "₀"  ; subscript 0
 741 dkGreekAlphabet.item(";") := "₋"  ; subscript -
 742 dkGreekAlphabet.item("'") := "₌"  ; subscript =
 743 dkGreekAlphabet.item("""") := "₊" ; subscript +
 744 dkGreekAlphabet.item("{") := "₍"  ; subscript (
 745 dkGreekAlphabet.item("}") := "₎"  ; subscript )
 746 dkGreekAlphabet.item(".") := "µ"  ; micro sign
 747 dkGreekAlphabet.item(" ") := "μ"  ; small mu
 748
 749
 750 ; Dead Key :  Math Symbols
 751
 752 dkMathSymbols := ComObjCreate("Scripting.Dictionary")
 753 dkMathSymbols.item("a") := "∀"  ; for all
 754 dkMathSymbols.item("A") := "∀"  ; for all
 755 dkMathSymbols.item("b") := "⊆"  ; subset of or equal to
 756 dkMathSymbols.item("B") := "⊇"  ; superset of or equal to
 757 dkMathSymbols.item("c") := "∝"  ; proportional to
 758 dkMathSymbols.item("C") := "ℂ"  ; complex numbers
 759 dkMathSymbols.item("d") := "∆"  ; increment operator
 760 dkMathSymbols.item("D") := "∇"  ; nable/del operator
 761 dkMathSymbols.item("e") := "∃"  ; there exists
 762 dkMathSymbols.item("E") := "∄"  ; there does not exist
 763 dkMathSymbols.item("f") := "ƒ"  ; f with hook
 764 dkMathSymbols.item("F") := "∎"  ; end of proof
 765 dkMathSymbols.item("g") := "⊂"  ; subset of
 766 dkMathSymbols.item("G") := "⊄"  ; not a subset of
 767 dkMathSymbols.item("h") := "⊃"  ; superset of
 768 dkMathSymbols.item("H") := "⊅"  ; not a superset of
 769 dkMathSymbols.item("i") := "∞"  ; infinity symbol
 770 dkMathSymbols.item("I") := "∞"  ; infinity symbol
 771 dkMathSymbols.item("k") := "∋"  ; contains as member
 772 dkMathSymbols.item("K") := "∌"  ; does not contain as member
 773 dkMathSymbols.item("l") := "∥"  ; parallel to
 774 dkMathSymbols.item("L") := "∦"  ; not parallel to
 775 dkMathSymbols.item("m") := "∈"  ; element of
 776 dkMathSymbols.item("M") := "∉"  ; not an element of
 777 dkMathSymbols.item("n") := "ⁿ"  ; superscript n
 778 dkMathSymbols.item("N") := "ℕ"  ; natural numbers
 779 dkMathSymbols.item("o") := "∘"  ; ring operator
 780 dkMathSymbols.item("O") := "∅"  ; empty set
 781 dkMathSymbols.item("p") := "∂"  ; partial differential
 782 dkMathSymbols.item("P") := "ℙ"  ; prime numbers
 783 dkMathSymbols.item("q") := "ℚ"  ; rational numbers
 784 dkMathSymbols.item("Q") := "ℚ"  ; rational numbers
 785 dkMathSymbols.item("r") := "√"  ; square root
 786 dkMathSymbols.item("R") := "ℝ"  ; real numbers
 787 dkMathSymbols.item("s") := "∩"  ; set intersection
 788 dkMathSymbols.item("S") := "∫"  ; integral symbol
 789 dkMathSymbols.item("u") := "∪"  ; set union
 790 dkMathSymbols.item("U") := "∖"  ; set minus
 791 dkMathSymbols.item("w") := "℘"  ; Weierstrass elliptic function
 792 dkMathSymbols.item("W") := "℘"  ; Weierstrass elliptic function
 793 dkMathSymbols.item("z") := "↯"  ; downwards zigzag arrow
 794 dkMathSymbols.item("Z") := "ℤ"  ; whole numbers
 795 dkMathSymbols.item("!") := "≠"  ; not equal to
 796 dkMathSymbols.item("1") := "≠"  ; not equal to
 797 dkMathSymbols.item("@") := "√"  ; square root
 798 dkMathSymbols.item("2") := "√"  ; square root
 799 dkMathSymbols.item("#") := "∛"  ; cube root
 800 dkMathSymbols.item("3") := "∛"  ; cube root
 801 dkMathSymbols.item("$") := "∜"  ; fourth root
 802 dkMathSymbols.item("4") := "∜"  ; fourth root
 803 dkMathSymbols.item("%") := "‰"  ; per mille sign
 804 dkMathSymbols.item("5") := "‱" ; per ten thousand sign
 805 dkMathSymbols.item("^") := "∠"  ; angle symbol
 806 dkMathSymbols.item("6") := "∠"  ; angle symbol
 807 dkMathSymbols.item("&") := "∧"  ; logical and
 808 dkMathSymbols.item("7") := "∧"  ; logical and
 809 dkMathSymbols.item("*") := "⊗"  ; tensor product
 810 dkMathSymbols.item("8") := "⊗"  ; tensor product
 811 dkMathSymbols.item("(") := "∟"  ; right angle
 812 dkMathSymbols.item("9") := "∟"  ; right angle
 813 dkMathSymbols.item(")") := "∡"  ; measured angle
 814 dkMathSymbols.item("0") := "∡"  ; measured angle
 815 dkMathSymbols.item("``") := "≈" ; almost equal to
 816 dkMathSymbols.item("~") := "≈"  ; almost equal to
 817 dkMathSymbols.item(",") := "≤"  ; less-than or equal to
 818 dkMathSymbols.item("<") := "≤"  ; less-than or equal to
 819 dkMathSymbols.item(".") := "≥"  ; greater-than or equal to
 820 dkMathSymbols.item(">") := "≥"  ; greater-than or equal to
 821 dkMathSymbols.item("-") := "±"  ; plus-minus sign
 822 dkMathSymbols.item("_") := "⊖"  ; circled minus
 823 dkMathSymbols.item("=") := "≝"  ; equal to by definition
 824 dkMathSymbols.item("+") := "⊕"  ; exclusive or
 825 dkMathSymbols.item(";") := "∵"  ; because sign
 826 dkMathSymbols.item(":") := "∴"  ; therefore sign
 827 dkMathSymbols.item("'") := "′"  ; prime
 828 dkMathSymbols.item("""") := "″" ; double prime
 829 dkMathSymbols.item("/") := "‴"  ; triple prime
 830 dkMathSymbols.item("?") := "⁗"  ; quadruple prime
 831 dkMathSymbols.item("\") := "∨"  ; logical or
 832 dkMathSymbols.item("|") := "∨"  ; logical or
 833 dkMathSymbols.item(" ") := "√"  ; square root
 834
 835
 836 ; Configuration :  Switch positions of symbols and digits
 837
 838 $1::Send {!} ; exclamation mark
 839 $+1::Send 1  ; digit 1
 840
 841 $2::Send @   ; at sign
 842 $+2::Send 2  ; digit 2
 843
 844 $3::Send {#} ; number sign
 845 $+3::Send 3  ; digit 3
 846
 847 $4::Send $   ; dollar sign
 848 $+4::Send 4  ; digit 4
 849
 850 $5::Send `%  ; percent sign
 851 $+5::Send 5  ; digit 5
 852
 853 $6::Send {^} ; circumflex accent
 854 $+6::Send 6  ; digit 6
 855
 856 $7::Send &   ; ampersand
 857 $+7::Send 7  ; digit 7
 858
 859 $8::Send *   ; asterisk
 860 $+8::Send 8  ; digit 8
 861
 862 $9::Send (   ; left parenthesis
 863 $+9::Send 9  ; digit 9
 864
 865 $0::Send )   ; right parenthesis
 866 $+0::Send 0  ; digit 0
 867
 868
 869 ; Configuration :  Right Alt on US QWERTY
 870
 871 >!a::
 872   if GetKeyState("CapsLock", "T")
 873     Send Ä  ; A with diaeresis
 874   else
 875     Send ä  ; a with diaeresis
 876 return
 877 >!+a::
 878   if GetKeyState("CapsLock", "T")
 879     Send ä  ; a with diaeresis
 880   else
 881     Send Ä  ; A with diaeresis
 882 return
 883
 884 >!z::
 885   if GetKeyState("CapsLock", "T")
 886     Send À  ; A with grave
 887   else
 888     Send à  ; a with grave
 889 return
 890 >!+z::
 891   if GetKeyState("CapsLock", "T")
 892     Send à  ; a with grave
 893   else
 894     Send À  ; A with grave
 895 return
 896
 897 >!x::
 898   if GetKeyState("CapsLock", "T")
 899     Send Á  ; A with acute
 900   else
 901     Send á  ; a with acute
 902 return
 903 >!+x::
 904   if GetKeyState("CapsLock", "T")
 905     Send á  ; a with acute
 906   else
 907     Send Á  ; A with acute
 908 return
 909
 910 >!q::
 911   if GetKeyState("CapsLock", "T")
 912     Send Æ  ; letter AE
 913   else
 914     Send æ  ; letter ae
 915 return
 916 >!+q::
 917   if GetKeyState("CapsLock", "T")
 918     Send æ  ; letter ae
 919   else
 920     Send Æ  ; letter AE
 921 return
 922
 923 >!w::
 924   if GetKeyState("CapsLock", "T")
 925     Send Å  ; A with ring above
 926   else
 927     Send å  ; a with ring above
 928 return
 929 >!+w::
 930   if GetKeyState("CapsLock", "T")
 931     Send å  ; a with ring above
 932   else
 933     Send Å  ; A with ring above
 934 return
 935
 936 >!c::
 937   if GetKeyState("CapsLock", "T")
 938     Send Ç  ; C with cedilla
 939   else
 940     Send ç  ; c with cedilla
 941 return
 942 >!+c::
 943   if GetKeyState("CapsLock", "T")
 944     Send ç  ; c with cedilla
 945   else
 946     Send Ç  ; C with cedilla
 947 return
 948
 949 >!d::
 950   if GetKeyState("CapsLock", "T")
 951     Send Ð  ; capital letter eth
 952   else
 953     Send ð  ; small letter eth
 954 return
 955 >!+d::
 956   if GetKeyState("CapsLock", "T")
 957     Send ð  ; small letter eth
 958   else
 959     Send Ð  ; capital letter eth
 960 return
 961
 962 >!e::
 963   if GetKeyState("CapsLock", "T")
 964     Send Ë  ; E with diaeresis
 965   else
 966     Send ë  ; e with diaeresis
 967 return
 968 >!+e::
 969   if GetKeyState("CapsLock", "T")
 970     Send ë  ; e with diaeresis
 971   else
 972     Send Ë  ; E with diaeresis
 973 return
 974
 975 >!f::
 976   if GetKeyState("CapsLock", "T")
 977     Send È  ; E with grave
 978   else
 979     Send è  ; e with grave
 980 return
 981 >!+f::
 982   if GetKeyState("CapsLock", "T")
 983     Send è  ; e with grave
 984   else
 985     Send È  ; E with grave
 986 return
 987
 988 >!g::
 989   if GetKeyState("CapsLock", "T")
 990     Send É  ; E with acute
 991   else
 992     Send é  ; e with acute
 993 return
 994 >!+g::
 995   if GetKeyState("CapsLock", "T")
 996     Send é  ; e with acute
 997   else
 998     Send É  ; E with acute
 999 return
1000
1001 >!i::
1002   if GetKeyState("CapsLock", "T")
1003     Send Ï  ; I with diaeresis
1004   else
1005     Send ï  ; i with diaeresis
1006 return
1007 >!+i::
1008   if GetKeyState("CapsLock", "T")
1009     Send ï  ; i with diaeresis
1010   else
1011     Send Ï  ; I with diaeresis
1012 return
1013
1014 >!v::
1015   if GetKeyState("CapsLock", "T")
1016     Send Ì  ; I with grave
1017   else
1018     Send ì  ; i with grave
1019 return
1020 >!+v::
1021   if GetKeyState("CapsLock", "T")
1022     Send ì  ; i with grave
1023   else
1024     Send Ì  ; I with grave
1025 return
1026
1027 >!b::
1028   if GetKeyState("CapsLock", "T")
1029     Send Í  ; I with acute
1030   else
1031     Send í  ; i with acute
1032 return
1033 >!+b::
1034   if GetKeyState("CapsLock", "T")
1035     Send í  ; i with acute
1036   else
1037     Send Í  ; I with acute
1038 return
1039
1040 >!o::
1041   if GetKeyState("CapsLock", "T")
1042     Send Ö  ; O with diaeresis
1043   else
1044     Send ö  ; o with diaeresis
1045 return
1046 >!+o::
1047   if GetKeyState("CapsLock", "T")
1048     Send ö  ; o with diaeresis
1049   else
1050     Send Ö  ; O with diaeresis
1051 return
1052
1053 >!,::
1054   if GetKeyState("CapsLock", "T")
1055     Send Ò  ; O with grave
1056   else
1057     Send ò  ; o with grave
1058 return
1059 >!<::
1060   if GetKeyState("CapsLock", "T")
1061     Send ò  ; o with grave
1062   else
1063     Send Ò  ; O with grave
1064 return
1065
1066 >!.::
1067   if GetKeyState("CapsLock", "T")
1068     Send Ó  ; O with acute
1069   else
1070     Send ó  ; o with acute
1071 return
1072 >!>::
1073   if GetKeyState("CapsLock", "T")
1074     Send ó  ; o with acute
1075   else
1076     Send Ó  ; O with acute
1077 return
1078
1079 >!k::
1080   if GetKeyState("CapsLock", "T")
1081     Send Œ  ; ligature OE
1082   else
1083     Send œ  ; ligature oe
1084 return
1085 >!+k::
1086   if GetKeyState("CapsLock", "T")
1087     Send œ  ; ligature oe
1088   else
1089     Send Œ  ; ligature OE
1090 return
1091
1092 >!l::
1093   if GetKeyState("CapsLock", "T")
1094     Send Ø  ; O with stroke
1095   else
1096     Send ø  ; o with stroke
1097 return
1098 >!+l::
1099   if GetKeyState("CapsLock", "T")
1100     Send ø  ; o with stroke
1101   else
1102     Send Ø  ; O with stroke
1103 return
1104
1105 >!n::
1106   if GetKeyState("CapsLock", "T")
1107     Send Ñ  ; N with tilde
1108   else
1109     Send ñ  ; n with tilde
1110 return
1111 >!+n::
1112   if GetKeyState("CapsLock", "T")
1113     Send ñ  ; n with tilde
1114   else
1115     Send Ñ  ; N with tilde
1116 return
1117
1118 >!t::
1119   if GetKeyState("CapsLock", "T")
1120     Send Þ  ; capital letter thorn
1121   else
1122     Send þ  ; small letter thorn
1123 return
1124 >!+t::
1125   if GetKeyState("CapsLock", "T")
1126     Send þ  ; small letter thorn
1127   else
1128     Send Þ  ; capital letter thorn
1129 return
1130
1131 >!u::
1132   if GetKeyState("CapsLock", "T")
1133     Send Ü  ; U with diaeresis
1134   else
1135     Send ü  ; u with diaeresis
1136 return
1137 >!+u::
1138   if GetKeyState("CapsLock", "T")
1139     Send ü  ; u with diaeresis
1140   else
1141     Send Ü  ; U with diaeresis
1142 return
1143
1144 >!h::
1145   if GetKeyState("CapsLock", "T")
1146     Send Ù  ; U with grave
1147   else
1148     Send ù  ; u with grave
1149 return
1150 >!+h::
1151   if GetKeyState("CapsLock", "T")
1152     Send ù  ; u with grave
1153   else
1154     Send Ù  ; U with grave
1155 return
1156
1157 >!j::
1158   if GetKeyState("CapsLock", "T")
1159     Send Ú  ; U with acute
1160   else
1161     Send ú  ; u with acute
1162 return
1163 >!+j::
1164   if GetKeyState("CapsLock", "T")
1165     Send ú  ; u with acute
1166   else
1167     Send Ú  ; U with acute
1168 return
1169
1170 >!y::
1171   if GetKeyState("CapsLock", "T")
1172     Send Ÿ  ; Y with diaeresis
1173   else
1174     Send ÿ  ; y with diaeresis
1175 return
1176 >!+y::
1177   if GetKeyState("CapsLock", "T")
1178     Send ÿ  ; y with diaeresis
1179   else
1180     Send Ÿ  ; Y with diaeresis
1181 return
1182
1183 >!r::
1184   if GetKeyState("CapsLock", "T")
1185     Send Ý  ; Y with acute
1186   else
1187     Send ý  ; y with acute
1188 return
1189 >!+r::
1190   if GetKeyState("CapsLock", "T")
1191     Send ý  ; y with acute
1192   else
1193     Send Ý  ; Y with acute
1194 return
1195
1196 >!p::Send †   ; dagger
1197 >!+p::Send ‡  ; double dagger
1198
1199 >!s::Send ß   ; small sharp s (Eszett)
1200 >!+s::Send §  ; section sign
1201
1202 >!/::Send ¿   ; inverted question mark
1203 >!?::Send ¶   ; pilcrow sign
1204
1205 >!1::Send ¡   ; inverted exclamation mark
1206 >!+1::Send ¹  ; superscript 1
1207
1208 >!2::Send ©   ; copyright sign
1209 >!+2::Send ²  ; superscript 2
1210
1211 >!3::Send ±   ; plus-minus sign
1212 >!+3::Send ³  ; superscript 3
1213
1214 >!4::Send £   ; pound sign
1215 >!+4::Send ¥  ; yen sign
1216
1217 >!5::Send €   ; euro sign
1218 >!+5::Send ¢  ; cent sign (dollar)
1219
1220 >!8::Send „   ; double low-9 quotation mark
1221 >!+8::Send ‚  ; single low-9 quotation mark
1222
1223 >!9::Send “   ; left double quotation mark
1224 >!+9::Send ‘  ; left single quotation mark
1225
1226 >!0::Send ”   ; right double quotation mark
1227 >!+0::Send ’  ; right single quotation mark
1228
1229 >!=::Send ×   ; multiplication sign
1230 >!+=::Send ÷  ; division sign
1231
1232 >![::Send «   ; left-pointing double angle quotation mark
1233 >!{::Send ‹   ; left-pointing single angle quotation mark
1234
1235 >!]::Send »   ; right-pointing double angle quotation mark
1236 >!}::Send ›   ; right-pointing single angle quotation mark
1237
1238 >!;::Send °   ; degree sign
1239 >!+;::Send ·  ; middle dot
1240
1241 >!6::
1242   Input, key, L1, {bs}{del}{esc}{home}{end}
1243   Send % dkCircumflex.item(key)
1244 return
1245 >!+6::
1246   Input, key, L1, {bs}{del}{esc}{home}{end}
1247   Send % dkCaron.item(key)
1248 return
1249
1250 >!7::
1251   Input, key, L1, {bs}{del}{esc}{home}{end}
1252   Send % dkRingDotAbove.item(key)
1253 return
1254 >!+7::
1255   Input, key, L1, {bs}{del}{esc}{home}{end}
1256   Send % dkMacronStroke.item(key)
1257 return
1258
1259 >!-::
1260   Input, key, L1, {bs}{del}{esc}{home}{end}
1261   Send % dkCedillaOgonek.item(key)
1262 return
1263 >!_::
1264   Input, key, L1, {bs}{del}{esc}{home}{end}
1265   Send % dkBreveSpecial.item(key)
1266 return
1267
1268 >!'::
1269   Input, key, L1, {bs}{del}{esc}{home}{end}
1270   Send % dkAcuteAccent.item(key)
1271 return
1272 >!"::
1273   Input, key, L1, {bs}{del}{esc}{home}{end}
1274   Send % dkDiaeresis.item(key)
1275 return
1276
1277 >!`::
1278   Input, key, L1, {bs}{del}{esc}{home}{end}
1279   Send % dkGraveAccent.item(key)
1280 return
1281 >!~::
1282   Input, key, L1, {bs}{del}{esc}{home}{end}
1283   Send % dkTilde.item(key)
1284 return
1285
1286 >!\::
1287   Input, key, L1, {bs}{del}{esc}{home}{end}
1288   Send % dkNotSign.item(key)
1289 return
1290 >!|::
1291   Input, key, L1, {bs}{del}{esc}{home}{end}
1292   Send % dkBrokenBar.item(key)
1293 return
1294
1295 >!m::
1296   Input, key, L1, {bs}{del}{esc}{home}{end}
1297   Send % dkGreekAlphabet.item(key)
1298 return
1299 >!+m::
1300   Input, key, L1, {bs}{del}{esc}{home}{end}
1301   Send % dkMathSymbols.item(key)
1302 return
1303
1304 >!space::Send     ; non-breaking space
1305 >!+space::Send    ; non-breaking space