From 9b1f1e30efb3d059b7bff20bb4412dc30f7dbf0d Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 12 Jan 2006 23:52:19 +0000 Subject: bizcard git-svn-id: svn://tug.org/texlive/trunk@715 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/bizcard/bizcard.sty | 91 +++++++++++++++++++++++++ 1 file changed, 91 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/bizcard/bizcard.sty (limited to 'Master') diff --git a/Master/texmf-dist/tex/latex/bizcard/bizcard.sty b/Master/texmf-dist/tex/latex/bizcard/bizcard.sty new file mode 100644 index 00000000000..c1c28d145c2 --- /dev/null +++ b/Master/texmf-dist/tex/latex/bizcard/bizcard.sty @@ -0,0 +1,91 @@ +%% +%% This is file `bizcard.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% bizcard.dtx (with options: `package') +%% bizcard: A LaTeX2e package for business/visiting/calling cards +%% +%% Copyright (C) 1999 Sebastian Marius Kirsch +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the GNU General Public License as published by +%% the Free Software Foundation; either version 2, or (at your option) +%% any later version. +%% +%% This program is distributed in the hope that it will be useful, +%% but WITHOUT ANY WARRANTY; without even the implied warranty of +%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%% GNU General Public License for more details. +%% +%% You should have received a copy of the GNU General Public License +%% along with this program; see the file COPYING. +%% If not, write to the Free Software Foundation, +%% 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. +%% +\def\fileversion{1.1} % ^^A -*-latex-*- +\def\filedate{1999/09/04} +%%\CheckSum{73} +%%\CharacterTable +%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z +%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z +%% Digits \0\1\2\3\4\5\6\7\8\9 +%% Exclamation \! Double quote \" Hash (number) \# +%% Dollar \$ Percent \% Ampersand \& +%% Acute accent \' Left paren \( Right paren \) +%% Asterisk \* Plus \+ Comma \, +%% Minus \- Point \. Solidus \/ +%% Colon \: Semicolon \; Less than \< +%% Equals \= Greater than \> Question mark \? +%% Commercial at \@ Left bracket \[ Backslash \\ +%% Right bracket \] Circumflex \^ Underscore \_ +%% Grave accent \` Left brace \{ Vertical bar \| +%% Right brace \} Tilde \~} +%% +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{bizcard}% + [\filedate\space v\fileversion\space Package for business cards] +\newcommand*{\bizcard@marks}{} +\DeclareOption{none}{\renewcommand{\bizcard@marks}{}} +\DeclareOption{frame}{\renewcommand{\bizcard@marks}{% + \multiput(0,0)(0,51){6}{\line(1,0){178}} + \multiput(0,0)(89,0){3}{\line(0,1){255}}}} +\DeclareOption{star}{\renewcommand{\bizcard@marks}{% +\multiput(0,0)(0,51){6}{\makebox(0.0,0.1)[c]{{\tiny +}}} +\multiput(89,0)(0,51){6}{\makebox(0.0,0.1)[c]{{\tiny +}}} +\multiput(178,0)(0,51){6}{\makebox(0.0,0.1)[c]{{\tiny +}}}}} +\DeclareOption{flat}{\renewcommand{\bizcard@marks}{% +\thinlines +\multiput(0,-.5)(89,0){3}{\line(0,-1){5}} +\multiput(0,255.5)(89,0){3}{\line(0,1){5}} +\multiput(-.5,0)(0,51){6}{\line(-1,0){5}} +\multiput(178.5,0)(0,51){6}{\line(1,0){5}}}} +\ExecuteOptions{star} + +\ProcessOptions +\RequirePackage{ifthen} + +\ifthenelse{% + \lengthtest{\textwidth<178.8mm}\or\lengthtest{\textheight<255mm}}{% + \RequirePackage[body={178.8mm,255mm},noheadfoot]{geometry}[1998/04/08]% + }{} +\newsavebox{\bizcard@box} + +\newenvironment{bizcard}{% + \setlength{\unitlength}{1mm}% + \begin{lrbox}{\bizcard@box}% + \begin{picture}(89,51)% + }{% + \end{picture}% + \end{lrbox}% + \thispagestyle{empty}% + \noindent\begin{picture}(178,255)(0,0)% + \multiput(0,0)(0,51){5}{\usebox{\bizcard@box}} + \multiput(89,0)(0,51){5}{\usebox{\bizcard@box}} + \bizcard@marks + \end{picture} + } +\endinput +%% +%% End of file `bizcard.sty'. -- cgit v1.2.3