From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/16005 Path: main.gmane.org!not-for-mail From: =?ISO-8859-15?Q?Peter_M=FCnster?= Newsgroups: gmane.comp.tex.context Subject: Re: High level user macro (howto?) Date: Tue, 10 Aug 2004 14:11:41 +0200 (CEST) Sender: ntg-context-bounces@ntg.nl Message-ID: References: <"m2hdtw92rn.fs f"@levana.de> <6.1.1.1.2.20040601200608.01eb9640@server-1> <"m2n032tvs8.fs f"@levana.de> <20040622161300.GA5608@swordfish> <34371.80.58.5.46.1087924408.squirrel@bitmail.bitmailer.com> <0D45B077-C4DA-11D8-972E-000A9595B57C@ensta.fr> <40D944A4.5030402@gmx.de> <43DEE2EE-C510-11D8-972E-000A9595B57C@ensta.fr> <72D4BC80-C612-11D8-9706-0030659899AA@fiee.net> <40DC4CDF.2090904@wxs.nl> <5CAF4C26-C756-11D8-AE54-000A95C38698@chello.fr> <20040628113217.2e Reply-To: ntg-context@ntg.nl NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=ISO-8859-15 Content-Transfer-Encoding: quoted-printable X-Trace: sea.gmane.org 1092140038 23766 80.91.224.253 (10 Aug 2004 12:13:58 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 10 Aug 2004 12:13:58 +0000 (UTC) Original-X-From: ntg-context-bounces@ntg.nl Tue Aug 10 14:13:50 2004 Return-path: Original-Received: from ronja.vet.uu.nl ([131.211.172.88] helo=ronja.ntg.nl) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1BuVVm-0001vg-00 for ; Tue, 10 Aug 2004 14:13:50 +0200 Original-Received: from localhost (localhost.localdomain [127.0.0.1]) by ronja.ntg.nl (Postfix) with ESMTP id 81CB11276D; Tue, 10 Aug 2004 14:13:50 +0200 (CEST) Original-Received: from ronja.ntg.nl ([127.0.0.1]) by localhost (ronja.vet.uu.nl [127.0.0.1]) (amavisd-new, port 10024) with LMTP id 03050-06; Tue, 10 Aug 2004 14:13:50 +0200 (CEST) Original-Received: from ronja.vet.uu.nl (localhost.localdomain [127.0.0.1]) by ronja.ntg.nl (Postfix) with ESMTP id 92B781276F; Tue, 10 Aug 2004 14:12:07 +0200 (CEST) Original-Received: from localhost (localhost.localdomain [127.0.0.1]) by ronja.ntg.nl (Postfix) with ESMTP id 38D051276F for ; Tue, 10 Aug 2004 14:12:06 +0200 (CEST) Original-Received: from ronja.ntg.nl ([127.0.0.1]) by localhost (ronja.vet.uu.nl [127.0.0.1]) (amavisd-new, port 10024) with LMTP id 03148-01 for ; Tue, 10 Aug 2004 14:12:05 +0200 (CEST) Original-Received: from postfix4-2.free.fr (unknown [213.228.0.176]) by ronja.ntg.nl (Postfix) with ESMTP id 90FA81276D for ; Tue, 10 Aug 2004 14:12:05 +0200 (CEST) Original-Received: from gaston.free.fr (rennes-1-62-147-98-98.dial.proxad.net [62.147.98.98]) by postfix4-2.free.fr (Postfix) with ESMTP id 6C7201C4B11 for ; Tue, 10 Aug 2004 14:11:52 +0200 (CEST) Original-Received: by gaston.free.fr (Postfix, from userid 500) id DFF8A13C015; Tue, 10 Aug 2004 14:11:41 +0200 (CEST) Original-Received: from localhost (localhost [127.0.0.1]) by gaston.free.fr (Postfix) with ESMTP id D511014807B for ; Tue, 10 Aug 2004 14:11:41 +0200 (CEST) X-X-Sender: peter@gaston.free.fr Original-To: ntg-context@ntg.nl In-Reply-To: X-Virus-Scanned: by amavisd-new at ntg.nl X-BeenThere: ntg-context@ntg.nl X-Mailman-Version: 2.1.5 Precedence: list List-Id: mailing list for ConTeXt users List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: ntg-context-bounces@ntg.nl X-Virus-Scanned: by amavisd-new at ntg.nl Xref: main.gmane.org gmane.comp.tex.context:16005 X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:16005 Pardon, I forgot the whole tex-file: \useregime[il1] \enableregime[il1] \useencoding[ffr] \definehspace[fr][:][.16667em] \definehspace[fr][;][.16667em] \definehspace[fr][!][.16667em] \definehspace[fr][?][.16667em] \mainlanguage[fr] \newdimen\BigWidth \BigWidth=3D18cm \setupscreens[screen=3D0.85] \setupcolors[state=3Dstart] \setupheadertexts[R=E9v.: \the\RevC] \def\Vfil{\vskip0pt plus3fil\relax} \def\In[#1,#2]{\ifx#1\empty\else\in[#1]\fi\if\relax#2\else, \In[#2]\fi} \def\BigTitle{\centerline{\framed[width=3D\BigWidth,offset=3D2mm, background=3Dscreen]{\bfb\setupinterlinespace\cbox{Title}}}} \def\startChanges{\hbox to \hsize\bgroup\hss\SetTableToWidth{\BigWidth}% \starttable[s1 | c | c | p(95mm) | p(17mm) | p(37mm) |] \HL\BL[5]\AR\VL R=E9v.\VL Date\VL Origine de la mise =E0 jour\VL=A7 mod= ifi=E9\VL Auteur\VL\AR\HL} \def\stopChanges{\stoptable\hss\egroup}\newcount\RevC \def\Changes#1[#2]{% \getparameters[CH][#2]% Auteur, Modif, Labels, Date \ifnum\RevC=3D0 \BigTitle \vskip0.5ex \Vfil \startChanges \fi \global\advance\RevC by 1 \VL \the\RevC \VL \CHDate \VL \CHModif \VL XXX%\In[\CHLabels,\relax] % does not work, but not so important for now \VL \CHAuteur \VL\AR\HL} \def\Destinataires#1{\stopChanges\Vfil \def\temp{#1}\ifx\temp\empty\else\noindenting Destinataires:\crlf#1\bla= nk\fi \centerline{\SetTableToWidth{\BigWidth}% \bf\starttable[| c | c | c |] \HL\BL[3]\AR\VL Approbateur\VL Date\VL Visa\VL\AR\HL \VL\vbox to 2cm{}\VL\VL\VL\AR\HL \stoptable}\par\page\completecontent} \starttext \Changes[Date=3D1/2/2004,Modif=3DFirst version,Auteur=3DPeter] \Changes[Date=3D3/4/2004,Modif=3DSome modifications,Lables=3D{sec:S1,sec:= S2}, Auteur=3DPeter M=FCnster] \Changes[Date=3D5/6/2004,Modif=3DSome other modifications,Lables=3D{sec:S= 2}, Auteur=3DPeter] % \Destinataires{Peter, Olivier} \section[sec:S1]{A section} some text \subsection{Bla} \subsection{Bla} \section[sec:S2]{Another section} some text \stoptext Cheers, Peter --=20 http://pmrb.free.fr/contact/ _____________________________________ FilmSearch engine: http://f-s.sf.net/