* \limitatefirstline (or slave to the wiki)
@ 2005-09-09 11:19 Peter Rolf
2005-09-11 12:39 ` Peter Rolf
2005-09-11 15:57 ` Hans Hagen
0 siblings, 2 replies; 8+ messages in thread
From: Peter Rolf @ 2005-09-09 11:19 UTC (permalink / raw)
[-- Attachment #1: Type: text/plain, Size: 612 bytes --]
Hi all,
I've tested the latest version of \limitatefirstline and it still
doesn't work as expected. This is really a complex story (problem).
- the clip mechanism cuts off the lowest part of some special chars
(clipping graphics is easy, but I don't understand what happens here)
- text is sometimes cropped at word boundaries (example 110pt),
instead of beeing clipped
The example file is appended and I use the latest beta. There is no
timeline, so fixing is not that urgent.
And yes, I've cancelled my hollidays and will live for the wiki only
from now on :)
wiki, wiki, wiki,....
Greetings,
Peter
[-- Attachment #2: crop.tex --]
[-- Type: text/plain, Size: 2548 bytes --]
% interface=en output=pdftex
% Time-stamp: <Freitag, 09 September 2005 11:40:17; crop.tex>
%
\setupcolors[state=start]
\unprotect
\def\limitatefirstline#1#2#3%
{\hbox\bgroup\strut
\setbox\scratchbox\hbox{#1}%
\ifdim\wd\scratchbox>#2\relax
\setbox\scratchbox\hbox{#3}%
\hsize#2\relax
\advance\hsize-\wd\scratchbox
\setbox\scratchbox\vbox{\forgetall\veryraggedright#1}%
\setbox\scratchbox\vsplit\scratchbox to \lineheight
\vbox
{\unvbox\scratchbox
\global\setbox\plusone\lastbox
\global\setbox\plusone\hbox{\unhbox\plusone}%
\hbox to #2
{\ifx\clip\undefined
\box\plusone
\else\ifdim\wd\plusone>\hsize
\clip[\c!width=\hsize,\c!height=\lineheight,\c!voffset=-4pt]{\box\plusone}%
\else
\box\plusone
\fi\fi
\removeunwantedspaces\hss#3}}%
\else
#1%
\fi
\egroup}
\protect
\def\CropSymbol{\red...}%
\starttext
% blue for the limitatetext case
\setupframed[offset=overlay, framecolor=lightgray]
\framed[width=8ex,height=\struttotal,background=color,backgroundcolor=black]{\white 8ex}
\framed{\limitatefirstline{\underbar{WqTextdummy}}{8ex}{\CropSymbol}}
\framed{\limitatetext{\blue\underbar{WqTextdummy}}{8ex}{\CropSymbol}}
\blank
\framed[width=120pt,height=\struttotal,background=color,backgroundcolor=black]{\white 120 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{120pt}{\CropSymbol}}
\framed{\limitatetext{\blue\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{120pt}{\CropSymbol}}
\blank
\framed[width=110pt,height=\struttotal,background=color,backgroundcolor=black]{\white 110 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{110pt}{\CropSymbol}}
\framed{\limitatefirstline{This text is definitely too long to fit this frame.}{110pt}{\CropSymbol}}
\framed{\limitatetext{\blue This text is definitely too long to fit this frame.}{110pt}{\CropSymbol}}
\blank
\framed[width=100pt,height=\struttotal,background=color,backgroundcolor=black]{\white 100 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered\space \pi \textdegree <>\&}{100pt}{\CropSymbol}}
\stoptext
%%% Local Variables:
%%% mode: context
%%% TeX-master: ""
%%% End:
[-- Attachment #3: Type: text/plain, Size: 139 bytes --]
_______________________________________________
ntg-context mailing list
ntg-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/ntg-context
^ permalink raw reply [flat|nested] 8+ messages in thread* Re: \limitatefirstline (or slave to the wiki)
2005-09-09 11:19 \limitatefirstline (or slave to the wiki) Peter Rolf
@ 2005-09-11 12:39 ` Peter Rolf
2005-09-11 15:57 ` Hans Hagen
1 sibling, 0 replies; 8+ messages in thread
From: Peter Rolf @ 2005-09-11 12:39 UTC (permalink / raw)
[-- Attachment #1: Type: text/plain, Size: 866 bytes --]
Peter Rolf wrote:
> Hi all,
>
> I've tested the latest version of \limitatefirstline and it still
> doesn't work as expected. This is really a complex story (problem).
>
> - the clip mechanism cuts off the lowest part of some special chars
> (clipping graphics is easy, but I don't understand what happens here)
This one is unsolved. I added height to the clipping (\struttotal; maybe
not enought for \underbar). Now I get complete characters, but the
cropped text and the sentinel are not on the same baseline anymore.
> - text is sometimes cropped at word boundaries (example 110pt),
> instead of beeing clipped
I have fixed this one. There must be another check in case of a
successful break (else it acts like \limitatetext). Haven't thought
about this :)
So just ignore the prior mail (example) and look at the attached code
instead.
Greetings,
Peter
[-- Attachment #2: crop.tex --]
[-- Type: text/plain, Size: 3605 bytes --]
% interface=en output=pdftex
% Time-stamp: <Sonntag, 11 September 2005 14:19:53; crop.tex>
%
\setupcolors[state=start]
\setupstrut
\unprotect
%% \def\limitatefirstline#1#2#3%
%% {\hbox\bgroup\strut
%% \setbox\scratchbox\hbox{#1}%
%% \ifdim\wd\scratchbox>#2\relax
%% \setbox\scratchbox\hbox{#3}%
%% \hsize#2\relax
%% \advance\hsize-\wd\scratchbox
%% \setbox\scratchbox\vbox{\forgetall\veryraggedright#1}%
%% \setbox\scratchbox\vsplit\scratchbox to \lineheight
%% \vbox
%% {\unvbox\scratchbox
%% \global\setbox\plusone\lastbox
%% \global\setbox\plusone\hbox{\unhbox\plusone}%
%% \hbox to #2
%% {\ifx\clip\undefined
%% \box\plusone
%% \else\ifdim\wd\plusone>\hsize
%% \clip[\c!width=\hsize]{\box\plusone}%
%% \else
%% \box\plusone
%% \fi\fi
%% \removeunwantedspaces\hss#3}}%
%% \else
%% #1%
%% \fi
%% \egroup}
\def\limitatefirstline#1#2#3%
{\hbox\bgroup\strut
\setbox\scratchbox\hbox{#1}%
\ifdim\wd\scratchbox>#2\relax
\setbox\scratchbox\hbox{#3}%
\hsize#2\relax
\advance\hsize-\wd\scratchbox
\setbox\scratchbox\vbox{\forgetall\veryraggedright#1}%
\setbox\scratchbox\vsplit\scratchbox to \lineheight
\vbox
{\unvbox\scratchbox
\global\setbox\plusone\lastbox
\global\setbox\plusone\hbox{\unhbox\plusone}%
\hbox to #2
{\ifx\clip\undefined
\box\plusone
\else
\ifdim\wd\plusone>\hsize
\clip[\c!width=\hsize,\c!height=\struttotal]{\ruledhbox{\box\plusone}}
\else
\ifdim\wd\plusone<\dimexpr\hsize-2ex\relax% tolerance for "successful" breaking
\clip[\c!width=\hsize,\c!height=\struttotal]{\ruledhbox{#1}}% must be #1 here
\else
\box\plusone
\fi
\fi
\fi
\removeunwantedspaces\hss#3}}%
\else
#1%
\fi
\egroup}
\protect
\def\CropSymbol{\red...}%
\starttext
% blue for the limitatetext examples
\setupframed[offset=overlay, framecolor=lightgray]
\framed[width=8ex,height=\struttotal,background=color,backgroundcolor=black]{\white 8ex}
\framed{\limitatefirstline{\underbar{WqTextdummy}}{8ex}{\CropSymbol}}
\framed{\limitatetext{\blue\underbar{WqTextdummy}}{8ex}{\CropSymbol}}
\blank
\framed[width=120pt,height=\struttotal,background=color,backgroundcolor=black]{\white 120 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{120pt}{\CropSymbol}}
\framed{\limitatetext{\blue\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{120pt}{\CropSymbol}}
\blank
\framed[width=110pt,height=\struttotal,background=color,backgroundcolor=black]{\white 110 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{110pt}{\CropSymbol}}
\framed{\limitatefirstline{This text is definitely too long to fit this frame.}{110pt}{\CropSymbol}}
\framed{\limitatetext{\blue This text is definitely too long to fit this frame.}{110pt}{\CropSymbol}}
\blank
\framed[width=100pt,height=\struttotal,background=color,backgroundcolor=black]{\white 100 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered\space \pi \textdegree <>\&}{100pt}{\CropSymbol}}
\stoptext
%%% Local Variables:
%%% mode: context
%%% TeX-master: ""
%%% End:
[-- Attachment #3: Type: text/plain, Size: 139 bytes --]
_______________________________________________
ntg-context mailing list
ntg-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/ntg-context
^ permalink raw reply [flat|nested] 8+ messages in thread* Re: \limitatefirstline (or slave to the wiki)
2005-09-09 11:19 \limitatefirstline (or slave to the wiki) Peter Rolf
2005-09-11 12:39 ` Peter Rolf
@ 2005-09-11 15:57 ` Hans Hagen
2005-09-11 16:30 ` Peter Rolf
1 sibling, 1 reply; 8+ messages in thread
From: Hans Hagen @ 2005-09-11 15:57 UTC (permalink / raw)
Peter Rolf wrote:
>Hi all,
>
>I've tested the latest version of \limitatefirstline and it still
>doesn't work as expected. This is really a complex story (problem).
>
>- the clip mechanism cuts off the lowest part of some special chars
> (clipping graphics is easy, but I don't understand what happens here)
>- text is sometimes cropped at word boundaries (example 110pt),
> instead of beeing clipped
>
>The example file is appended and I use the latest beta. There is no
>timeline, so fixing is not that urgent.
>
>
add some struts:
\setbox\scratchbox\hbox{\begstrut#1\endstrut}%
\ifdim\wd\scratchbox>#2\relax
\setbox\scratchbox\hbox{\begstrut#3\endstrut}%
and remove your funny voffset
Hans
-----------------------------------------------------------------
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.com
| www.pragma-pod.nl
-----------------------------------------------------------------
^ permalink raw reply [flat|nested] 8+ messages in thread* Re: \limitatefirstline (or slave to the wiki)
2005-09-11 15:57 ` Hans Hagen
@ 2005-09-11 16:30 ` Peter Rolf
2005-09-11 16:48 ` Peter Rolf
` (2 more replies)
0 siblings, 3 replies; 8+ messages in thread
From: Peter Rolf @ 2005-09-11 16:30 UTC (permalink / raw)
[-- Attachment #1: Type: text/plain, Size: 1097 bytes --]
Hans Hagen wrote:
> Peter Rolf wrote:
>
>> Hi all,
>>
>> I've tested the latest version of \limitatefirstline and it still
>> doesn't work as expected. This is really a complex story (problem).
>>
>> - the clip mechanism cuts off the lowest part of some special chars
>> (clipping graphics is easy, but I don't understand what happens here)
>> - text is sometimes cropped at word boundaries (example 110pt),
>> instead of beeing clipped
>>
>> The example file is appended and I use the latest beta. There is no
>> timeline, so fixing is not that urgent.
>>
>>
>
> add some struts:
>
> \setbox\scratchbox\hbox{\begstrut#1\endstrut}%
> \ifdim\wd\scratchbox>#2\relax
> \setbox\scratchbox\hbox{\begstrut#3\endstrut}%
>
> and remove your funny voffset
oeps, a relict from testing.
> Hans
Yep, it (later example) works with the struts. Thank you Hans!
But the clipping still needs the height parameter, else you get no
drawings below the baseline. I use \struttotal in my example, which can
be too small in case of underbar/underline.
working example is attached.
Greetings,
Peter
[-- Attachment #2: crop.tex --]
[-- Type: text/plain, Size: 2873 bytes --]
% interface=en output=pdftex
% Time-stamp: <Sonntag, 11 September 2005 18:28:02; crop.tex>
%
\setupcolors[state=start]
\unprotect
\def\limitatefirstline#1#2#3%
{\hbox\bgroup\strut
\setbox\scratchbox\hbox{\begstrut#1\endstrut}%
\ifdim\wd\scratchbox>#2\relax
\setbox\scratchbox\hbox{\begstrut#3\endstrut}%
\hsize#2\relax
\advance\hsize-\wd\scratchbox
\setbox\scratchbox\vbox{\forgetall\veryraggedright\begstrut#1\endstrut}%
\setbox\scratchbox\vsplit\scratchbox to \lineheight
\vbox
{\unvbox\scratchbox
\global\setbox\plusone\lastbox
\global\setbox\plusone\hbox{\unhbox\plusone}%
\hbox to #2
{\ifx\clip\undefined
\box\plusone
\else
\ifdim\wd\plusone>\hsize
\clip[\c!width=\hsize,\c!height=\struttotal]{\ruledhbox{\box\plusone}}
\else
\ifdim\wd\plusone<\dimexpr\hsize-2ex\relax% tolerance for "successful" breaking
\clip[\c!width=\hsize,\c!height=\struttotal]{\ruledhbox{\begstrut#1\endstrut}}% must be #1 here
\else
\box\plusone
\fi
\fi
\fi
\removeunwantedspaces\hss#3}}%
\else
#1%
\fi
\egroup}
\protect
\def\CropSymbol{\red...}%
\starttext
% blue for the limitatetext examples
\setupframed[offset=overlay, framecolor=lightgray]
\framed[width=8ex,height=\struttotal,background=color,backgroundcolor=black]{\white 8ex}
\framed{\limitatefirstline{\underbar{WqTextdummy}}{8ex}{\CropSymbol}}
\framed{\limitatetext{\blue\underbar{WqTextdummy}}{8ex}{\CropSymbol}}
\blank
\framed[width=120pt,height=\struttotal,background=color,backgroundcolor=black]{\white 120 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{120pt}{\CropSymbol}}
\framed{\limitatetext{\blue\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{120pt}{\CropSymbol}}
\blank
\framed[width=110pt,height=\struttotal,background=color,backgroundcolor=black]{\white 110 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered \pi \textdegree <>\&}{110pt}{\CropSymbol}}
\framed{\limitatefirstline{This text is definitely too long to fit this frame.}{110pt}{\CropSymbol}}
\framed{\limitatetext{\blue This text is definitely too long to fit this frame.}{110pt}{\CropSymbol}}
\blank
\framed[width=100pt,height=\struttotal,background=color,backgroundcolor=black]{\white 100 pt}
\framed{\limitatefirstline{\textbar \_\textcircumflex\texttilde \%\$\#\textbraceleft \textbraceright \textpm \copyright \registered\space \pi \textdegree <>\&}{100pt}{\CropSymbol}}
\stoptext
%%% Local Variables:
%%% mode: context
%%% TeX-master: ""
%%% End:
[-- Attachment #3: Type: text/plain, Size: 139 bytes --]
_______________________________________________
ntg-context mailing list
ntg-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/ntg-context
^ permalink raw reply [flat|nested] 8+ messages in thread* Re: \limitatefirstline (or slave to the wiki)
2005-09-11 16:30 ` Peter Rolf
@ 2005-09-11 16:48 ` Peter Rolf
2005-09-11 17:28 ` Hans Hagen
2005-09-11 17:38 ` Hans Hagen
2 siblings, 0 replies; 8+ messages in thread
From: Peter Rolf @ 2005-09-11 16:48 UTC (permalink / raw)
Peter Rolf wrote:
>
> Yep, it (later example) works with the struts. Thank you Hans!
I must clean my glasses. The sentinel is now at the bottom of the text
box (ruledhbox) and not on height on the baseline. So it's still not
working...
> But the clipping still needs the height parameter, else you get no
> drawings below the baseline. I use \struttotal in my example, which can
> be too small in case of underbar/underline.
>
> working example is attached.
>
> Greetings,
>
> Peter
>
Sorry for the noise,
Peter
^ permalink raw reply [flat|nested] 8+ messages in thread
* Re: \limitatefirstline (or slave to the wiki)
2005-09-11 16:30 ` Peter Rolf
2005-09-11 16:48 ` Peter Rolf
@ 2005-09-11 17:28 ` Hans Hagen
2005-09-11 17:38 ` Hans Hagen
2 siblings, 0 replies; 8+ messages in thread
From: Hans Hagen @ 2005-09-11 17:28 UTC (permalink / raw)
Peter Rolf wrote:
> \ifdim\wd\plusone<\dimexpr\hsize-2ex\relax% tolerance for
> "successful" breaking
>
> \clip[\c!width=\hsize,\c!height=\struttotal]{\ruledhbox{\begstrut#1\endstrut}}%
> must be #1 here
This may fail, since it #1 may have more than one line, and this whole
branch is entered when there are more lines
Hans
-----------------------------------------------------------------
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.com
| www.pragma-pod.nl
-----------------------------------------------------------------
^ permalink raw reply [flat|nested] 8+ messages in thread* Re: \limitatefirstline (or slave to the wiki)
2005-09-11 16:30 ` Peter Rolf
2005-09-11 16:48 ` Peter Rolf
2005-09-11 17:28 ` Hans Hagen
@ 2005-09-11 17:38 ` Hans Hagen
2005-09-12 10:31 ` Peter Rolf
2 siblings, 1 reply; 8+ messages in thread
From: Hans Hagen @ 2005-09-11 17:38 UTC (permalink / raw)
Peter Rolf wrote:
another one
\def\limitatefirstline#1#2#3%
{\hbox\bgroup\strut
\setbox\scratchbox\hbox{\begstrut#1\endstrut}%
\ifdim\wd\scratchbox>#2\relax
\setbox\scratchbox\hbox{#3}%
\hsize#2\relax
\advance\hsize-\wd\scratchbox
\setbox\scratchbox\vbox{\forgetall\veryraggedright#1}%
\setbox\scratchbox\vsplit\scratchbox to \lineheight
\vbox
{\unvbox\scratchbox
\global\setbox\plusone\lastbox
\global\setbox\plusone\hbox{\strut\unhbox\plusone}%
\hbox % to #2
{\ifx\clip\undefined
\box\plusone
\else\ifdim\wd\plusone>\hsize
\lower\strutdepth\hbox{\clip[\c!width=\hsize,\c!height=\lineheight]{\hbox{\raise\strutdepth\box\plusone}}}%
\else
\box\plusone
\fi\fi
\removeunwantedspaces#3}}% \removeunwantedspaces\hss#3}}%
\else
#1%
\fi
\egroup}
Hans
-----------------------------------------------------------------
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.com
| www.pragma-pod.nl
-----------------------------------------------------------------
^ permalink raw reply [flat|nested] 8+ messages in thread* Re: \limitatefirstline (or slave to the wiki)
2005-09-11 17:38 ` Hans Hagen
@ 2005-09-12 10:31 ` Peter Rolf
0 siblings, 0 replies; 8+ messages in thread
From: Peter Rolf @ 2005-09-12 10:31 UTC (permalink / raw)
Hi all,
Hans Hagen wrote:
> Peter Rolf wrote:
>
> another one
>
> \def\limitatefirstline#1#2#3%
> {\hbox\bgroup\strut
> \setbox\scratchbox\hbox{\begstrut#1\endstrut}%
> \ifdim\wd\scratchbox>#2\relax
> \setbox\scratchbox\hbox{#3}%
> \hsize#2\relax
> \advance\hsize-\wd\scratchbox
> \setbox\scratchbox\vbox{\forgetall\veryraggedright#1}%
> \setbox\scratchbox\vsplit\scratchbox to \lineheight
> \vbox
> {\unvbox\scratchbox
> \global\setbox\plusone\lastbox
> \global\setbox\plusone\hbox{\strut\unhbox\plusone}%
> \hbox % to #2
> {\ifx\clip\undefined
> \box\plusone
> \else\ifdim\wd\plusone>\hsize
>
> \lower\strutdepth\hbox{\clip[\c!width=\hsize,\c!height=\lineheight]{\hbox{\raise\strutdepth\box\plusone}}}%
>
> \else
> \box\plusone
> \fi\fi
> \removeunwantedspaces#3}}% \removeunwantedspaces\hss#3}}%
> \else
> #1%
> \fi
> \egroup}
>
> Hans
>
Seems to work now :)
There is only one thing left. The clip mechanism is only called, if
breaking fails (which is not enought). An example:
My name is ThisPartIsVisiblexxxxxxxxxxxxxxxxxx.
^^ ^^
break cut here
Breaking is successful, so \limitatefirstline acts nearly like
\limitatetext and you get
My name is...
instead of
My name is ThisPartIsVisible...
There must be another test, which checks the quality (width) of the
breaking. If there is too much wasted space, clipping should be used
instead.
\else\ifdim\wd\plusone<\dimexpr\hsize-2ex\relax% breaking tolerance
\lower\strutdepth\hbox{\clip[\c!width=\hsize,\c!height=\lineheight]{\hbox{\raise\strutdepth\hbox{\begstrut#1\endstrut}}}}%
I don't know, if boxing #1 is enought (more than one line problem)...
and we have to add \dontcomplain somewhere.
The tolerance of 2ex acts very greedy, so in most cases, clipping is
used (not usefull in common , but that's the way I need it).
Maybe 6-8ex are a better value for the final (no need to force 2ex to
others).
Thanks Hans. This was a hard birth, but the baby is looking nice :)
Peter
^ permalink raw reply [flat|nested] 8+ messages in thread
end of thread, other threads:[~2005-09-12 10:31 UTC | newest]
Thread overview: 8+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2005-09-09 11:19 \limitatefirstline (or slave to the wiki) Peter Rolf
2005-09-11 12:39 ` Peter Rolf
2005-09-11 15:57 ` Hans Hagen
2005-09-11 16:30 ` Peter Rolf
2005-09-11 16:48 ` Peter Rolf
2005-09-11 17:28 ` Hans Hagen
2005-09-11 17:38 ` Hans Hagen
2005-09-12 10:31 ` Peter Rolf
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).