autohotkey-v1.1/UltimateKEYS.ahk

   1 ; UltimateKEYS.ahk - 2022-11-04
   2
   3 ; Website :  www.ultimatekeys.info (pieter-degroote.github.io/UltimateKEYS/)
   4
   5 ; License :  GNU General Public License Version 3
   6
   7 ; GitHub :   github.com/pieter-degroote/UltimateKEYS
   8
   9
  10 ; Requirements :
  11
  12 ; Keyboard layout (on Windows) :  US QWERTY
  13
  14 ; AutoHotkey v1.1 (www.autohotkey.com)
  15
  16
  17
  18 ListLines Off   ; omits recently executed lines from history (for privacy and security)
  19 #KeyHistory 0   ; disables the key history (for privacy and security)
  20
  21 SendMode Input  ; optimizes for faster and more reliable input
  22
  23
  24 ; Compose :  Circumflex Accent (c)
  25
  26 cmpCircumflex := ComObjCreate("Scripting.Dictionary")
  27 cmpCircumflex.item["a"] := "{u+00e2}"  ; (â) a with circumflex
  28 cmpCircumflex.item["A"] := "{u+00c2}"  ; (Â) A with circumflex
  29 cmpCircumflex.item["c"] := "{u+0109}"  ; (ĉ) c with circumflex
  30 cmpCircumflex.item["C"] := "{u+0108}"  ; (Ĉ) C with circumflex
  31 cmpCircumflex.item["e"] := "{u+00ea}"  ; (ê) e with circumflex
  32 cmpCircumflex.item["E"] := "{u+00ca}"  ; (Ê) E with circumflex
  33 cmpCircumflex.item["g"] := "{u+011d}"  ; (ĝ) g with circumflex
  34 cmpCircumflex.item["G"] := "{u+011c}"  ; (Ĝ) G with circumflex
  35 cmpCircumflex.item["h"] := "{u+0125}"  ; (ĥ) h with circumflex
  36 cmpCircumflex.item["H"] := "{u+0124}"  ; (Ĥ) H with circumflex
  37 cmpCircumflex.item["i"] := "{u+00ee}"  ; (î) i with circumflex
  38 cmpCircumflex.item["I"] := "{u+00ce}"  ; (Î) I with circumflex
  39 cmpCircumflex.item["j"] := "{u+0135}"  ; (ĵ) j with circumflex
  40 cmpCircumflex.item["J"] := "{u+0134}"  ; (Ĵ) J with circumflex
  41 cmpCircumflex.item["o"] := "{u+00f4}"  ; (ô) o with circumflex
  42 cmpCircumflex.item["O"] := "{u+00d4}"  ; (Ô) O with circumflex
  43 cmpCircumflex.item["s"] := "{u+015d}"  ; (ŝ) s with circumflex
  44 cmpCircumflex.item["S"] := "{u+015c}"  ; (Ŝ) S with circumflex
  45 cmpCircumflex.item["u"] := "{u+00fb}"  ; (û) u with circumflex
  46 cmpCircumflex.item["U"] := "{u+00db}"  ; (Û) U with circumflex
  47 cmpCircumflex.item["w"] := "{u+0175}"  ; (ŵ) w with circumflex
  48 cmpCircumflex.item["W"] := "{u+0174}"  ; (Ŵ) W with circumflex
  49 cmpCircumflex.item["y"] := "{u+0177}"  ; (ŷ) y with circumflex
  50 cmpCircumflex.item["Y"] := "{u+0176}"  ; (Ŷ) Y with circumflex
  51 cmpCircumflex.item["z"] := "{u+1e91}"  ; (ẑ) z with circumflex
  52 cmpCircumflex.item["Z"] := "{u+1e90}"  ; (Ẑ) Z with circumflex
  53 cmpCircumflex.item[" "] := "{u+02c6}"  ; (ˆ) circumflex accent (modifier)
  54
  55
  56 ; Compose :  Caron (v)
  57
  58 cmpCaron := ComObjCreate("Scripting.Dictionary")
  59 cmpCaron.item["a"] := "{u+01ce}"  ; (ǎ) a with caron
  60 cmpCaron.item["A"] := "{u+01cd}"  ; (Ǎ) A with caron
  61 cmpCaron.item["c"] := "{u+010d}"  ; (č) c with caron
  62 cmpCaron.item["C"] := "{u+010c}"  ; (Č) C with caron
  63 cmpCaron.item["d"] := "{u+010f}"  ; (ď) d with caron
  64 cmpCaron.item["D"] := "{u+010e}"  ; (Ď) D with caron
  65 cmpCaron.item["e"] := "{u+011b}"  ; (ě) e with caron
  66 cmpCaron.item["E"] := "{u+011a}"  ; (Ě) E with caron
  67 cmpCaron.item["g"] := "{u+01e7}"  ; (ǧ) g with caron
  68 cmpCaron.item["G"] := "{u+01e6}"  ; (Ǧ) G with caron
  69 cmpCaron.item["h"] := "{u+021f}"  ; (ȟ) h with caron
  70 cmpCaron.item["H"] := "{u+021e}"  ; (Ȟ) H with caron
  71 cmpCaron.item["i"] := "{u+01d0}"  ; (ǐ) i with caron
  72 cmpCaron.item["I"] := "{u+01cf}"  ; (Ǐ) I with caron
  73 cmpCaron.item["j"] := "{u+01f0}"  ; (ǰ) j with caron
  74 cmpCaron.item["k"] := "{u+01e9}"  ; (ǩ) k with caron
  75 cmpCaron.item["K"] := "{u+01e8}"  ; (Ǩ) K with caron
  76 cmpCaron.item["l"] := "{u+013e}"  ; (ľ) l with caron
  77 cmpCaron.item["L"] := "{u+013d}"  ; (Ľ) L with caron
  78 cmpCaron.item["n"] := "{u+0148}"  ; (ň) n with caron
  79 cmpCaron.item["N"] := "{u+0147}"  ; (Ň) N with caron
  80 cmpCaron.item["o"] := "{u+01d2}"  ; (ǒ) o with caron
  81 cmpCaron.item["O"] := "{u+01d1}"  ; (Ǒ) O with caron
  82 cmpCaron.item["r"] := "{u+0159}"  ; (ř) r with caron
  83 cmpCaron.item["R"] := "{u+0158}"  ; (Ř) R with caron
  84 cmpCaron.item["s"] := "{u+0161}"  ; (š) s with caron
  85 cmpCaron.item["S"] := "{u+0160}"  ; (Š) S with caron
  86 cmpCaron.item["t"] := "{u+0165}"  ; (ť) t with caron
  87 cmpCaron.item["T"] := "{u+0164}"  ; (Ť) T with caron
  88 cmpCaron.item["u"] := "{u+01d4}"  ; (ǔ) u with caron
  89 cmpCaron.item["U"] := "{u+01d3}"  ; (Ǔ) U with caron
  90 cmpCaron.item["z"] := "{u+017e}"  ; (ž) z with caron
  91 cmpCaron.item["Z"] := "{u+017d}"  ; (Ž) Z with caron
  92 cmpCaron.item["3"] := "{u+01ef}"  ; (ǯ) small letter ezh with caron
  93 cmpCaron.item["#"] := "{u+01ee}"  ; (Ǯ) capital letter ezh with caron
  94 cmpCaron.item[" "] := "{u+02c7}"  ; (ˇ) caron
  95
  96
  97 ; Compose :  Dot Above (.)
  98
  99 cmpDotAbove := ComObjCreate("Scripting.Dictionary")
 100 cmpDotAbove.item["a"] := "{u+0227}"  ; (ȧ) a with dot above
 101 cmpDotAbove.item["A"] := "{u+0226}"  ; (Ȧ) A with dot above
 102 cmpDotAbove.item["b"] := "{u+1e03}"  ; (ḃ) b with dot above
 103 cmpDotAbove.item["B"] := "{u+1e02}"  ; (Ḃ) B with dot above
 104 cmpDotAbove.item["c"] := "{u+010b}"  ; (ċ) c with dot above
 105 cmpDotAbove.item["C"] := "{u+010a}"  ; (Ċ) C with dot above
 106 cmpDotAbove.item["d"] := "{u+1e0b}"  ; (ḋ) d with dot above
 107 cmpDotAbove.item["D"] := "{u+1e0a}"  ; (Ḋ) D with dot above
 108 cmpDotAbove.item["e"] := "{u+0117}"  ; (ė) e with dot above
 109 cmpDotAbove.item["E"] := "{u+0116}"  ; (Ė) E with dot above
 110 cmpDotAbove.item["f"] := "{u+1e1f}"  ; (ḟ) f with dot above
 111 cmpDotAbove.item["F"] := "{u+1e1e}"  ; (Ḟ) F with dot above
 112 cmpDotAbove.item["g"] := "{u+0121}"  ; (ġ) g with dot above
 113 cmpDotAbove.item["G"] := "{u+0120}"  ; (Ġ) G with dot above
 114 cmpDotAbove.item["h"] := "{u+1e23}"  ; (ḣ) h with dot above
 115 cmpDotAbove.item["H"] := "{u+1e22}"  ; (Ḣ) H with dot above
 116 cmpDotAbove.item["i"] := "{u+0131}"  ; (ı) dotless i (Turkish, Azerbaijani)
 117 cmpDotAbove.item["I"] := "{u+0130}"  ; (İ) I with dot above (Turkish, Azerbaijani)
 118 cmpDotAbove.item["j"] := "{u+0237}"  ; (ȷ) dotless j
 119 cmpDotAbove.item["l"] := "{u+0140}"  ; (ŀ) l with middle dot
 120 cmpDotAbove.item["L"] := "{u+013f}"  ; (Ŀ) L with middle dot
 121 cmpDotAbove.item["m"] := "{u+1e41}"  ; (ṁ) m with dot above
 122 cmpDotAbove.item["M"] := "{u+1e40}"  ; (Ṁ) M with dot above
 123 cmpDotAbove.item["n"] := "{u+1e45}"  ; (ṅ) n with dot above
 124 cmpDotAbove.item["N"] := "{u+1e44}"  ; (Ṅ) N with dot above
 125 cmpDotAbove.item["o"] := "{u+022f}"  ; (ȯ) o with dot above
 126 cmpDotAbove.item["O"] := "{u+022e}"  ; (Ȯ) O with dot above
 127 cmpDotAbove.item["p"] := "{u+1e57}"  ; (ṗ) p with dot above
 128 cmpDotAbove.item["P"] := "{u+1e56}"  ; (Ṗ) P with dot above
 129 cmpDotAbove.item["r"] := "{u+1e59}"  ; (ṙ) r with dot above
 130 cmpDotAbove.item["R"] := "{u+1e58}"  ; (Ṙ) R with dot above
 131 cmpDotAbove.item["s"] := "{u+1e61}"  ; (ṡ) s with dot above
 132 cmpDotAbove.item["S"] := "{u+1e60}"  ; (Ṡ) S with dot above
 133 cmpDotAbove.item["t"] := "{u+1e6b}"  ; (ṫ) t with dot above
 134 cmpDotAbove.item["T"] := "{u+1e6a}"  ; (Ṫ) T with dot above
 135 cmpDotAbove.item["u"] := "{u+016f}"  ; (ů) u with ring above
 136 cmpDotAbove.item["U"] := "{u+016e}"  ; (Ů) U with ring above
 137 cmpDotAbove.item["w"] := "{u+1e87}"  ; (ẇ) w with dot above
 138 cmpDotAbove.item["W"] := "{u+1e86}"  ; (Ẇ) W with dot above
 139 cmpDotAbove.item["x"] := "{u+1e8b}"  ; (ẋ) x with dot above
 140 cmpDotAbove.item["X"] := "{u+1e8a}"  ; (Ẋ) X with dot above
 141 cmpDotAbove.item["y"] := "{u+1e8f}"  ; (ẏ) y with dot above
 142 cmpDotAbove.item["Y"] := "{u+1e8e}"  ; (Ẏ) Y with dot above
 143 cmpDotAbove.item["z"] := "{u+017c}"  ; (ż) z with dot above
 144 cmpDotAbove.item["Z"] := "{u+017b}"  ; (Ż) Z with dot above
 145
 146
 147 ; Compose :  Ring Above (o)
 148
 149 cmpRingAbove := ComObjCreate("Scripting.Dictionary")
 150 cmpRingAbove.item["a"] := "{u+00e5}"  ; (å) a with ring above
 151 cmpRingAbove.item["A"] := "{u+00c5}"  ; (Å) A with ring above
 152 cmpRingAbove.item["u"] := "{u+016f}"  ; (ů) u with ring above
 153 cmpRingAbove.item["U"] := "{u+016e}"  ; (Ů) U with ring above
 154 cmpRingAbove.item["w"] := "{u+1e98}"  ; (ẘ) w with ring above
 155 cmpRingAbove.item["y"] := "{u+1e99}"  ; (ẙ) y with ring above
 156
 157
 158 ; Compose :  Macron/Stroke (-)
 159
 160 cmpMacronStroke := ComObjCreate("Scripting.Dictionary")
 161 cmpMacronStroke.item["a"] := "{u+0101}"  ; (ā) a with macron
 162 cmpMacronStroke.item["A"] := "{u+0100}"  ; (Ā) A with macron
 163 cmpMacronStroke.item["b"] := "{u+0180}"  ; (ƀ) b with stroke
 164 cmpMacronStroke.item["B"] := "{u+0243}"  ; (Ƀ) B with stroke
 165 cmpMacronStroke.item["d"] := "{u+0111}"  ; (đ) d with stroke
 166 cmpMacronStroke.item["D"] := "{u+0110}"  ; (Đ) D with stroke
 167 cmpMacronStroke.item["e"] := "{u+0113}"  ; (ē) e with macron
 168 cmpMacronStroke.item["E"] := "{u+0112}"  ; (Ē) E with macron
 169 cmpMacronStroke.item["g"] := "{u+01e5}"  ; (ǥ) g with stroke (Skolt Sami)
 170 cmpMacronStroke.item["G"] := "{u+01e4}"  ; (Ǥ) G with stroke (Skolt Sami)
 171 cmpMacronStroke.item["h"] := "{u+0127}"  ; (ħ) h with stroke (Maltese)
 172 cmpMacronStroke.item["H"] := "{u+0126}"  ; (Ħ) H with stroke (Maltese)
 173 cmpMacronStroke.item["i"] := "{u+012b}"  ; (ī) i with macron
 174 cmpMacronStroke.item["I"] := "{u+012a}"  ; (Ī) I with macron
 175 cmpMacronStroke.item["j"] := "{u+0249}"  ; (ɉ) j with stroke
 176 cmpMacronStroke.item["J"] := "{u+0248}"  ; (Ɉ) J with stroke
 177 cmpMacronStroke.item["l"] := "{u+0142}"  ; (ł) l with stroke
 178 cmpMacronStroke.item["L"] := "{u+0141}"  ; (Ł) L with stroke
 179 cmpMacronStroke.item["o"] := "{u+014d}"  ; (ō) o with macron
 180 cmpMacronStroke.item["O"] := "{u+014c}"  ; (Ō) O with macron
 181 cmpMacronStroke.item["p"] := "{u+1d7d}"  ; (ᵽ) p with stroke
 182 cmpMacronStroke.item["P"] := "{u+2c63}"  ; (Ᵽ) P with stroke
 183 cmpMacronStroke.item["q"] := "{u+01ed}"  ; (ǭ) o with ogonek and macron
 184 cmpMacronStroke.item["Q"] := "{u+01ec}"  ; (Ǭ) O with ogonek and macron
 185 cmpMacronStroke.item["r"] := "{u+024d}"  ; (ɍ) r with stroke
 186 cmpMacronStroke.item["R"] := "{u+024c}"  ; (Ɍ) R with stroke
 187 cmpMacronStroke.item["t"] := "{u+0167}"  ; (ŧ) t with stroke
 188 cmpMacronStroke.item["T"] := "{u+0166}"  ; (Ŧ) T with stroke
 189 cmpMacronStroke.item["u"] := "{u+016b}"  ; (ū) u with macron
 190 cmpMacronStroke.item["U"] := "{u+016a}"  ; (Ū) U with macron
 191 cmpMacronStroke.item["y"] := "{u+0233}"  ; (ȳ) y with macron
 192 cmpMacronStroke.item["Y"] := "{u+0232}"  ; (Ȳ) Y with macron
 193 cmpMacronStroke.item["z"] := "{u+01b6}"  ; (ƶ) z with stroke
 194 cmpMacronStroke.item["Z"] := "{u+01b5}"  ; (Ƶ) Z with stroke
 195 cmpMacronStroke.item[" "] := "{u+00af}"  ; (¯) macron
 196
 197
 198 ; Compose :  Macron/Stroke (Additional) (_)
 199
 200 cmpMacronStrokeAdd := ComObjCreate("Scripting.Dictionary")
 201 cmpMacronStrokeAdd.item["g"] := "{u+1e21}"  ; (ḡ) g with macron
 202 cmpMacronStrokeAdd.item["G"] := "{u+1e20}"  ; (Ḡ) G with macron
 203 cmpMacronStrokeAdd.item["i"] := "{u+0268}"  ; (ɨ) i with stroke
 204 cmpMacronStrokeAdd.item["I"] := "{u+0197}"  ; (Ɨ) I with stroke
 205 cmpMacronStrokeAdd.item["l"] := "{u+019a}"  ; (ƚ) l with bar
 206 cmpMacronStrokeAdd.item["L"] := "{u+023d}"  ; (Ƚ) L with bar
 207 cmpMacronStrokeAdd.item["u"] := "{u+0289}"  ; (ʉ) u with bar
 208 cmpMacronStrokeAdd.item["U"] := "{u+0244}"  ; (Ʉ) U with bar
 209 cmpMacronStrokeAdd.item["y"] := "{u+024f}"  ; (ɏ) y with stroke
 210 cmpMacronStrokeAdd.item["Y"] := "{u+024e}"  ; (Ɏ) Y with stroke
 211
 212
 213 ; Compose :  Oblique/Diagonal Stroke (/)
 214
 215 cmpStroke := ComObjCreate("Scripting.Dictionary")
 216 cmpStroke.item["a"] := "{u+2c65}"  ; (ⱥ) a with stroke
 217 cmpStroke.item["A"] := "{u+023a}"  ; (Ⱥ) A with stroke
 218 cmpStroke.item["c"] := "{u+023c}"  ; (ȼ) c with stroke
 219 cmpStroke.item["C"] := "{u+023b}"  ; (Ȼ) C with stroke
 220 cmpStroke.item["e"] := "{u+0247}"  ; (ɇ) e with stroke
 221 cmpStroke.item["E"] := "{u+0246}"  ; (Ɇ) E with stroke
 222 cmpStroke.item["f"] := "{u+1e9c}"  ; (ẜ) long s with diagonal stroke
 223 cmpStroke.item["g"] := "{u+a7a1}"  ; (ꞡ) g with oblique stroke
 224 cmpStroke.item["G"] := "{u+a7a0}"  ; (Ꞡ) G with oblique stroke
 225 cmpStroke.item["k"] := "{u+a7a3}"  ; (ꞣ) k with oblique stroke
 226 cmpStroke.item["K"] := "{u+a7a2}"  ; (Ꞣ) K with oblique stroke
 227 cmpStroke.item["l"] := "{u+0142}"  ; (ł) l with stroke
 228 cmpStroke.item["L"] := "{u+0141}"  ; (Ł) L with stroke
 229 cmpStroke.item["n"] := "{u+a7a5}"  ; (ꞥ) n with oblique stroke
 230 cmpStroke.item["N"] := "{u+a7a4}"  ; (Ꞥ) N with oblique stroke
 231 cmpStroke.item["o"] := "{u+00f8}"  ; (ø) o with stroke
 232 cmpStroke.item["O"] := "{u+00d8}"  ; (Ø) O with stroke
 233 cmpStroke.item["r"] := "{u+a7a7}"  ; (ꞧ) r with oblique stroke
 234 cmpStroke.item["R"] := "{u+a7a6}"  ; (Ꞧ) R with oblique stroke
 235 cmpStroke.item["s"] := "{u+a7a9}"  ; (ꞩ) s with oblique stroke
 236 cmpStroke.item["S"] := "{u+a7a8}"  ; (Ꞩ) S with oblique stroke
 237 cmpStroke.item["t"] := "{u+2c66}"  ; (ⱦ) t with stroke
 238 cmpStroke.item["T"] := "{u+023e}"  ; (Ⱦ) T with stroke
 239
 240
 241 ; Compose :  Cedilla/Ogonek (,)
 242
 243 cmpCedillaOgonek := ComObjCreate("Scripting.Dictionary")
 244 cmpCedillaOgonek.item["a"] := "{u+0105}"  ; (ą) a with ogonek
 245 cmpCedillaOgonek.item["A"] := "{u+0104}"  ; (Ą) A with ogonek
 246 cmpCedillaOgonek.item["c"] := "{u+00e7}"  ; (ç) c with cedilla
 247 cmpCedillaOgonek.item["C"] := "{u+00c7}"  ; (Ç) C with cedilla
 248 cmpCedillaOgonek.item["d"] := "{u+1e11}"  ; (ḑ) d with cedilla
 249 cmpCedillaOgonek.item["D"] := "{u+1e10}"  ; (Ḑ) D with cedilla
 250 cmpCedillaOgonek.item["e"] := "{u+0119}"  ; (ę) e with ogonek
 251 cmpCedillaOgonek.item["E"] := "{u+0118}"  ; (Ę) E with ogonek
 252 cmpCedillaOgonek.item["f"] := "{u+0229}"  ; (ȩ) e with cedilla
 253 cmpCedillaOgonek.item["F"] := "{u+0228}"  ; (Ȩ) E with cedilla
 254 cmpCedillaOgonek.item["g"] := "{u+0123}"  ; (ģ) g with cedilla
 255 cmpCedillaOgonek.item["G"] := "{u+0122}"  ; (Ģ) G with cedilla
 256 cmpCedillaOgonek.item["h"] := "{u+1e29}"  ; (ḩ) h with cedilla
 257 cmpCedillaOgonek.item["H"] := "{u+1e28}"  ; (Ḩ) H with cedilla
 258 cmpCedillaOgonek.item["i"] := "{u+012f}"  ; (į) i with ogonek
 259 cmpCedillaOgonek.item["I"] := "{u+012e}"  ; (Į) I with ogonek
 260 cmpCedillaOgonek.item["k"] := "{u+0137}"  ; (ķ) k with cedilla
 261 cmpCedillaOgonek.item["K"] := "{u+0136}"  ; (Ķ) K with cedilla
 262 cmpCedillaOgonek.item["l"] := "{u+013c}"  ; (ļ) l with cedilla
 263 cmpCedillaOgonek.item["L"] := "{u+013b}"  ; (Ļ) L with cedilla
 264 cmpCedillaOgonek.item["n"] := "{u+0146}"  ; (ņ) n with cedilla
 265 cmpCedillaOgonek.item["N"] := "{u+0145}"  ; (Ņ) N with cedilla
 266 cmpCedillaOgonek.item["o"] := "{u+01eb}"  ; (ǫ) o with ogonek
 267 cmpCedillaOgonek.item["O"] := "{u+01ea}"  ; (Ǫ) O with ogonek
 268 cmpCedillaOgonek.item["r"] := "{u+0157}"  ; (ŗ) r with cedilla
 269 cmpCedillaOgonek.item["R"] := "{u+0156}"  ; (Ŗ) R with cedilla
 270 cmpCedillaOgonek.item["s"] := "{u+015f}"  ; (ş) s with cedilla
 271 cmpCedillaOgonek.item["S"] := "{u+015e}"  ; (Ş) S with cedilla
 272 cmpCedillaOgonek.item["t"] := "{u+0163}"  ; (ţ) t with cedilla
 273 cmpCedillaOgonek.item["T"] := "{u+0162}"  ; (Ţ) T with cedilla
 274 cmpCedillaOgonek.item["u"] := "{u+0173}"  ; (ų) u with ogonek
 275 cmpCedillaOgonek.item["U"] := "{u+0172}"  ; (Ų) U with ogonek
 276 cmpCedillaOgonek.item["."] := "{u+02db}"  ; (˛) ogonek
 277 cmpCedillaOgonek.item[" "] := "{u+00b8}"  ; (¸) cedilla
 278
 279
 280 ; Compose :  Breve and Special Letters (b)
 281
 282 cmpBreveSpecial := ComObjCreate("Scripting.Dictionary")
 283 cmpBreveSpecial.item["a"] := "{u+0103}"  ; (ă) a with breve
 284 cmpBreveSpecial.item["A"] := "{u+0102}"  ; (Ă) A with breve
 285 cmpBreveSpecial.item["d"] := "{u+0256}"  ; (ɖ) small letter d with tail
 286 cmpBreveSpecial.item["D"] := "{u+0189}"  ; (Ɖ) capital letter African D
 287 cmpBreveSpecial.item["e"] := "{u+0115}"  ; (ĕ) e with breve
 288 cmpBreveSpecial.item["E"] := "{u+0114}"  ; (Ĕ) E with breve
 289 cmpBreveSpecial.item["f"] := "{u+0259}"  ; (ə) small letter schwa (Azerbaijani)
 290 cmpBreveSpecial.item["F"] := "{u+018f}"  ; (Ə) capital letter schwa (Azerbaijani)
 291 cmpBreveSpecial.item["g"] := "{u+011f}"  ; (ğ) g with breve
 292 cmpBreveSpecial.item["G"] := "{u+011e}"  ; (Ğ) G with breve
 293 cmpBreveSpecial.item["i"] := "{u+012d}"  ; (ĭ) i with breve
 294 cmpBreveSpecial.item["I"] := "{u+012c}"  ; (Ĭ) I with breve
 295 cmpBreveSpecial.item["o"] := "{u+014f}"  ; (ŏ) o with breve
 296 cmpBreveSpecial.item["O"] := "{u+014e}"  ; (Ŏ) O with breve
 297 cmpBreveSpecial.item["s"] := "{u+0219}"  ; (ș) s with comma below (Romanian)
 298 cmpBreveSpecial.item["S"] := "{u+0218}"  ; (Ș) S with comma below (Romanian)
 299 cmpBreveSpecial.item["t"] := "{u+021b}"  ; (ț) t with comma below (Romanian)
 300 cmpBreveSpecial.item["T"] := "{u+021a}"  ; (Ț) T with comma below (Romanian)
 301 cmpBreveSpecial.item["u"] := "{u+016d}"  ; (ŭ) u with breve
 302 cmpBreveSpecial.item["U"] := "{u+016c}"  ; (Ŭ) U with breve
 303 cmpBreveSpecial.item["w"] := "{u+01bf}"  ; (ƿ) small letter wynn
 304 cmpBreveSpecial.item["W"] := "{u+01f7}"  ; (Ƿ) capital letter wynn
 305 cmpBreveSpecial.item["y"] := "{u+021d}"  ; (ȝ) small letter yogh
 306 cmpBreveSpecial.item["Y"] := "{u+021c}"  ; (Ȝ) capital letter yogh
 307 cmpBreveSpecial.item["3"] := "{u+0292}"  ; (ʒ) small letter ezh
 308 cmpBreveSpecial.item["#"] := "{u+01b7}"  ; (Ʒ) capital letter ezh
 309 cmpBreveSpecial.item[" "] := "{u+02d8}"  ; (˘) breve
 310
 311
 312 ; Compose :  Inverted Breve (B)
 313
 314 cmpInvertedBreve := ComObjCreate("Scripting.Dictionary")
 315 cmpInvertedBreve.item["a"] := "{u+0203}"  ; (ȃ) a with inverted breve
 316 cmpInvertedBreve.item["A"] := "{u+0202}"  ; (Ȃ) A with inverted breve
 317 cmpInvertedBreve.item["e"] := "{u+0207}"  ; (ȇ) e with inverted breve
 318 cmpInvertedBreve.item["E"] := "{u+0206}"  ; (Ȇ) E with inverted breve
 319 cmpInvertedBreve.item["i"] := "{u+020b}"  ; (ȋ) i with inverted breve
 320 cmpInvertedBreve.item["I"] := "{u+020a}"  ; (Ȋ) I with inverted breve
 321 cmpInvertedBreve.item["o"] := "{u+020f}"  ; (ȏ) o with inverted breve
 322 cmpInvertedBreve.item["O"] := "{u+020e}"  ; (Ȏ) O with inverted breve
 323 cmpInvertedBreve.item["r"] := "{u+0213}"  ; (ȓ) r with inverted breve
 324 cmpInvertedBreve.item["R"] := "{u+0212}"  ; (Ȓ) R with inverted breve
 325 cmpInvertedBreve.item["u"] := "{u+0217}"  ; (ȗ) u with inverted breve
 326 cmpInvertedBreve.item["U"] := "{u+0216}"  ; (Ȗ) U with inverted breve
 327
 328
 329 ; Compose :  Acute Accent (')
 330
 331 cmpAcuteAccent := ComObjCreate("Scripting.Dictionary")
 332 cmpAcuteAccent.item["a"] := "{u+00e1}"  ; (á) a with acute
 333 cmpAcuteAccent.item["A"] := "{u+00c1}"  ; (Á) A with acute
 334 cmpAcuteAccent.item["c"] := "{u+0107}"  ; (ć) c with acute
 335 cmpAcuteAccent.item["C"] := "{u+0106}"  ; (Ć) C with acute
 336 cmpAcuteAccent.item["e"] := "{u+00e9}"  ; (é) e with acute
 337 cmpAcuteAccent.item["E"] := "{u+00c9}"  ; (É) E with acute
 338 cmpAcuteAccent.item["g"] := "{u+01f5}"  ; (ǵ) g with acute
 339 cmpAcuteAccent.item["G"] := "{u+01f4}"  ; (Ǵ) G with acute
 340 cmpAcuteAccent.item["i"] := "{u+00ed}"  ; (í) i with acute
 341 cmpAcuteAccent.item["I"] := "{u+00cd}"  ; (Í) I with acute
 342 cmpAcuteAccent.item["k"] := "{u+1e31}"  ; (ḱ) k with acute
 343 cmpAcuteAccent.item["K"] := "{u+1e30}"  ; (Ḱ) K with acute
 344 cmpAcuteAccent.item["l"] := "{u+013a}"  ; (ĺ) l with acute
 345 cmpAcuteAccent.item["L"] := "{u+0139}"  ; (Ĺ) L with acute
 346 cmpAcuteAccent.item["m"] := "{u+1e3f}"  ; (ḿ) m with acute
 347 cmpAcuteAccent.item["M"] := "{u+1e3e}"  ; (Ḿ) M with acute
 348 cmpAcuteAccent.item["n"] := "{u+0144}"  ; (ń) n with acute
 349 cmpAcuteAccent.item["N"] := "{u+0143}"  ; (Ń) N with acute
 350 cmpAcuteAccent.item["o"] := "{u+00f3}"  ; (ó) o with acute
 351 cmpAcuteAccent.item["O"] := "{u+00d3}"  ; (Ó) O with acute
 352 cmpAcuteAccent.item["p"] := "{u+1e55}"  ; (ṕ) p with acute
 353 cmpAcuteAccent.item["P"] := "{u+1e54}"  ; (Ṕ) P with acute
 354 cmpAcuteAccent.item["r"] := "{u+0155}"  ; (ŕ) r with acute
 355 cmpAcuteAccent.item["R"] := "{u+0154}"  ; (Ŕ) R with acute
 356 cmpAcuteAccent.item["s"] := "{u+015b}"  ; (ś) s with acute
 357 cmpAcuteAccent.item["S"] := "{u+015a}"  ; (Ś) S with acute
 358 cmpAcuteAccent.item["u"] := "{u+00fa}"  ; (ú) u with acute
 359 cmpAcuteAccent.item["U"] := "{u+00da}"  ; (Ú) U with acute
 360 cmpAcuteAccent.item["w"] := "{u+1e83}"  ; (ẃ) w with acute
 361 cmpAcuteAccent.item["W"] := "{u+1e82}"  ; (Ẃ) W with acute
 362 cmpAcuteAccent.item["y"] := "{u+00fd}"  ; (ý) y with acute
 363 cmpAcuteAccent.item["Y"] := "{u+00dd}"  ; (Ý) Y with acute
 364 cmpAcuteAccent.item["z"] := "{u+017a}"  ; (ź) z with acute
 365 cmpAcuteAccent.item["Z"] := "{u+0179}"  ; (Ź) Z with acute
 366 cmpAcuteAccent.item[" "] := "{u+00b4}"  ; (´) acute accent
 367
 368
 369 ; Compose :  Diaeresis (")
 370
 371 cmpDiaeresis := ComObjCreate("Scripting.Dictionary")
 372 cmpDiaeresis.item["a"] := "{u+00e4}"  ; (ä) a with diaeresis
 373 cmpDiaeresis.item["A"] := "{u+00c4}"  ; (Ä) A with diaeresis
 374 cmpDiaeresis.item["e"] := "{u+00eb}"  ; (ë) e with diaeresis
 375 cmpDiaeresis.item["E"] := "{u+00cb}"  ; (Ë) E with diaeresis
 376 cmpDiaeresis.item["h"] := "{u+1e27}"  ; (ḧ) h with diaeresis
 377 cmpDiaeresis.item["H"] := "{u+1e26}"  ; (Ḧ) H with diaeresis
 378 cmpDiaeresis.item["i"] := "{u+00ef}"  ; (ï) i with diaeresis
 379 cmpDiaeresis.item["I"] := "{u+00cf}"  ; (Ï) I with diaeresis
 380 cmpDiaeresis.item["o"] := "{u+00f6}"  ; (ö) o with diaeresis
 381 cmpDiaeresis.item["O"] := "{u+00d6}"  ; (Ö) O with diaeresis
 382 cmpDiaeresis.item["t"] := "{u+1e97}"  ; (ẗ) t with diaeresis
 383 cmpDiaeresis.item["u"] := "{u+00fc}"  ; (ü) u with diaeresis
 384 cmpDiaeresis.item["U"] := "{u+00dc}"  ; (Ü) U with diaeresis
 385 cmpDiaeresis.item["w"] := "{u+1e85}"  ; (ẅ) w with diaeresis
 386 cmpDiaeresis.item["W"] := "{u+1e84}"  ; (Ẅ) W with diaeresis
 387 cmpDiaeresis.item["x"] := "{u+1e8d}"  ; (ẍ) x with diaeresis
 388 cmpDiaeresis.item["X"] := "{u+1e8c}"  ; (Ẍ) X with diaeresis
 389 cmpDiaeresis.item["y"] := "{u+00ff}"  ; (ÿ) y with diaeresis
 390 cmpDiaeresis.item["Y"] := "{u+0178}"  ; (Ÿ) Y with diaeresis
 391 cmpDiaeresis.item[" "] := "{u+00a8}"  ; (¨) diaeresis
 392
 393
 394 ; Compose :  Double Acute Accent (=)
 395
 396 cmpDoubleAcute := ComObjCreate("Scripting.Dictionary")
 397 cmpDoubleAcute.item["o"] := "{u+0151}"  ; (ő) o with double acute
 398 cmpDoubleAcute.item["O"] := "{u+0150}"  ; (Ő) O with double acute
 399 cmpDoubleAcute.item["u"] := "{u+0171}"  ; (ű) u with double acute
 400 cmpDoubleAcute.item["U"] := "{u+0170}"  ; (Ű) U with double acute
 401 cmpDoubleAcute.item[" "] := "{u+02dd}"  ; (˝) double acute accent
 402
 403
 404 ; Compose :  Grave Accent (`)
 405
 406 cmpGraveAccent := ComObjCreate("Scripting.Dictionary")
 407 cmpGraveAccent.item["a"] := "{u+00e0}"  ; (à) a with grave
 408 cmpGraveAccent.item["A"] := "{u+00c0}"  ; (À) A with grave
 409 cmpGraveAccent.item["e"] := "{u+00e8}"  ; (è) e with grave
 410 cmpGraveAccent.item["E"] := "{u+00c8}"  ; (È) E with grave
 411 cmpGraveAccent.item["i"] := "{u+00ec}"  ; (ì) i with grave
 412 cmpGraveAccent.item["I"] := "{u+00cc}"  ; (Ì) I with grave
 413 cmpGraveAccent.item["n"] := "{u+01f9}"  ; (ǹ) n with grave
 414 cmpGraveAccent.item["N"] := "{u+01f8}"  ; (Ǹ) N with grave
 415 cmpGraveAccent.item["o"] := "{u+00f2}"  ; (ò) o with grave
 416 cmpGraveAccent.item["O"] := "{u+00d2}"  ; (Ò) O with grave
 417 cmpGraveAccent.item["u"] := "{u+00f9}"  ; (ù) u with grave
 418 cmpGraveAccent.item["U"] := "{u+00d9}"  ; (Ù) U with grave
 419 cmpGraveAccent.item["w"] := "{u+1e81}"  ; (ẁ) w with grave
 420 cmpGraveAccent.item["W"] := "{u+1e80}"  ; (Ẁ) W with grave
 421 cmpGraveAccent.item["y"] := "{u+1ef3}"  ; (ỳ) y with grave
 422 cmpGraveAccent.item["Y"] := "{u+1ef2}"  ; (Ỳ) Y with grave
 423 cmpGraveAccent.item[" "] := "{u+02cb}"  ; (ˋ) grave accent (modifier)
 424
 425
 426 ; Compose :  Double Grave Accent (G)
 427
 428 cmpDoubleGrave := ComObjCreate("Scripting.Dictionary")
 429 cmpDoubleGrave.item["a"] := "{u+0201}"  ; (ȁ) a with double grave
 430 cmpDoubleGrave.item["A"] := "{u+0200}"  ; (Ȁ) A with double grave
 431 cmpDoubleGrave.item["e"] := "{u+0205}"  ; (ȅ) e with double grave
 432 cmpDoubleGrave.item["E"] := "{u+0204}"  ; (Ȅ) E with double grave
 433 cmpDoubleGrave.item["i"] := "{u+0209}"  ; (ȉ) i with double grave
 434 cmpDoubleGrave.item["I"] := "{u+0208}"  ; (Ȉ) I with double grave
 435 cmpDoubleGrave.item["o"] := "{u+020d}"  ; (ȍ) o with double grave
 436 cmpDoubleGrave.item["O"] := "{u+020c}"  ; (Ȍ) O with double grave
 437 cmpDoubleGrave.item["r"] := "{u+0211}"  ; (ȑ) r with double grave
 438 cmpDoubleGrave.item["R"] := "{u+0210}"  ; (Ȑ) R with double grave
 439 cmpDoubleGrave.item["u"] := "{u+0215}"  ; (ȕ) u with double grave
 440 cmpDoubleGrave.item["U"] := "{u+0214}"  ; (Ȕ) U with double grave
 441
 442
 443 ; Compose :  Tilde (~)
 444
 445 cmpTilde := ComObjCreate("Scripting.Dictionary")
 446 cmpTilde.item["a"] := "{u+00e3}"  ; (ã) a with tilde
 447 cmpTilde.item["A"] := "{u+00c3}"  ; (Ã) A with tilde
 448 cmpTilde.item["e"] := "{u+1ebd}"  ; (ẽ) e with tilde
 449 cmpTilde.item["E"] := "{u+1ebc}"  ; (Ẽ) E with tilde
 450 cmpTilde.item["i"] := "{u+0129}"  ; (ĩ) i with tilde
 451 cmpTilde.item["I"] := "{u+0128}"  ; (Ĩ) I with tilde
 452 cmpTilde.item["l"] := "{u+026b}"  ; (ɫ) l with middle tilde
 453 cmpTilde.item["L"] := "{u+2c62}"  ; (Ɫ) L with middle tilde
 454 cmpTilde.item["n"] := "{u+00f1}"  ; (ñ) n with tilde
 455 cmpTilde.item["N"] := "{u+00d1}"  ; (Ñ) N with tilde
 456 cmpTilde.item["o"] := "{u+00f5}"  ; (õ) o with tilde
 457 cmpTilde.item["O"] := "{u+00d5}"  ; (Õ) O with tilde
 458 cmpTilde.item["u"] := "{u+0169}"  ; (ũ) u with tilde
 459 cmpTilde.item["U"] := "{u+0168}"  ; (Ũ) U with tilde
 460 cmpTilde.item["v"] := "{u+1e7d}"  ; (ṽ) v with tilde
 461 cmpTilde.item["V"] := "{u+1e7c}"  ; (Ṽ) V with tilde
 462 cmpTilde.item["y"] := "{u+1ef9}"  ; (ỹ) y with tilde
 463 cmpTilde.item["Y"] := "{u+1ef8}"  ; (Ỹ) Y with tilde
 464 cmpTilde.item[" "] := "{u+02dc}"  ; (˜) small tilde
 465
 466
 467 ; Compose :  Hook and Horn (h)
 468
 469 cmpHook := ComObjCreate("Scripting.Dictionary")
 470 cmpHook.item["b"] := "{u+0253}"  ; (ɓ) b with hook
 471 cmpHook.item["B"] := "{u+0181}"  ; (Ɓ) B with hook
 472 cmpHook.item["c"] := "{u+0188}"  ; (ƈ) c with hook
 473 cmpHook.item["C"] := "{u+0187}"  ; (Ƈ) C with hook
 474 cmpHook.item["d"] := "{u+0257}"  ; (ɗ) d with hook
 475 cmpHook.item["D"] := "{u+018a}"  ; (Ɗ) D with hook
 476 cmpHook.item["f"] := "{u+0192}"  ; (ƒ) f with hook
 477 cmpHook.item["F"] := "{u+0191}"  ; (Ƒ) F with hook
 478 cmpHook.item["g"] := "{u+0260}"  ; (ɠ) g with hook
 479 cmpHook.item["G"] := "{u+0193}"  ; (Ɠ) G with hook
 480 cmpHook.item["h"] := "{u+0266}"  ; (ɦ) h with hook
 481 cmpHook.item["H"] := "{u+a7aa}"  ; (Ɦ) H with hook
 482 cmpHook.item["j"] := "{u+0267}"  ; (ɧ) small letter heng with hook
 483 cmpHook.item["k"] := "{u+0199}"  ; (ƙ) k with hook
 484 cmpHook.item["K"] := "{u+0198}"  ; (Ƙ) K with hook
 485 cmpHook.item["m"] := "{u+0271}"  ; (ɱ) m with hook
 486 cmpHook.item["M"] := "{u+2c6e}"  ; (Ɱ) M with hook
 487 cmpHook.item["n"] := "{u+0272}"  ; (ɲ) n with left hook
 488 cmpHook.item["N"] := "{u+019d}"  ; (Ɲ) N with left hook
 489 cmpHook.item["o"] := "{u+01a1}"  ; (ơ) o with horn
 490 cmpHook.item["O"] := "{u+01a0}"  ; (Ơ) O with horn
 491 cmpHook.item["p"] := "{u+01a5}"  ; (ƥ) p with hook
 492 cmpHook.item["P"] := "{u+01a4}"  ; (Ƥ) P with hook
 493 cmpHook.item["q"] := "{u+024b}"  ; (ɋ) q with hook tail
 494 cmpHook.item["Q"] := "{u+024a}"  ; (Ɋ) Q with hook tail
 495 cmpHook.item["r"] := "{u+027d}"  ; (ɽ) r with tail
 496 cmpHook.item["R"] := "{u+2c64}"  ; (Ɽ) R with tail
 497 cmpHook.item["t"] := "{u+01ad}"  ; (ƭ) t with hook
 498 cmpHook.item["T"] := "{u+01ac}"  ; (Ƭ) T with hook
 499 cmpHook.item["u"] := "{u+01b0}"  ; (ư) u with horn
 500 cmpHook.item["U"] := "{u+01af}"  ; (Ư) U with horn
 501 cmpHook.item["v"] := "{u+028b}"  ; (ʋ) v with hook
 502 cmpHook.item["V"] := "{u+01b2}"  ; (Ʋ) V with hook
 503 cmpHook.item["w"] := "{u+2c73}"  ; (ⱳ) w with hook
 504 cmpHook.item["W"] := "{u+2c72}"  ; (Ⱳ) W with hook
 505 cmpHook.item["y"] := "{u+01b4}"  ; (ƴ) y with hook
 506 cmpHook.item["Y"] := "{u+01b3}"  ; (Ƴ) Y with hook
 507 cmpHook.item["z"] := "{u+0225}"  ; (ȥ) z with hook
 508 cmpHook.item["Z"] := "{u+0224}"  ; (Ȥ) Z with hook
 509
 510
 511 ; Compose :  Latin Greek Letters and Variations (l)
 512
 513 cmpLatinGreek := ComObjCreate("Scripting.Dictionary")
 514 cmpLatinGreek.item["a"] := "{u+0251}"  ; (ɑ) Latin small letter alpha
 515 cmpLatinGreek.item["A"] := "{u+2c6d}"  ; (Ɑ) Latin capital letter alpha
 516 cmpLatinGreek.item["c"] := "{u+ab36}"  ; (ꬶ) small letter script g with crossed-tail
 517 cmpLatinGreek.item["e"] := "{u+025b}"  ; (ɛ) small letter open e (Latin small epsilon)
 518 cmpLatinGreek.item["E"] := "{u+0190}"  ; (Ɛ) capital letter open E (Latin capital epsilon)
 519 cmpLatinGreek.item["f"] := "{u+017f}"  ; (ſ) small letter long s
 520 cmpLatinGreek.item["F"] := "{u+1e9b}"  ; (ẛ) long s with dot above
 521 cmpLatinGreek.item["g"] := "{u+0263}"  ; (ɣ) Latin small letter gamma
 522 cmpLatinGreek.item["G"] := "{u+0194}"  ; (Ɣ) Latin capital letter gamma
 523 cmpLatinGreek.item["h"] := "{u+a727}"  ; (ꜧ) small letter heng
 524 cmpLatinGreek.item["H"] := "{u+a726}"  ; (Ꜧ) capital letter heng
 525 cmpLatinGreek.item["i"] := "{u+0269}"  ; (ɩ) Latin small letter iota
 526 cmpLatinGreek.item["I"] := "{u+0196}"  ; (Ɩ) Latin capital letter iota
 527 cmpLatinGreek.item["k"] := "{u+0138}"  ; (ĸ) small letter kra
 528 cmpLatinGreek.item["o"] := "{u+0254}"  ; (ɔ) small letter open o
 529 cmpLatinGreek.item["O"] := "{u+0186}"  ; (Ɔ) capital letter open O
 530 cmpLatinGreek.item["s"] := "{u+0283}"  ; (ʃ) small letter esh
 531 cmpLatinGreek.item["S"] := "{u+01a9}"  ; (Ʃ) capital letter esh
 532 cmpLatinGreek.item["u"] := "{u+028a}"  ; (ʊ) Latin small letter upsilon
 533 cmpLatinGreek.item["U"] := "{u+01b1}"  ; (Ʊ) Latin capital letter upsilon
 534
 535
 536 ; Compose :  Turned Letters (t)
 537
 538 cmpTurned := ComObjCreate("Scripting.Dictionary")
 539 cmpTurned.item["a"] := "{u+0250}"  ; (ɐ) Latin small letter turned a
 540 cmpTurned.item["A"] := "{u+2c6f}"  ; (Ɐ) Latin capital letter turned A
 541 cmpTurned.item["e"] := "{u+01dd}"  ; (ǝ) Latin small letter turned e
 542 cmpTurned.item["E"] := "{u+018e}"  ; (Ǝ) Latin capital letter reversed E
 543 cmpTurned.item["q"] := "{u+0252}"  ; (ɒ) Latin small letter turned alpha
 544 cmpTurned.item["Q"] := "{u+2c70}"  ; (Ɒ) Latin capital letter turned alpha
 545 cmpTurned.item["v"] := "{u+028c}"  ; (ʌ) Latin small letter turned v
 546 cmpTurned.item["V"] := "{u+0245}"  ; (Ʌ) Latin capital letter turned V
 547 cmpTurned.item["y"] := "{u+028e}"  ; (ʎ) Latin small letter turned y
 548
 549
 550 ; Compose :  Currency Symbols ($)
 551
 552 cmpCurrency := ComObjCreate("Scripting.Dictionary")
 553 cmpCurrency.item["a"] := "{u+058f}"  ; (֏) Armenian dram
 554 cmpCurrency.item["A"] := "{u+20b3}"  ; (₳) Argentine austral
 555 cmpCurrency.item["b"] := "{u+20bf}"  ; (₿) bitcoin
 556 cmpCurrency.item["B"] := "{u+0e3f}"  ; (฿) Thai baht
 557 cmpCurrency.item["c"] := "{u+20a1}"  ; (₡) Costa Rican colón
 558 cmpCurrency.item["C"] := "{u+20b5}"  ; (₵) Ghanaian cedi
 559 cmpCurrency.item["d"] := "{u+20ab}"  ; (₫) Vietnamese dong
 560 cmpCurrency.item["D"] := "{u+20af}"  ; (₯) Greek drachma
 561 cmpCurrency.item["e"] := "{u+20ac}"  ; (€) euro sign
 562 cmpCurrency.item["E"] := "{u+20a0}"  ; (₠) euro-currency sign
 563 cmpCurrency.item["f"] := "{u+20a3}"  ; (₣) French franc
 564 cmpCurrency.item["F"] := "{u+20a3}"  ; (₣) French franc
 565 cmpCurrency.item["g"] := "{u+20b2}"  ; (₲) Paraguayan guaraní
 566 cmpCurrency.item["G"] := "{u+20be}"  ; (₾) Georgian lari
 567 cmpCurrency.item["h"] := "{u+20b4}"  ; (₴) Ukrainian hryvnia
 568 cmpCurrency.item["H"] := "{u+20b4}"  ; (₴) Ukrainian hryvnia
 569 cmpCurrency.item["i"] := "{u+20a4}"  ; (₤) lira
 570 cmpCurrency.item["I"] := "{u+20b6}"  ; (₶) livre tournois
 571 cmpCurrency.item["k"] := "{u+20ad}"  ; (₭) Laotian kip
 572 cmpCurrency.item["K"] := "{u+20ad}"  ; (₭) Laotian kip
 573 cmpCurrency.item["l"] := "{u+20ba}"  ; (₺) Turkish lira
 574 cmpCurrency.item["L"] := "{u+00a3}"  ; (£) pound sign
 575 cmpCurrency.item["m"] := "{u+20bc}"  ; (₼) Azerbaijani manat
 576 cmpCurrency.item["M"] := "{u+20a5}"  ; (₥) mill sign
 577 cmpCurrency.item["n"] := "{u+20a6}"  ; (₦) Nigerian naira
 578 cmpCurrency.item["N"] := "{u+20bb}"  ; (₻) Nordic mark
 579 cmpCurrency.item["o"] := "{u+00a2}"  ; (¢) cent sign (dollar)
 580 cmpCurrency.item["p"] := "{u+20b1}"  ; (₱) Philippine peso
 581 cmpCurrency.item["P"] := "{u+20a7}"  ; (₧) Spanish pesetas
 582 cmpCurrency.item["r"] := "{u+20b9}"  ; (₹) Indian rupee
 583 cmpCurrency.item["R"] := "{u+20bd}"  ; (₽) Russian ruble
 584 cmpCurrency.item["s"] := "{u+20aa}"  ; (₪) Israeli new shekel
 585 cmpCurrency.item["S"] := "{u+20b7}"  ; (₷) spesmilo
 586 cmpCurrency.item["t"] := "{u+20ae}"  ; (₮) Mongolian tögrög (tugrik)
 587 cmpCurrency.item["T"] := "{u+20b8}"  ; (₸) Kazakh tenge
 588 cmpCurrency.item["u"] := "{u+20a8}"  ; (₨) rupee sign
 589 cmpCurrency.item["U"] := "{u+20a2}"  ; (₢) Brazilian cruzeiro
 590 cmpCurrency.item["w"] := "{u+20a9}"  ; (₩) South Korean won
 591 cmpCurrency.item["W"] := "{u+20a9}"  ; (₩) South Korean won
 592 cmpCurrency.item["x"] := "{u+00a4}"  ; (¤) currency sign
 593 cmpCurrency.item["y"] := "{u+00a5}"  ; (¥) yen sign
 594 cmpCurrency.item["Y"] := "{u+00a5}"  ; (¥) yen sign
 595 cmpCurrency.item[" "] := "{u+00a4}"  ; (¤) currency sign
 596
 597
 598 ; Compose :  Greek Alphabet (g)
 599
 600 cmpGreek := ComObjCreate("Scripting.Dictionary")
 601 cmpGreek.item["a"] := "{u+03b1}"  ; (α) Greek small alpha
 602 cmpGreek.item["A"] := "{u+0391}"  ; (Α) Greek capital alpha
 603 cmpGreek.item["b"] := "{u+03b2}"  ; (β) Greek small beta
 604 cmpGreek.item["B"] := "{u+0392}"  ; (Β) Greek capital beta
 605 cmpGreek.item["v"] := "{u+03b2}"  ; (β) Greek small beta
 606 cmpGreek.item["V"] := "{u+0392}"  ; (Β) Greek capital beta
 607 cmpGreek.item["g"] := "{u+03b3}"  ; (γ) Greek small gamma
 608 cmpGreek.item["G"] := "{u+0393}"  ; (Γ) Greek capital gamma
 609 cmpGreek.item["d"] := "{u+03b4}"  ; (δ) Greek small delta
 610 cmpGreek.item["D"] := "{u+0394}"  ; (Δ) Greek capital delta
 611 cmpGreek.item["e"] := "{u+03b5}"  ; (ε) Greek small epsilon
 612 cmpGreek.item["E"] := "{u+0395}"  ; (Ε) Greek capital epsilon
 613 cmpGreek.item["z"] := "{u+03b6}"  ; (ζ) Greek small zeta
 614 cmpGreek.item["Z"] := "{u+0396}"  ; (Ζ) Greek capital zeta
 615 cmpGreek.item["h"] := "{u+03b7}"  ; (η) Greek small eta
 616 cmpGreek.item["H"] := "{u+0397}"  ; (Η) Greek capital eta
 617 cmpGreek.item["j"] := "{u+03b8}"  ; (θ) Greek small theta
 618 cmpGreek.item["J"] := "{u+0398}"  ; (Θ) Greek capital theta
 619 cmpGreek.item["i"] := "{u+03b9}"  ; (ι) Greek small iota
 620 cmpGreek.item["I"] := "{u+0399}"  ; (Ι) Greek capital iota
 621 cmpGreek.item["k"] := "{u+03ba}"  ; (κ) Greek small kappa
 622 cmpGreek.item["K"] := "{u+039a}"  ; (Κ) Greek capital kappa
 623 cmpGreek.item["l"] := "{u+03bb}"  ; (λ) Greek small lambda
 624 cmpGreek.item["L"] := "{u+039b}"  ; (Λ) Greek capital lambda
 625 cmpGreek.item["m"] := "{u+03bc}"  ; (μ) Greek small mu
 626 cmpGreek.item["M"] := "{u+039c}"  ; (Μ) Greek capital mu
 627 cmpGreek.item["n"] := "{u+03bd}"  ; (ν) Greek small nu
 628 cmpGreek.item["N"] := "{u+039d}"  ; (Ν) Greek capital nu
 629 cmpGreek.item["x"] := "{u+03be}"  ; (ξ) Greek small xi
 630 cmpGreek.item["X"] := "{u+039e}"  ; (Ξ) Greek capital xi
 631 cmpGreek.item["o"] := "{u+03bf}"  ; (ο) Greek small omicron
 632 cmpGreek.item["O"] := "{u+039f}"  ; (Ο) Greek capital omicron
 633 cmpGreek.item["p"] := "{u+03c0}"  ; (π) Greek small pi
 634 cmpGreek.item["P"] := "{u+03a0}"  ; (Π) Greek capital pi
 635 cmpGreek.item["r"] := "{u+03c1}"  ; (ρ) Greek small rho
 636 cmpGreek.item["R"] := "{u+03a1}"  ; (Ρ) Greek capital rho
 637 cmpGreek.item["s"] := "{u+03c3}"  ; (σ) Greek small sigma
 638 cmpGreek.item["S"] := "{u+03a3}"  ; (Σ) Greek capital sigma
 639 cmpGreek.item[","] := "{u+03c2}"  ; (ς) Greek small final sigma
 640 cmpGreek.item["t"] := "{u+03c4}"  ; (τ) Greek small tau
 641 cmpGreek.item["T"] := "{u+03a4}"  ; (Τ) Greek capital tau
 642 cmpGreek.item["u"] := "{u+03c5}"  ; (υ) Greek small upsilon
 643 cmpGreek.item["U"] := "{u+03a5}"  ; (Υ) Greek capital upsilon
 644 cmpGreek.item["y"] := "{u+03c5}"  ; (υ) Greek small upsilon
 645 cmpGreek.item["Y"] := "{u+03a5}"  ; (Υ) Greek capital upsilon
 646 cmpGreek.item["f"] := "{u+03c6}"  ; (φ) Greek small phi
 647 cmpGreek.item["F"] := "{u+03a6}"  ; (Φ) Greek capital phi
 648 cmpGreek.item["c"] := "{u+03c7}"  ; (χ) Greek small chi
 649 cmpGreek.item["C"] := "{u+03a7}"  ; (Χ) Greek capital chi
 650 cmpGreek.item["w"] := "{u+03c8}"  ; (ψ) Greek small psi
 651 cmpGreek.item["W"] := "{u+03a8}"  ; (Ψ) Greek capital psi
 652 cmpGreek.item["q"] := "{u+03c9}"  ; (ω) Greek small omega
 653 cmpGreek.item["Q"] := "{u+03a9}"  ; (Ω) Greek capital omega
 654
 655
 656 ; Compose :  Superscript Characters (p)
 657
 658 cmpSuperscript := ComObjCreate("Scripting.Dictionary")
 659 cmpSuperscript.item["1"] := "{u+00b9}"  ; (¹) superscript 1
 660 cmpSuperscript.item["2"] := "{u+00b2}"  ; (²) superscript 2
 661 cmpSuperscript.item["3"] := "{u+00b3}"  ; (³) superscript 3
 662 cmpSuperscript.item["4"] := "{u+2074}"  ; (⁴) superscript 4
 663 cmpSuperscript.item["5"] := "{u+2075}"  ; (⁵) superscript 5
 664 cmpSuperscript.item["6"] := "{u+2076}"  ; (⁶) superscript 6
 665 cmpSuperscript.item["7"] := "{u+2077}"  ; (⁷) superscript 7
 666 cmpSuperscript.item["8"] := "{u+2078}"  ; (⁸) superscript 8
 667 cmpSuperscript.item["9"] := "{u+2079}"  ; (⁹) superscript 9
 668 cmpSuperscript.item["0"] := "{u+2070}"  ; (⁰) superscript 0
 669 cmpSuperscript.item["i"] := "{u+2071}"  ; (ⁱ) superscript i
 670 cmpSuperscript.item["n"] := "{u+207f}"  ; (ⁿ) superscript n
 671 cmpSuperscript.item["+"] := "{u+207a}"  ; (⁺) superscript +
 672 cmpSuperscript.item["-"] := "{u+207b}"  ; (⁻) superscript -
 673 cmpSuperscript.item["="] := "{u+207c}"  ; (⁼) superscript =
 674 cmpSuperscript.item["("] := "{u+207d}"  ; (⁽) superscript (
 675 cmpSuperscript.item[")"] := "{u+207e}"  ; (⁾) superscript )
 676
 677
 678 ; Compose :  Subscript Characters (u)
 679
 680 cmpSubscript := ComObjCreate("Scripting.Dictionary")
 681 cmpSubscript.item["1"] := "{u+2081}"  ; (₁) subscript 1
 682 cmpSubscript.item["2"] := "{u+2082}"  ; (₂) subscript 2
 683 cmpSubscript.item["3"] := "{u+2083}"  ; (₃) subscript 3
 684 cmpSubscript.item["4"] := "{u+2084}"  ; (₄) subscript 4
 685 cmpSubscript.item["5"] := "{u+2085}"  ; (₅) subscript 5
 686 cmpSubscript.item["6"] := "{u+2086}"  ; (₆) subscript 6
 687 cmpSubscript.item["7"] := "{u+2087}"  ; (₇) subscript 7
 688 cmpSubscript.item["8"] := "{u+2088}"  ; (₈) subscript 8
 689 cmpSubscript.item["9"] := "{u+2089}"  ; (₉) subscript 9
 690 cmpSubscript.item["0"] := "{u+2080}"  ; (₀) subscript 0
 691 cmpSubscript.item["a"] := "{u+2090}"  ; (ₐ) subscript a
 692 cmpSubscript.item["b"] := "{u+1d66}"  ; (ᵦ) subscript beta
 693 cmpSubscript.item["c"] := "{u+1d6a}"  ; (ᵪ) subscript chi
 694 cmpSubscript.item["e"] := "{u+2091}"  ; (ₑ) subscript e
 695 cmpSubscript.item["E"] := "{u+2094}"  ; (ₔ) subscript schwa
 696 cmpSubscript.item["f"] := "{u+1d69}"  ; (ᵩ) subscript phi
 697 cmpSubscript.item["g"] := "{u+1d67}"  ; (ᵧ) subscript gamma
 698 cmpSubscript.item["h"] := "{u+2095}"  ; (ₕ) subscript h
 699 cmpSubscript.item["i"] := "{u+1d62}"  ; (ᵢ) subscript i
 700 cmpSubscript.item["j"] := "{u+2c7c}"  ; (ⱼ) subscript j
 701 cmpSubscript.item["k"] := "{u+2096}"  ; (ₖ) subscript k
 702 cmpSubscript.item["l"] := "{u+2097}"  ; (ₗ) subscript l
 703 cmpSubscript.item["m"] := "{u+2098}"  ; (ₘ) subscript m
 704 cmpSubscript.item["n"] := "{u+2099}"  ; (ₙ) subscript n
 705 cmpSubscript.item["o"] := "{u+2092}"  ; (ₒ) subscript o
 706 cmpSubscript.item["p"] := "{u+209a}"  ; (ₚ) subscript p
 707 cmpSubscript.item["r"] := "{u+1d63}"  ; (ᵣ) subscript r
 708 cmpSubscript.item["R"] := "{u+1d68}"  ; (ᵨ) subscript rho
 709 cmpSubscript.item["s"] := "{u+209b}"  ; (ₛ) subscript s
 710 cmpSubscript.item["t"] := "{u+209c}"  ; (ₜ) subscript t
 711 cmpSubscript.item["u"] := "{u+1d64}"  ; (ᵤ) subscript u
 712 cmpSubscript.item["v"] := "{u+1d65}"  ; (ᵥ) subscript v
 713 cmpSubscript.item["x"] := "{u+2093}"  ; (ₓ) subscript x
 714 cmpSubscript.item["+"] := "{u+208a}"  ; (₊) subscript +
 715 cmpSubscript.item["-"] := "{u+208b}"  ; (₋) subscript -
 716 cmpSubscript.item["="] := "{u+208c}"  ; (₌) subscript =
 717 cmpSubscript.item["("] := "{u+208d}"  ; (₍) subscript (
 718 cmpSubscript.item[")"] := "{u+208e}"  ; (₎) subscript )
 719
 720
 721 ; Compose :  Spacing Characters and Dashes
 722
 723 cmpSpace := ComObjCreate("Scripting.Dictionary")
 724 cmpQuad := ComObjCreate("Scripting.Dictionary")
 725 cmpSpace.item["2"] := "{u+2002}"  ; en space
 726 cmpSpace.item["3"] := "{u+2003}"  ; em space
 727 cmpSpace.item["1"] := "{u+2004}"  ; three-per-em space
 728 cmpSpace.item["4"] := "{u+2005}"  ; four-per-em space
 729 cmpSpace.item["5"] := "{u+2008}"  ; punctuation space
 730 cmpSpace.item["6"] := "{u+2006}"  ; six-per-em space
 731 cmpSpace.item["7"] := "{u+2009}"  ; thin space
 732 cmpSpace.item["8"] := "{u+200a}"  ; hair space
 733 cmpSpace.item["9"] := "{u+2007}"  ; figure space
 734 cmpSpace.item["0"] := "{u+200b}"  ; zero-width space
 735 cmpSpace.item[" "] := "{u+00a0}"  ; non-breaking space
 736 cmpSpace.item["."] := "{u+202f}"  ; narrow no-break space
 737 cmpMacronStroke.item["2"] := "{u+2013}"  ; (–) en dash
 738 cmpMacronStroke.item["3"] := "{u+2014}"  ; (—) em dash
 739 cmpMacronStroke.item["4"] := "{u+2015}"  ; (―) horizontal bar
 740 cmpMacronStroke.item["5"] := "{u+2010}"  ; (‐) hyphen
 741 cmpMacronStroke.item["9"] := "{u+2012}"  ; (‒) figure dash
 742 cmpMacronStroke.item["0"] := "{u+00ad}"  ; () soft hyphen
 743 cmpMacronStroke.item["-"] := "{u+2011}"  ; (‑) non-breaking hyphen
 744 cmpQuad.item["2"] := "{u+2000}"  ; en quad
 745 cmpQuad.item["3"] := "{u+2001}"  ; em quad
 746
 747
 748 ; Compose :  Arrows and Pointers
 749
 750 cmpArrow := ComObjCreate("Scripting.Dictionary")
 751 cmpArrow.item["w"] := "{u+25b2}"  ; (▲) black up-pointing triangle
 752 cmpArrow.item["a"] := "{u+25c0}"  ; (◀) black left-pointing triangle
 753 cmpArrow.item["s"] := "{u+25bc}"  ; (▼) black down-pointing triangle
 754 cmpArrow.item["d"] := "{u+25b6}"  ; (▶) black right-pointing triangle
 755 cmpArrow.item["i"] := "{u+25b3}"  ; (△) white up-pointing triangle
 756 cmpArrow.item["j"] := "{u+25c1}"  ; (◁) white left-pointing triangle
 757 cmpArrow.item["k"] := "{u+25bd}"  ; (▽) white down-pointing triangle
 758 cmpArrow.item["l"] := "{u+25b7}"  ; (▷) white right-pointing triangle
 759 cmpArrow.item["1"] := "{u+2199}"  ; (↙) south west arrow
 760 cmpArrow.item["2"] := "{u+2193}"  ; (↓) downwards arrow
 761 cmpArrow.item["3"] := "{u+2198}"  ; (↘) south east arrow
 762 cmpArrow.item["4"] := "{u+2190}"  ; (←) leftwards arrow
 763 cmpArrow.item["5"] := "{u+2195}"  ; (↕) up down arrow
 764 cmpArrow.item["6"] := "{u+2192}"  ; (→) rightwards arrow
 765 cmpArrow.item["7"] := "{u+2196}"  ; (↖) north west arrow
 766 cmpArrow.item["8"] := "{u+2191}"  ; (↑) upwards arrow
 767 cmpArrow.item["9"] := "{u+2197}"  ; (↗) north east arrow
 768 cmpArrow.item["0"] := "{u+2194}"  ; (↔) left right arrow
 769 cmpDoubleAcute.item["1"] := "{u+21d9}"  ; (⇙) south west double arrow
 770 cmpDoubleAcute.item["2"] := "{u+21d3}"  ; (⇓) downwards double arrow
 771 cmpDoubleAcute.item["3"] := "{u+21d8}"  ; (⇘) south east double arrow
 772 cmpDoubleAcute.item["4"] := "{u+21d0}"  ; (⇐) leftwards double arrow
 773 cmpDoubleAcute.item["5"] := "{u+21d5}"  ; (⇕) up down double arrow
 774 cmpDoubleAcute.item["6"] := "{u+21d2}"  ; (⇒) rightwards double arrow
 775 cmpDoubleAcute.item["7"] := "{u+21d6}"  ; (⇖) north west double arrow
 776 cmpDoubleAcute.item["8"] := "{u+21d1}"  ; (⇑) upwards double arrow
 777 cmpDoubleAcute.item["9"] := "{u+21d7}"  ; (⇗) north east double arrow
 778 cmpDoubleAcute.item["0"] := "{u+21d4}"  ; (⇔) left right double arrow
 779
 780
 781 ; Compose :  Various Symbols (s)
 782
 783 cmpSymbols := ComObjCreate("Scripting.Dictionary")
 784 cmpSymbols.item["a"] := "{u+214d}"  ; (⅍) aktieselskab
 785 cmpSymbols.item["b"] := "{u+2e18}"  ; (⸘) inverted interrobang
 786 cmpSymbols.item["c"] := "{u+2105}"  ; (℅) care of
 787 cmpSymbols.item["d"] := "{u+22c4}"  ; (⋄) diamond operator
 788 cmpSymbols.item["e"] := "{u+212e}"  ; (℮) estimated symbol
 789 cmpSymbols.item["f"] := "{u+2640}"  ; (♀) female sign (Venus)
 790 cmpSymbols.item["h"] := "{u+2126}"  ; (Ω) ohm sign (backwards compatibility)
 791 cmpSymbols.item["i"] := "{u+2300}"  ; (⌀) diameter sign
 792 cmpSymbols.item["l"] := "{u+2113}"  ; (ℓ) script small l
 793 cmpSymbols.item["L"] := "{u+2112}"  ; (ℒ) Laplace transform
 794 cmpSymbols.item["m"] := "{u+2642}"  ; (♂) male sign (Mars)
 795 cmpSymbols.item["M"] := "{u+2120}"  ; (℠) service mark
 796 cmpSymbols.item["q"] := "{u+2e2e}"  ; (⸮) reversed question mark
 797 cmpSymbols.item["r"] := "{u+211e}"  ; (℞) prescription take (Recipere)
 798 cmpSymbols.item["R"] := "{u+211e}"  ; (℞) prescription take (Recipere)
 799 cmpSymbols.item["2"] := "{u+266b}"  ; (♫) beamed eighth notes
 800 cmpSymbols.item["3"] := "{u+2042}"  ; (⁂) asterism
 801 cmpSymbols.item["8"] := "{u+266a}"  ; (♪) eighth note
 802 cmpSymbols.item["!"] := "{u+203c}"  ; (‼) double exclamation mark
 803 cmpSymbols.item["?"] := "{u+203d}"  ; (‽) interrobang
 804 cmpSymbols.item["\"] := "{u+205e}"  ; (⁞) vertical four dots
 805 cmpSymbols.item["|"] := "{u+00a6}"  ; (¦) broken bar
 806
 807
 808 ; Compose :  Math Symbols (m)
 809
 810 cmpMathSymbols := ComObjCreate("Scripting.Dictionary")
 811 cmpMathSymbols.item["a"] := "{u+2200}"  ; (∀) for all
 812 cmpMathSymbols.item["A"] := "{u+2200}"  ; (∀) for all
 813 cmpMathSymbols.item["b"] := "{u+2286}"  ; (⊆) subset of or equal to
 814 cmpMathSymbols.item["B"] := "{u+2287}"  ; (⊇) superset of or equal to
 815 cmpMathSymbols.item["c"] := "{u+221d}"  ; (∝) proportional to
 816 cmpMathSymbols.item["C"] := "{u+2102}"  ; (ℂ) complex numbers
 817 cmpMathSymbols.item["d"] := "{u+2206}"  ; (∆) increment operator
 818 cmpMathSymbols.item["D"] := "{u+2207}"  ; (∇) nabla/del operator
 819 cmpMathSymbols.item["e"] := "{u+2203}"  ; (∃) there exists
 820 cmpMathSymbols.item["E"] := "{u+2204}"  ; (∄) there does not exist
 821 cmpMathSymbols.item["f"] := "{u+0192}"  ; (ƒ) f with hook
 822 cmpMathSymbols.item["F"] := "{u+220e}"  ; (∎) end of proof
 823 cmpMathSymbols.item["g"] := "{u+2282}"  ; (⊂) subset of
 824 cmpMathSymbols.item["G"] := "{u+2284}"  ; (⊄) not a subset of
 825 cmpMathSymbols.item["h"] := "{u+2283}"  ; (⊃) superset of
 826 cmpMathSymbols.item["H"] := "{u+2285}"  ; (⊅) not a superset of
 827 cmpMathSymbols.item["I"] := "{u+2111}"  ; (ℑ) imaginary numbers
 828 cmpMathSymbols.item["j"] := "{u+2245}"  ; (≅) congruent to
 829 cmpMathSymbols.item["J"] := "{u+2247}"  ; (≇) not congruent to
 830 cmpMathSymbols.item["k"] := "{u+220b}"  ; (∋) contains as member
 831 cmpMathSymbols.item["K"] := "{u+220c}"  ; (∌) does not contain as member
 832 cmpMathSymbols.item["l"] := "{u+2225}"  ; (∥) parallel to
 833 cmpMathSymbols.item["L"] := "{u+2226}"  ; (∦) not parallel to
 834 cmpMathSymbols.item["m"] := "{u+2208}"  ; (∈) element of
 835 cmpMathSymbols.item["M"] := "{u+2209}"  ; (∉) not an element of
 836 cmpMathSymbols.item["n"] := "{u+00ac}"  ; (¬) not sign
 837 cmpMathSymbols.item["N"] := "{u+2115}"  ; (ℕ) natural numbers
 838 cmpMathSymbols.item["o"] := "{u+2218}"  ; (∘) ring operator
 839 cmpMathSymbols.item["O"] := "{u+2205}"  ; (∅) empty set
 840 cmpMathSymbols.item["p"] := "{u+2202}"  ; (∂) partial differential
 841 cmpMathSymbols.item["P"] := "{u+2119}"  ; (ℙ) prime numbers
 842 cmpMathSymbols.item["Q"] := "{u+211a}"  ; (ℚ) rational numbers
 843 cmpMathSymbols.item["R"] := "{u+211d}"  ; (ℝ) real numbers
 844 cmpMathSymbols.item["s"] := "{u+2229}"  ; (∩) set intersection
 845 cmpMathSymbols.item["S"] := "{u+222b}"  ; (∫) integral symbol
 846 cmpMathSymbols.item["t"] := "{u+2261}"  ; (≡) identical to
 847 cmpMathSymbols.item["T"] := "{u+2262}"  ; (≢) not identical to
 848 cmpMathSymbols.item["u"] := "{u+222a}"  ; (∪) set union
 849 cmpMathSymbols.item["U"] := "{u+2216}"  ; (∖) set minus
 850 cmpMathSymbols.item["w"] := "{u+2118}"  ; (℘) Weierstrass elliptic function
 851 cmpMathSymbols.item["z"] := "{u+21af}"  ; (↯) downwards zigzag arrow
 852 cmpMathSymbols.item["Z"] := "{u+2124}"  ; (ℤ) whole numbers
 853 cmpMathSymbols.item["6"] := "{u+2220}"  ; (∠) angle symbol
 854 cmpMathSymbols.item["&"] := "{u+2227}"  ; (∧) logical and
 855 cmpMathSymbols.item["8"] := "{u+2297}"  ; (⊗) circled times
 856 cmpMathSymbols.item["*"] := "{u+2299}"  ; (⊙) circled dot operator
 857 cmpMathSymbols.item["9"] := "{u+221f}"  ; (∟) right angle
 858 cmpMathSymbols.item["0"] := "{u+2221}"  ; (∡) measured angle
 859 cmpMathSymbols.item["+"] := "{u+2295}"  ; (⊕) circled plus
 860 cmpMathSymbols.item["-"] := "{u+2296}"  ; (⊖) circled minus
 861 cmpMathSymbols.item["/"] := "{u+2298}"  ; (⊘) circled division slash
 862 cmpMathSymbols.item["="] := "{u+225d}"  ; (≝) equal to by definition
 863 cmpMathSymbols.item[";"] := "{u+2235}"  ; (∵) because sign
 864 cmpMathSymbols.item[":"] := "{u+2234}"  ; (∴) therefore sign
 865 cmpMathSymbols.item["|"] := "{u+2228}"  ; (∨) logical or
 866
 867
 868 ; Compose :  Special Letters/Characters
 869
 870 cmpCapitalA := ComObjCreate("Scripting.Dictionary")
 871 cmpSmallD := ComObjCreate("Scripting.Dictionary")
 872 cmpCapitalD := ComObjCreate("Scripting.Dictionary")
 873 cmpSmallI := ComObjCreate("Scripting.Dictionary")
 874 cmpCapitalI := ComObjCreate("Scripting.Dictionary")
 875 cmpSmallN := ComObjCreate("Scripting.Dictionary")
 876 cmpCapitalN := ComObjCreate("Scripting.Dictionary")
 877 cmpCapitalO := ComObjCreate("Scripting.Dictionary")
 878 cmpCapitalS := ComObjCreate("Scripting.Dictionary")
 879 cmpCapitalT := ComObjCreate("Scripting.Dictionary")
 880 cmpArrow.item["e"] := "{u+00e6}"      ; (æ) letter ae
 881 cmpCapitalA.item["E"] := "{u+00c6}"   ; (Æ) letter AE
 882 cmpSmallD.item["h"] := "{u+00f0}"     ; (ð) small letter eth
 883 cmpCapitalD.item["H"] := "{u+00d0}"   ; (Ð) capital letter eth
 884 cmpSmallI.item["j"] := "{u+0133}"     ; (ĳ) ligature ij
 885 cmpCapitalI.item["J"] := "{u+0132}"   ; (Ĳ) ligature IJ
 886 cmpSmallN.item["g"] := "{u+014b}"     ; (ŋ) small letter eng(ma)
 887 cmpCapitalN.item["G"] := "{u+014a}"   ; (Ŋ) capital letter eng(ma)
 888 cmpRingAbove.item["e"] := "{u+0153}"  ; (œ) ligature oe
 889 cmpCapitalO.item["E"] := "{u+0152}"   ; (Œ) ligature OE
 890 cmpSymbols.item["s"] := "{u+00df}"    ; (ß) small sharp s (Eszett)
 891 cmpCapitalS.item["S"] := "{u+1e9e}"   ; (ẞ) capital sharp S (capital Eszett)
 892 cmpTurned.item["h"] := "{u+00fe}"     ; (þ) small letter thorn
 893 cmpCapitalT.item["H"] := "{u+00de}"   ; (Þ) capital letter thorn
 894
 895
 896 ; Compose :  General/Math Symbols
 897
 898 cmpDigitEight := ComObjCreate("Scripting.Dictionary")
 899 cmpCapitalP := ComObjCreate("Scripting.Dictionary")
 900 cmpSmallR := ComObjCreate("Scripting.Dictionary")
 901 cmpSemicolon := ComObjCreate("Scripting.Dictionary")
 902 cmpAsterisk := ComObjCreate("Scripting.Dictionary")
 903 cmpExclam := ComObjCreate("Scripting.Dictionary")
 904 cmpQuestion := ComObjCreate("Scripting.Dictionary")
 905 cmpParenLeft := ComObjCreate("Scripting.Dictionary")
 906 cmpPlus := ComObjCreate("Scripting.Dictionary")
 907 cmpPercent := ComObjCreate("Scripting.Dictionary")
 908 cmpLessThan := ComObjCreate("Scripting.Dictionary")
 909 cmpGreaterThan := ComObjCreate("Scripting.Dictionary")
 910 cmpSmallD.item["d"] := "{u+2020}"        ; (†) dagger
 911 cmpCapitalD.item["D"] := "{u+2021}"      ; (‡) double dagger
 912 cmpSmallI.item["i"] := "{u+221e}"        ; (∞) infinity symbol
 913 cmpDigitEight.item["8"] := "{u+221e}"    ; (∞) infinity symbol
 914 cmpMathSymbols.item["i"] := "{u+00b5}"   ; (µ) micro sign
 915 cmpSmallN.item["o"] := "{u+2116}"        ; (№) numero sign
 916 cmpCapitalN.item["o"] := "{u+2116}"      ; (№) numero sign
 917 cmpRingAbove.item["x"] := "{u+00a4}"     ; (¤) currency sign
 918 cmpSuperscript.item["p"] := "{u+00b6}"   ; (¶) pilcrow sign
 919 cmpCapitalP.item["P"] := "{u+00b6}"      ; (¶) pilcrow sign
 920 cmpSmallR.item["2"] := "{u+221a}"        ; (√) square root
 921 cmpSmallR.item["3"] := "{u+221b}"        ; (∛) cube root
 922 cmpSmallR.item["4"] := "{u+221c}"        ; (∜) fourth root
 923 cmpSymbols.item["o"] := "{u+00a7}"       ; (§) section sign
 924 cmpCapitalS.item["o"] := "{u+00a7}"      ; (§) section sign
 925 cmpTurned.item["m"] := "{u+2122}"        ; (™) trademark symbol
 926 cmpSemicolon.item["b"] := "{u+2022}"     ; (•) bullet
 927 cmpSemicolon.item[";"] := "{u+2022}"     ; (•) bullet
 928 cmpSemicolon.item["t"] := "{u+2023}"     ; (‣) triangular bullet
 929 cmpSemicolon.item["h"] := "{u+2043}"     ; (⁃) hyphen bullet
 930 cmpSemicolon.item["w"] := "{u+25e6}"     ; (◦) white bullet
 931 cmpAcuteAccent.item["1"] := "{u+2032}"   ; (′) prime
 932 cmpAcuteAccent.item["2"] := "{u+2033}"   ; (″) double prime
 933 cmpAcuteAccent.item["3"] := "{u+2034}"   ; (‴) triple prime
 934 cmpAcuteAccent.item["4"] := "{u+2057}"   ; (⁗) quadruple prime
 935 cmpAsterisk.item["*"] := "{u+00d7}"      ; (×) multiplication sign
 936 cmpStroke.item["/"] := "{u+00f7}"        ; (÷) division sign
 937 cmpAsterisk.item["o"] := "{u+00b0}"      ; (°) degree sign
 938 cmpRingAbove.item["*"] := "{u+00b0}"     ; (°) degree sign
 939 cmpDotAbove.item["."] := "{u+00b7}"      ; (·) middle dot
 940 cmpDotAbove.item[" "] := "{u+00b7}"      ; (·) middle dot
 941 cmpDotAbove.item["3"] := "{u+2026}"      ; (…) horizontal ellipsis
 942 cmpArrow.item["-"] := "{u+00aa}"         ; (ª) feminine ordinal indicator (Spanish, Portuguese, Italian, Galician)
 943 cmpRingAbove.item["-"] := "{u+00ba}"     ; (º) masculine ordinal indicator (Spanish, Portuguese, Italian, Galician)
 944 cmpExclam.item["!"] := "{u+00a1}"        ; (¡) inverted exclamation mark
 945 cmpQuestion.item["?"] := "{u+00bf}"      ; (¿) inverted question mark
 946 cmpRingAbove.item["c"] := "{u+00a9}"     ; (©) copyright sign
 947 cmpParenLeft.item["c"] := "{u+00a9}"     ; (©) copyright sign
 948 cmpRingAbove.item["p"] := "{u+2117}"     ; (℗) sound recording copyright
 949 cmpParenLeft.item["p"] := "{u+2117}"     ; (℗) sound recording copyright
 950 cmpRingAbove.item["r"] := "{u+00ae}"     ; (®) registered sign
 951 cmpParenLeft.item["r"] := "{u+00ae}"     ; (®) registered sign
 952 cmpPlus.item["-"] := "{u+00b1}"          ; (±) plus-minus sign
 953 cmpMacronStroke.item["+"] := "{u+2213}"  ; (∓) minus-or-plus sign
 954 cmpPercent.item["%"] := "{u+2030}"       ; (‰) per mille sign
 955 cmpPercent.item["3"] := "{u+2030}"       ; (‰) per mille sign
 956 cmpPercent.item["4"] := "{u+2031}"       ; (‱) per ten thousand sign
 957 cmpExclam.item["="] := "{u+2260}"        ; (≠) not equal to
 958 cmpLessThan.item[">"] := "{u+2260}"      ; (≠) not equal to
 959 cmpLessThan.item["="] := "{u+2264}"      ; (≤) less-than or equal to
 960 cmpGreaterThan.item["="] := "{u+2265}"   ; (≥) greater-than or equal to
 961 cmpLessThan.item["+"] := "{u+2a7d}"      ; (⩽) less-than or slanted equal to
 962 cmpGreaterThan.item["+"] := "{u+2a7e}"   ; (⩾) greater-than or slanted equal to
 963 cmpTilde.item["~"] := "{u+2248}"         ; (≈) almost equal to
 964
 965
 966 ; Compose :  Vulgar Fractions
 967
 968 cmpDigitOne := ComObjCreate("Scripting.Dictionary")
 969 cmpDigitTwo := ComObjCreate("Scripting.Dictionary")
 970 cmpDigitThree := ComObjCreate("Scripting.Dictionary")
 971 cmpDigitFour := ComObjCreate("Scripting.Dictionary")
 972 cmpDigitFive := ComObjCreate("Scripting.Dictionary")
 973 cmpDigitSeven := ComObjCreate("Scripting.Dictionary")
 974 cmpDigitZero := ComObjCreate("Scripting.Dictionary")
 975 cmpDigitOne.item["2"] := "{u+00bd}"    ; (½) vulgar fraction 1/2
 976 cmpDigitOne.item["3"] := "{u+2153}"    ; (⅓) vulgar fraction 1/3
 977 cmpDigitTwo.item["3"] := "{u+2154}"    ; (⅔) vulgar fraction 2/3
 978 cmpDigitOne.item["4"] := "{u+00bc}"    ; (¼) vulgar fraction 1/4
 979 cmpDigitThree.item["4"] := "{u+00be}"  ; (¾) vulgar fraction 3/4
 980 cmpDigitOne.item["5"] := "{u+2155}"    ; (⅕) vulgar fraction 1/5
 981 cmpDigitTwo.item["5"] := "{u+2156}"    ; (⅖) vulgar fraction 2/5
 982 cmpDigitThree.item["5"] := "{u+2157}"  ; (⅗) vulgar fraction 3/5
 983 cmpDigitFour.item["5"] := "{u+2158}"   ; (⅘) vulgar fraction 4/5
 984 cmpDigitOne.item["6"] := "{u+2159}"    ; (⅙) vulgar fraction 1/6
 985 cmpDigitFive.item["6"] := "{u+215a}"   ; (⅚) vulgar fraction 5/6
 986 cmpDigitOne.item["7"] := "{u+2150}"    ; (⅐) vulgar fraction 1/7
 987 cmpDigitOne.item["8"] := "{u+215b}"    ; (⅛) vulgar fraction 1/8
 988 cmpDigitThree.item["8"] := "{u+215c}"  ; (⅜) vulgar fraction 3/8
 989 cmpDigitFive.item["8"] := "{u+215d}"   ; (⅝) vulgar fraction 5/8
 990 cmpDigitSeven.item["8"] := "{u+215e}"  ; (⅞) vulgar fraction 7/8
 991 cmpDigitOne.item["9"] := "{u+2151}"    ; (⅑) vulgar fraction 1/9
 992 cmpDigitOne.item["0"] := "{u+2152}"    ; (⅒) vulgar fraction 1/10
 993 cmpDigitZero.item["3"] := "{u+2189}"   ; (↉) vulgar fraction 0/3
 994
 995
 996 ; Compose :  Quotation Marks
 997
 998 cmpBracketLeft := ComObjCreate("Scripting.Dictionary")
 999 cmpBracketRight := ComObjCreate("Scripting.Dictionary")
1000 cmpCedillaOgonek.item[chr(34)] := "{u+201e}"  ; („) double low-9 quotation mark
1001 cmpDiaeresis.item[","] := "{u+201e}"          ; („) double low-9 quotation mark
1002 cmpCedillaOgonek.item["'"] := "{u+201a}"      ; (‚) single low-9 quotation mark
1003 cmpAcuteAccent.item[","] := "{u+201a}"        ; (‚) single low-9 quotation mark
1004 cmpDiaeresis.item["["] := "{u+201c}"          ; (“) left double quotation mark
1005 cmpBracketLeft.item[chr(34)] := "{u+201c}"    ; (“) left double quotation mark
1006 cmpDiaeresis.item["]"] := "{u+201d}"          ; (”) right double quotation mark
1007 cmpBracketRight.item[chr(34)] := "{u+201d}"   ; (”) right double quotation mark
1008 cmpAcuteAccent.item["["] := "{u+2018}"        ; (‘) left single quotation mark
1009 cmpBracketLeft.item["'"] := "{u+2018}"        ; (‘) left single quotation mark
1010 cmpAcuteAccent.item["]"] := "{u+2019}"        ; (’) right single quotation mark
1011 cmpBracketRight.item["'"] := "{u+2019}"       ; (’) right single quotation mark
1012 cmpLessThan.item["<"] := "{u+00ab}"           ; («) left-pointing double angle quotation mark
1013 cmpLessThan.item[chr(34)] := "{u+00ab}"       ; («) left-pointing double angle quotation mark
1014 cmpDiaeresis.item["<"] := "{u+00ab}"          ; («) left-pointing double angle quotation mark
1015 cmpGreaterThan.item[">"] := "{u+00bb}"        ; (») right-pointing double angle quotation mark
1016 cmpGreaterThan.item[chr(34)] := "{u+00bb}"    ; (») right-pointing double angle quotation mark
1017 cmpDiaeresis.item[">"] := "{u+00bb}"          ; (») right-pointing double angle quotation mark
1018 cmpLessThan.item["'"] := "{u+2039}"           ; (‹) left-pointing single angle quotation mark
1019 cmpAcuteAccent.item["<"] := "{u+2039}"        ; (‹) left-pointing single angle quotation mark
1020 cmpGreaterThan.item["'"] := "{u+203a}"        ; (›) right-pointing single angle quotation mark
1021 cmpAcuteAccent.item[">"] := "{u+203a}"        ; (›) right-pointing single angle quotation mark
1022
1023
1024 ; Compose :  Letters with Two Diacritical Marks
1025
1026 cmpCapitalC := ComObjCreate("Scripting.Dictionary")
1027 cmpSmallE := ComObjCreate("Scripting.Dictionary")
1028 cmpCapitalE := ComObjCreate("Scripting.Dictionary")
1029 cmpCapitalV := ComObjCreate("Scripting.Dictionary")
1030 cmpArrow.item[chr(34)] := "{u+01df}"      ; (ǟ) a with diaeresis and macron
1031 cmpCapitalA.item[chr(34)] := "{u+01de}"   ; (Ǟ) A with diaeresis and macron
1032 cmpArrow.item["."] := "{u+01e1}"          ; (ǡ) a with dot above and macron
1033 cmpCapitalA.item["."] := "{u+01e0}"       ; (Ǡ) A with dot above and macron
1034 cmpArrow.item["'"] := "{u+01fb}"          ; (ǻ) a with ring above and acute
1035 cmpCapitalA.item["'"] := "{u+01fa}"       ; (Ǻ) A with ring above and acute
1036 cmpCircumflex.item["'"] := "{u+1e09}"     ; (ḉ) c with cedilla and acute
1037 cmpCapitalC.item["'"] := "{u+1e08}"       ; (Ḉ) C with cedilla and acute
1038 cmpSmallE.item["-"] := "{u+01e3}"         ; (ǣ) ae with macron
1039 cmpCapitalE.item["-"] := "{u+01e2}"       ; (Ǣ) AE with macron
1040 cmpSmallE.item["'"] := "{u+01fd}"         ; (ǽ) ae with acute
1041 cmpCapitalE.item["'"] := "{u+01fc}"       ; (Ǽ) AE with acute
1042 cmpRingAbove.item[","] := "{u+01ed}"      ; (ǭ) o with ogonek and macron
1043 cmpCapitalO.item[","] := "{u+01ec}"       ; (Ǭ) O with ogonek and macron
1044 cmpRingAbove.item["'"] := "{u+01ff}"      ; (ǿ) o with stroke and acute
1045 cmpCapitalO.item["'"] := "{u+01fe}"       ; (Ǿ) O with stroke and acute
1046 cmpRingAbove.item[chr(34)] := "{u+022b}"  ; (ȫ) o with diaeresis and macron
1047 cmpCapitalO.item[chr(34)] := "{u+022a}"   ; (Ȫ) O with diaeresis and macron
1048 cmpRingAbove.item["~"] := "{u+022d}"      ; (ȭ) o with tilde and macron
1049 cmpCapitalO.item["~"] := "{u+022c}"       ; (Ȭ) O with tilde and macron
1050 cmpRingAbove.item["."] := "{u+0231}"      ; (ȱ) o with dot above and macron
1051 cmpCapitalO.item["."] := "{u+0230}"       ; (Ȱ) O with dot above and macron
1052 cmpCaron.item["-"] := "{u+01d6}"          ; (ǖ) u with diaeresis and macron
1053 cmpCapitalV.item["-"] := "{u+01d5}"       ; (Ǖ) U with diaeresis and macron
1054 cmpCaron.item["'"] := "{u+01d8}"          ; (ǘ) u with diaeresis and acute
1055 cmpCapitalV.item["'"] := "{u+01d7}"       ; (Ǘ) U with diaeresis and acute
1056 cmpCaron.item["v"] := "{u+01da}"          ; (ǚ) u with diaeresis and caron
1057 cmpCapitalV.item["v"] := "{u+01d9}"       ; (Ǚ) U with diaeresis and caron
1058 cmpCaron.item["``"] := "{u+01dc}"         ; (ǜ) u with diaeresis and grave
1059 cmpCapitalV.item["``"] := "{u+01db}"      ; (Ǜ) U with diaeresis and grave
1060
1061
1062 ; Compose :  Miscellaneous Symbols and Dingbats
1063
1064 cmpDigitSix := ComObjCreate("Scripting.Dictionary")
1065
1066 cmpDigitOne.item["a"] := "{u+2600}"  ; (☀) black sun with rays
1067 cmpDigitOne.item["b"] := "{u+2601}"  ; (☁) cloud
1068 cmpDigitOne.item["c"] := "{u+2602}"  ; (☂) umbrella
1069 cmpDigitOne.item["d"] := "{u+2603}"  ; (☃) snowman
1070 cmpDigitOne.item["e"] := "{u+2604}"  ; (☄) comet
1071 cmpDigitOne.item["f"] := "{u+2605}"  ; (★) black star
1072 cmpDigitOne.item["g"] := "{u+2606}"  ; (☆) white star
1073 cmpDigitOne.item["h"] := "{u+260e}"  ; (☎) black telephone
1074 cmpDigitOne.item["i"] := "{u+260f}"  ; (☏) white telephone
1075 cmpDigitOne.item["j"] := "{u+2610}"  ; (☐) ballot box
1076 cmpDigitOne.item["k"] := "{u+2611}"  ; (☑) ballot box with check
1077 cmpDigitOne.item["l"] := "{u+2612}"  ; (☒) ballot box with x
1078 cmpDigitOne.item["m"] := "{u+2619}"  ; (☙) reversed rotated floral heart bullet
1079 cmpDigitOne.item["n"] := "{u+261a}"  ; (☚) black left-pointing index
1080 cmpDigitOne.item["o"] := "{u+261b}"  ; (☛) black right-pointing index
1081 cmpDigitOne.item["p"] := "{u+261c}"  ; (☜) white left-pointing index
1082 cmpDigitOne.item["q"] := "{u+261d}"  ; (☝) white up-pointing index
1083 cmpDigitOne.item["r"] := "{u+261e}"  ; (☞) white right-pointing index
1084 cmpDigitOne.item["s"] := "{u+261f}"  ; (☟) white down-pointing index
1085 cmpDigitOne.item["t"] := "{u+2620}"  ; (☠) skull and crossbones
1086 cmpDigitOne.item["u"] := "{u+2621}"  ; (☡) caution sign
1087 cmpDigitOne.item["v"] := "{u+2622}"  ; (☢) radioactive sign
1088 cmpDigitOne.item["w"] := "{u+2623}"  ; (☣) biohazard sign
1089 cmpDigitOne.item["x"] := "{u+2639}"  ; (☹) white frowning face
1090 cmpDigitOne.item["y"] := "{u+263a}"  ; (☺) white smiling face
1091 cmpDigitOne.item["z"] := "{u+263b}"  ; (☻) black smiling face
1092
1093 cmpDigitTwo.item["a"] := "{u+263c}"  ; (☼) white sun with rays
1094 cmpDigitTwo.item["b"] := "{u+263d}"  ; (☽) first quarter moon
1095 cmpDigitTwo.item["c"] := "{u+263e}"  ; (☾) last quarter moon
1096 cmpDigitTwo.item["d"] := "{u+2640}"  ; (♀) female sign (Venus)
1097 cmpDigitTwo.item["e"] := "{u+2642}"  ; (♂) male sign (Mars)
1098 cmpDigitTwo.item["f"] := "{u+2668}"  ; (♨) hot springs
1099 cmpDigitTwo.item["g"] := "{u+2669}"  ; (♩) quarter note
1100 cmpDigitTwo.item["h"] := "{u+266a}"  ; (♪) eighth note
1101 cmpDigitTwo.item["i"] := "{u+266b}"  ; (♫) beamed eighth notes
1102 cmpDigitTwo.item["j"] := "{u+266c}"  ; (♬) beamed sixteenth notes
1103 cmpDigitTwo.item["k"] := "{u+266d}"  ; (♭) music flat sign
1104 cmpDigitTwo.item["l"] := "{u+266e}"  ; (♮) music natural sign
1105 cmpDigitTwo.item["m"] := "{u+266f}"  ; (♯) music sharp sign
1106 cmpDigitTwo.item["n"] := "{u+2672}"  ; (♲) universal recycling symbol
1107 cmpDigitTwo.item["o"] := "{u+267a}"  ; (♺) recycling symbol for generic materials
1108 cmpDigitTwo.item["p"] := "{u+267b}"  ; (♻) black universal recycling symbol
1109 cmpDigitTwo.item["q"] := "{u+267f}"  ; (♿) wheelchair symbol
1110 cmpDigitTwo.item["r"] := "{u+2690}"  ; (⚐) white flag
1111 cmpDigitTwo.item["s"] := "{u+2691}"  ; (⚑) black flag
1112 cmpDigitTwo.item["t"] := "{u+26a0}"  ; (⚠) warning sign
1113 cmpDigitTwo.item["u"] := "{u+26a1}"  ; (⚡) high voltage sign
1114 cmpDigitTwo.item["v"] := "{u+26d4}"  ; (⛔) no entry
1115
1116 cmpDigitThree.item["a"] := "{u+2701}"  ; (✁) upper blade scissors
1117 cmpDigitThree.item["b"] := "{u+2702}"  ; (✂) black scissors
1118 cmpDigitThree.item["c"] := "{u+2703}"  ; (✃) lower blade scissors
1119 cmpDigitThree.item["d"] := "{u+2704}"  ; (✄) white scissors
1120 cmpDigitThree.item["e"] := "{u+2706}"  ; (✆) telephone location sign
1121 cmpDigitThree.item["f"] := "{u+2707}"  ; (✇) tape drive
1122 cmpDigitThree.item["g"] := "{u+2708}"  ; (✈) airplane
1123 cmpDigitThree.item["h"] := "{u+2709}"  ; (✉) envelope
1124 cmpDigitThree.item["i"] := "{u+270a}"  ; (✊) raised fist
1125 cmpDigitThree.item["j"] := "{u+270b}"  ; (✋) raised hand
1126 cmpDigitThree.item["k"] := "{u+270c}"  ; (✌) victory hand
1127 cmpDigitThree.item["l"] := "{u+270d}"  ; (✍) writing hand
1128 cmpDigitThree.item["m"] := "{u+270e}"  ; (✎) lower right pencil
1129 cmpDigitThree.item["n"] := "{u+270f}"  ; (✏) pencil
1130 cmpDigitThree.item["o"] := "{u+2710}"  ; (✐) upper right pencil
1131 cmpDigitThree.item["p"] := "{u+2711}"  ; (✑) white nib
1132 cmpDigitThree.item["q"] := "{u+2712}"  ; (✒) black nib
1133 cmpDigitThree.item["r"] := "{u+2713}"  ; (✓) check mark
1134 cmpDigitThree.item["s"] := "{u+2714}"  ; (✔) heavy check mark
1135 cmpDigitThree.item["t"] := "{u+2715}"  ; (✕) multiplication x
1136 cmpDigitThree.item["u"] := "{u+2716}"  ; (✖) heavy multiplication x
1137 cmpDigitThree.item["v"] := "{u+2717}"  ; (✗) ballot x
1138 cmpDigitThree.item["w"] := "{u+2718}"  ; (✘) heavy ballot x
1139 cmpDigitThree.item["x"] := "{u+2719}"  ; (✙) outlined Greek cross
1140 cmpDigitThree.item["y"] := "{u+271a}"  ; (✚) heavy Greek cross
1141 cmpDigitThree.item["z"] := "{u+271b}"  ; (✛) open centre cross
1142
1143 cmpDigitFour.item["a"] := "{u+271c}"  ; (✜) heavy open centre cross
1144 cmpDigitFour.item["b"] := "{u+271d}"  ; (✝) Latin cross
1145 cmpDigitFour.item["c"] := "{u+271e}"  ; (✞) shadowed white Latin cross
1146 cmpDigitFour.item["d"] := "{u+271f}"  ; (✟) outlined Latin cross
1147 cmpDigitFour.item["e"] := "{u+2720}"  ; (✠) Maltese cross
1148 cmpDigitFour.item["f"] := "{u+2721}"  ; (✡) star of David
1149 cmpDigitFour.item["g"] := "{u+2722}"  ; (✢) four teardrop-spoked asterisk
1150 cmpDigitFour.item["h"] := "{u+2723}"  ; (✣) four balloon-spoked asterisk
1151 cmpDigitFour.item["i"] := "{u+2724}"  ; (✤) heavy four balloon-spoked asterisk
1152 cmpDigitFour.item["j"] := "{u+2725}"  ; (✥) four club-spoked asterisk
1153 cmpDigitFour.item["k"] := "{u+2726}"  ; (✦) black four-pointed star
1154 cmpDigitFour.item["l"] := "{u+2727}"  ; (✧) white four-pointed star
1155 cmpDigitFour.item["m"] := "{u+2729}"  ; (✩) stress outlined white star
1156 cmpDigitFour.item["n"] := "{u+272a}"  ; (✪) circled white star
1157 cmpDigitFour.item["o"] := "{u+272b}"  ; (✫) open centre black star
1158 cmpDigitFour.item["p"] := "{u+272c}"  ; (✬) black centre white star
1159 cmpDigitFour.item["q"] := "{u+272d}"  ; (✭) outlined black star
1160 cmpDigitFour.item["r"] := "{u+272e}"  ; (✮) heavy outlined black star
1161 cmpDigitFour.item["s"] := "{u+272f}"  ; (✯) pinwheel star
1162 cmpDigitFour.item["t"] := "{u+2730}"  ; (✰) shadowed white star
1163 cmpDigitFour.item["u"] := "{u+2731}"  ; (✱) heavy asterisk
1164 cmpDigitFour.item["v"] := "{u+2732}"  ; (✲) open centre asterisk
1165 cmpDigitFour.item["w"] := "{u+2733}"  ; (✳) eight-spoked asterisk
1166 cmpDigitFour.item["x"] := "{u+2734}"  ; (✴) eight-pointed black star
1167 cmpDigitFour.item["y"] := "{u+2735}"  ; (✵) eight-pointed pinwheel star
1168 cmpDigitFour.item["z"] := "{u+2736}"  ; (✶) six-pointed black star
1169
1170 cmpDigitFive.item["a"] := "{u+2737}"  ; (✷) eight-pointed rectilinear black star
1171 cmpDigitFive.item["b"] := "{u+2738}"  ; (✸) heavy eight-pointed rectilinear black star
1172 cmpDigitFive.item["c"] := "{u+2739}"  ; (✹) twelve pointed black star
1173 cmpDigitFive.item["d"] := "{u+273a}"  ; (✺) sixteen-pointed asterisk
1174 cmpDigitFive.item["e"] := "{u+273b}"  ; (✻) teardrop-spoked asterisk
1175 cmpDigitFive.item["f"] := "{u+273c}"  ; (✼) open centre teardrop-spoked asterisk
1176 cmpDigitFive.item["g"] := "{u+273d}"  ; (✽) heavy teardrop-spoked asterisk
1177 cmpDigitFive.item["h"] := "{u+273e}"  ; (✾) six-petalled black and white florette
1178 cmpDigitFive.item["i"] := "{u+273f}"  ; (✿) black florette
1179 cmpDigitFive.item["j"] := "{u+2740}"  ; (❀) white florette
1180 cmpDigitFive.item["k"] := "{u+2741}"  ; (❁) eight-petalled outlined black florette
1181 cmpDigitFive.item["l"] := "{u+2742}"  ; (❂) circled open centre eight-pointed star
1182 cmpDigitFive.item["m"] := "{u+2743}"  ; (❃) heavy teardrop-spoked pinwheel asterisk
1183 cmpDigitFive.item["n"] := "{u+2744}"  ; (❄) snowflake
1184 cmpDigitFive.item["o"] := "{u+2745}"  ; (❅) tight trifoliate snowflake
1185 cmpDigitFive.item["p"] := "{u+2746}"  ; (❆) heavy chevron snowflake
1186 cmpDigitFive.item["q"] := "{u+2747}"  ; (❇) sparkle
1187 cmpDigitFive.item["r"] := "{u+2748}"  ; (❈) heavy sparkle
1188 cmpDigitFive.item["s"] := "{u+2749}"  ; (❉) balloon-spoked asterisk
1189 cmpDigitFive.item["t"] := "{u+274a}"  ; (❊) eight teardrop-spoked propeller asterisk
1190 cmpDigitFive.item["u"] := "{u+274b}"  ; (❋) heavy eight teardrop-spoked propeller asterisk
1191 cmpDigitFive.item["v"] := "{u+274d}"  ; (❍) shadowed white circle
1192 cmpDigitFive.item["w"] := "{u+274f}"  ; (❏) lower right drop-shadowed white square
1193 cmpDigitFive.item["x"] := "{u+2750}"  ; (❐) upper right drop-shadowed white square
1194 cmpDigitFive.item["y"] := "{u+2751}"  ; (❑) lower right shadowed white square
1195 cmpDigitFive.item["z"] := "{u+2752}"  ; (❒) upper right shadowed white square
1196
1197 cmpDigitSix.item["a"] := "{u+2756}"  ; (❖) black diamond minus white x
1198 cmpDigitSix.item["b"] := "{u+2758}"  ; (❘) light vertical bar
1199 cmpDigitSix.item["c"] := "{u+2759}"  ; (❙) medium vertical bar
1200 cmpDigitSix.item["d"] := "{u+275a}"  ; (❚) heavy vertical bar
1201 cmpDigitSix.item["e"] := "{u+275b}"  ; (❛) heavy single turned comma quotation mark ornament
1202 cmpDigitSix.item["f"] := "{u+275c}"  ; (❜) heavy single comma quotation mark ornament
1203 cmpDigitSix.item["g"] := "{u+275d}"  ; (❝) heavy double turned comma quotation mark ornament
1204 cmpDigitSix.item["h"] := "{u+275e}"  ; (❞) heavy double comma quotation mark ornament
1205 cmpDigitSix.item["i"] := "{u+275f}"  ; (❟) heavy low single comma quotation mark ornament
1206 cmpDigitSix.item["j"] := "{u+2760}"  ; (❠) heavy low double comma quotation mark ornament
1207 cmpDigitSix.item["k"] := "{u+2761}"  ; (❡) curved stem paragraph sign ornament
1208 cmpDigitSix.item["l"] := "{u+2762}"  ; (❢) heavy exclamation mark ornament
1209 cmpDigitSix.item["m"] := "{u+2763}"  ; (❣) heavy heart exclamation mark ornament
1210 cmpDigitSix.item["n"] := "{u+2764}"  ; (❤) heavy black heart
1211 cmpDigitSix.item["o"] := "{u+2765}"  ; (❥) rotated heavy black heart bullet
1212 cmpDigitSix.item["p"] := "{u+2766}"  ; (❦) floral heart
1213 cmpDigitSix.item["q"] := "{u+2767}"  ; (❧) rotated floral heart bullet
1214
1215 cmpDigitSeven.item["a"] := "{u+2794}"  ; (➔) heavy wide-headed rightwards arrow
1216 cmpDigitSeven.item["b"] := "{u+2798}"  ; (➘) heavy south east arrow
1217 cmpDigitSeven.item["c"] := "{u+2799}"  ; (➙) heavy rightwards arrow
1218 cmpDigitSeven.item["d"] := "{u+279a}"  ; (➚) heavy north east arrow
1219 cmpDigitSeven.item["e"] := "{u+279b}"  ; (➛) drafting point rightwards arrow
1220 cmpDigitSeven.item["f"] := "{u+279c}"  ; (➜) heavy round-tipped rightwards arrow
1221 cmpDigitSeven.item["g"] := "{u+279d}"  ; (➝) triangle-headed rightwards arrow
1222 cmpDigitSeven.item["h"] := "{u+279e}"  ; (➞) heavy triangle-headed rightwards arrow
1223 cmpDigitSeven.item["i"] := "{u+279f}"  ; (➟) dashed triangle-headed rightwards arrow
1224 cmpDigitSeven.item["j"] := "{u+27a0}"  ; (➠) heavy dashed triangle-headed rightwards arrow
1225 cmpDigitSeven.item["k"] := "{u+27a1}"  ; (➡) black rightwards arrow
1226 cmpDigitSeven.item["l"] := "{u+27a2}"  ; (➢) 3d top-lighted rightwards arrowhead
1227 cmpDigitSeven.item["m"] := "{u+27a3}"  ; (➣) 3d bottom-lighted rightwards arrowhead
1228 cmpDigitSeven.item["n"] := "{u+27a4}"  ; (➤) black rightwards arrowhead
1229 cmpDigitSeven.item["o"] := "{u+27a5}"  ; (➥) heavy black curved downwards and rightwards arrow
1230 cmpDigitSeven.item["p"] := "{u+27a6}"  ; (➦) heavy black curved upwards and rightwards arrow
1231 cmpDigitSeven.item["q"] := "{u+27a7}"  ; (➧) squat black rightwards arrow
1232 cmpDigitSeven.item["r"] := "{u+27a8}"  ; (➨) heavy concave-pointed black rightwards arrow
1233 cmpDigitSeven.item["s"] := "{u+27a9}"  ; (➩) right-shaded white rightwards arrow
1234 cmpDigitSeven.item["t"] := "{u+27aa}"  ; (➪) left-shaded white rightwards arrow
1235 cmpDigitSeven.item["u"] := "{u+27ab}"  ; (➫) back-tilted shadowed white rightwards arrow
1236 cmpDigitSeven.item["v"] := "{u+27ac}"  ; (➬) front-tilted shadowed white rightwards arrow
1237 cmpDigitSeven.item["w"] := "{u+27ad}"  ; (➭) heavy lower right-shadowed white rightwards arrow
1238 cmpDigitSeven.item["x"] := "{u+27ae}"  ; (➮) heavy upper right-shadowed white rightwards arrow
1239 cmpDigitSeven.item["y"] := "{u+27af}"  ; (➯) notched lower right-shadowed white rightwards arrow
1240 cmpDigitSeven.item["z"] := "{u+27b1}"  ; (➱) notched upper right-shadowed white rightwards arrow
1241
1242 cmpDigitEight.item["a"] := "{u+27b2}"  ; (➲) circled heavy white rightwards arrow
1243 cmpDigitEight.item["b"] := "{u+27b3}"  ; (➳) white-feathered rightwards arrow
1244 cmpDigitEight.item["c"] := "{u+27b4}"  ; (➴) black-feathered south east arrow
1245 cmpDigitEight.item["d"] := "{u+27b5}"  ; (➵) black-feathered rightwards arrow
1246 cmpDigitEight.item["e"] := "{u+27b6}"  ; (➶) black-feathered north east arrow
1247 cmpDigitEight.item["f"] := "{u+27b7}"  ; (➷) heavy black-feathered south east arrow
1248 cmpDigitEight.item["g"] := "{u+27b8}"  ; (➸) heavy black-feathered rightwards arrow
1249 cmpDigitEight.item["h"] := "{u+27b9}"  ; (➹) heavy black-feathered north east arrow
1250 cmpDigitEight.item["i"] := "{u+27ba}"  ; (➺) teardrop-barbed rightwards arrow
1251 cmpDigitEight.item["j"] := "{u+27bb}"  ; (➻) heavy teardrop-shanked rightwards arrow
1252 cmpDigitEight.item["k"] := "{u+27bc}"  ; (➼) wedge-tailed rightwards arrow
1253 cmpDigitEight.item["l"] := "{u+27bd}"  ; (➽) heavy wedge-tailed rightwards arrow
1254 cmpDigitEight.item["m"] := "{u+27be}"  ; (➾) open-outlined rightwards arrow
1255 cmpDigitEight.item["n"] := "{u+27c1}"  ; (⟁) white triangle containing small white triangle
1256
1257
1258 ; Compose :  Chess Symbols (C)
1259
1260 cmpCapitalC.item["k"] := "{u+2654}"  ; (♔) white chess king
1261 cmpCapitalC.item["q"] := "{u+2655}"  ; (♕) white chess queen
1262 cmpCapitalC.item["r"] := "{u+2656}"  ; (♖) white chess rook
1263 cmpCapitalC.item["b"] := "{u+2657}"  ; (♗) white chess bishop
1264 cmpCapitalC.item["n"] := "{u+2658}"  ; (♘) white chess knight
1265 cmpCapitalC.item["p"] := "{u+2659}"  ; (♙) white chess pawn
1266 cmpCapitalC.item["K"] := "{u+265a}"  ; (♚) black chess king
1267 cmpCapitalC.item["Q"] := "{u+265b}"  ; (♛) black chess queen
1268 cmpCapitalC.item["R"] := "{u+265c}"  ; (♜) black chess rook
1269 cmpCapitalC.item["B"] := "{u+265d}"  ; (♝) black chess bishop
1270 cmpCapitalC.item["N"] := "{u+265e}"  ; (♞) black chess knight
1271 cmpCapitalC.item["P"] := "{u+265f}"  ; (♟) black chess pawn
1272
1273
1274 ; Compose :  Playing Card Suit Symbols (S)
1275
1276 cmpCapitalS.item["c"] := "{u+2663}"  ; (♣) black club suit
1277 cmpCapitalS.item["C"] := "{u+2667}"  ; (♧) white club suit
1278 cmpCapitalS.item["d"] := "{u+2666}"  ; (♦) black diamond suit
1279 cmpCapitalS.item["D"] := "{u+2662}"  ; (♢) white diamond suit
1280 cmpCapitalS.item["h"] := "{u+2665}"  ; (♥) black heart suit
1281 cmpCapitalS.item["H"] := "{u+2661}"  ; (♡) white heart suit
1282 cmpCapitalS.item["p"] := "{u+2660}"  ; (♠) black spade suit
1283 cmpCapitalS.item["P"] := "{u+2664}"  ; (♤) white spade suit
1284
1285
1286 ; Compose :  Dingbat Negative Circled Digits (n)
1287
1288 cmpSmallN.item["1"] := "{u+2776}"  ; (❶) dingbat negative circled digit 1
1289 cmpSmallN.item["2"] := "{u+2777}"  ; (❷) dingbat negative circled digit 2
1290 cmpSmallN.item["3"] := "{u+2778}"  ; (❸) dingbat negative circled digit 3
1291 cmpSmallN.item["4"] := "{u+2779}"  ; (❹) dingbat negative circled digit 4
1292 cmpSmallN.item["5"] := "{u+277a}"  ; (❺) dingbat negative circled digit 5
1293 cmpSmallN.item["6"] := "{u+277b}"  ; (❻) dingbat negative circled digit 6
1294 cmpSmallN.item["7"] := "{u+277c}"  ; (❼) dingbat negative circled digit 7
1295 cmpSmallN.item["8"] := "{u+277d}"  ; (❽) dingbat negative circled digit 8
1296 cmpSmallN.item["9"] := "{u+277e}"  ; (❾) dingbat negative circled digit 9
1297 cmpSmallN.item["0"] := "{u+277f}"  ; (❿) dingbat negative circled digit 10
1298
1299
1300 ; Configuration :  'Right Alt' and 'Right Alt + Shift' on US QWERTY
1301
1302 >!a::
1303   if GetKeyState("CapsLock", "T")
1304     Send {u+00c4}  ; (Ä) A with diaeresis
1305   else
1306     Send {u+00e4}  ; (ä) a with diaeresis
1307   return
1308 >!+a::
1309   if GetKeyState("CapsLock", "T")
1310     Send {u+00e4}  ; (ä) a with diaeresis
1311   else
1312     Send {u+00c4}  ; (Ä) A with diaeresis
1313   return
1314
1315 >!q::
1316   if GetKeyState("CapsLock", "T")
1317     Send {u+00c6}  ; (Æ) letter AE
1318   else
1319     Send {u+00e6}  ; (æ) letter ae
1320   return
1321 >!+q::
1322   if GetKeyState("CapsLock", "T")
1323     Send {u+00e6}  ; (æ) letter ae
1324   else
1325     Send {u+00c6}  ; (Æ) letter AE
1326   return
1327
1328 >!w::
1329   if GetKeyState("CapsLock", "T")
1330     Send {u+00c5}  ; (Å) A with ring above
1331   else
1332     Send {u+00e5}  ; (å) a with ring above
1333   return
1334 >!+w::
1335   if GetKeyState("CapsLock", "T")
1336     Send {u+00e5}  ; (å) a with ring above
1337   else
1338     Send {u+00c5}  ; (Å) A with ring above
1339   return
1340
1341 >!z::
1342   if GetKeyState("CapsLock", "T")
1343     Send {u+00c0}  ; (À) A with grave
1344   else
1345     Send {u+00e0}  ; (à) a with grave
1346   return
1347 >!+z::
1348   if GetKeyState("CapsLock", "T")
1349     Send {u+00e0}  ; (à) a with grave
1350   else
1351     Send {u+00c0}  ; (À) A with grave
1352   return
1353
1354 >!x::
1355   if GetKeyState("CapsLock", "T")
1356     Send {u+00c1}  ; (Á) A with acute
1357   else
1358     Send {u+00e1}  ; (á) a with acute
1359   return
1360 >!+x::
1361   if GetKeyState("CapsLock", "T")
1362     Send {u+00e1}  ; (á) a with acute
1363   else
1364     Send {u+00c1}  ; (Á) A with acute
1365   return
1366
1367 >!d::
1368   if GetKeyState("CapsLock", "T")
1369     Send {u+00c2}  ; (Â) A with circumflex
1370   else
1371     Send {u+00e2}  ; (â) a with circumflex
1372   return
1373 >!+d::
1374   if GetKeyState("CapsLock", "T")
1375     Send {u+00e2}  ; (â) a with circumflex
1376   else
1377     Send {u+00c2}  ; (Â) A with circumflex
1378   return
1379
1380 >!c::
1381   if GetKeyState("CapsLock", "T")
1382     Send {u+00c7}  ; (Ç) C with cedilla
1383   else
1384     Send {u+00e7}  ; (ç) c with cedilla
1385   return
1386 >!+c::
1387   if GetKeyState("CapsLock", "T")
1388     Send {u+00e7}  ; (ç) c with cedilla
1389   else
1390     Send {u+00c7}  ; (Ç) C with cedilla
1391   return
1392
1393 >!e::
1394   if GetKeyState("CapsLock", "T")
1395     Send {u+00cb}  ; (Ë) E with diaeresis
1396   else
1397     Send {u+00eb}  ; (ë) e with diaeresis
1398   return
1399 >!+e::
1400   if GetKeyState("CapsLock", "T")
1401     Send {u+00eb}  ; (ë) e with diaeresis
1402   else
1403     Send {u+00cb}  ; (Ë) E with diaeresis
1404   return
1405
1406 >!f::
1407   if GetKeyState("CapsLock", "T")
1408     Send {u+00c8}  ; (È) E with grave
1409   else
1410     Send {u+00e8}  ; (è) e with grave
1411   return
1412 >!+f::
1413   if GetKeyState("CapsLock", "T")
1414     Send {u+00e8}  ; (è) e with grave
1415   else
1416     Send {u+00c8}  ; (È) E with grave
1417   return
1418
1419 >!g::
1420   if GetKeyState("CapsLock", "T")
1421     Send {u+00c9}  ; (É) E with acute
1422   else
1423     Send {u+00e9}  ; (é) e with acute
1424   return
1425 >!+g::
1426   if GetKeyState("CapsLock", "T")
1427     Send {u+00e9}  ; (é) e with acute
1428   else
1429     Send {u+00c9}  ; (É) E with acute
1430   return
1431
1432 >!r::
1433   if GetKeyState("CapsLock", "T")
1434     Send {u+00ca}  ; (Ê) E with circumflex
1435   else
1436     Send {u+00ea}  ; (ê) e with circumflex
1437   return
1438 >!+r::
1439   if GetKeyState("CapsLock", "T")
1440     Send {u+00ea}  ; (ê) e with circumflex
1441   else
1442     Send {u+00ca}  ; (Ê) E with circumflex
1443   return
1444
1445 >!i::
1446   if GetKeyState("CapsLock", "T")
1447     Send {u+00cf}  ; (Ï) I with diaeresis
1448   else
1449     Send {u+00ef}  ; (ï) i with diaeresis
1450   return
1451 >!+i::
1452   if GetKeyState("CapsLock", "T")
1453     Send {u+00ef}  ; (ï) i with diaeresis
1454   else
1455     Send {u+00cf}  ; (Ï) I with diaeresis
1456   return
1457
1458 >!v::
1459   if GetKeyState("CapsLock", "T")
1460     Send {u+00cc}  ; (Ì) I with grave
1461   else
1462     Send {u+00ec}  ; (ì) i with grave
1463   return
1464 >!+v::
1465   if GetKeyState("CapsLock", "T")
1466     Send {u+00ec}  ; (ì) i with grave
1467   else
1468     Send {u+00cc}  ; (Ì) I with grave
1469   return
1470
1471 >!b::
1472   if GetKeyState("CapsLock", "T")
1473     Send {u+00cd}  ; (Í) I with acute
1474   else
1475     Send {u+00ed}  ; (í) i with acute
1476   return
1477 >!+b::
1478   if GetKeyState("CapsLock", "T")
1479     Send {u+00ed}  ; (í) i with acute
1480   else
1481     Send {u+00cd}  ; (Í) I with acute
1482   return
1483
1484 >!t::
1485   if GetKeyState("CapsLock", "T")
1486     Send {u+00ce}  ; (Î) I with circumflex
1487   else
1488     Send {u+00ee}  ; (î) i with circumflex
1489   return
1490 >!+t::
1491   if GetKeyState("CapsLock", "T")
1492     Send {u+00ee}  ; (î) i with circumflex
1493   else
1494     Send {u+00ce}  ; (Î) I with circumflex
1495   return
1496
1497 >!n::
1498   if GetKeyState("CapsLock", "T")
1499     Send {u+00d1}  ; (Ñ) N with tilde
1500   else
1501     Send {u+00f1}  ; (ñ) n with tilde
1502   return
1503 >!+n::
1504   if GetKeyState("CapsLock", "T")
1505     Send {u+00f1}  ; (ñ) n with tilde
1506   else
1507     Send {u+00d1}  ; (Ñ) N with tilde
1508   return
1509
1510 >!o::
1511   if GetKeyState("CapsLock", "T")
1512     Send {u+00d6}  ; (Ö) O with diaeresis
1513   else
1514     Send {u+00f6}  ; (ö) o with diaeresis
1515   return
1516 >!+o::
1517   if GetKeyState("CapsLock", "T")
1518     Send {u+00f6}  ; (ö) o with diaeresis
1519   else
1520     Send {u+00d6}  ; (Ö) O with diaeresis
1521   return
1522
1523 >!k::
1524   if GetKeyState("CapsLock", "T")
1525     Send {u+0152}  ; (Œ) ligature OE
1526   else
1527     Send {u+0153}  ; (œ) ligature oe
1528   return
1529 >!+k::
1530   if GetKeyState("CapsLock", "T")
1531     Send {u+0153}  ; (œ) ligature oe
1532   else
1533     Send {u+0152}  ; (Œ) ligature OE
1534   return
1535
1536 >!l::
1537   if GetKeyState("CapsLock", "T")
1538     Send {u+00d8}  ; (Ø) O with stroke
1539   else
1540     Send {u+00f8}  ; (ø) o with stroke
1541   return
1542 >!+l::
1543   if GetKeyState("CapsLock", "T")
1544     Send {u+00f8}  ; (ø) o with stroke
1545   else
1546     Send {u+00d8}  ; (Ø) O with stroke
1547   return
1548
1549 >!,::
1550   if GetKeyState("CapsLock", "T")
1551     Send {u+00d2}  ; (Ò) O with grave
1552   else
1553     Send {u+00f2}  ; (ò) o with grave
1554   return
1555 >!<::
1556   if GetKeyState("CapsLock", "T")
1557     Send {u+00f2}  ; (ò) o with grave
1558   else
1559     Send {u+00d2}  ; (Ò) O with grave
1560   return
1561
1562 >!.::
1563   if GetKeyState("CapsLock", "T")
1564     Send {u+00d3}  ; (Ó) O with acute
1565   else
1566     Send {u+00f3}  ; (ó) o with acute
1567   return
1568 >!>::
1569   if GetKeyState("CapsLock", "T")
1570     Send {u+00f3}  ; (ó) o with acute
1571   else
1572     Send {u+00d3}  ; (Ó) O with acute
1573   return
1574
1575 >!p::
1576   if GetKeyState("CapsLock", "T")
1577     Send {u+00d4}  ; (Ô) O with circumflex
1578   else
1579     Send {u+00f4}  ; (ô) o with circumflex
1580   return
1581 >!+p::
1582   if GetKeyState("CapsLock", "T")
1583     Send {u+00f4}  ; (ô) o with circumflex
1584   else
1585     Send {u+00d4}  ; (Ô) O with circumflex
1586   return
1587
1588 >!s::
1589   if GetKeyState("CapsLock", "T")
1590     Send {u+1e9e}  ; (ẞ) capital sharp S (capital Eszett)
1591   else
1592     Send {u+00df}  ; (ß) small sharp s (Eszett)
1593   return
1594 >!+s::
1595   if GetKeyState("CapsLock", "T")
1596     Send {u+00df}  ; (ß) small sharp s (Eszett)
1597   else
1598     Send {u+1e9e}  ; (ẞ) capital sharp S (capital Eszett)
1599   return
1600
1601 >!u::
1602   if GetKeyState("CapsLock", "T")
1603     Send {u+00dc}  ; (Ü) U with diaeresis
1604   else
1605     Send {u+00fc}  ; (ü) u with diaeresis
1606   return
1607 >!+u::
1608   if GetKeyState("CapsLock", "T")
1609     Send {u+00fc}  ; (ü) u with diaeresis
1610   else
1611     Send {u+00dc}  ; (Ü) U with diaeresis
1612   return
1613
1614 >!h::
1615   if GetKeyState("CapsLock", "T")
1616     Send {u+00d9}  ; (Ù) U with grave
1617   else
1618     Send {u+00f9}  ; (ù) u with grave
1619   return
1620 >!+h::
1621   if GetKeyState("CapsLock", "T")
1622     Send {u+00f9}  ; (ù) u with grave
1623   else
1624     Send {u+00d9}  ; (Ù) U with grave
1625   return
1626
1627 >!j::
1628   if GetKeyState("CapsLock", "T")
1629     Send {u+00da}  ; (Ú) U with acute
1630   else
1631     Send {u+00fa}  ; (ú) u with acute
1632   return
1633 >!+j::
1634   if GetKeyState("CapsLock", "T")
1635     Send {u+00fa}  ; (ú) u with acute
1636   else
1637     Send {u+00da}  ; (Ú) U with acute
1638   return
1639
1640 >!y::
1641   if GetKeyState("CapsLock", "T")
1642     Send {u+00db}  ; (Û) U with circumflex
1643   else
1644     Send {u+00fb}  ; (û) u with circumflex
1645   return
1646 >!+y::
1647   if GetKeyState("CapsLock", "T")
1648     Send {u+00fb}  ; (û) u with circumflex
1649   else
1650     Send {u+00db}  ; (Û) U with circumflex
1651   return
1652
1653 >!6::
1654   if GetKeyState("CapsLock", "T")
1655     Send {u+00c3}  ; (Ã) A with tilde
1656   else
1657     Send {u+00e3}  ; (ã) a with tilde
1658   return
1659 >!+6::
1660   if GetKeyState("CapsLock", "T")
1661     Send {u+00e3}  ; (ã) a with tilde
1662   else
1663     Send {u+00c3}  ; (Ã) A with tilde
1664   return
1665
1666 >!7::
1667   if GetKeyState("CapsLock", "T")
1668     Send {u+00d5}  ; (Õ) O with tilde
1669   else
1670     Send {u+00f5}  ; (õ) o with tilde
1671   return
1672 >!+7::
1673   if GetKeyState("CapsLock", "T")
1674     Send {u+00f5}  ; (õ) o with tilde
1675   else
1676     Send {u+00d5}  ; (Õ) O with tilde
1677   return
1678
1679 >!m::Send {u+00b5}   ; (µ) micro sign
1680 >!+m::Send {u+00b1}  ; (±) plus-minus sign
1681
1682 >!1::Send {u+00a1}   ; (¡) inverted exclamation mark
1683 >!+1::Send {u+00b9}  ; (¹) superscript 1
1684
1685 >!2::Send {u+2264}   ; (≤) less-than or equal to
1686 >!+2::Send {u+00b2}  ; (²) superscript 2
1687
1688 >!3::Send {u+2265}   ; (≥) greater-than or equal to
1689 >!+3::Send {u+00b3}  ; (³) superscript 3
1690
1691 >!4::Send {u+00a3}   ; (£) pound sign
1692 >!+4::Send {u+00a5}  ; (¥) yen sign
1693
1694 >!5::Send {u+20ac}   ; (€) euro sign
1695 >!+5::Send {u+00a2}  ; (¢) cent sign (dollar)
1696
1697 >!8::Send {u+201e}   ; („) double low-9 quotation mark
1698 >!+8::Send {u+00a7}  ; (§) section sign
1699
1700 >!9::Send {u+201c}   ; (“) left double quotation mark
1701 >!+9::Send {u+2018}  ; (‘) left single quotation mark
1702
1703 >!0::Send {u+201d}   ; (”) right double quotation mark
1704 >!+0::Send {u+2019}  ; (’) right single quotation mark
1705
1706 >!-::Send {u+2013}   ; (–) en dash
1707 >!_::Send {u+2014}   ; (—) em dash
1708
1709 >!=::Send {u+00d7}   ; (×) multiplication sign
1710 >!+=::Send {u+00f7}  ; (÷) division sign
1711
1712 >![::Send {u+00ab}   ; («) left-pointing double angle quotation mark
1713 >!{::Send {u+2039}   ; (‹) left-pointing single angle quotation mark
1714
1715 >!]::Send {u+00bb}   ; (») right-pointing double angle quotation mark
1716 >!}::Send {u+203a}   ; (›) right-pointing single angle quotation mark
1717
1718 >!;::Send {u+00b0}   ; (°) degree sign
1719 >!+;::Send {u+00b7}  ; (·) middle dot
1720
1721 >!'::Send {u+2020}   ; (†) dagger
1722 >!"::Send {u+2021}   ; (‡) double dagger
1723
1724 >!\::Send {u+2002}   ;     en space
1725 >!|::Send {u+2003}   ;     em space
1726
1727 >!/::Send {u+00bf}   ; (¿) inverted question mark
1728 >!?::Send {u+2026}   ; (…) horizontal ellipsis
1729
1730 >!space::Send {u+00a0}   ; non-breaking space
1731 >!+space::Send {u+00a0}  ; non-breaking space
1732
1733
1734 ; Compose Key Selector
1735
1736 >!`::
1737 >!~::
1738   Input, keyA, L1, {bs}{del}{esc}{home}{end}
1739   Input, keyB, L1, {bs}{del}{esc}{home}{end}
1740
1741   if (keyA == "c")
1742     Send % cmpCircumflex.item[keyB]
1743   else if (keyA == "v")
1744     Send % cmpCaron.item[keyB]
1745   else if (keyA == ".")
1746     Send % cmpDotAbove.item[keyB]
1747   else if (keyA == "o")
1748     Send % cmpRingAbove.item[keyB]
1749   else if (keyA == "-")
1750     Send % cmpMacronStroke.item[keyB]
1751   else if (keyA == "_")
1752     Send % cmpMacronStrokeAdd.item[keyB]
1753   else if (keyA == "/")
1754     Send % cmpStroke.item[keyB]
1755   else if (keyA == ",")
1756     Send % cmpCedillaOgonek.item[keyB]
1757   else if (keyA == "b")
1758     Send % cmpBreveSpecial.item[keyB]
1759   else if (keyA == "B")
1760     Send % cmpInvertedBreve.item[keyB]
1761   else if (keyA == "'")
1762     Send % cmpAcuteAccent.item[keyB]
1763   else if (keyA == chr(34))
1764     Send % cmpDiaeresis.item[keyB]
1765   else if (keyA == "=")
1766     Send % cmpDoubleAcute.item[keyB]
1767   else if (keyA == "``")
1768     Send % cmpGraveAccent.item[keyB]
1769   else if (keyA == "G")
1770     Send % cmpDoubleGrave.item[keyB]
1771   else if (keyA == "~")
1772     Send % cmpTilde.item[keyB]
1773   else if (keyA == "h")
1774     Send % cmpHook.item[keyB]
1775   else if (keyA == "l")
1776     Send % cmpLatinGreek.item[keyB]
1777   else if (keyA == "t")
1778     Send % cmpTurned.item[keyB]
1779   else if (keyA == "$")
1780     Send % cmpCurrency.item[keyB]
1781   else if (keyA == "g")
1782     Send % cmpGreek.item[keyB]
1783   else if (keyA == "p")
1784     Send % cmpSuperscript.item[keyB]
1785   else if (keyA == "u")
1786     Send % cmpSubscript.item[keyB]
1787   else if (keyA == " ")
1788     Send % cmpSpace.item[keyB]
1789   else if (keyA == "q")
1790     Send % cmpQuad.item[keyB]
1791   else if (keyA == "a")
1792     Send % cmpArrow.item[keyB]
1793   else if (keyA == "s")
1794     Send % cmpSymbols.item[keyB]
1795   else if (keyA == "m")
1796     Send % cmpMathSymbols.item[keyB]
1797   else if (keyA == "A")
1798     Send % cmpCapitalA.item[keyB]
1799   else if (keyA == "d")
1800     Send % cmpSmallD.item[keyB]
1801   else if (keyA == "D")
1802     Send % cmpCapitalD.item[keyB]
1803   else if (keyA == "i")
1804     Send % cmpSmallI.item[keyB]
1805   else if (keyA == "I")
1806     Send % cmpCapitalI.item[keyB]
1807   else if (keyA == "n")
1808     Send % cmpSmallN.item[keyB]
1809   else if (keyA == "N")
1810     Send % cmpCapitalN.item[keyB]
1811   else if (keyA == "O")
1812     Send % cmpCapitalO.item[keyB]
1813   else if (keyA == "S")
1814     Send % cmpCapitalS.item[keyB]
1815   else if (keyA == "T")
1816     Send % cmpCapitalT.item[keyB]
1817   else if (keyA == "P")
1818     Send % cmpCapitalP.item[keyB]
1819   else if (keyA == "r")
1820     Send % cmpSmallR.item[keyB]
1821   else if (keyA == ";")
1822     Send % cmpSemicolon.item[keyB]
1823   else if (keyA == "*")
1824     Send % cmpAsterisk.item[keyB]
1825   else if (keyA == "!")
1826     Send % cmpExclam.item[keyB]
1827   else if (keyA == "?")
1828     Send % cmpQuestion.item[keyB]
1829   else if (keyA == "(")
1830     Send % cmpParenLeft.item[keyB]
1831   else if (keyA == "+")
1832     Send % cmpPlus.item[keyB]
1833   else if (keyA == "%")
1834     Send % cmpPercent.item[keyB]
1835   else if (keyA == "8")
1836     Send % cmpDigitEight.item[keyB]
1837   else if (keyA == "<")
1838     Send % cmpLessThan.item[keyB]
1839   else if (keyA == ">")
1840     Send % cmpGreaterThan.item[keyB]
1841   else if (keyA == "1")
1842     Send % cmpDigitOne.item[keyB]
1843   else if (keyA == "2")
1844     Send % cmpDigitTwo.item[keyB]
1845   else if (keyA == "3")
1846     Send % cmpDigitThree.item[keyB]
1847   else if (keyA == "4")
1848     Send % cmpDigitFour.item[keyB]
1849   else if (keyA == "5")
1850     Send % cmpDigitFive.item[keyB]
1851   else if (keyA == "7")
1852     Send % cmpDigitSeven.item[keyB]
1853   else if (keyA == "0")
1854     Send % cmpDigitZero.item[keyB]
1855   else if (keyA == "[")
1856     Send % cmpBracketLeft.item[keyB]
1857   else if (keyA == "]")
1858     Send % cmpBracketRight.item[keyB]
1859   else if (keyA == "C")
1860     Send % cmpCapitalC.item[keyB]
1861   else if (keyA == "e")
1862     Send % cmpSmallE.item[keyB]
1863   else if (keyA == "E")
1864     Send % cmpCapitalE.item[keyB]
1865   else if (keyA == "V")
1866     Send % cmpCapitalV.item[keyB]
1867   else if (keyA == "6")
1868     Send % cmpDigitSix.item[keyB]
1869
1870   keyA := ""  ; avoids leaking content via debug properties
1871   keyB := ""  ; avoids leaking content via debug properties
1872   return