summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/lambda/oinuit/oinuit.sty
blob: b39e58eb60c05dbc1eb28e24493933fd637f0fb8 (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
%%
%% This is file `oinuit.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% oinuit.dtx  (with options: `oinuit')
%% 
%%  (c) copyright 2002 Apostolos Syropoulos
%%  This program can be redistributed and/or modified under the terms
%%  of the LaTeX Project Public License Distributed from CTAN
%%  archives in directory macros/latex/base/lppl.txt; either
%%  version 1 of the License, or any later version.
%%  use or alter this file in any way.
%% 
%%  Please report errors or suggestions for improvement to
%% 
%%     Apostolos Syropoulos
%%     366, 28th October Str.
%%     GR-671 00 Xanthi, GREECE
%%     apostolo@ocean1.ee.duth.gr or apostolo@obelix.ee.duth.gr
%% 
%% \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         \~}
\ProvidesPackage{oinuit.sty}
[2002/07/21 v1.0 Package `oinuit.sty']
\IfFileExists{ot1uctt.fd}{%
   \def\ttdefault{uctt}}{}%
\DeclareOption{nunavut}{%
   \ocp\InInuit=Ninuit2uni
   \ocplist\InInuitList=
      \addbeforeocplist 1 \InInuit
      \nullocplist
}
\DeclareOption{quebec}{%
   \ocp\InInuit=Qinuit2uni
   \ocplist\InInuitList=
      \addbeforeocplist 1 \InInuit
      \nullocplist
}
\DeclareOption{iscii}{%
   \ocp\InInuit=inuitscii
   \ocplist\InInuitList=
      \addbeforeocplist 1 \InInuit
      \nullocplist
}
\DeclareOption{utf8}{%
   \ocp\InInuit=inutf8
   \ocplist\InInuitList=
      \addbeforeocplist 1 \InInuit
      \nullocplist
}
\DeclareOption{ucs2}{%
   \ocp\InInuit=id
   \ocplist\InInuitList=
      \addbeforeocplist 1 \InInuit
      \nullocplist
}
\ExecuteOptions{nunavut}
\ProcessOptions
\input litenc.def
\def\selectlanguage#1{%
   \expandafter\ifx\csname l@#1\endcsname\relax%
   \typeout{^^J Error: No hyphenation pattern for language #1 loaded,}%
   \typeout{ default hyphenation patterns are used.^^J}%
   \language=0%
   \else\language=\csname l@#1\endcsname\fi}
\def\inuittext{%
        \fontencoding{LIT}\selectfont%
        \def\encodingdefault{LIT}%
        \selectlanguage{inuit}%
        \pushocplist\InInuitList%
}
\newenvironment{inuit}{\fontencoding{LIT}\selectfont%
                       \selectlanguage{inuit}%
                       \pushocplist\InInuitList}%
                      {\popocplist}
\DeclareRobustCommand{\textinuit}[1]{{%
      \leavevmode\fontencoding{LIT}\selectfont%
      \selectlanguage{inuit}%
      \pushocplist\InInuitList #1}}
\DeclareRobustCommand{\InuitToday}{{%
     \fontencoding{LIT}\selectfont%
     \number\day\space%
     \ifcase\month%
     \or ^^^^1528^^^^14c4^^^^140a^^^^1546         %January
     \or ^^^^1555^^^^1433^^^^140a^^^^1546         %February
     \or ^^^^14ab^^^^1550^^^^14ef                 %March
     \or ^^^^140a^^^^1403^^^^1433^^^^1546^^^^14ea %April
     \or ^^^^14aa^^^^1403                         %May
     \or ^^^^152a^^^^14c2                         %June
     \or ^^^^152a^^^^14da^^^^1403                 %July
     \or ^^^^140a^^^^1405^^^^148d^^^^1505         %August
     \or ^^^^14ef^^^^144e^^^^14bb^^^^1433^^^^1546 %September
     \or ^^^^1505^^^^1483^^^^1450^^^^1433^^^^1546 %October
     \or ^^^^14c4^^^^1555^^^^14bb^^^^1433^^^^1546 %November
     \or ^^^^144e^^^^14ef^^^^14bb^^^^1433^^^^1546 %December
     \fi%
     \number\year}}
\endinput
%%
%% End of file `oinuit.sty'.