diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/frcursive/latex |
Initial commit
Diffstat (limited to 'fonts/frcursive/latex')
-rw-r--r-- | fonts/frcursive/latex/frcursive.sty | 65 | ||||
-rw-r--r-- | fonts/frcursive/latex/ot1frc.fd | 38 | ||||
-rw-r--r-- | fonts/frcursive/latex/t1frc.fd | 34 |
3 files changed, 137 insertions, 0 deletions
diff --git a/fonts/frcursive/latex/frcursive.sty b/fonts/frcursive/latex/frcursive.sty new file mode 100644 index 0000000000..c9c3acaac7 --- /dev/null +++ b/fonts/frcursive/latex/frcursive.sty @@ -0,0 +1,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'. diff --git a/fonts/frcursive/latex/ot1frc.fd b/fonts/frcursive/latex/ot1frc.fd new file mode 100644 index 0000000000..403410a06c --- /dev/null +++ b/fonts/frcursive/latex/ot1frc.fd @@ -0,0 +1,38 @@ +%-*- TeX -*- +% NFSS definition for the French Cursive font family +% Bugfixes by Mariusz Wodzicki. + +\ProvidesFile{ot1frc.fd}[2004/06/12 French Cursive font definition] +\DeclareFontFamily{OT1}{frc}{} + +\newcommand\DeclareFrenchCursiveShape[3]{ + \DeclareFontShape{OT1}{frc}{#2}{#3}{% + <-8> frc#17 + <8><9><10><12> gen * frc#1 + <10.95> frc#111 + <14.4> frc#114 + <17.28-> frc#117}{}} + +\DeclareFrenchCursiveShape {r} {m}{n} +\DeclareFrenchCursiveShape {sl} {m}{sl} +\DeclareFrenchCursiveShape {bx} {bx}{n} +\DeclareFrenchCursiveShape {slbx} {bx}{sl} + +\newcommand\DeclareReducedFrenchCursiveShape[3]{ + \DeclareFontShape{OT1}{frc}{#2}{#3}{% + <-10.95> frc#110 + <10.95> frc#111 + <12> frc#112 + <14.4-> frc#114}{}} + +\DeclareReducedFrenchCursiveShape {c} {cal}{n} % calligraphic +\DeclareReducedFrenchCursiveShape {slc} {cal}{sl} % slanted calligraphic +\DeclareReducedFrenchCursiveShape {f} {ft}{n} % fixed-thickness + +\DeclareFontShape{OT1}{frc}{m}{ac}{<-> frca10}{} +\DeclareFontShape{OT1}{frc}{w}{n}{<-> frcw10}{} + +\DeclareFontShape{OT1}{frc}{m}{it}{<-> sub * frc/m/sl}{} +\DeclareFontShape{OT1}{frc}{bx}{it}{<-> sub * frc/bx/sl}{} + +\endinput diff --git a/fonts/frcursive/latex/t1frc.fd b/fonts/frcursive/latex/t1frc.fd new file mode 100644 index 0000000000..54ab280609 --- /dev/null +++ b/fonts/frcursive/latex/t1frc.fd @@ -0,0 +1,34 @@ +%-*- TeX -*- +% NFSS definition for the French Cursive font family +% Bugfixes by Mariusz Wodzicki. + +\ProvidesFile{t1frc.fd}[2004/06/12 French Cursive font definition] +\DeclareFontFamily{T1}{frc}{} + +\newcommand\DeclareFrenchCursiveShape[3]{ + \DeclareFontShape{T1}{frc}{#2}{#3}{% + <-8> frc#16 + <8-14> frc#110 + <14-> frc#114}{}} + +\DeclareFrenchCursiveShape {r} {m}{n} +\DeclareFrenchCursiveShape {sl} {m}{sl} +\DeclareFrenchCursiveShape {bx} {bx}{n} +\DeclareFrenchCursiveShape {slbx} {bx}{sl} + +\newcommand\DeclareReducedFrenchCursiveShape[3]{ + \DeclareFontShape{T1}{frc}{#2}{#3}{% + <-14> frc#110 + <14-> frc#114}{}} + +\DeclareReducedFrenchCursiveShape {c} {cal}{n} % calligraphic +\DeclareReducedFrenchCursiveShape {slc} {cal}{sl} % slanted calligraphic +\DeclareReducedFrenchCursiveShape {f} {ft}{n} % fixed-thickness + +\DeclareFontShape{T1}{frc}{m}{ac}{<-> frca10}{} +\DeclareFontShape{T1}{frc}{w}{n}{<-> frcw10}{} + +\DeclareFontShape{T1}{frc}{m}{it}{<-> sub * frc/m/sl}{} +\DeclareFontShape{T1}{frc}{bx}{it}{<-> sub * frc/bx/sl}{} + +\endinput |