atpage || number comparing

atpage || number comparing

[Peter Schorsch]

Hi,

it tried to do a \atpage command that results
a) some page => nothing
b) different page => pagenumber with some text (e.g. "auf Seite XY")

\def\atPage[#1]%
	{\doifnot{\at[#1]}{\currentpage}%
	{\at[#1]}%
	}

My problem with this is, that the \doifnot always results as not equal;
it is like the types mismatch as if I exchange \at[#1] with a pure
number the comparing works. If so, how can the types be corrected?

Additionally - if possible - I would like to add case that the referred
page is on the other page but in duplex mode adjacent to the actual
page. Is that possible to do this? I unluckily dont know how to make
working simple calculation in tex code.

To be complete I found in the file strc-ref.mkiv some notes about a
planed \atpage command:

%D A still very rudimentary|/|experimental forward|/|backward
%D reference mechanism is provided by the macro \type{\atpage}:
%D
%D \starttyping
%D ... \somewhere{backward text}{forward text}[someref] ...
%D ... \atpage[someref] ...
%D \stoptyping
%D 
%D In future versions there will be more sophisticated

% 0 = no page reference
% 1 = same page
% 2 = preceding page
% 3 = following page
% 4 = backward, same page (todo)
% 5 = forward, same page  (todo)

But that level of the ambient tex is still out of my scope.

Thanks
P.
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: atpage || number comparing

[Rogers, Michael K]

Hi,

I'm a neophyte using last year's TeXLive context.  An expert can probably improve my answer.  Does this work for you?:

\def\atPage[#1]%
        {\doifnot{\doifreferencefoundelse{#1}{\currentreferencepage}{?}}{\currentpage}%
        {\at[#1]}%
        }

I adapted it from code in strc-ref.mkiv.  The \doifreferencefoundelse seems to set up \currentreferencepage properly.  I don't understand it any deeper than that.

As for testing for adjacent pages, TeX has count registers (through \newcount) and ConTeXt has counters (see wiki).  In TeX one can do arithmetic on registers with \advance, \multiply, \divide and test results with \ifnum, \ifodd.  One can do some arithmetic with ConTeXT counters, but I haven't figured it all out yet; and of course, one can use Lua.

Michael

On May 15, 2012, at 8:28 AM, Peter Schorsch wrote:

> Hi,
>
> it tried to do a \atpage command that results
> a) some page => nothing
> b) different page => pagenumber with some text (e.g. "auf Seite XY")
>
> \def\atPage[#1]%
>       {\doifnot{\at[#1]}{\currentpage}%
>       {\at[#1]}%
>       }
>
> My problem with this is, that the \doifnot always results as not equal;
> it is like the types mismatch as if I exchange \at[#1] with a pure
> number the comparing works. If so, how can the types be corrected?
>
> Additionally - if possible - I would like to add case that the referred
> page is on the other page but in duplex mode adjacent to the actual
> page. Is that possible to do this? I unluckily dont know how to make
> working simple calculation in tex code.
>
> To be complete I found in the file strc-ref.mkiv some notes about a
> planed \atpage command:
>
> %D A still very rudimentary|/|experimental forward|/|backward
> %D reference mechanism is provided by the macro \type{\atpage}:
> %D
> %D \starttyping
> %D ... \somewhere{backward text}{forward text}[someref] ...
> %D ... \atpage[someref] ...
> %D \stoptyping
> %D
> %D In future versions there will be more sophisticated
>
> % 0 = no page reference
> % 1 = same page
> % 2 = preceding page
> % 3 = following page
> % 4 = backward, same page (todo)
> % 5 = forward, same page  (todo)
>
> But that level of the ambient tex is still out of my scope.
>
> Thanks
> P.
> ___________________________________________________________________________________
> If your question is of interest to others as well, please add an entry to the Wiki!
>
> maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
> webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
> archive  : http://foundry.supelec.fr/projects/contextrev/
> wiki     : http://contextgarden.net
> ___________________________________________________________________________________


________________________________

This e-mail message (including any attachments) is for the sole use of
the intended recipient(s) and may contain confidential and privileged
information. If the reader of this message is not the intended
recipient, you are hereby notified that any dissemination, distribution
or copying of this message (including any attachments) is strictly
prohibited.

If you have received this message in error, please contact
the sender by reply e-mail message and destroy all copies of the
original message (including attachments).
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: atpage || number comparing

[Hans Hagen]

On 15-5-2012 14:28, Peter Schorsch wrote:
> Hi,
>
> it tried to do a \atpage command that results
> a) some page =>  nothing
> b) different page =>  pagenumber with some text (e.g. "auf Seite XY")
>
> \def\atPage[#1]%
> 	{\doifnot{\at[#1]}{\currentpage}%
> 	{\at[#1]}%
> 	}
>
> My problem with this is, that the \doifnot always results as not equal;
> it is like the types mismatch as if I exchange \at[#1] with a pure
> number the comparing works. If so, how can the types be corrected?
>
> Additionally - if possible - I would like to add case that the referred
> page is on the other page but in duplex mode adjacent to the actual
> page. Is that possible to do this? I unluckily dont know how to make
> working simple calculation in tex code.
>
> To be complete I found in the file strc-ref.mkiv some notes about a
> planed \atpage command:
>
> %D A still very rudimentary|/|experimental forward|/|backward
> %D reference mechanism is provided by the macro \type{\atpage}:
> %D
> %D \starttyping
> %D ... \somewhere{backward text}{forward text}[someref] ...
> %D ... \atpage[someref] ...
> %D \stoptyping
> %D
> %D In future versions there will be more sophisticated
>
> % 0 = no page reference
> % 1 = same page
> % 2 = preceding page
> % 3 = following page
> % 4 = backward, same page (todo)
> % 5 = forward, same page  (todo)
>
> But that level of the ambient tex is still out of my scope.

that comment can be deleted as \atpage is defined earlier on

anyhow, you can use

\startbuffer
\starttabulate[|l|l|l|l|]
     \NC one   \NC \atpage[one]   \NC \somewhere{(see before)}{(see 
later)}[one]   \NC \NR
     \NC two   \NC \atpage[two]   \NC \somewhere{(see before)}{(see 
later)}[two]   \NC \NR
     \NC three \NC \atpage[three] \NC \somewhere{(see before)}{(see 
later)}[three] \NC \NR
\stoptabulate
\stopbuffer

\starttext

     \section[one]  {One}   \getbuffer \page
     \section[two]  {Two}   \getbuffer \page
     \section[three]{Three} \getbuffer \page

\stoptext

the next variant (same functionality) is somewhat better

\unprotect

\unexpanded\def\somewhere#1#2#3[#4]% #dummy gobbles space around #2
   {\doifreferencefoundelse{#4}%
 
{\strc_references_by_reference_page_state{#4}{\goto{#1}[#4]}{}{\goto{#2}[#4]}}
      {[#4]}}

\protect




-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
     tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com
                                              | www.pragma-pod.nl
-----------------------------------------------------------------
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________