keyboard/altgr/ipa-sil.eng.inc.pl

   1 use utf8;
   2 use strict;
   3 use warnings;
   4 use Shiar_Sheet::KeyboardChars 'kbmodes';
   5
   6 my %rows = (
   7         '' => {
   8                 '=' => '=',
   9                 '>' => '>',
  10                 '<' => '<',
  11         },
  12         '=' => {
  13                 '!' => 'ǂ',
  14                 '#' => '‿',
  15                 '+' => '+',
  16                 ':' => 'ː',
  17                 '.' => '‖',
  18                 '0' => '∅',
  19                 '?' => 'ʔ',
  20                 B => 'ʙ',
  21                 E => 'ɘ',
  22                 G => 'ɢ',
  23                 H => 'ʜ',
  24                 I => 'ɨ',
  25                 N => 'ɴ',
  26                 O => 'ɵ',
  27                 Q => 'ʡ',
  28                 R => 'ʀ',
  29                 S => 'ᶘ',
  30                 U => 'ʉ',
  31                 Y => 'ʏ',
  32                 Z => 'ᶚ',
  33                 a => 'ɑ',
  34                 b => 'β',
  35                 c => 'ç',
  36                 e => 'ə',
  37                 f => 'ɸ',
  38                 g => 'ɣ',
  39                 h => 'ɥ', # y<
  40                 i => 'ɪ',
  41                 j => 'ɟ',
  42                 l => 'ɬ',
  43                 n => 'ɲ',
  44                 o => 'ɒ',
  45                 p => 'ʘ',
  46                 q => 'ʡ',
  47                 r => 'ɹ',
  48                 s => 'ʃ',
  49                 t => 'θ',
  50                 u => 'ɯ',
  51                 v => 'ʋ',
  52                 w => 'ʍ',
  53                 x => 'χ',
  54                 z => 'ʒ',
  55                 qw( 1  2  3  4  5  6  7  8  9  ), # pitch contours in Graphite apps
  56         },
  57         '>' => {
  58                 '!' => 'ǁ',
  59                 '|' => 'ˈ',
  60                 '0' => '◌', # diacritic holder
  61                 A => 'ᴂ',
  62                 E => 'ɶ',
  63                 G => 'ʛ',
  64                 H => 'ɧ',
  65                 I => 'ᵼ',
  66                 L => 'ɺ',
  67                 O => 'ɤ',
  68                 R => 'ʁ',
  69                 U => 'ᵾ',
  70                 a => 'ɐ',
  71                 b => 'ɓ',
  72                 c => 'ƈ',
  73                 d => 'ɗ',
  74                 e => 'ɜ',
  75                 g => 'ɠ',
  76                 h => 'ħ',
  77                 j => 'ʄ',
  78                 k => 'ƙ',
  79                 l => 'ɮ',
  80                 m => 'ɱ',
  81                 n => 'ŋ',
  82                 o => 'ø',
  83                 p => 'ƥ',
  84                 q => 'ʠ',
  85                 r => 'ɾ',
  86                 t => 'ƭ',
  87                 u => 'ʌ',
  88                 w => 'ɰ',
  89                 z => 'ʑ',
  90         },
  91         '<' => {
  92                 '!' => 'ǀ',
  93                 ':' => 'ˑ',
  94                 '.' => '|',
  95                 '|' => 'ˌ',
  96                 '?' => 'ʕ',
  97                 E => 'œ',
  98                 I => 'ᵻ',
  99                 L => 'ʎ',
 100                 O => 'ɞ',
 101                 Q => 'ʢ',
 102                 R => 'ɻ',
 103                 a => 'æ',
 104                 c => 'ɕ',
 105                 d => 'ɖ',
 106                 e => 'ɛ',
 107                 g => 'ɡ',
 108                 h => 'ɦ',
 109                 j => 'ʝ',
 110                 l => 'ɭ',
 111                 n => 'ɳ',
 112                 o => 'ɔ',
 113                 q => 'ʢ',
 114                 r => 'ɽ',
 115                 s => 'ʂ',
 116                 t => 'ʈ',
 117                 u => 'ʊ',
 118                 v => 'ⱱ',
 119                 w => 'ⱳ',
 120                 y => 'ɥ', # h=
 121                 z => 'ʐ',
 122         },
 123         '|' => {
 124                 A => 'ᴀ',
 125                 E => 'ᴇ',
 126                 T => 'ʇ',
 127                 Y => 'ʯ',
 128                 Z => 'ʅ',
 129                 a => 'α',
 130                 d => 'ȡ',
 131                 e => 'ʚ',
 132                 h => 'ђ',
 133                 i => 'ɩ',
 134                 l => 'ȴ',
 135                 n => 'ȵ',
 136                 t => 'ȶ',
 137                 u => 'ɷ',
 138                 y => 'ʮ',
 139                 z => 'ɿ',
 140                 '[' => '˞',
 141                 ']' => "\N{COMBINING LEFT ANGLE ABOVE}",
 142         },
 143         '^' => {
 144                 # superscripts
 145                 '(' => '⁽',
 146                 ')' => '⁾',
 147                 '+' => '⁺',
 148                 '-' => '⁻',
 149                 '=' => '⁼',
 150                 '?' => 'ˀ',
 151                 '!' => 'ꜝ', # african
 152                 'A' => 'ᵄ',
 153                 'B' => 'ᵝ',
 154                 'C' => 'ᶝ',
 155                 'D' => 'ᶞ',
 156                 'E' => 'ᵊ',
 157                 'F' => 'ᶲ',
 158                 'G' => 'ᶢ',
 159                 'H' => 'ʱ',
 160                 'I' => 'ᶦ',
 161                 'J' => 'ᶨ',
 162                 'L' => 'ᶫ',
 163                 'M' => 'ᶬ',
 164                 'N' => 'ᶰ',
 165                 'O' => 'ᵓ',
 166                 'R' => 'ʶ',
 167                 'S' => 'ᶳ',
 168                 'U' => 'ᶷ',
 169                 'V' => 'ᶺ',
 170                 'W' => 'ᵚ',
 171                 'X' => '',
 172                 'Y' => '',
 173                 'Z' => 'ᶽ',
 174                 'a' => 'ᵃ',
 175                 'b' => 'ᵇ',
 176                 'c' => 'ᶜ',
 177                 'd' => 'ᵈ',
 178                 'e' => 'ᵉ',
 179                 'f' => 'ᶠ',
 180                 'g' => 'ᵍ',
 181                 'h' => 'ʰ',
 182                 'i' => 'ⁱ',
 183                 'j' => 'ʲ',
 184                 'k' => 'ᵏ',
 185                 'l' => 'ˡ',
 186                 'm' => 'ᵐ',
 187                 'n' => 'ⁿ',
 188                 'o' => 'ᵒ',
 189                 'p' => 'ᵖ',
 190                 'r' => 'ʳ',
 191                 's' => 'ˢ',
 192                 't' => 'ᵗ',
 193                 'u' => 'ᵘ',
 194                 'v' => 'ᵛ',
 195                 'w' => 'ʷ',
 196                 'x' => 'ˣ',
 197                 'y' => 'ʸ',
 198                 'z' => 'ᶻ',
 199                 '1' => '¹',
 200                 # ..
 201                 '9' => '⁹',
 202         },
 203         '#' => {
 204                 # more superscripts
 205                 '?' => 'ˤ',
 206                 '!' => 'ꜞ', # african
 207                 A => 'ᶛ',
 208                 B => '',
 209                 C => '',
 210                 D => '',
 211                 E => 'ᵋ',
 212                 J => 'ᶮ',
 213                 N => 'ᶯ',
 214                 O => '',
 215                 R => 'ʵ',
 216                 Y => 'ᶣ',
 217                 Z => 'ᶾ',
 218                 a => 'ᵅ',
 219                 b => 'ᵆ',
 220                 c => '',
 221                 d => '',
 222                 e => 'ᶟ',
 223                 g => 'ˠ',
 224                 h => '',
 225                 i => 'ᶤ',
 226                 j => 'ᶡ',
 227                 l => 'ᶩ',
 228                 m => 'ᶭ',
 229                 n => 'ᵑ',
 230                 o => 'ᶱ',
 231                 r => 'ʴ',
 232                 s => 'ᶴ',
 233                 t => 'ᶿ',
 234                 u => 'ᶶ',
 235                 v => 'ᶹ',
 236                 y => '',
 237                 z => 'ᶼ',
 238         },
 239         '&' => {
 240                 # retroflex
 241                 a => 'ᶏ',
 242                 A => 'ᶐ',
 243                 b => 'ᶔ',
 244                 B => 'ᶕ',
 245                 d => 'ᶑ',
 246                 e => 'ᶒ',
 247                 E => 'ᶓ',
 248                 i => 'ᶖ',
 249                 o => 'ᶗ',
 250                 s => 'ᶘ',
 251                 u => 'ᶙ',
 252                 z => 'ᶚ',
 253
 254                 # dicritics & supersegmentals
 255                 '|' => 'syllabic',
 256                 '*' => "\N{COMBINING INVERTED BREVE BELOW}",
 257                 '~' => "\N{COMBINING TILDE BELOW}",
 258                 '%' => "\N{COMBINING RING BELOW}",
 259                 '5' => "\N{COMBINING CARON BELOW}",
 260                 '"' => "\N{COMBINING DIAERESIS BELOW}",
 261                 # ..
 262         },
 263         '@' => {
 264                 # palatal
 265                 '!' => 'ꜟ', # african
 266                 b => 'ᶀ',
 267                 d => 'ᶁ',
 268                 f => 'ᶂ',
 269                 g => 'ᶃ',
 270                 k => 'ᶄ',
 271                 l => 'ᶅ',
 272                 m => 'ᶆ',
 273                 n => 'ᶇ',
 274                 p => 'ᶈ',
 275                 r => 'ᶉ',
 276                 s => 'ᶊ',
 277                 S => 'ᶋ',
 278                 v => 'ᶌ',
 279                 x => 'ᶍ',
 280                 z => 'ᶎ',
 281         },
 282         '~' => {
 283                 # velarized (or pharyngealized)
 284                 b => 'ᵬ',
 285                 d => 'ᵭ',
 286                 f => 'ᵮ',
 287                 l => 'ɫ',
 288                 m => 'ᵯ',
 289                 n => 'ᵰ',
 290                 p => 'ᵱ',
 291                 r => 'ᵲ',
 292                 R => 'ᵳ',
 293                 s => 'ᵴ',
 294                 t => 'ᵵ',
 295                 z => 'ᵶ',
 296         },
 297 );
 298
 299 +{
 300         %{ kbmodes(\%rows) },
 301         version => '1.0',
 302         title => 'IPA SIL',
 303         intro => join("\n",
 304                 '<a href="https://keyman.com/keyboards/sil_ipa" target=_blank>Keyman</a>',
 305         ),
 306         description => [
 307         ],
 308 }