summaryrefslogtreecommitdiff
path: root/language/tibetan/ctib/texinput/ctib.tex
diff options
context:
space:
mode:
Diffstat (limited to 'language/tibetan/ctib/texinput/ctib.tex')
-rw-r--r--language/tibetan/ctib/texinput/ctib.tex116
1 files changed, 116 insertions, 0 deletions
diff --git a/language/tibetan/ctib/texinput/ctib.tex b/language/tibetan/ctib/texinput/ctib.tex
new file mode 100644
index 0000000000..06b8bcd118
--- /dev/null
+++ b/language/tibetan/ctib/texinput/ctib.tex
@@ -0,0 +1,116 @@
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% File: ctib.tex
+% Author: Sam Sirlin
+% Modified by: Oliver Corff
+% Date: October 10th, 1999
+% Version: \CtibVersionRelease
+%
+% Description: The ctib.tex file provides access to all
+% commands necessary for writing Tibetan
+% in TeX documents, making use of a modified
+% version of Sirlin's Tibetan fonts.
+%
+% Many definitions were actually taken from
+% Sirlin's tibdef.tex (and occasionally modified).
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% ------------------- main code -------------------
+%
+% \TibTeX creates the TibTeX logo
+%
+\def\TibTeX{{cTib\TeX}}
+%
+%
+% s.w. sirlin 11/24/94, modified by o. corff, 1999-10-10
+% definitions for tibetan fonts
+
+\font\tibetanzero=ctib scaled\magstep0
+\font\tenrmzero=cmr10 scaled\magstep0
+
+\font\tibetanone=ctib scaled\magstep1
+\font\tenrmone=cmr10 scaled\magstep1
+
+\def\tsize{%
+\def\tibetan{\tibetanzero}%
+\def\tenrm{\tenrmzero}}
+
+\def\tsizei{%
+\def\tibetan{\tibetanone}%
+\def\tenrm{\tenrmone}}
+
+%
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% Now Tibetan paragraph properties
+%
+%\hyphenpenalty=10000\parindent=0pt
+
+\def\tspace{{\hskip\fontdimen7\font}} % inter-sentence space
+\def\notsheg{\noboundary} % elimininates tsheg
+\def\K{\noboundary\tspace} % Space after k, g
+
+%
+% Helps build additional stacks
+%
+\def\V#1#2{\noboundary%
+ \ooalign{\noboundary#1\noboundary\cr
+ \lower1.15\fontdimen5\font\hbox{#2\noboundary}}%
+ x} % `x' which has no value in ctib generates automatic tsheg
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% Now typical Tibetan identities
+%
+% Bad: would not cooperate with MonTeX!
+\ifx\om\undefined
+ \def\om{{\tib\char254}} % `<'
+\fi
+\def\visarga{{\tib\char58}} % `:'
+\def\swasti{{\tib\char64}} % `@'
+%
+% special characters
+%
+\def\dme{\V{de}{ma}x}
+%%
+\def\ai{\V{a}{\raise0.85\fontdimen5\font\hbox{\hskip0.25em`}}x}
+%%
+\def\hung{\ooalign{{\raise0.7\fontdimen5\font\hbox{\hskip0.15em0}}
+ \cr\V{h}{'u}}x}
+%%
+\def\hrih{\V{hri}{\raise0.50\fontdimen5\font\hbox{`}}x}
+%%
+\def\achung#1{\vtop{%
+ \baselineskip0pt\hbox{#1\noboundary}%
+ \hbox{\lower0.15\fontdimen5\font\hbox{`}}}
+}
+%%
+%%
+%% % operators - new vowels
+%%
+%% % m as o above next letter
+%% %\def \altm{{\tibsp\accent0}}
+%% %\def \altm{ \tibsp\accent0\tibetan}
+%% % expect that tfilt will add junk which we need to junk
+%% \def \altm#1{ \tibsp\accent0\tibetan #1}
+%%
+%% % m as o above, u below
+%% \def\altmu#1{\vtop{\baselineskip0pt\hbox
+%% {\tibsp\accent0\tibetan #1}\hbox{\tibsp\char123}}}
+%%
+%% % m as o below - emphasis
+%% % \def\subm#1{\vtop{\baselineskip0pt\hbox{#1}\hbox{\tibsp\char0}}}
+%% \def\subm#1{
+%% \vtop{\ialign{\hfil##\hfil\cr
+%% \hbox{#1}\cr
+%% \noalign{\kern1pt\nointerlineskip}
+%% \hbox{\tibsp\char0}\cr}}
+%% }
+%%
+%% % below
+%%
+%ready to start, default size is 0
+
+\tsize
+
+% end of ctib.tex