% tipx.sty: Additional Symbols for TIPA
% Copyright 2002 FUKUI Rei
%
% This program may be distributed and/or modified under the
% conditions of the LaTeX Project Public License, either version 1.2
% of this license or (at your option) any later version.
% The latest version of this license is in
%   http://www.latex-project.org/lppl.txt
% and version 1.2 or later is part of all distributions of LaTeX 
% version 1999/12/01 or later.
%
% This program consists of all files listed in Manifest.txt.
%
% Version 1.0  2001/11/21
% Version 1.1  2001/12/31
%
\NeedsTeXFormat{LaTeX2e}
\RequirePackage{tipa}
\ProvidesPackage{tipx}[2003/01/01 TIPX version 1.2]

% The next few commands are makeshifts; if TS3 can be used, they won't
% be necessary.

\newcommand\@select@tipx{\fontencoding{U}\fontfamily{tipx}\selectfont}
\newcommand\@select@xipx{\fontencoding{U}\fontfamily{xipx}\selectfont}
\newcommand\@select@tipxss{\fontencoding{U}\fontfamily{tipxss}\selectfont}
\newcommand\@select@xipxss{\fontencoding{U}\fontfamily{xipxss}\selectfont}

\let\@tipx\@select@tipx
\let\@tipxss\@select@tipxss

\begingroup
\newcommand\@@ptm@@{ptm}
\ifx\rmdefault\@@ptm@@\global\let\@tipx\@select@xipx\fi
\newcommand\@@phv@@{phv}
\ifx\sfdefault\@@phv@@\global\let\@tipxss\@select@xipxss\fi
\endgroup

\let\@sffamilyorg\sffamily
\renewcommand\sffamily{\let\@tipx\@tipxss\@sffamilyorg}

\newcommand\tipxupperaccent{\@ifnextchar[{\upper@accent a\@tipx}%
  {\upper@accent a\@tipx[\z@]}}
\newcommand\tipxloweraccent{\@ifnextchar[{\lower@accent a\@tipx}%
  {\lower@accent a\@tipx[\z@]}}

\newcommand\textrevpolhook[1]{%
  \tipxloweraccent{0}{{\tipaencoding#1}}} % Reversed Polish Hook

\newcommand\textrthooklong{{\@tipx\char1}}
\newcommand\textpalhooklong{{\@tipx\char2}}
\newcommand\textpalhookvar{{\@tipx\char3}}
\newcommand\textrectangle{{\@tipx\char4}}
\newcommand\textspleftarrow{{\@tipx\char5}}
\newcommand\textretractingvar{{\@tipx\char6}}
\newcommand\textdownfullarrow{{\@tipx\char7}}
\newcommand\textupfullarrow{{\@tipx\char8}}
\newcommand\textsubrightarrow{{\@tipx\char9}}
\newcommand\textsubdoublearrow{{\@tipx\char10}}

\newcommand\textrhooka{{\@tipx\char32}}
\newcommand\textinvscripta{{\@tipx\char33}}
\newcommand\textaolig{{\@tipx\char34}}
\newcommand\textlhookfour{{\@tipx\char35}}
\newcommand\textstretchcvar{{\@tipx\char36}}
\newcommand\textctstretchc{{\@tipx\char37}}
\newcommand\textctstretchcvar{{\@tipx\char38}}
\newcommand\textfrhookd{{\@tipx\char39}}
\newcommand\textfrhookdvar{{\@tipx\char40}}
\newcommand\textdblig{{\@tipx\char41}}
\newcommand\textrhooke{{\@tipx\char42}}
\newcommand\textrhookepsilon{{\@tipx\char43}}
\newcommand\textgrgamma{{\@tipx\char44}}
\newcommand\textfrtailgamma{{\@tipx\char45}}
\newcommand\textbktailgamma{{\@tipx\char46}}
\newcommand\textrtailhth{{\@tipx\char47}}
\newcommand\textheng{{\@tipx\char48}}
\newcommand\textlhti{{\@tipx\char49}}
\newcommand\textctjvar{{\@tipx\char50}}
\newcommand\texthtbardotlessjvar{{\@tipx\char51}}
\newcommand\texthmlig{{\@tipx\char52}}
\newcommand\textfrbarn{{\@tipx\char53}}
\newcommand\textnrleg{{\@tipx\char54}}
\newcommand\textfemale{{\@tipx\char55}}
\newcommand\textuncrfemale{{\@tipx\char56}}
\newcommand\textObullseye{{\@tipx\char57}}
\newcommand\textrhookopeno{{\@tipx\char58}}
\newcommand\textinvomega{{\@tipx\char59}}
\newcommand\textlhookp{{\@tipx\char60}}
\newcommand\textqplig{{\@tipx\char61}}
\newcommand\textlooptoprevesh{{\@tipx\char62}}
\newcommand\textfrhookt{{\@tipx\char63}}
\newcommand\textctturnt{{\@tipx\char64}}
\newcommand\textturntwo{{\@tipx\char65}}
\newcommand\textbenttailyogh{{\@tipx\char66}}
\newcommand\textturnthree{{\@tipx\char67}}
\newcommand\textctinvglotstop{{\@tipx\char68}}
\newcommand\textturnglotstop{{\@tipx\char69}}
\newcommand\textpipevar{{\@tipx\char70}}
\newcommand\textdoublepipevar{{\@tipx\char71}}
\newcommand\textdoublebarpipevar{{\@tipx\char72}}
\newcommand\textlfishhookrlig{{\@tipx\char73}}

\newcommand\textthornvari{{\@tipx\char80}}
\newcommand\textthornvarii{{\@tipx\char81}}
\newcommand\textthornvariii{{\@tipx\char82}}
\newcommand\textthornvariv{{\@tipx\char83}}
\newcommand\textglotstopvari{{\@tipx\char84}}
\newcommand\textglotstopvarii{{\@tipx\char85}}
\newcommand\textglotstopvariii{{\@tipx\char86}}

\newcommand\textinvsca{{\@tipx\char112}}
\newcommand\textscaolig{{\@tipx\char113}}
\newcommand\textscdelta{{\@tipx\char114}}
\newcommand\textscf{{\@tipx\char115}}
\newcommand\textsck{{\@tipx\char116}}
\newcommand\textturnsck{{\@tipx\char117}}
\newcommand\textrevscl{{\@tipx\char118}}
\newcommand\textscm{{\@tipx\char119}}
\newcommand\textscp{{\@tipx\char120}}
\newcommand\textscq{{\@tipx\char121}}
\newcommand\textrevscr{{\@tipx\char122}}
\newcommand\textturnscu{{\@tipx\char123}}

\endinput