blob: 02d125c3159b4c6825bc6429e338fe58d9f38602 (
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
|
\ProvidesPackage{ocr}[2006/09/18 LaTeX support for the various OCR
fonts. Created by Palle Jorgensen, hamselv@pallej.dk]
\RequirePackage{ifthen}
\def\ocrdefault{ocrb}
\DeclareOption{ocr-a}{\def\ocrdefault{ocra}}
\DeclareOption{oca}{\def\ocrdefault{oca}%
\PackageWarning{ocr}{The OCA fonts are buggy. Use the 'ocr-a' option
to get proper OCR-A fonts.^^J}}
\DeclareOption{ocr-b}{\def\ocrdefault{ocrb}}
\DeclareOption{ocr-b-outline}{\def\ocrdefault{ocrbo}}
\DeclareOption{ocr-b-negative}{\def\ocrdefault{ocrbn}}
\DeclareOption{ocr-b-sharp}{\def\ocrdefault{ocrbs}%
\PackageWarning{ocr}{The sharp OCR-B fonts are buggy. Use with care.^^J}}
\DeclareOption{ocr-b-sharp-negative}{\def\ocrdefault{ocrbns}%
\PackageWarning{ocr}{The sharp OCR-B fonts are buggy. Use with care.^^J}}
\ProcessOptions*
\def\ocrfamily{\fontencoding{OT1}\fontfamily{\ocrdefault}\selectfont}
\DeclareTextFontCommand{\ocr}{\ocrfamily}
\def\ocrnegfamily{%
\ifthenelse{\equal{\ocrdefault}{ocrb}}{}{%
\PackageWarning{ocr}{%
Using the 'negative OCR-B' fonts without using the\MessageBreak
OCR-B fonts may give a funny result.^^J}}
\fontencoding{OT1}\fontfamily{ocrbn}\selectfont}
\def\ocrs@negfamily{%
\ifthenelse{\equal{\ocrdefault}{ocrbs}}{}{
\PackageWarning{ocr}{%
Using the 'negative OCR-B Sharp' fonts without using the\MessageBreak
OCR-B Sharp fonts may give a funny result.^^J}}
\fontencoding{OT1}\fontfamily{ocrbns}\selectfont}
\ifthenelse{\equal{\ocrdefault}{ocrbs}}{%
\def\ocrnegfamily{\ocrs@negfamily}}{}
\DeclareTextFontCommand{\ocrneg}{\ocrnegfamily}
\endinput
|