Re: \starbuffer in own macros

[Andreas Harder <aharder@uni-koblenz.de>]

[-- Attachment #1.1: Type: text/plain, Size: 1083 bytes --]


Am 19.10.2009 um 00:50 schrieb Wolfgang Schuster:

>
> Am 18.10.2009 um 12:02 schrieb Andreas Harder:
>
>>> Before I help you provide us with more information, e.g. should  
>>> the text in the buffer
>>> appear also in the complete text or do you it only in the snippet?
>>
>> Sorry, that I did not make myself clear. The real setup is: I've a  
>> lot of line numbered text in the appendix of the document. In the  
>> body I'd like to cite out of it (with the same line numbers as in  
>> the source/appendix). The appendix should stay unchanged.
>
> For the beginning you can play with this code, it has to be changed
> in a few parts (e.g. make \setuplines local) but it's what I can read
> from your description above and the code you showed in the previous  
> message.

Thank you very much for your help!

I adapted your solution and it works as intended.

There is an inherent "problem" as one can see in the attachment, but  
since mostly I cite a whole paragraph it's not a real problem. I think  
therefore you used the lines-environment?



Again many thanks!

	Andreas

[-- Attachment #1.2.1: Type: text/html, Size: 1706 bytes --]

[-- Attachment #1.2.2: test-linenumbering6.tex --]
[-- Type: application/octet-stream, Size: 4438 bytes --]


% \def\doifelsesamelinereference#1#2#3%
%  {\doifreferencefoundelse{lr:b:#1}
%     {\edef\fline{\currentreferencedefault}% was \currentreferencetext
%      \doifreferencefoundelse{lr:e:#1}
%        {\edef\tline{\currentreferencedefault}% was \currentreferencetext
%         \ifx\fline\tline#2\else#3\fi}
%        {\unknownreference{#1}#2}}
%     {\unknownreference{#1}#2}}

% \def\startMyCite[#1]%
%  {\def\stopMyCite
%     {\setuplines[before=,after=]%
%      \startlines\startline[#1]\getbuffer[#1]\stopline[#1]\stoplines
%      \savebuffer[#1]}%
%   \dostartbuffer[#1][startMyCite][stopMyCite]}

% \def\getMyCite[#1]%
%  {\doifreferencefoundelse{lr:b:#1}
%     {\startlinenumbering[\currentreferencedefault]}
%      \startlinenumbering
%   \startlines\readfile{\jobname-#1.tmp}{}{}\stoplines
%   \stoplinenumbering}

% \setuplayout[width=middle,backspace=5cm]

\def\startMyCite[#1]%
 {\def\stopMyCite
   {\startline[#1]\getbuffer[#1]\stopline[#1]\savebuffer[#1]}%
   \dostartbuffer[#1][startMyCite][stopMyCite]}


\def\getMyCite[#1]{%
  \doifreferencefoundelse{lr:b:#1} 
    {\startlinenumbering[\currentreferencedefault]}
    \startlinenumbering
      \readfile{\jobname-#1.tmp}{}{}
    \stoplinenumbering}


\setupwhitespace[big]
% \setupalign[right,nothyphenated]

\starttext

\startbodymatter
 test text test text test text test text test text test text test
 text test text test text test text test text test text test text

 she told:\crlf
 \getMyCite[test-1] % lines 3--6 but 3--7 in the appendix

 test text test text test text test text test text test text test
 text test text test text test text test text test text test text

 and he answered:\crlf
 \getMyCite[test-2]

 test text test text test text test text test text test text test
 text test text test text test text test text test text test text

 she replied:\crlf
 \getMyCite[test-3]
\stopbodymatter


\startappendices
 \startlinenumbering
   We thrive in information--thick worlds because of our marvelous and
   everyday ca- pacity to select, edit, single out, structure,
   highlight, group, pair, merge, harmo- nize, synthesize, focus,
   organize, condense, reduce, boil down, choose,
   \startMyCite[test-1]
     {\red categorize}, catalog, classify, list, abstract, scan, look
     into, idealize, isolate, discriminate, dis- tinguish, screen,
     pigeonhole, pick over, sort, integrate, blend, inspect, filter,
     lump, skip, smooth, chunk, average, approximate, cluster,
     aggregate, outline, summarize, {\red itemize,}
   \stopMyCite
   review, dip into, flip through, browse, glance into, leaf through,
   skim, re- fine, enumerate, glean, synopsize, winnow the wheat from
   the chaff and separate the sheep from the goats.

   We thrive in information--thick worlds because of our marvelous and
   everyday ca- pacity to select, edit, single out, structure,
   highlight, group, pair, merge, harmo- nize, synthesize, focus,
   organize, condense, reduce, boil down, choose,
   \startMyCite[test-2]
     {\red categorize}, catalog, classify, list, abstract, scan, look
     into, idealize, isolate, discriminate, dis- tinguish, screen,
     pigeonhole, pick over, sort, integrate, blend, inspect, filter,
     lump, skip, smooth, chunk, average, approximate, cluster,
     aggregate, outline, summarize, {\red itemize,}
   \stopMyCite
   review, dip into, flip through, browse, glance into, leaf through,
   skim, re- fine, enumerate, glean, synopsize, winnow the wheat from
   the chaff and separate the sheep from the goats.

   \startMyCite[test-3]
     We thrive in information--thick worlds because of our marvelous
     and everyday ca- pacity to select, edit, single out, structure,
     highlight, group, pair, merge, harmo- nize, synthesize, focus,
     organize, condense, reduce, boil down, choose, categorize,
     catalog, classify, list, abstract, scan, look into, idealize,
     isolate, discriminate, dis- tinguish, screen, pigeonhole, pick
     over, sort, integrate, blend, inspect, filter, lump, skip,
     smooth, chunk, average, approximate, cluster, aggregate, outline,
     summarize, itemize, review, dip into, flip through, browse,
     glance into, leaf through, skim, re- fine, enumerate, glean,
     synopsize, winnow the wheat from the chaff and separate the sheep
     from the goats.
   \stopMyCite
 \stoplinenumbering
\stopappendices

\stoptext

%%% Local Variables: 
%%% mode: context
%%% TeX-master: t
%%% End: 

[-- Attachment #1.2.3: Type: text/html, Size: 285 bytes --]

[-- Attachment #2: Type: text/plain, Size: 486 bytes --]

___________________________________________________________________________________
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
___________________________________________________________________________________