blob: dbd8ed2251817f8af3083c2550996570acf3da59 (
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
|
\ProvidesPackage{dictsym}[2004/07/26 v2.0beta1 Dictionary Symbols (GV/WaS)]
%% Copyright 2004 Walter Schmidt
%
% This work may be distributed and/or modified under the
% conditions of the LaTeX Project Public License, either version 1.3
% 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.3 or later is part of all distributions of LaTeX
% version 2003/12/01 or later.
%
% This work has the LPPL maintenance status "maintained".
%
% This Current Maintainer of this work is Walter Schmidt <w.a.schmidt@gmx.net>
%
% This work consists of the files dictsym.sty and dictsym.tex
% and the compiled file dictsym.pdf.
%
\RequirePackage{pifont,keyval}
\define@key{dsy}{scaled}{%
\def\dsy@scale{#1}}
\def\ProcessOptionsWithKV#1{%
\let\@tempc\relax
\let\dsy@tempa\@empty
\@for\CurrentOption:=\@classoptionslist\do{%
\@ifundefined{KV@#1@\CurrentOption}%
{}%
{%
\edef\dsy@tempa{\dsy@tempa,\CurrentOption,}%
\@expandtwoargs\@removeelement\CurrentOption
\@unusedoptionlist\@unusedoptionlist
}%
}%
\edef\dsy@tempa{%
\noexpand\setkeys{#1}{%
\dsy@tempa\@ptionlist{\@currname.\@currext}%
}%
}%
\dsy@tempa
\let\CurrentOption\@empty
}
\ProcessOptionsWithKV{dsy}
\AtEndOfPackage{%
\let\@unprocessedoptions\relax
}
\expandafter\ifx\csname dsy@scale\endcsname\relax
\let\dsy@@scale\@empty
\else
\edef\dsy@@scale{s*[\csname dsy@scale\endcsname]}%
\fi
\DeclareFontFamily{U}{dictsym}{}
\DeclareFontShape{U}{dictsym}{m}{n}{<->\dsy@@scale dictsym}{}
%
\newcommand{\dsarchitectural}{{\Pifont{dictsym}A}}
\newcommand{\dsbiological}{{\Pifont{dictsym}B}}
\newcommand{\dschemical}{{\Pifont{dictsym}C}}
\newcommand{\dsagricultural}{{\Pifont{dictsym}G}}
\newcommand{\dsheraldical}{{\Pifont{dictsym}H}}
\newcommand{\dsjuridical}{{\Pifont{dictsym}J}}
\newcommand{\dsliterary}{{\Pifont{dictsym}L}}
\newcommand{\dsmathematical}{{\Pifont{dictsym}M}}
\newcommand{\dsrailways}{{\Pifont{dictsym}R}}
\newcommand{\dstechnical}{{\Pifont{dictsym}T}}
\newcommand{\dsmilitary}{{\Pifont{dictsym}X}}
\newcommand{\dsaeronautical}{{\Pifont{dictsym}a}}
\newcommand{\dscommercial}{{\Pifont{dictsym}c}}
\newcommand{\dsmedical}{{\Pifont{dictsym}m}}
\endinput
|
