Received: via tmail-4.1(11) (invoked by user schoepf) for schoepf; Tue, 7 Mar 2000 19:12:57 +0100 (MET) Received: from mailgate1.zdv.Uni-Mainz.DE (mailgate1.zdv.Uni-Mainz.DE [134.93.8.56]) by mail.Uni-Mainz.DE (8.9.3/8.9.3) with ESMTP id TAA28189 for ; Tue, 7 Mar 2000 19:12:57 +0100 (MET) Received: from mail.listserv.gmd.de (mail.listserv.gmd.de [192.88.97.5]) by mailgate1.zdv.Uni-Mainz.DE (8.9.3/8.9.3) with ESMTP id TAA08499 for ; Tue, 7 Mar 2000 19:12:56 +0100 (MET) MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="----_=_NextPart_001_01BF8860.C3A0DA80" Received: from mail.listserv.gmd.de (192.88.97.5) by mail.listserv.gmd.de (LSMTP for OpenVMS v1.1a) with SMTP id <6.6CB6106B@mail.listserv.gmd.de>; Tue, 7 Mar 2000 19:11:37 +0100 Received: from RELAY.URZ.UNI-HEIDELBERG.DE by RELAY.URZ.UNI-HEIDELBERG.DE (LISTSERV-TCP/IP release 1.8b) with spool id 452475 for LATEX-L@RELAY.URZ.UNI-HEIDELBERG.DE; Tue, 7 Mar 2000 19:10:13 +0100 X-MimeOLE: Produced By Microsoft Exchange V6.5 Received: from ix.urz.uni-heidelberg.de (mail.urz.uni-heidelberg.de [129.206.119.234]) by relay.urz.uni-heidelberg.de (8.8.8/8.8.8) with ESMTP id TAA09405 for ; Tue, 7 Mar 2000 19:10:12 +0100 (MET) Received: from relay.uni-heidelberg.de (relay.uni-heidelberg.de [129.206.100.212]) by ix.urz.uni-heidelberg.de (8.8.8/8.8.8) with ESMTP id TAA18298 for ; Tue, 7 Mar 2000 19:12:51 +0100 Received: from ixgate02.dfnrelay.d400.de (ixgate02.dfnrelay.d400.de [193.174.248.2]) by relay.uni-heidelberg.de (8.9.3+Sun/8.9.3) with ESMTP id TAA15378 for ; Tue, 7 Mar 2000 19:10:13 +0100 (MET) In-Reply-To: "200003070919.KAA10263": References: "200003062205.WAA14050": Return-Path: X-Mailer: VM 6.44 under Emacs 19.34.1 x-vm-v5-data: ([nil nil nil nil nil nil nil nil nil]["2016" "Tue" "7" "March" "2000" "19:12:35" "+0100" "Chris Rowley" "C.A.Rowley@OPEN.AC.UK" nil "70" "Re: bop-hook" "^Date:" nil nil "3" nil nil nil nil nil]nil) x-mime-autoconverted: from quoted-printable to 8bit by relay.urz.uni-heidelberg.de id TAA09406 x400-received: by /PRMD=uk.ac/ADMD= /C=gb/; Relayed; Tue, 7 Mar 2000 19:12:35 +0100 x400-mts-identifier: [/PRMD=UK.AC/ADMD= /C=GB/;<14533.17439.546743.235209@fell.] content-identifier: Re: bop-hook x400-content-type: P2-1984 (2) alternate-recipient: Allowed x400-originator: C.A.Rowley@open.ac.uk x400-recipients: non-disclosure:; Content-class: urn:content-classes:message Subject: Re: bop-hook Date: Tue, 7 Mar 2000 19:12:35 +0100 Message-ID: <14533.17439.546743.235209*@MHS> X-MS-Has-Attach: X-MS-TNEF-Correlator: From: "Chris Rowley" Sender: "Mailing list for the LaTeX3 project" To: "Multiple recipients of list LATEX-L" Reply-To: "Mailing list for the LaTeX3 project" Status: R X-Status: X-Keywords: X-UID: 3553 This is a multi-part message in MIME format. ------_=_NextPart_001_01BF8860.C3A0DA80 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset=FFso-8859-1" Karsten Tinnefeld wrote -- > \newcommand*{\@originprint}{% > \setbox\@tempboxa\vbox to\z@{% > \vskip-1in \moveleft1in \vbox{% > \hb@xt@\z@{% > \@originpic\hss}}\vss} > \dp\@tempboxa\z@ > \box\@tempboxa \@pagelayout} Whilst holding my tongue on the merits of hooks in general I should like to welcome the presentation of this one since, unlike some other suggestions on this subject, it is very precisely specified (as a bonus we also have the code!). Phil Taylor will also be delighted by its interpretation of where the origin should be for typesetting. Thanks, Karsten chris > \endinput > > > \documentclass[a4paper, oneside]{letter} > \usepackage{bophook} > \PageLayout{% > \newlength{\topdist} > \setlength{\topdist}{\topmargin} > \addtolength{\topdist}{\headheight} > \newlength{\sidedist} > \setlength{\sidedist}{\oddsidemargin}} > \newcommand*{\color}[1]{} > \AtBeginPage{% > \unitlength1mm > \begin{picture}(0,0) > \put(105,-22.5){\makebox(0,0){\Large Brief nach DIN 676 B--A4 = (1995--05)}} > \put(0,-45){\line(1,0){210}} > \put(20,-50){\line(1,0){85}} > \put(20,-90){\line(1,0){85}} > \put(20,-45){\line(0,-1){45}} > \put(105,-45){\line(0,-1){45}} > \put(0,-98.5){\line(1,0){210}} > \put(24,-98.5){\line(0,-1){173.1}} > \put(74.8,-98.5){\line(0,-1){20}} > \put(125.6,-98.5){\line(0,-1){20}} > \put(176.4,-98.5){\line(0,-1){20}} > %%% Faltmarken > \put(0,-105){\line(1,0){10}} > \put(0,-210){\line(1,0){10}} > %%% Lochermarke > \put(10,-148.5){\line(1,0){10}} > \end{picture}} > \newenvironment{brief}{% > \ignorespacesafterend}{} > \begin{document} > \begin{brief} > \makebox{} > \end{brief} > \end{document} > > -- > Karsten Tinnefeld = tinnefeld@ls2.cs.uni-dortmund.de > Fachbereich Informatik, Lehrstuhl 2 T +49 231 = 755-4737 > Universit=E4t Dortmund, D-44221 Dortmund, Deutschland F +49 231 = 755-2047 > ------_=_NextPart_001_01BF8860.C3A0DA80 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Re: bop-hook

