Added frcursive for latex

1 files changed, 65 insertions, 0 deletions

diff --git a/latex_frcursive/texmf/tex/latex/frcursive/frcursive.sty b/latex_frcursive/texmf/tex/latex/frcursive/frcursive.sty
new file mode 100644
index 0000000..c9c3aca
--- /dev/null
+++ b/latex_frcursive/texmf/tex/latex/frcursive/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'.