summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/generic/serbianc/serbianc.dtx
blob: bc51a9190ac6dd837b82c2caf49af122c4847ecd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
% \iffalse meta-comment
%
% Copyright 1989-2001 Johannes L. Braams and any individual authors
% listed elsewhere in this file.  All rights reserved.
%
% This file is part of the Babel system release 3.7.
% --------------------------------------------------
%
% It may be distributed under the terms of the LaTeX Project Public
% License, as described in lppl.txt in the base LaTeX distribution.
% Either version 1.2 or, at your option, any later version.
% \fi
% \CheckSum{263}
% \iffalse
%    Tell the \LaTeX\ system who we are and write an entry on the
%    transcript.
%<*dtx>
\ProvidesFile{serbianc.dtx}
%</dtx>
%<code>\ProvidesLanguage{serbianc}
%\fi
%\ProvidesFile{serbianc.dtx}
       [2011/06/06 v2.2 Serbian cyrillic]
%\iffalse
% Babel package for LaTeX version 2e
% Copyright (C) 1989 - 2001
%           by Johannes Braams, TeXniek
%
% Please report errors to: J.L. Braams
%                          JLBraams@cistron.nl
%
%    This file is part of the babel system, it provides the source
%    code for the Serbian cyrillic language definition file.  A contribution
%    was made by Filip Br\v{c}i\'{c} <brcha@gna.org>
%
%<*filedriver>
\documentclass{ltxdoc}
\newcommand*\TeXhax{\TeX hax}
\newcommand*\babel{\textsf{babel}}
\newcommand*\langvar{$\langle \it lang \rangle$}
\newcommand*\note[1]{}
\newcommand*\Lopt[1]{\textsf{#1}}
\newcommand*\file[1]{\texttt{#1}}
\begin{document}
 \DocInput{serbianc.dtx}
\end{document}
%</filedriver>
%\fi
% \GetFileInfo{serbianc.dtx}
% \changes{serbianc-1.0}{2002/09/03}{Created the first public release
% of serbian cyrillic packet for babel}
% \changes{serbianc-1.1}{2005/11/09}{Released new version with some bugs fixed
% and with automated installer for GNU/* or POSIX-like systems}
% \changes{serbianc-2.0}{2006/11/24}{Dropped support for non-utf coding style,
% now you have to use T2A font encoding and write using utf-8. If you don't like
% that, use previous version}
% \changes{serbianc-2.1}{2007/02/23}{Minor bugfixes}
% \changes{serbianc-2.2}{2011/06/06}{Published on CTAN}
%
%  \section{The Serbian cyrillic language}
%
%    The file \file{\filename}\footnote{The file described in this
%    section has version number \fileversion\ and was last revised on
%    \filedate.  A contribution was made by Filip Br\v{c}i\'{c}
%    (\texttt{brcha@gna.org}).}  Defines all the language
%    definition macros for the serbianc language, typeset in a cyrillic
%    script.
%
%    Apart from defining shorthands we need to make sure that the
%    first paragraph of each section is indented. Furthermore the
%    following new math operators are defined (|\tg|, |\ctg|,
%    |\arctg|, |\arcctg|, |\sh|, |\ch|, |\th|, |\cth|, |\arsh|,
%    |\arch|, |\arth|, |\arcth|, |\Prob|, |\Expect|, |\Variance|).
%
% \StopEventually{}
%
%    The macro |\LdfInit| takes care of preventing that this file is
%    loaded more than once, checking the category code of the
%    \texttt{@} sign, etc.
%    \begin{macrocode}
%<*code>
\LdfInit{serbianc}\captionsserbianc
%    \end{macrocode}
%
%    When this file is read as an option, i.e. by the |\usepackage|
%    command, \texttt{serbianc} will be an `unknown' language in which
%    case we have to make it known. So we check for the existence of
%    |\l@serbianc| to see whether we have to do something here.
%
%    \begin{macrocode}
\ifx\l@serbianc\@undefined
    \@nopatterns{serbianc}
    \adddialect\l@serbianc0\fi
%    \end{macrocode}
%
%    \begin{macrocode}

\AtEndOfPackage{%
    \RequirePackage{ucs}%
    \PassOptionsToPackage{utf8x}{inputenc}%
    \RequirePackage{inputenc}%
    \PassOptionsToPackage{T2A}{fontenc}%
    \RequirePackage{fontenc}%
}

%    \end{macrocode}
%
%    The next step consists of defining commands to switch to (and
%    from) the Serbocroatian language.
%
%  \begin{macro}{\captionsserbianc}
%    The macro |\captionsserbianc| defines all strings used
%    in the four standard documentclasses provided with \LaTeX.
%    \begin{macrocode}
\addto\captionsserbianc{%
  \def\prefacename{\CYRP\cyrr\cyre\cyrd\cyrg\cyro\cyrv\cyro\cyrr}%{Предговор}%
  \def\refname{\CYRL\cyri\cyrt\cyre\cyrr\cyra\cyrt\cyru\cyrr\cyra}%{Литература}%
  \def\abstractname{\CYRA\cyrb\cyrs\cyrt\cyrr\cyra\cyrk\cyrt}%{Абстракт}%
  \def\bibname{\CYRB\cyri\cyrb\cyrl\cyri\cyro\cyrg\cyrr\cyra\cyrf\cyri\cyrje\cyra}%
            %{Библиографија}%
  \def\chaptername{\CYRG\cyrl\cyra\cyrv\cyra}%{Глава}%
  \def\appendixname{\CYRD\cyro\cyrd\cyra\cyrt\cyra\cyrk}%{Додатак}%
  \def\contentsname{\CYRS\cyra\cyrd\cyrr\cyrzh\cyra\cyrje}%{Садржај}%
  \def\listfigurename{\CYRL\cyri\cyrs\cyrt\cyra \cyrs\cyrl\cyri\cyrk\cyra}%
                    %{Листа слика}%
  \def\listtablename{\CYRL\cyri\cyrs\cyrt\cyra \cyrt\cyra\cyrb\cyre\cyrl\cyra}%
                    %{Листа табела}%
  \def\indexname{\CYRI\cyrn\cyrd\cyre\cyrk\cyrs \cyrp\cyro\cyrje\cyrm\cyro\cyrv\cyra}%
                %{Индекс појмова}%
  \def\figurename{\CYRS\cyrl\cyri\cyrk\cyra}%{Слика}%
  \def\tablename{\CYRT\cyra\cyrb\cyre\cyrl\cyra}%{Табела}%
  \def\partname{\CYRD\cyre\cyro}%{Део}%
  \def\enclname{\CYRP\cyrr\cyri\cyrl\cyro\cyrz\cyri}%{Прилози}%
  \def\ccname{\CYRK\cyro\cyrp\cyri\cyrje\cyre}%{Копије}%
  \def\headtoname{\CYRP\cyrr\cyri\cyrm\cyra}%{Прима}%
  \def\pagename{\cyrs\cyrt\cyrr\cyra\cyrn\cyra}%{страна}%
  \def\seename{\cyrv\cyri\cyrd\cyri}%{види}%
  \def\alsoname{\cyrv\cyri\cyrd\cyri \cyrt\cyra\cyrk\cyro\cyrdje\cyre}%{види такође}%
  \def\proofname{\CYRD\cyro\cyrk\cyra\cyrz}%{Доказ}%
  \def\glossaryname{\CYRR\cyre\cyrch\cyrn\cyri\cyrk}%{Речник}%
  }%
%    \end{macrocode}
%  \end{macro}
%
%  \begin{macro}{\dateserbianc}
%    The macro |\dateserbianc| redefines the command |\today| to
%    produce Serbian dates.
%    \begin{macrocode}
\def\dateserbianc{%
  \def\today{\number\day .~\ifcase\month\or
     \cyrje\cyra\cyrn\cyru\cyra\cyrr \or % јануар
     \cyrf\cyre\cyrb\cyrr\cyru\cyra\cyrr \or % фебруар
     \cyrm\cyra\cyrr\cyrt \or % март
     \cyra\cyrp\cyrr\cyri\cyrl \or % април
     \cyrm\cyra\cyrje \or % мај
     \cyrje\cyru\cyrn \or % јун
     \cyrje\cyru\cyrl \or % јул
     \cyra\cyrv\cyrg\cyru\cyrs\cyrt \or % август
     \cyrs\cyre\cyrp\cyrt\cyre\cyrm\cyrb\cyra\cyrr \or % септембар
     \cyro\cyrk\cyrt\cyro\cyrb\cyra\cyrr \or % октобар
     \cyrn\cyro\cyrv\cyre\cyrm\cyrb\cyra\cyrr \or % новембар
     \cyrd\cyre\cyrc\cyre\cyrm\cyrb\cyra\cyrr\fi % децембар
     \space \number\year.}}
%    \end{macrocode}
%  \end{macro}
%
%  \begin{macro}{\extrasserbianc}
%  \begin{macro}{\noextrasserbianc}
%    The macro |\extrasserbianc| will perform all the extra
%    definitions needed for the Serbian language. The macro
%    |\noextrasserbianc| is used to cancel the actions of
%    |\extrasserbianc|.
%
%    In serbianc the first paragraph of each section should be indented.
%    Add this code only in \LaTeX.
%    \begin{macrocode}
\ifx\fmtname plain \else
  \let\@aifORI\@afterindentfalse
  \def\bbl@frenchindent{\let\@afterindentfalse\@afterindenttrue
                        \@afterindenttrue}
  \def\bbl@nonfrenchindent{\let\@afterindentfalse\@aifORI
                          \@afterindentfalse}
  \addto\extrasserbianc{\bbl@frenchindent}
  \addto\noextrasserbianc{\bbl@nonfrenchindent}
\fi
%    \end{macrocode}
%  \end{macro}
%  \end{macro}
%
%  \begin{macro}{\mathserbianc}
%    Some math functions in serbianc math books have other names:
%    e.g. |sinh| in serbianc is written as |sh| etc. So we define a
%    number of new math operators.
%    \begin{macrocode}
\def\sh{\mathop{\operator@font sh}\nolimits} % same as \sinh
\def\ch{\mathop{\operator@font ch}\nolimits} % same as \cosh
\def\th{\mathop{\operator@font th}\nolimits} % same as \tanh
\def\cth{\mathop{\operator@font cth}\nolimits} % same as \coth
\def\arsh{\mathop{\operator@font arsh}\nolimits}
\def\arch{\mathop{\operator@font arch}\nolimits}
\def\arth{\mathop{\operator@font arth}\nolimits}
\def\arcth{\mathop{\operator@font arcth}\nolimits}
\def\tg{\mathop{\operator@font tg}\nolimits} % same as \tan
\def\ctg{\mathop{\operator@font ctg}\nolimits} % same as \cot
\def\arctg{\mathop{\operator@font arctg}\nolimits} % same as \arctan
\def\arcctg{\mathop{\operator@font arcctg}\nolimits}
\def\Prob{\mathop{\mathsf P\hskip0pt}\nolimits}
\def\Expect{\mathop{\mathsf E\hskip0pt}\nolimits}
\def\Variance{\mathop{\mathsf D\hskip0pt}\nolimits}
%    \end{macrocode}
%  \end{macro}
%
%    The macro |\ldf@finish| takes care of looking for a
%    configuration file, setting the main language to be switched on
%    at |\begin{document}| and resetting the category code of
%    \texttt{@} to its original value.
%    \begin{macrocode}
\ldf@finish{serbianc}
%</code>
%    \end{macrocode}
%
% \Finale
%% \CharacterTable
%%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
%%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
%%   Digits        \0\1\2\3\4\5\6\7\8\9
%%   Exclamation   \!     Double quote  \"     Hash (number) \#
%%   Dollar        \$     Percent       \%     Ampersand     \&
%%   Acute accent  \'     Left paren    \(     Right paren   \)
%%   Asterisk      \*     Plus          \+     Comma         \,
%%   Minus         \-     Point         \.     Solidus       \/
%%   Colon         \:     Semicolon     \;     Less than     \<
%%   Equals        \=     Greater than  \>     Question mark \?
%%   Commercial at \@     Left bracket  \[     Backslash     \\
%%   Right bracket \]     Circumflex    \^     Underscore    \_
%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
%%   Right brace   \}     Tilde         \~}
%%
\endinput