ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
From: Henning Hraban Ramm <hraban@fiee.net>
Subject: Re: pagemark code works no more with arranging 3SIDE
Date: Mon, 11 Aug 2003 22:42:36 +0200	[thread overview]
Message-ID: <571199F6-CC3C-11D7-883C-0030659899AA@fiee.net> (raw)
In-Reply-To: <5.2.0.9.1.20030811143345.02bbce70@server-1>


Am Montag, 11.08.03, um 14:34 Uhr (Europe/Zurich) schrieb Hans Hagen:

> Can you make me a small test file?

Here you are:
--- snip ---
\starttext
\enableregime			[il1]
\definepapersize		[filius][width=92mm, height=172mm]
\setuppapersize		[filius][A4,landscape]
\setuparranging		[3SIDE]
\setupbodyfont		[ss,7pt]

% alternative, but markings don't show:
%\setuppaper     [nx=3,ny=1, dx=0mm,dy=0mm, 
topspace=19mm,backspace=10.5mm]
%\setuplayout    [page] [topspace=19mm, backspace=10.5mm,
%			location=middle, marking=on]
%\setuparranging [XY]

\setuplayout		[location=middle,
			alternative=singlesided,
			grid=no, marking=on,
			leftmargin=10mm, leftmargindistance=0mm,
			topspace=2mm, header=4mm, footer=0mm,
			width=77mm, height=166mm]

\def\RegisterPageMark#1#2% #1=Class #2=Text
	{\iftrialtypesetting \else
	\doglobal\increment\MNamCounter%
	\textreference[#1:t:\MNamCounter]{#2}%
	\doifreferencefoundelse{#1:t:\MNamCounter}
	{\doifundefined{#1:f:\currentrealreference}%
	{\setxvalue{#1:f:\currentrealreference}%
	{\noexpand\in[#1:t:\MNamCounter]}}
	\setxvalue{#1:l:\currentrealreference}%
	{\noexpand\in[#1:t:\MNamCounter]}}%
	{}%
	\fi}

\def\GetFirstOnPage#1{\getvalue{#1:f:\realfolio}} % #1=Class
\def\GetLastOnPage#1{\getvalue{#1:l:\realfolio}} % #1=Class

\setuppagenumbering	[state=start, location={header,inleft}]

\setupheadertexts	[][\GetFirstOnPage{MNam}--\GetLastOnPage{MNam}]

\def\Name#1{\bf #1\RegisterPageMark{MNam}{\FirstNCharacters{4}{#1}}}

\startalignment	[right]
\setuptabulate	[distance=none,indenting=none,inner={}]

\starttabulate[|w(30mm)k0|w(30mm)k0|w(18mm)k0|]
\HL
% \input adrlst.tex % script-generated table entries from database like:
\NC\Name{Alter, Hugo}\NC alter.hugo@t-online.de\NC\NC\NR
\NC Hugostraße 77 \NC D-66127 Saarbrücken \NC +49 +6898-12345\NC\NR
\HL
\NC\Name{Zoller, Stefan}\NC stefan.zoller@gmx.ch\NC0179-123456\NC\NR
\NC Zollstraße 1\NC CH-8274 Tägerwilen\NC +41 +71-12345\NC\NR
\HL
\stoptabulate
\stopalignment
\stoptext
--- snap ---

Grüßlis vom Hraban!
-- 
http://www.fiee.net/texnique/

      reply	other threads:[~2003-08-11 20:42 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-08-08 20:19 Henning Hraban Ramm
2003-08-11 12:34 ` Hans Hagen
2003-08-11 20:42   ` Henning Hraban Ramm [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=571199F6-CC3C-11D7-883C-0030659899AA@fiee.net \
    --to=hraban@fiee.net \
    --cc=ntg-context@ntg.nl \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).