summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/ocr-latex/ocr.sty
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