Content-Type: text/plain; = charset=FFso-8859-1"

Karsten Tinnefeld wrote --

> \newcommand*{\@originprint}{%
>   \setbox\@tempboxa\vbox = to\z@{%
>     \vskip-1in \moveleft1in = \vbox{%
>       = \hb@xt@\z@{%
>         = \@originpic\hss}}\vss}
>   \dp\@tempboxa\z@
>   \box\@tempboxa \@pagelayout}

Whilst holding my tongue on the merits of hooks in = general I should
like to welcome the presentation of this one since, = unlike some
other suggestions on this subject, it is very = precisely specified (as
a bonus we also have the code!).

Phil Taylor will also be delighted by its = interpretation of where the
origin should be for typesetting.

Thanks, Karsten


chris

> \endinput
>
>
> \documentclass[a4paper, oneside]{letter}
> \usepackage{bophook}
> \PageLayout{%
>   \newlength{\topdist}
>   = \setlength{\topdist}{\topmargin}
>   = \addtolength{\topdist}{\headheight}
>   \newlength{\sidedist}
>   = \setlength{\sidedist}{\oddsidemargin}}
> \newcommand*{\color}[1]{}
> \AtBeginPage{%
>   \unitlength1mm
>   \begin{picture}(0,0)
>     = \put(105,-22.5){\makebox(0,0){\Large Brief nach DIN 676 B--A4 = (1995--05)}}
>     = \put(0,-45){\line(1,0){210}}
>     = \put(20,-50){\line(1,0){85}}
>     = \put(20,-90){\line(1,0){85}}
>     = \put(20,-45){\line(0,-1){45}}
>     = \put(105,-45){\line(0,-1){45}}
>     = \put(0,-98.5){\line(1,0){210}}
>     = \put(24,-98.5){\line(0,-1){173.1}}
>     = \put(74.8,-98.5){\line(0,-1){20}}
>     = \put(125.6,-98.5){\line(0,-1){20}}
>     = \put(176.4,-98.5){\line(0,-1){20}}
>     %%% Faltmarken
>     = \put(0,-105){\line(1,0){10}}
>     = \put(0,-210){\line(1,0){10}}
>     %%% Lochermarke
>     = \put(10,-148.5){\line(1,0){10}}
>   \end{picture}}
>   \newenvironment{brief}{%
>     = \ignorespacesafterend}{}
> \begin{document}
> \begin{brief}
>   \makebox{}
> \end{brief}
> \end{document}
>
> --
> Karsten = Tinnefeld          &nbs= p;            = tinnefeld@ls2.cs.uni-dortmund.de
> Fachbereich Informatik, Lehrstuhl = 2            =        T +49 231 755-4737
> Universit=E4t Dortmund, D-44221 Dortmund, = Deutschland   F +49 231 755-2047
>

------_=_NextPart_001_01BF8860.C3A0DA80--