summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/struktex/struktex.sty
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-08-19 23:37:56 +0000
committerKarl Berry <karl@freefriends.org>2006-08-19 23:37:56 +0000
commitaffc79c45bfab740028ac1e6b8480c5465a42b01 (patch)
treeab54d74bdf618c0775f9fc6fec3c40a0148aecd2 /Master/texmf-dist/tex/latex/struktex/struktex.sty
parent0ea7446c8635d5d43c7e3b08d8fbb673ca926534 (diff)
struktex update (19aug06)
git-svn-id: svn://tug.org/texlive/trunk@1989 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/struktex/struktex.sty')
-rw-r--r--Master/texmf-dist/tex/latex/struktex/struktex.sty58
1 files changed, 41 insertions, 17 deletions
diff --git a/Master/texmf-dist/tex/latex/struktex/struktex.sty b/Master/texmf-dist/tex/latex/struktex/struktex.sty
index 4f069cdbc36..701d27b3be4 100644
--- a/Master/texmf-dist/tex/latex/struktex/struktex.sty
+++ b/Master/texmf-dist/tex/latex/struktex/struktex.sty
@@ -6,7 +6,7 @@
%%
%% struktex.dtx (with options: `struktex')
%%
-%% Copyright (C) 1989-2005 by Jobst Hoffmann. All rights reserved.
+%% Copyright (C) 1989-2006 by Jobst Hoffmann. All rights reserved.
%%
%% IMPORTANT COPYRIGHT NOTICE:
%%
@@ -19,8 +19,8 @@
%% to
%% j.hoffmann@fh-aachen.de
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
-\def\filedate{2005/05/17}
-\def\fileversion{v8.0f}
+\def\filedate{2006/01/20}
+\def\fileversion{v8.2a}
\ProvidesPackage{struktex}
[\filedate\space\fileversion\space Nassi Shneidermann Charts (Jobst Hoffmann)]
%%
@@ -58,6 +58,24 @@
{%
\setboolean{verification}{true}
}
+\newboolean{filler}
+\setboolean{filler}{true}
+\DeclareOption{nofiller}%
+{%
+ \setboolean{filler}{false}
+}
+\let\ifdraft@nss\iffalse
+\let\iffinal@nss\iftrue
+\DeclareOption{draft}%
+{%
+ \let\ifdraft@nss\iftrue
+ \let\iffinal@nss\iffalse
+}
+\DeclareOption{final}%
+{%
+ \let\ifdraft@nss\iffalse
+ \let\iffinal@nss\iftrue
+}
\ProcessOptions
\ifcurves%
\RequirePackage{curves}
@@ -84,11 +102,8 @@
\DeclareMathSymbol\varnothing{\mathord}{AMSb}{"3F}
\let\emptyset\varnothing
\def\filler@nss%
-{
- \ifmmode%
- \emptyset%
- \else $\emptyset$%
- \fi%
+{%
+ \iffiller\ensuremath{\emptyset}\fi%
}
\def\c@nter@nss%
{%
@@ -106,6 +121,7 @@
{%
\let\ifthenelse=\ifthenelse@nss%
\let\ifend=\ifend@nss%
+ \ifdraft@nss\let\struktogramm@nss=\struktogramm@Proof\fi%
\@ifnextchar [{\struktogramm@nss(#1,#2)}{\struktogramm@nss(#1,#2)[]}%
}
\def\endstruktogramm%
@@ -547,10 +563,12 @@
\curve(\x@nss, \y@nss, \xx@nss, \tempy@nss)%
\else\ifpictIIe%
\tempxxx@nss=\xx@nss
+ \advance\tempxxx@nss by -\x@nss
\divide\tempxxx@nss by 1000
\tempyyy@nss=\tempy@nss
\advance\tempyyy@nss by -\y@nss
\divide\tempyyy@nss by 1000
+ \advance\xx@nss by -\x@nss
\put(\x@nss,\y@nss){\line(\tempxxx@nss, \tempyyy@nss){\xx@nss}}
\fi\fi\fi%
\else
@@ -563,12 +581,17 @@
\else\ifcurves%
\curve(\x@nss, \y@nss, \xx@nss, \tempy@nss)%
\else\ifpictIIe%
- \tempxxx@nss=\xx@nss
- \divide\tempxxx@nss by 1000
- \tempyyy@nss=\tempy@nss
- \advance\tempyyy@nss by -\y@nss
- \divide\tempyyy@nss by 1000
- \put(\x@nss,\y@nss){\line(\tempxxx@nss, \tempyyy@nss){\xx@nss}}
+ \begingroup
+ \tempxxx@nss=\xx@nss
+ \advance\tempxxx@nss by -\x@nss
+ \divide\tempxxx@nss by 1000
+ \tempyyy@nss=\tempy@nss
+ \advance\tempyyy@nss by -\y@nss
+ \divide\tempyyy@nss by 1000
+ \advance\xx@nss by -\x@nss
+ \put(\x@nss,\y@nss){\line(\tempxxx@nss,
+ \tempyyy@nss){\xx@nss}}
+ \endgroup
\fi\fi\fi%
\advance\x@nss by \xsize@nss
\ifemlines%
@@ -689,18 +712,19 @@
\end{trivlist}%
}
\let\centernssfile=\CenterNssFile
+ \newcommand\assert{\let\next=\assert@nss\getoption}%
+ \newcommand\assert@nss[1]{}%
\ifthenelse{\boolean{verification}}
{
\countdef\xsizeo@nss=232%
\countdef\ydeptho@nss=233%
-
- \newcommand\assert{\let\next=\assert@nss\getoption}%
- \newcommand{\assert@nss}[1]%
+ \renewcommand{\assert@nss}[1]%
{%
\tempx@nss=\xsize@nss\divide\tempx@nss by 6%
\set@nss{#1}{\tempx@nss}\tempy@nss=\number\param@nss000%
\assertblock@nss{\tempy@nss}{1}%
}
+%%
\newcommand{\assertblock@nss}[2]%
{%
\tempy@nss=#1\TextBoxHt@nss=\ht\TextBox@nss%