blob: c9c3acaac784ba1daa1d46bd90c147938bd29c3c (
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
|
%%
%% This is file `frcursive.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% frcursive.dtx
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{frcursive}
[2004/02/01 v1.2 support package for French Cursive]
\newcommand{\frcursive@enc}{T1}
\DeclareOption{OT1}{%
\renewcommand{\frcursive@enc}{OT1}}
\newif\if@frcursive@default
\@frcursive@defaultfalse
\DeclareOption{default}{%
\@frcursive@defaulttrue}
\ProcessOptions\relax
\if@frcursive@default
\renewcommand{\rmdefault}{frc}
\linespread{1.5}
\RequirePackage[T1]{fontenc}
\fi
\newenvironment{cursive}{%
\fontencoding{\frcursive@enc}%
\fontfamily{frc}%
\linespread{1.5}%
\selectfont}{%
\par}
\newcommand{\textcursive}[1]{{\cursive#1}}
\newenvironment{calseries}{\fontseries{cal}\selectfont}{}
\newcommand{\textcal}[1]{{\calseries#1}}
\newenvironment{ftseries}{\fontseries{ft}\selectfont}{}
\newcommand{\textft}[1]{{\ftseries#1}}
\newenvironment{wideseries}{\fontseries{w}\selectfont}{}
\newcommand{\textwide}[1]{{\wideseries#1}}
\newenvironment{acadshape}{\fontshape{ac}\selectfont}{}
\newcommand{\textacad}[1]{{\acadshape#1}}
\newlength{\seyesThickness}
\setlength{\seyesThickness}{0.05mm}
\newcommand{\seyesDefault}{}
\newsavebox{\seyes@box}
\newlength{\seyes@ln}
\newcommand{\seyes}[2][\seyesDefault]{%
\mbox{%
\sbox\seyes@box{#2}%
#1%
\raisebox{-0.5\seyesThickness}{\mbox{%
\rlap{\rule{\wd\seyes@box}{\seyesThickness}}%
\settoheight\seyes@ln{a}%
\rlap{\rule[\seyes@ln]{\wd\seyes@box}{\seyesThickness}}%
\settoheight\seyes@ln{d}%
\rlap{\rule[\seyes@ln]{\wd\seyes@box}{\seyesThickness}}%
\settoheight\seyes@ln{b}%
\rlap{\rule[\seyes@ln]{\wd\seyes@box}{\seyesThickness}}%
\settodepth\seyes@ln{p}%
\rlap{\rule[-\seyes@ln]{\wd\seyes@box}{\seyesThickness}}%
\settodepth\seyes@ln{g}%
\rlap{\rule[-\seyes@ln]{\wd\seyes@box}{\seyesThickness}}%
}}%
\usebox\seyes@box}}
\endinput
%%
%% End of file `frcursive.sty'.
|
