\ProvidesFile{gloss-thai.ldf}[polyglossia: module for thai] %% This is partly based on thai-latex for Babel: %%%% Copyright (C) 1999 - 2006 %%%% by Surapant Meknavin, %%%% Theppitak Karoonboonyanan (thep at linux.thai.net), %%%% Chanop Silpa-Anan (chanop at debian.org), %%%% Poonlap Veerathanabutr (poonlap at linux.thai.net) %%%% Thai Linux Working Group %%%% http://linux.thai.net/ %%%% \ifluatex \xpg@warning{Thai is not supported with LuaTeX.\MessageBreak I will proceed with the compilation, but\MessageBreak the output is not guaranteed to be correct\MessageBreak and may look very wrong.} \fi \PolyglossiaSetup{thai}{ bcp47=th, script=Thai, scripttag=thai, langtag=THA, hyphennames={nohyphenation}, fontsetup=true, localnumeral=thainumerals %TODO localalph={xxx@alph,xxx@Alph} %TODO localdigits=thainumber } % BCP-47 compliant aliases \setlanguagealias*{thai}{th} \newif\if@thai@numerals \def\tmp@thai{thai} \define@key{thai}{numerals}[arabic]{% \def\@tmpa{#1}% \ifx\@tmpa\tmp@thai\@thai@numeralstrue\else \@thai@numeralsfalse\fi } % Register default options \xpg@initialize@gloss@options{thai}{numerals=arabic} \def\captionsthai{% \def\refname{หนังสืออ้างอิง}% \def\abstractname{บทคัดย่อ}% \def\bibname{บรรณานุกรม}% \def\prefacename{คำนำ}% \def\chaptername{บทที่}% \def\appendixname{ภาคผนวก}% \def\contentsname{สารบัญ}% \def\listfigurename{สารบัญรูป}% \def\listtablename{สารบัญตาราง}% \def\indexname{ดรรชนี}% \def\figurename{รูปที่}% \def\tablename{ตารางที่}% %\def\thepart{}% \def\partname{ภาค}% \def\pagename{หน้า}% \def\seename{ดู}% \def\alsoname{ดูเพิ่มเติม}% \def\enclname{สิ่งที่แนบมาด้วย}% \def\ccname{สำเนาถึง}% \def\headtoname{เรียน}% \def\proofname{พิสูจน์}% %\def\glossaryname{}% } \def\datethai{% \def\thai@month{% \ifcase\month\or มกราคม\or กุมภาพันธ์\or มีนาคม\or เมษายน% \or พฤษภาคม\or มิถุนายน\or กรกฎาคม\or สิงหาคม% \or กันยายน\or ตุลาคม\or พฤศจิกายน\or ธันวาคม\fi}% \newcount\thai@year% \thai@year=\year% \advance\thai@year by 543% \def\today{\thainumber\day \space \thai@month\space พ.ศ.~\thainumber\thai@year}% } %NB: thai-latex had "plus 0.6pt", but .4em appears to give better results % FIXME to avoid name clashes, rename \wbr to \wordbreak or \thaiworkbreak ? \def\wbr{\hskip0pt plus .4em\relax} %%OR \char"200B = ZWSP ? Does not work %\catcode"200b=\active %\def^^200b{\hskip 0pt plus .4em} \def\thaidigits#1{\expandafter\@thai@digits #1@} \def\@thai@digits#1{% \ifx @#1% then terminate \else \ifx0#1๐\else\ifx1#1๑\else\ifx2#1๒\else\ifx3#1๓\else\ifx4#1๔\else\ifx5#1๕\else\ifx6#1๖\else\ifx7#1๗\else\ifx8#1๘\else\ifx9#1๙\else#1\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi \expandafter\@thai@digits \fi } \newcommand{\thainumerals}[2]{\thainumber{#2}} \def\thainumber#1{% \if@thai@numerals \thaidigits{\number#1}% %%{\protect\addfontfeature{Mapping=thaidigits}\protect\number#1} \else \number#1% %%{\protect\reset@font\number#1} \fi} \def\@thaialph#1{% \ifcase#1\or ก\or ข\or ค\or ง\or จ\or ฉ\or ช\or ซ\or ฌ\or ญ\or ฎ\or ฏ\or ฐ\or ฑ\or ฒ\or ณ\or ด\or ต\or ถ\or ท\or ธ\or น\or บ\or ป\or ผ\or ฝ\or พ\or ฟ\or ภ\or ม\or ย\or ร\or ล\or ว\or ศ\or ษ\or ส\or ห\or ฬ\or อ\or ฮ\else\xpg@ill@value{#1}{@thaialph}\fi} \def\thaiAlph#1{\expandafter\@thaiAlph\csname c@#1\endcsname} \def\@thaiAlph#1{% \ifcase#1\or ก\or ข\or ฃ\or ค\or ฅ\or ฆ\or ง\or จ\or ฉ\or ช\or ซ\or ฌ\or ญ\or ฎ\or ฏ\or ฐ\or ฑ\or ฒ\or ณ\or ด\or ต\or ถ\or ท\or ธ\or น\or บ\or ป\or ผ\or ฝ\or พ\or ฟ\or ภ\or ม\or ย\or ร\or ฤ\or ล\or ฦ\or ว\or ศ\or ษ\or ส\or ห\or ฬ\or อ\or ฮ\else\xpg@ill@value{#1}{@thaialph}\fi} \def\thai@numbers{% \if@thai@numerals \let\@alph\@thaialph% \let\@Alph\@thaiAlph% \fi } \def\nothai@numbers{% \let\@alph\latin@alph% \let\@Alph\latin@Alph% } \def\thai@globalnumbers{% \let\orig@arabic\@arabic% \let\@arabic\thainumber% \renewcommand{\thefootnote}{\localnumeral*{footnote}}% } \def\nothai@globalnumbers{% \let\@arabic\orig@arabic% } \def\blockextras@thai{% %%TODO \XeTeXlinebreaklocales "th"% uses ICU to find line breaks on the basis of a dictionary lookup-- make this optional? (in case a user might prefer a preprocessor \let\orig@baselinestrech\baselinestretch% \renewcommand{\baselinestretch}{1.2}% } \def\noblockextras@thai{% %%TODO \XeTeXlinebreaklocales "en"% \let\baselinestrech\orig@baselinestretch% } \endinput %TODO ? %\def\thainum#1{\expandafter\thainumber\csname c@#1\endcsname} %\def\thaibracenum#1{(\expandafter\thainumber\csname c@#1\endcsname)} %\def\thaialph#1{\expandafter\@thaialph\csname c@#1\endcsname} \@ifclassloaded{book}{% % redefine page numbering for frontmatter and mainmatter \def\ps@headnum{\let\@mkboth\@gobbletwo \def\@oddhead{\reset@font\hfil\thepage\hfil}\let\@oddfoot\@empty \let\@evenhead\@oddhead\let\@evenfoot\@empty} \let\@ltxfrontmatter\frontmatter \renewcommand\frontmatter{\@ltxfrontmatter\pagestyle{headnum}\pagenumbering{thaibracenum}} \let\@ltxmainmatter\mainmatter \renewcommand\mainmatter{\@ltxmainmatter\pagestyle{headings}\pagenumbering{thainum}} }{} \@ifclassloaded{book}{% \renewcommand\appendix{\par \setcounter{chapter}{0}% \setcounter{section}{0}% \gdef\@chapapp{\appendixname}% \gdef\thechapter{\@thaialph\c@chapter}} }{} \@ifclassloaded{report}{% \renewcommand\appendix{\par \setcounter{chapter}{0}% \setcounter{section}{0}% \gdef\@chapapp{\appendixname}% \gdef\thechapter{\@thaialph\c@chapter}} }{} \@ifclassloaded{article}{% \renewcommand\appendix{\par \setcounter{section}{0}% \setcounter{subsection}{0}% \gdef\thesection{\@thaialph\c@section}} }{}