From 05a8f868f29744bed719f3f7bab863ae7e846ea7 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 27 Apr 2021 21:55:25 +0000 Subject: tipauni (27apr21) git-svn-id: svn://tug.org/texlive/trunk@59009 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/tipauni/tipauni.sty | 453 ++++++++++++++++++++++++ 1 file changed, 453 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/tipauni/tipauni.sty (limited to 'Master/texmf-dist/tex/latex/tipauni') diff --git a/Master/texmf-dist/tex/latex/tipauni/tipauni.sty b/Master/texmf-dist/tex/latex/tipauni/tipauni.sty new file mode 100644 index 00000000000..d324bbebb77 --- /dev/null +++ b/Master/texmf-dist/tex/latex/tipauni/tipauni.sty @@ -0,0 +1,453 @@ +%% +%% This is file `tipauni.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% tipauni.dtx (with options: `package') +%% +%% --------------------------------------------------------------------------- +%% Package: tipauni +%% Author: Niranjan +%% Description: For producing Unicode characters with TIPA commands. +%% Repository: https://gitlab.com/niruvt/tipauni +%% Bug tracker: https://gitlab.com/niruvt/tipauni/-/issues +%% License: GPL v3.0+ +%% --------------------------------------------------------------------------- +%% +%% LaTeX Package tipauni v0.1 +%% © 2021 Niranjan +%% +%% This program is free software: you can redistribute it and/or modify +%% it under the terms of the GNU General Public License as published by +%% the Free Software Foundation, either version 3 of the License, or +%% (at your option) any later version. +%% +%% This program is distributed in the hope that it will be useful, +%% but WITHOUT ANY WARRANTY; without even the implied warranty of +%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%% GNU General Public License for more details. +%% +%% You should have received a copy of the GNU General Public License +%% along with this program. If not, see . +%% +%% The current maintainers of this work are Niranjan. +%% +%% This work consists of the files tipauni.dtx +%% tipauni.ins +%% and the derived file tipauni.sty. +%% --------------------------------------------------------------------------- +%% +\def\tipauniname{tipauni} +\def\tipauniversion{0.1} +\def\tipaunidate{2021/04/27} +\def\tipaunidescription{For producing Unicode characters with TIPA commands} +\ProvidesPackage{tipauni}[2021/04/27 v0.1 +Unicode characters with TIPA commands] +\RequirePackage{xparse} +\RequirePackage{fontspec} +\RequirePackage{environ} +\RequirePackage{xkeyval} +\RequirePackage{ifthen} +\setmainfont{CharisSIL} %% https://ctan.org/pkg/charissil +\DeclareOptionX{documentfont}{\setmainfont{#1}} +\newif\ifnontipaignore +\DeclareOptionX{incompatible}{\nontipaignoretrue} +\ProcessOptionsX\relax +\newif\ifnontipa +\protected\def\nontipatrue{\global\let\ifnontipa\iftrue} +\protected\def\nontipafalse{\global\let\ifnontipa\iffalse} +\ifnontipaignore + \protected\def\nontipatrue{} +\fi +\NewDocumentCommand\tipaunicmd{ m m }{% + \NewDocumentCommand#1{ }{\nontipatrue #2}% +}% +\AtEndDocument{% + \ifnontipa + \PackageWarningNoLine{tipauni}{% + You have used a command(s) that is (are) not\MessageBreak + supported by package TIPA. Thus your current code is\MessageBreak + incompatible with that package. These commands are\MessageBreak + printed with a different Unicode font. Refer to the\MessageBreak + documentation of package tipauni for a list of\MessageBreak + commands that are not supported in TIPA% + }% + \else + \fi +}% +\DeclareTextCommand{\tipaunistar}{TU}[1]{{#1}} +\DeclareTextAccentDefault{\tipaunistar}{TU} +\DeclareTextCommand{\tipaunisemicolon}{TU}[1]{{#1}} +\DeclareTextAccentDefault{\tipaunisemicolon}{TU} +\DeclareTextCommand{\tipaunicolon}{TU}[1]{{#1}} +\DeclareTextAccentDefault{\tipaunicolon}{TU} +\DeclareTextCommand{\tipaunibang}{TU}[1]{{#1}} +\DeclareTextAccentDefault{\tipaunibang}{TU} +\DeclareTextCommand{\tipaunipipe}{TU}[2]{\@pipeshorthands{#1}{#2}} +\DeclareTextAccentDefault{\tipaunipipe}{TU} +%% Pulmonic consonants +%%-- Stops +%%--** Retroflex +\DeclareTextSymbol{\textrtailt}{TU}{"0288}%% ʈ +\DeclareTextComposite{\tipaunicolon}{TU}{t}{"288} +\DeclareTextSymbol{\textrtaild}{TU}{"0256}%% ɖ +\DeclareTextComposite{\tipaunicolon}{TU}{d}{"256} +%%--** Palatal +\DeclareTextSymbol{\textbardotlessj}{TU}{"25F}%% ɟ +\DeclareTextComposite{\tipaunistar}{TU}{j}{"25F} +%%--** Uvular +\DeclareTextSymbol{\textscg}{TU}{"262}%% ɢ +\DeclareTextComposite{\tipaunisemicolon}{TU}{G}{"262} +%%--** Glottal +\DeclareTextSymbol{\textglotstop}{TU}{"294}%% ʔ +%%-- Nasals +%%--** Labiodental +\DeclareTextSymbol{\textltailm}{TU}{"271}%% ɱ +%%--** Retroflex +\DeclareTextSymbol{\textrtailn}{TU}{"273}%% ɳ +\DeclareTextComposite{\tipaunicolon}{TU}{n}{"273} +%%--** Palatal +\DeclareTextSymbol{\textltailn}{TU}{"272}%% ɲ +\DeclareTextComposite{\tipaunistar}{TU}{n}{"272} +%%--** Uvular +\DeclareTextSymbol{\textscn}{TU}{"274}%% ɴ +\DeclareTextComposite{\tipaunisemicolon}{TU}{N}{"274} +%%-- Trills +%%--** Bilabial +\DeclareTextSymbol{\textscb}{TU}{"299}%% ʙ +\DeclareTextComposite{\tipaunisemicolon}{TU}{B}{"299} +%%--** Uvular +\DeclareTextSymbol{\textscr}{TU}{"280}%% ʀ +\DeclareTextComposite{\tipaunisemicolon}{TU}{R}{"280} +%%-- Taps or flaps +%%-- Labiodental flap +\tipaunicmd{\labdentflap}{ⱱ} %% tipauni-exclusive +\DeclareTextComposite{\tipaunistar}{TU}{v}{"2C71} %% tipauni-exclusive +%%--** Alveolar +\DeclareTextSymbol{\textfishhookr}{TU}{"27E}%% ɾ +%%--** Retroflex +\DeclareTextSymbol{\textrtailr}{TU}{"27D}%% ɽ +\DeclareTextComposite{\tipaunicolon}{TU}{r}{"27D} +%%-- Fricatives +%%--** Bilabial +\DeclareTextSymbol{\textphi}{TU}{"278}%% ɸ +\DeclareTextSymbol{\textbeta}{TU}{"3B2}%% β +%%--** Dental +\DeclareTextSymbol{\texttheta}{TU}{"3B8}%% θ +%%--** Postalveolar +\DeclareTextSymbol{\textesh}{TU}{"283}%% ʃ +\DeclareTextSymbol{\textyogh}{TU}{"292}%% ʒ +%%--** Retroflex +\DeclareTextSymbol{\textrtails}{TU}{"282}%% ʂ +\DeclareTextComposite{\tipaunicolon}{TU}{s}{"282} +\DeclareTextSymbol{\textrtailz}{TU}{"290}%% ʐ +\DeclareTextComposite{\tipaunicolon}{TU}{z}{"290} +%%--** Palatal +\DeclareTextSymbol{\textctj}{TU}{"29D}%% ʝ +%%--** Velar +\DeclareTextSymbol{\textgamma}{TU}{"263}%% ɣ +%%--** Uvular +\DeclareTextSymbol{\textchi}{TU}{"3C7}%% χ +\DeclareTextSymbol{\textinvscr}{TU}{"281}%% ʁ +%%--** Pharyngeal +\DeclareTextSymbol{\textcrh}{TU}{"127}%% ħ +\DeclareTextComposite{\tipaunistar}{TU}{h}{"127} +\DeclareTextSymbol{\textrevglotstop}{TU}{"295}%% ʕ +%%--** Glottal +\DeclareTextSymbol{\texthth}{TU}{"266}%% ɦ +%%-- Lateral fricatives +%%--** Alveolar +\DeclareTextSymbol{\textbeltl}{TU}{"26C}%% ɬ +\DeclareTextComposite{\tipaunistar}{TU}{l}{"26C} +\DeclareTextSymbol{\textlyoghlig}{TU}{"26E}%% ɮ +\DeclareTextComposite{\tipaunistar}{TU}{z}{"26E} +%%-- Approximants +%%-- Labiodental approximant +\tipaunicmd{\labdentapp}{ʋ} %% tipauni-exclusive +%%--** Alveolar +\DeclareTextSymbol{\textturnr}{TU}{"279}%% ɹ +\DeclareTextComposite{\tipaunistar}{TU}{r}{"279} +%%--** Retroflex +\DeclareTextSymbol{\textturnrrtail}{TU}{"27B}%% ɻ +\DeclareTextComposite{\tipaunicolon}{TU}{R}{"27B} +%%--** Velar +\DeclareTextSymbol{\textturnmrleg}{TU}{"270}%% ɰ +\DeclareTextComposite{\tipaunistar}{TU}{m}{"270} +%%-- Lateral approximants +%%--** Retroflex +\DeclareTextSymbol{\textrtaill}{TU}{"26D}%% ɭ +\DeclareTextComposite{\tipaunicolon}{TU}{l}{"26D} +\DeclareTextSymbol{\textturny}{TU}{"28E}%% ʎ +\DeclareTextSymbol{\textscl}{TU}{"29F}%% ʟ +\DeclareTextComposite{\tipaunisemicolon}{TU}{L}{"29F} +%% Non-pulmonic consonants +%%-- Clicks +%%--** Bilabial +\DeclareTextSymbol{\textbullseye}{TU}{"298}%% ʘ +\DeclareTextComposite{\tipaunibang}{TU}{o}{"298} +%%-- Postalveolar click +\tipaunicmd{\pstalvclick}{ǃ} %% tipauni-exclusive +%%--** Palato-alveolar +\DeclareTextSymbol{\textdoublebarpipe}{TU}{"1C2}%% ǂ +\DeclareTextComposite{\tipaunibang}{TU}{c}{"1C2} %% tipauni-exclusive +%%--** Alveolar lateral +\DeclareTextSymbol{\textdoublepipe}{TU}{"1C1}% ǁ +%%-- Implosives +%%--** Bilabial +\DeclareTextSymbol{\texthtb}{TU}{"253}%% ɓ +\DeclareTextComposite{\tipaunibang}{TU}{b}{"253} +%%--** Dental +\DeclareTextSymbol{\texthtd}{TU}{"257}%% ɗ +\DeclareTextComposite{\tipaunibang}{TU}{d}{"257} +%%--** Palatal +\DeclareTextSymbol{\texthtbardotlessj}{TU}{"284}%% ʄ +\DeclareTextComposite{\tipaunibang}{TU}{j}{"284} +%%--** Velar +\DeclareTextSymbol{\texthtg}{TU}{"260}%% ɠ +\DeclareTextComposite{\tipaunibang}{TU}{g}{"260} +%%--** Uvular +\DeclareTextSymbol{\texthtscg}{TU}{"29B}%% ʛ +\DeclareTextComposite{\tipaunibang}{TU}{G}{"29B} +%% Other consonants +\DeclareTextSymbol{\textturnw}{TU}{"28D}%% ʍ +\DeclareTextSymbol{\textturnh}{TU}{"265}%% ɥ +\DeclareTextSymbol{\textsch}{TU}{"29C}%% ʜ +\DeclareTextSymbol{\textbarrevglotstop}{TU}{"2A2}%% ʢ +\DeclareTextComposite{\tipaunistar}{TU}{1}{"2A2} %% tipauni-exclusive +\DeclareTextSymbol{\textbarglotstop}{TU}{"2A1}%% ʡ +\DeclareTextComposite{\tipaunistar}{TU}{2}{"2A1} %% tipauni-exclusive +\DeclareTextSymbol{\textctc}{TU}{"255}%% ɕ +\DeclareTextSymbol{\textctz}{TU}{"291}%% ʑ +\DeclareTextComposite{\tipaunistar}{TU}{Z}{"291} %% tipauni-exclusive +\DeclareTextSymbol{\textturnlonglegr}{TU}{"27A}%% ɺ +\DeclareTextComposite{\tipaunibang}{TU}{r}{"27A} %% tipauni-exclusive +\DeclareTextSymbol{\texththeng}{TU}{"267}%% ɧ +\DeclareTextComposite{\tipaunistar}{TU}{3}{"267} %% tipauni-exclusive +\DeclareTextComposite{\tipaunistar}{TU}{k}{"029E} % ʞ +\DeclareTextComposite{\tipaunistar}{TU}{t}{"287} % ʇ +\DeclareTextComposite{\tipaunistar}{TU}{w}{"28D} % ʍ +\DeclareTextComposite{\tipaunisemicolon}{TU}{E}{"1D07} % ᴇ +\DeclareTextComposite{\tipaunisemicolon}{TU}{J}{"1D0A} % ᴊ +\DeclareTextComposite{\tipaunisemicolon}{TU}{A}{"1D00} % ᴀ +\DeclareTextComposite{\tipaunisemicolon}{TU}{H}{"29C} % ʜ +\DeclareTextComposite{\tipaunisemicolon}{TU}{U}{"1D1C} % ᴜ +%% Vowels +\DeclareTextSymbol{\textsci}{TU}{"26A}%% ɪ +\DeclareTextSymbol{\textscy}{TU}{"28F}%% ʏ +\DeclareTextSymbol{\textepsilon}{TU}{"25B}%% ɛ +\DeclareTextSymbol{\textbari}{TU}{"268}%% ɨ +\DeclareTextSymbol{\textbaru}{TU}{"289}%% ʉ +\DeclareTextSymbol{\textupsilon}{TU}{"28A}%% ʊ +\DeclareTextSymbol{\textreve}{TU}{"258}%% ɘ +\DeclareTextSymbol{\textbaro}{TU}{"275}%% ɵ +\DeclareTextSymbol{\textschwa}{TU}{"259}%% ə +\DeclareTextSymbol{\textrevepsilon}{TU}{"25C}%% ɜ +\DeclareTextSymbol{\textcloserevepsilon}{TU}{"25E}%% ɞ +\DeclareTextSymbol{\textturna}{TU}{"250}%% ɐ +\DeclareTextSymbol{\textturnm}{TU}{"26F}%% ɯ +\DeclareTextSymbol{\textramshorns}{TU}{"264}%% ɤ +\DeclareTextSymbol{\textturnv}{TU}{"28C}%% ʌ +\DeclareTextSymbol{\textopeno}{TU}{"254}%% ɔ +\DeclareTextSymbol{\textscripta}{TU}{"251}%% ɑ +\DeclareTextSymbol{\textturnscripta}{TU}{"252}%% ɒ +%% Independent diacritic marks +%%-- Rhoticity +\DeclareTextSymbol{\textrhoticity}{TU}{"2DE}%% ˞ +\tipaunicmd{\tr}{˞} +%%-- Tie bar (below) +\DeclareTextCommand{\tipaunitextbottomtiebar}{TU}[2]{#1\symbol{"035C}#2} +\NewDocumentCommand\textbottomtiebar{ m }{\tipaunitextbottomtiebar#1} +%%-- Tie bar (below) - standalone character +\DeclareTextCommand{\tipaunits}{TU}[2]{#1\symbol{"203F}#2} +\NewDocumentCommand\stdlnetiebar{ m }{\tipaunits#1} +\NewDocumentCommand\ts{ m }{\tipaunits#1} +%% No audible release +\DeclareUnicodeAccent{\textcorner}{TU}{"31A}%% ̚ +\tipaunicmd{\tc}{̚} +%% Syllabic +\DeclareUnicodeAccent{\textsyllabic}{TU}{"0329} %% ̩ +\NewDocumentCommand\s{ m }{\textsyllabic{\textipa{#1}}\nontipatrue} +%% Non-syllabic +\DeclareUnicodeAccent{\textsubarch}{TU}{"032F} %% ̯ +\NewDocumentCommand\ns{ m }{\textsubarch{\textipa{#1}}} +%% Laminal +\DeclareUnicodeAccent{\textsubsquare}{TU}{"033B} %% ̻ +\NewDocumentCommand\lmn{ m }{\textsubsquare{\textipa{#1}}\nontipatrue} +%% Other complex shorthand commands +\DeclareTextCommand{\@pipeshorthands}{TU}[2]{% + \if #1[\tipaunisubbridge{\textipa{#2}}\else + \if #1]\tipauniinvsubbridge{\textipa{#2}}\else + \if #1(\tipaunisublhalfring{\textipa{#2}}\else + \if #1)\tipaunisubrhalfring{\textipa{#2}}\else + \if #1+\tipaunisubplus{\textipa{#2}}\else + \if #1'\tipauniraising{\textipa{#2}}\else + \if #1`\tipaunilowering{\textipa{#2}}\else + \if #1<\tipauniadvancing{\textipa{#2}}\else + \if #1>\tipauniretracting{\textipa{#2}}\else + \if #1x\tipauniovercross{\textipa{#2}}\else + \if #1m\tipauniseagull{\textipa{#2}}\else #1#2% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi +}% +\DeclareTextAccentDefault{\@pipeshorthands}{TU} +\NewDocumentCommand\super{ m }{% + \ifthenelse{\equal{#1}{h}}{ʰ}{\relax}% + \ifthenelse{\equal{#1}{w}}{ʷ}{\relax}% + \ifthenelse{\equal{#1}{j}}{ʲ}{\relax}% + \ifthenelse{\equal{#1}{ɣ}}{ˠ}{\relax}% + \ifthenelse{\equal{#1}{ʕ}}{ˤ}{\relax}% + \ifthenelse{\equal{#1}{n}}{ⁿ}{\relax}% + \ifthenelse{\equal{#1}{l}}{ˡ}{\relax}% +}% +\ExplSyntaxOn +\seq_new:N \l__tipauni_replace_maps_seq +\seq_new:N \l__tipauni_remove_from_accents_seq +\tl_new:N \l__tipauni_textipa_tl +\seq_set_split:Nnn \l_tmpa_seq { , } + { + % sequence (with some escaping of the characters which aren't alpha-numeric): + { \c{\! | tipaunibang } G }{ʛ}, + { \c{\! | tipaunibang } g }{ɠ}, + { \c{\* | tipaunistar } 1 }{ʢ}, + { \c{\* | tipaunistar } 2 }{ʡ}, + { \c{\* | tipaunistar } 3 }{ɧ}, + { \c{\* | tipaunistar } Z }{ʑ}, + { \c{\: | tipaunicolon } R }{ɻ}, + { \c{\; | tipaunisemicolon} A }{ᴀ}, + { \c{\; | tipaunisemicolon} G }{ɢ}, + { \c{\; | tipaunisemicolon} B }{ʙ}, + { \c{\; | tipaunisemicolon} E }{ᴇ}, + { \c{\; | tipaunisemicolon} H }{ʜ}, + { \c{\; | tipaunisemicolon} J }{ᴊ}, + { \c{\; | tipaunisemicolon} L }{ʟ}, + { \c{\; | tipaunisemicolon} N }{ɴ}, + { \c{\; | tipaunisemicolon} R }{ʀ}, + { \c{\; | tipaunisemicolon} U }{ᴜ}, + {\|\|}{ǁ}, {\"\"}{ˌ}, + {5}{ɐ}, {A}{ɑ}, {6}{ɒ}, {2}{ʌ}, {B}{β}, {C}{ɕ}, {D}{ð}, {9}{ɘ}, {E}{ɛ}, + {3}{ɜ}, {g}{ɡ}, {G}{ɣ}, {7}{ɤ}, {H}{ɦ}, {L}{ʎ}, {4}{ɥ}, {1}{ɨ}, {I}{ɪ}, + {J}{ʝ}, {M}{ɱ}, {W}{ɯ}, {N}{ŋ}, {8}{ɵ}, {O}{ɔ}, {F}{ɸ}, {R}{ɾ}, {K}{ʁ}, + {S}{ʃ}, {T}{θ}, {0}{ʉ}, {U}{ʊ}, {V}{ʋ}, {X}{χ}, {Y}{ʏ}, {Z}{ʒ}, + {P}{ʔ}, {Q}{ʕ}, + {\:}{ː}, {\;}{ˑ}, {\!}{ǃ}, {\&}{ɞ}, {\@}{ə}, {\|}{ǀ}, {\"}{ˈ} + } +\seq_clear:N \l__tipauni_replace_maps_seq +\seq_map_inline:Nn \l_tmpa_seq + { + \exp_args:Nco \regex_const:Nn + { c__tipauni_ \exp_args:No \tl_to_str:n { \use_i:nn #1 } _regex } + { \use_i:nn #1 } + \seq_put_right:Nx \l__tipauni_replace_maps_seq + { + \exp_not:c + { c__tipauni_ \exp_args:No \tl_to_str:n { \use_i:nn #1 } _regex } + { \exp_not:o { \use_ii:nn #1 } } + } + } +\seq_set_split:Nnn \l__tipauni_remove_from_accents_seq { , } + { \~, \=, \", \r, \v, \t } +\cs_new_protected:Npn \__tipauni_nontipa_search:n #1 + { + \regex_match:nnT {ⱱ} {#1} \nontipatrue + \regex_match:nnT {ɞ} {#1} \nontipatrue + \regex_match:nnT {ɰ} {#1} \nontipatrue + \regex_match:nnT {ǃ} {#1} \nontipatrue + \regex_match:nnT {ǂ} {#1} \nontipatrue + \regex_match:nnT {ʢ} {#1} \nontipatrue + \regex_match:nnT {ɺ} {#1} \nontipatrue + \regex_match:nnT {ʑ} {#1} \nontipatrue + \regex_match:nnT {ɧ} {#1} \nontipatrue + } +\cs_generate_variant:Nn \__tipauni_nontipa_search:n { o } +\NewDocumentCommand\textipa{ +m }% + { + \begingroup + \let\*\tipaunistar + \let\:\tipaunicolon + \let\;\tipaunisemicolon + \let\!\tipaunibang + \let\|\tipaunipipe + \let\t\tipaunit + \catcode`\&=11 + \seq_map_inline:Nn \l__tipauni_remove_from_accents_seq + { \tl_remove_all:Nn \l_text_accents_tl {##1} } + \tl_set:Nx \l__tipauni_textipa_tl { \text_expand:n {#1} } + \seq_map_inline:Nn \l__tipauni_replace_maps_seq + { \regex_replace_all:NnN ##1 \l__tipauni_textipa_tl } + \l__tipauni_textipa_tl + \unless\ifnontipa + \__tipauni_nontipa_search:o \l__tipauni_textipa_tl + \fi + \endgroup + } +\ExplSyntaxOff +%%-- Dependent diacritic marks +%%--** Voiceless +\DeclareUnicodeAccent{\textsubring}{TU}{"0325} %% ̥ +\DeclareTextCommand{\r}{TU}{\tipaunisubring} +\protected\def\tipaunisubring{\@ifstar{\TipaUniSubRing}{\TipaUniSubRing}} +\NewDocumentCommand\TipaUniSubRing{ m }{\textsubring{\textipa{#1}}} +%%--** Voiced +\DeclareUnicodeAccent{\textsubwedge}{TU}{"032C} %% ̬ +\DeclareTextCommand{\v}{TU}{\tipaunisubwedge} +\protected\def\tipaunisubwedge{\@ifstar{\TipaUniSubWedge}{\TipaUniSubWedge}} +\NewDocumentCommand\TipaUniSubWedge{ m }{\textsubwedge{\textipa{#1}}} +%%--** More rounded +\DeclareUnicodeAccent{\textsubrhalfring}{TU}{"0339} %% ̹ +\NewDocumentCommand\tipaunisubrhalfring{ m }{\textsubrhalfring{\textipa{#1}}} +%%--** Less rounded +\DeclareUnicodeAccent{\textsublhalfring}{TU}{"031C} %% ̜ +\NewDocumentCommand\tipaunisublhalfring{ m }{\textsublhalfring{\textipa{#1}}} +%%--** Advanced +\DeclareUnicodeAccent{\textsubplus}{TU}{"031F} %% ̟ +\NewDocumentCommand\tipaunisubplus{ m }{\textsubplus{\textipa{#1}}} +%%--** Retracted +\DeclareUnicodeAccent{\textsubbar}{TU}{"0320} %% ̠ +\DeclareTextCommand{\=}{TU}{\tipaunisubbar} +\protected\def\tipaunisubbar{\@ifstar{\TipaUniSubBar}{\TipaUniSubBar}} +\NewDocumentCommand\TipaUniSubBar{ m }{\textsubbar{\textipa{#1}}} +%%--** Mid-centralized +\DeclareUnicodeAccent{\textovercross}{TU}{"033D} %% ̽ +\NewDocumentCommand\tipauniovercross{ m }{\textovercross{\textipa{#1}}} +%%--** Breathy voiced +\DeclareUnicodeAccent{\textsubumlaut}{TU}{"0324} %% ̤ +\DeclareTextCommand{\"}{TU}{\tipaunisubumlaut} +\protected\def\tipaunisubumlaut{\@ifstar{\TipaUniSubUmlaut}{\TipaUniSubUmlaut}} +\NewDocumentCommand\TipaUniSubUmlaut{ m }{\textsubumlaut{\textipa{#1}}} +%%--** Creaky voiced +\DeclareUnicodeAccent{\textsubtilde}{TU}{"0330} %% ̰ +\DeclareTextCommand{\~}{TU}{\tipaunisubtilde} +\protected\def\tipaunisubtilde{\@ifstar{\TipaUniSubTilde}{\TipaUniSubTilde}} +\NewDocumentCommand\TipaUniSubTilde{ m }{\textsubtilde{\textipa{#1}}} +%%--** Linguo-labialized +\DeclareUnicodeAccent{\textseagull}{TU}{"033C} %% ̼ +\NewDocumentCommand\tipauniseagull{ m }{\textseagull{#1}} +%%--** Velarized +\DeclareUnicodeAccent{\textsuperimposetilde}{TU}{"0334} %% ̴ +\NewDocumentCommand\tipaunisuperimposetilde{ m }{\textsuperimposetilde{#1}} +\NewDocumentCommand\vl{ m }{\textsuperimposetilde{\textipa{#1}}} +%%--** Raised +\DeclareUnicodeAccent{\textraising}{TU}{"031D} %% ̝ +\NewDocumentCommand{\tipauniraising}{m}{\textraising{#1}} +%%--** Lowered +\DeclareUnicodeAccent{\textlowering}{TU}{"031E} %% ̞ +\NewDocumentCommand{\tipaunilowering}{m}{\textlowering{#1}} +\DeclareUnicodeAccent{\textadvancing}{TU}{"0318} %% ̘ +\NewDocumentCommand{\tipauniadvancing}{m}{\textadvancing{#1}} +%%--** Retracted tongue root +\DeclareUnicodeAccent{\textretracting}{TU}{"0319} %% ̙ +\NewDocumentCommand{\tipauniretracting}{m}{\textretracting{#1}} +%%--** Dental +\DeclareUnicodeAccent{\textsubbridge}{TU}{"032A} %% ̪ +\NewDocumentCommand\tipaunisubbridge{ m }{\textsubbridge{#1}} +%%--** Apical +\DeclareUnicodeAccent{\textinvsubbridge}{TU}{"033A} %% ̺ +\NewDocumentCommand\tipauniinvsubbridge{ m }{\textinvsubbridge{#1}} +%%--** Tie bar (above) +\DeclareTextCommand{\tipaunitexttoptiebar}{TU}[2]{#1\symbol{"0361}#2} +\NewDocumentCommand\texttoptiebar{ m }{\tipaunitexttoptiebar#1} +\DeclareTextCommand{\tipaunit}{TU}{\@ifstar{\textbottomtiebar}{\texttoptiebar}} +\NewEnviron{IPA}{\textipa{\BODY}} +\endinput +%% +%% End of file `tipauni.sty'. -- cgit v1.2.3