summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/dashrule/dashrule.sty
blob: 826407dd13bd7530916de3dc21ff6222d7003a16 (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
%%
%% This is file `dashrule.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% dashrule.dtx  (with options: `package')
%% 
%% This is a generated file.
%% 
%% Copyright (C) 2001 Scott Pakin <pakin@uiuc.edu>
%% -------------------------------------------------------
%% 
%% This package may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.2
%% 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.2 or later is part of all distributions of LaTeX
%% version 1999/12/01 or later.
%% 
%% File: dashrule.dtx Copyright (C) 2001 Scott Pakin <pakin@uiuc.edu>
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{dashrule}
         [2001/04/23 v1.00 Dashed rules (SDP)]
\def\hdr@do@rule[#1]#2#3{%
  \rule[#1]{#2}{#3}%
  \let\hdr@do@something=\hdr@do@skip
}
\def\hdr@do@skip[#1]#2#3{%
  \hspace*{#2}%
  \let\hdr@do@something=\hdr@do@rule
}
\newcounter{hdr@segments}
\def\hdr@tally@segments#1 {%
  \ifx#1!%
  \else
    \addtocounter{hdr@segments}{1}%
    \expandafter\hdr@tally@segments%
  \fi
}
\DeclareRobustCommand{\hdashrule}{\@testopt{\hdashrule@i}{0pt}}
\def\hdashrule@i[#1]{\@testopt{\hdashrule@ii[#1]}\empty}
\def\hdashrule@ii[#1][#2]#3#4#5{%
  \let\hdr@do@something=\hdr@do@rule
  \def\hdr@parse@dash##1 {%
    \ifx##1!%
    \else
      \hdr@do@something[#1]{##1}{#4}%
      \expandafter\hdr@parse@dash%
    \fi
  }%
  \setcounter{hdr@segments}{0}%
  \hdr@tally@segments#5 !
  \ifodd\c@hdr@segments
    \csname#2leaders\endcsname%
      \hbox{\hdr@parse@dash#5 #5 ! }%
      \hskip#3\relax
  \else
    \csname#2leaders\endcsname%
      \hbox{\hdr@parse@dash#5 ! }%
      \hskip#3\relax
  \fi%
}
\endinput
%%
%% End of file `dashrule.sty'.