summaryrefslogtreecommitdiff
path: root/Master/tlpkg/dviout/HYPERTEX/myhyper.sty
blob: 1b3ccd202790c4f1477867da93cbfc80b16cd334 (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
%  This is a LaTeX style file for HyperTeX
%       1996     written  by Okumura
%       1996     modified by SHIMA
%	1997/99  modified by Ohishi
%
% \href
% \name
% \img
% \base
%
% \goto   % 1996 added by SHIMA
%
%%%%%%  Example  %%%%%%
%
%   If you click \href{#foo}{here}, 
%   you will jump to \name{foo}{this place}.
%
%   The above is equavalent to 
%
%   If you click \goto{foo}{here},
%   ...
%
%   If you click \href{http://xxx.toto-u.ac.jp/ftp.html}{here}, 
%   you will jump to http://xxx.toto-u.ac.jp/ftp.html.

\edef\hypert@mp{\catcode`\noexpand\#=\the\catcode`\#}%
\catcode`\#=12
\def\hyper@sh{#}%
\hypert@mp
\let\hypert@mp=\relax

\def\goto{\leavevmode\begingroup\@sanitize\@goto}
\def\@goto#1{\special{html:<a href="\hyper@sh#1">}\endgroup \@@href}

\def\href{\leavevmode\begingroup\@sanitize\@href}
\def\@href#1{\special{html:<a href="#1">}\endgroup \@@href}
\def\@@href#1{#1\special{html:</a>}}

\def\base{\leavevmode\begingroup\@sanitize\@base}
\def\@base#1{\special{html:<base href="#1">}\endgroup}

\def\img{\leavevmode\begingroup\@sanitize\@img}
\def\@img#1{\special{html:<img src="#1">}\endgroup}

\def\name{\leavevmode\begingroup\@sanitize\@name}
\def\@name#1{\special{html:<a name="#1">}\endgroup \@@name}
\def\@@name#1{#1\special{html:</a>}}