Re: [NTG-context] shrink inter-line space

2021-12-18 Thread Wolfgang Schuster via ntg-context

mf via ntg-context schrieb am 18.12.2021 um 09:47:

Il 17/12/21 20:17, Wolfgang Schuster ha scritto:> \starttext
>
> \samplefile{ward}\par
>
> \blank
>
> \start \setupinterlinespace[line=12pt]
> \samplefile{ward}\par
> \stop
>
> \stoptext
Yes, but you can't say \setupinterlinespace[line=6pt] and make lines 
overlap. At a certain point baselines don't get closer any more.


--
\starttext

\samplefile{ward}\par

\blank

\start \setupinterlinespace[line=12pt]
\samplefile{ward}\par
\stop

\blank

\start \setupinterlinespace[line=6pt]
\samplefile{ward}\par
\stop

\stoptext
--

You can do something like this:

--
\starttext

\samplefile{ward}\par

\blank

\start \setupinterlinespace[line=12pt]
\samplefile{ward}\par
\stop

\blank

The Earth, as a habitat for animal life, is in old age and has a fatal 
illness.\vadjust{\kern-6pt}
Several, in fact. It would be happening whether humans had ever 
evolved or not.\vadjust{\kern-6pt}
But our presence is like the effect of an old-age patient who smokes 
many packs\vadjust{\kern-6pt}

of cigarettes per day—and we humans are the cigarettes.

\stoptext
--

but I had to insert all those \kern-6pt manually.
How can I obtain the same result automatically?
(please don't argue about the ugliness of the result ;) )



TeX prevents overlapping line but you cheat and modify the dimensions of 
all characters.


The following example set the height and depth to 0 ex for all character 
in the current font (I used \definedfont to keep it local to the group) 
and now you can change the interlinespace to whatever value you like.



\definefontfeature [tightlines] [dimensions={*,0,0}]

\starttext

\samplefile{ward}\par

\blank

\start
    \setupinterlinespace[line=5pt]
    \definedfont[Normal*default,tightlines]
    \samplefile{ward}\par
\stop

\stoptext

Wolfgang

___
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___


Re: [NTG-context] shrink inter-line space

2021-12-18 Thread Hans Hagen via ntg-context

On 12/18/2021 9:47 AM, mf via ntg-context wrote:

Il 17/12/21 20:17, Wolfgang Schuster ha scritto:> \starttext
 >
 > \samplefile{ward}\par
 >
 > \blank
 >
 > \start \setupinterlinespace[line=12pt]
 > \samplefile{ward}\par
 > \stop
 >
 > \stoptext
Yes, but you can't say \setupinterlinespace[line=6pt] and make lines 
overlap. At a certain point baselines don't get closer any more.


--
\starttext

\samplefile{ward}\par

\blank

\start \setupinterlinespace[line=12pt]
\samplefile{ward}\par
\stop

\blank

\start \setupinterlinespace[line=6pt]
\samplefile{ward}\par
\stop

\stoptext
--

You can do something like this:

--
\starttext

\samplefile{ward}\par

\blank

\start \setupinterlinespace[line=12pt]
\samplefile{ward}\par
\stop

\blank

The Earth, as a habitat for animal life, is in old age and has a fatal 
illness.\vadjust{\kern-6pt}
Several, in fact. It would be happening whether humans had ever evolved 
or not.\vadjust{\kern-6pt}
But our presence is like the effect of an old-age patient who smokes 
many packs\vadjust{\kern-6pt}

of cigarettes per day—and we humans are the cigarettes.

\stoptext
--

but I had to insert all those \kern-6pt manually.
How can I obtain the same result automatically?
(please don't argue about the ugliness of the result ;) )


there is no real need to argue because it *is* ugly -)

so say that you choose 6pt interlinespace ... which means that all lines 
will likely touch


in that case tex will inject lineskip (assuming that you didn't disable it)

and as tex doesn't care about results being ugly (plenty of examples of 
that on the internet) it will happily insert a negative skip when you do 
this:


\start \setupinterlinespace[line=6pt]
\lineskip-6pt
\samplefile{ward}\par
\stop

now, of course, this will not be pretty when heights and depths differ 
per line so here's another way:


\start
\setbox\scratchbox\vbox{\samplefile{ward}}
\dorecurse {\boxlines\scratchbox} {
\boxlineht\scratchbox#1 2pt % 4pt
\boxlinedp\scratchbox#1 1pt % 2pt
\nointerlineskip
\boxline  \scratchbox#1
\par
}
\stop

so ... in tex there's always a way out

Hans



-
  Hans Hagen | PRAGMA ADE
  Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
   tel: 038 477 53 69 | www.pragma-ade.nl | 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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___


Re: [NTG-context] shrink inter-line space

2021-12-18 Thread mf via ntg-context

Il 17/12/21 20:17, Wolfgang Schuster ha scritto:> \starttext
>
> \samplefile{ward}\par
>
> \blank
>
> \start \setupinterlinespace[line=12pt]
> \samplefile{ward}\par
> \stop
>
> \stoptext
Yes, but you can't say \setupinterlinespace[line=6pt] and make lines 
overlap. At a certain point baselines don't get closer any more.


--
\starttext

\samplefile{ward}\par

\blank

\start \setupinterlinespace[line=12pt]
\samplefile{ward}\par
\stop

\blank

\start \setupinterlinespace[line=6pt]
\samplefile{ward}\par
\stop

\stoptext
--

You can do something like this:

--
\starttext

\samplefile{ward}\par

\blank

\start \setupinterlinespace[line=12pt]
\samplefile{ward}\par
\stop

\blank

The Earth, as a habitat for animal life, is in old age and has a fatal 
illness.\vadjust{\kern-6pt}
Several, in fact. It would be happening whether humans had ever evolved 
or not.\vadjust{\kern-6pt}
But our presence is like the effect of an old-age patient who smokes 
many packs\vadjust{\kern-6pt}

of cigarettes per day—and we humans are the cigarettes.

\stoptext
--

but I had to insert all those \kern-6pt manually.
How can I obtain the same result automatically?
(please don't argue about the ugliness of the result ;) )

Massi
___
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___


Re: [NTG-context] shrink inter-line space

2021-12-17 Thread Wolfgang Schuster via ntg-context

mf via ntg-context schrieb am 17.12.2021 um 16:28:

Hello list,
here's a MWE to shrink the distance between two lines:

\starttext
\samplefile{ward}\par
\blank
\bgroup
\baselineskip=0pt
\samplefile{ward}\par
\egroup
\stoptext

How can I get lines closer, even overlapping?


\starttext

\samplefile{ward}\par

\blank

\start \setupinterlinespace[line=12pt]
\samplefile{ward}\par
\stop

\stoptext

Wolfgang

___
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___


[NTG-context] shrink inter-line space

2021-12-17 Thread mf via ntg-context

Hello list,
here's a MWE to shrink the distance between two lines:

\starttext
\samplefile{ward}\par
\blank
\bgroup
\baselineskip=0pt
\samplefile{ward}\par
\egroup
\stoptext

How can I get lines closer, even overlapping?

Massi
___
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___