Re: [NTG-context] MetaFun: how to check the number of arguments
Dear Hans, > vardef textlength(text t) = >save n ; n := 0 ; >for i = t : > n := n + 1 ; >endfor; >n > enddef; > Thank you for a good method! It can be used in another program. Best regards, Dalyoung ___ 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] MetaFun: how to check the number of arguments
On 1/16/2019 12:53 AM, Jeong Dal wrote:
Dear Hans,
Thank you for a solution.
In my memory, it is possible to check the argument in Lua, so I hope
that there is a similar method in MetaFun.
It may be easier to draw grid using lines instead of squares.
vardef textlength(text t) =
save n ; n := 0 ;
for i = t :
n := n + 1 ;
endfor;
n
enddef;
def drawGridF (expr nb) (text s) =
if textlength(s) = 0 :
draw textext("A grid!");
else :
path p ;
picture pic ;
numeric n;
p := unitsquare scaled wu;
n:= 0;
for m = s:
i:= n mod nb;
j:= n div nb;
pic := image (draw p; label(textext(m), center p); );
draw pic shifted (i*wu, j*wu);
n:= n+ 1;
endfor;
fi ;
enddef;
Thank you again.
Best regards,
Dalyoung
2019. 1. 16. 오전 2:04, Hans Hagen > 작성:
On 1/14/2019 10:44 PM, Jeong Dal wrote:
Dear all,
In the following sample, it draws squares with label which is given.
I’d like to know how to check the number of elements in the second
argument?
If it is 0, then I just draw grids only.
Thank you for reading.
Best regards,
Dalyoung
\startbuffer[defs]
def drawGridF (expr nb) (text s) =
p := unitsquare scaled wu;
n:= 0;
for m = s:
i:= n mod nb;
j:= n div nb;
pic := image (draw p; label(textext(m), center p); );
draw pic shifted (i*wu, j*wu);
n:= n+ 1;
endfor;
enddef;
\stopbuffer
\startbuffer[3x3b]
wu := \MPvar{width};
drawGridF (3) (1,2,3,0,1, 1,4,5,8);
\stopbuffer
\starttext
\setupMPvariables[width=30pt]
\processMPbuffer[defs,3x3b]
\stoptext
\startbuffer[defs]
def drawGridF (expr nb) (text s) =
path p ;
picture pic ;
numeric n;
p := unitsquare scaled wu;
n:= 0;
for m = s:
i:= n mod nb;
j:= n div nb;
pic := image (draw p; label(textext(m), center p); );
draw pic shifted (i*wu, j*wu);
n:= n+ 1;
endfor;
if n == 0 :
draw textext("A grid!");
fi ;
enddef;
\stopbuffer
\startbuffer[3x3b]
wu := \MPvar{width};
drawGridF (3) (1,2,3,0,1, 1,4,5,8);
currentpicture := currentpicture shifted (bbwidth(currentpicture),0);
drawGridF (3) ();
\stopbuffer
\setupMPvariables[width=30pt]
\processMPbuffer[defs,3x3b]
2019. 1. 14. 오후 8:00, ntg-context-requ...@ntg.nl
작성:
Send ntg-context mailing list submissions to
ntg-context@ntg.nl
To subscribe or unsubscribe via the World Wide Web, visit
https://mailman.ntg.nl/mailman/listinfo/ntg-context
or, via email, send a message with subject or body 'help' to
ntg-context-requ...@ntg.nl
You can reach the person managing the list at
ntg-context-ow...@ntg.nl
When replying, please edit your Subject line so it is more specific
than "Re: Contents of ntg-context digest..."
Today's Topics:
1. Re: Manipulating the left blank page when chapter starts on
the right page (Wolfgang Schuster)
2. Re: Footnotes in float combinations missing in output
(Wolfgang Schuster)
3. Re: Manipulating the left blank page when chapter starts on
the right page (Jan U. Hasecke)
--
Message: 1
Date: Sun, 13 Jan 2019 16:56:40 +0100
From: Wolfgang Schuster
To: mailing list for ConTeXt users , "Jan U.
Hasecke"
Subject: Re: [NTG-context] Manipulating the left blank page when
chapter starts on the right page
Message-ID:
Content-Type: text/plain; charset=utf-8; format=flowed
Jan U. Hasecke schrieb am 12.01.19 um 22:08:
Hi Aditya,
Am 12.01.19 um 20:11 schrieb Aditya Mahajan:
On Sat, 12 Jan 2019, Jan U. Hasecke wrote:
Hi all,
in my document \startchapter and \starttitle starts a new chapter
on the
right (odd) page. So sometimes, there is a blank even page just
before a
new chapter.
I would like to manipulate this blank even page.
There are several things I would like to do, eg. having no
headers and
footers, setting the background color to a named color, placing
an image
or some graphics on the page.
Is there a way to define such a page, name it and call it in
\startchapter so that it is placed on the left side.
See https://tex.stackexchange.com/q/457428/323
Thanks a lot, but I wasn't looking for a way to just delete page
numbers
but to style the empty page in arbitrary ways.
Maybe it is better to do this manually.
I would let chapter open on even pages too and just insert a styled
page
by hand.
Here is a example which shows how you can change the background color
of a empty page before the chapter title.
\setuppagenumbering
[alternative=doublesided]
\startsetups [chapter:before]
\doifoddpageelse
{}
{\pushbackground[page]
\setupbackgrounds[page][background=color,backgroundcolor=black]
\page[empty,right]
\popbackground}
\stopsetups
\setuphead
[chapter]
[page=yes,
before=\directsetup{chapter:before}]
\starttext
\startchapter[title={Knuth}]
\dorecurse{10}{\samplefile{knuth}}
\stopchapter
Re: [NTG-context] MetaFun: how to check the number of arguments
Dear Hans,
Thank you for a solution.
In my memory, it is possible to check the argument in Lua, so I hope that there
is a similar method in MetaFun.
It may be easier to draw grid using lines instead of squares.
Thank you again.
Best regards,
Dalyoung
> 2019. 1. 16. 오전 2:04, Hans Hagen 작성:
>
> On 1/14/2019 10:44 PM, Jeong Dal wrote:
>> Dear all,
>> In the following sample, it draws squares with label which is given.
>> I’d like to know how to check the number of elements in the second argument?
>> If it is 0, then I just draw grids only.
>> Thank you for reading.
>> Best regards,
>> Dalyoung
>>
>> \startbuffer[defs]
>> def drawGridF (expr nb) (text s) =
>> p := unitsquare scaled wu;
>> n:= 0;
>> for m = s:
>> i:= n mod nb;
>> j:= n div nb;
>> pic := image (draw p; label(textext(m), center p); );
>> draw pic shifted (i*wu, j*wu);
>> n:= n+ 1;
>> endfor;
>> enddef;
>> \stopbuffer
>> \startbuffer[3x3b]
>> wu := \MPvar{width};
>> drawGridF (3) (1,2,3,0,1, 1,4,5,8);
>> \stopbuffer
>> \starttext
>> \setupMPvariables[width=30pt]
>> \processMPbuffer[defs,3x3b]
>> \stoptext
>
>
> \startbuffer[defs]
> def drawGridF (expr nb) (text s) =
>path p ;
>picture pic ;
>numeric n;
> p := unitsquare scaled wu;
> n:= 0;
> for m = s:
> i:= n mod nb;
> j:= n div nb;
> pic := image (draw p; label(textext(m), center p); );
> draw pic shifted (i*wu, j*wu);
> n:= n+ 1;
> endfor;
>if n == 0 :
>draw textext("A grid!");
>fi ;
> enddef;
> \stopbuffer
>
> \startbuffer[3x3b]
> wu := \MPvar{width};
> drawGridF (3) (1,2,3,0,1, 1,4,5,8);
> currentpicture := currentpicture shifted (bbwidth(currentpicture),0);
> drawGridF (3) ();
> \stopbuffer
>
> \setupMPvariables[width=30pt]
> \processMPbuffer[defs,3x3b]
>
>
>
>
>>> 2019. 1. 14. 오후 8:00, ntg-context-requ...@ntg.nl 작성:
>>>
>>> Send ntg-context mailing list submissions to
>>> ntg-context@ntg.nl
>>>
>>> To subscribe or unsubscribe via the World Wide Web, visit
>>> https://mailman.ntg.nl/mailman/listinfo/ntg-context
>>> or, via email, send a message with subject or body 'help' to
>>> ntg-context-requ...@ntg.nl
>>>
>>> You can reach the person managing the list at
>>> ntg-context-ow...@ntg.nl
>>>
>>> When replying, please edit your Subject line so it is more specific
>>> than "Re: Contents of ntg-context digest..."
>>>
>>>
>>> Today's Topics:
>>>
>>> 1. Re: Manipulating the left blank page when chapter starts on
>>> the right page (Wolfgang Schuster)
>>> 2. Re: Footnotes in float combinations missing in output
>>> (Wolfgang Schuster)
>>> 3. Re: Manipulating the left blank page when chapter starts on
>>> the right page (Jan U. Hasecke)
>>>
>>>
>>> --
>>>
>>> Message: 1
>>> Date: Sun, 13 Jan 2019 16:56:40 +0100
>>> From: Wolfgang Schuster
>>> To: mailing list for ConTeXt users , "Jan U.
>>> Hasecke"
>>> Subject: Re: [NTG-context] Manipulating the left blank page when
>>> chapter starts on the right page
>>> Message-ID:
>>> Content-Type: text/plain; charset=utf-8; format=flowed
>>>
>>> Jan U. Hasecke schrieb am 12.01.19 um 22:08:
Hi Aditya,
Am 12.01.19 um 20:11 schrieb Aditya Mahajan:
> On Sat, 12 Jan 2019, Jan U. Hasecke wrote:
>
>> Hi all,
>>
>> in my document \startchapter and \starttitle starts a new chapter on the
>> right (odd) page. So sometimes, there is a blank even page just before a
>> new chapter.
>>
>> I would like to manipulate this blank even page.
>>
>> There are several things I would like to do, eg. having no headers and
>> footers, setting the background color to a named color, placing an image
>> or some graphics on the page.
>>
>> Is there a way to define such a page, name it and call it in
>> \startchapter so that it is placed on the left side.
> See https://tex.stackexchange.com/q/457428/323
Thanks a lot, but I wasn't looking for a way to just delete page numbers
but to style the empty page in arbitrary ways.
Maybe it is better to do this manually.
I would let chapter open on even pages too and just insert a styled page
by hand.
>>>
>>> Here is a example which shows how you can change the background color
>>> of a empty page before the chapter title.
>>>
>>> \setuppagenumbering
>>> [alternative=doublesided]
>>>
>>> \startsetups [chapter:before]
>>> \doifoddpageelse
>>> {}
>>> {\pushbackground[page]
>>> \setupbackgrounds[page][background=color,backgroundcolor=black]
>>> \page[empty,right]
>>> \popbackground}
>>> \stopsetups
>>>
>>> \setuphead
>>> [chapter]
>>> [page=yes,
>>>before=\directsetup{chapter:before}]
>>>
>>> \starttext
>>>
>>>
Re: [NTG-context] MetaFun: how to check the number of arguments
On 1/14/2019 10:44 PM, Jeong Dal wrote:
Dear all,
In the following sample, it draws squares with label which is given.
I’d like to know how to check the number of elements in the second argument?
If it is 0, then I just draw grids only.
Thank you for reading.
Best regards,
Dalyoung
\startbuffer[defs]
def drawGridF (expr nb) (text s) =
p := unitsquare scaled wu;
n:= 0;
for m = s:
i:= n mod nb;
j:= n div nb;
pic := image (draw p; label(textext(m), center p); );
draw pic shifted (i*wu, j*wu);
n:= n+ 1;
endfor;
enddef;
\stopbuffer
\startbuffer[3x3b]
wu := \MPvar{width};
drawGridF (3) (1,2,3,0,1, 1,4,5,8);
\stopbuffer
\starttext
\setupMPvariables[width=30pt]
\processMPbuffer[defs,3x3b]
\stoptext
\startbuffer[defs]
def drawGridF (expr nb) (text s) =
path p ;
picture pic ;
numeric n;
p := unitsquare scaled wu;
n:= 0;
for m = s:
i:= n mod nb;
j:= n div nb;
pic := image (draw p; label(textext(m), center p); );
draw pic shifted (i*wu, j*wu);
n:= n+ 1;
endfor;
if n == 0 :
draw textext("A grid!");
fi ;
enddef;
\stopbuffer
\startbuffer[3x3b]
wu := \MPvar{width};
drawGridF (3) (1,2,3,0,1, 1,4,5,8);
currentpicture := currentpicture shifted (bbwidth(currentpicture),0);
drawGridF (3) ();
\stopbuffer
\setupMPvariables[width=30pt]
\processMPbuffer[defs,3x3b]
2019. 1. 14. 오후 8:00, ntg-context-requ...@ntg.nl 작성:
Send ntg-context mailing list submissions to
ntg-context@ntg.nl
To subscribe or unsubscribe via the World Wide Web, visit
https://mailman.ntg.nl/mailman/listinfo/ntg-context
or, via email, send a message with subject or body 'help' to
ntg-context-requ...@ntg.nl
You can reach the person managing the list at
ntg-context-ow...@ntg.nl
When replying, please edit your Subject line so it is more specific
than "Re: Contents of ntg-context digest..."
Today's Topics:
1. Re: Manipulating the left blank page when chapter starts on
the right page (Wolfgang Schuster)
2. Re: Footnotes in float combinations missing in output
(Wolfgang Schuster)
3. Re: Manipulating the left blank page when chapter starts on
the right page (Jan U. Hasecke)
--
Message: 1
Date: Sun, 13 Jan 2019 16:56:40 +0100
From: Wolfgang Schuster
To: mailing list for ConTeXt users , "Jan U.
Hasecke"
Subject: Re: [NTG-context] Manipulating the left blank page when
chapter starts on the right page
Message-ID:
Content-Type: text/plain; charset=utf-8; format=flowed
Jan U. Hasecke schrieb am 12.01.19 um 22:08:
Hi Aditya,
Am 12.01.19 um 20:11 schrieb Aditya Mahajan:
On Sat, 12 Jan 2019, Jan U. Hasecke wrote:
Hi all,
in my document \startchapter and \starttitle starts a new chapter on the
right (odd) page. So sometimes, there is a blank even page just before a
new chapter.
I would like to manipulate this blank even page.
There are several things I would like to do, eg. having no headers and
footers, setting the background color to a named color, placing an image
or some graphics on the page.
Is there a way to define such a page, name it and call it in
\startchapter so that it is placed on the left side.
See https://tex.stackexchange.com/q/457428/323
Thanks a lot, but I wasn't looking for a way to just delete page numbers
but to style the empty page in arbitrary ways.
Maybe it is better to do this manually.
I would let chapter open on even pages too and just insert a styled page
by hand.
Here is a example which shows how you can change the background color
of a empty page before the chapter title.
\setuppagenumbering
[alternative=doublesided]
\startsetups [chapter:before]
\doifoddpageelse
{}
{\pushbackground[page]
\setupbackgrounds[page][background=color,backgroundcolor=black]
\page[empty,right]
\popbackground}
\stopsetups
\setuphead
[chapter]
[page=yes,
before=\directsetup{chapter:before}]
\starttext
\startchapter[title={Knuth}]
\dorecurse{10}{\samplefile{knuth}}
\stopchapter
\startchapter[title={Zapf}]
\dorecurse{10}{\samplefile{zapf}}
\stopchapter
\startchapter[title={Ward}]
\dorecurse{10}{\samplefile{ward}}
\stopchapter
\stoptext
Wolfgang
--
Message: 2
Date: Sun, 13 Jan 2019 21:06:42 +0100
From: Wolfgang Schuster
To: mailing list for ConTeXt users , Lars
Subject: Re: [NTG-context] Footnotes in float combinations missing in
output
Message-ID:
Content-Type: text/plain; charset=utf-8; format=flowed
Lars schrieb am 09.01.19 um 23:01:
Hi there, hi Hans,
I just want to let you know that footnotes insterted in
float-combinations don't get rendered properly, i. e. only the last
footnote is placed in the output. MWE:
\starttext
[NTG-context] MetaFun: how to check the number of arguments
Dear all,
In the following sample, it draws squares with label which is given.
I’d like to know how to check the number of elements in the second argument?
If it is 0, then I just draw grids only.
Thank you for reading.
Best regards,
Dalyoung
\startbuffer[defs]
def drawGridF (expr nb) (text s) =
p := unitsquare scaled wu;
n:= 0;
for m = s:
i:= n mod nb;
j:= n div nb;
pic := image (draw p; label(textext(m), center p); );
draw pic shifted (i*wu, j*wu);
n:= n+ 1;
endfor;
enddef;
\stopbuffer
\startbuffer[3x3b]
wu := \MPvar{width};
drawGridF (3) (1,2,3,0,1, 1,4,5,8);
\stopbuffer
\starttext
\setupMPvariables[width=30pt]
\processMPbuffer[defs,3x3b]
\stoptext
> 2019. 1. 14. 오후 8:00, ntg-context-requ...@ntg.nl 작성:
>
> Send ntg-context mailing list submissions to
> ntg-context@ntg.nl
>
> To subscribe or unsubscribe via the World Wide Web, visit
> https://mailman.ntg.nl/mailman/listinfo/ntg-context
> or, via email, send a message with subject or body 'help' to
> ntg-context-requ...@ntg.nl
>
> You can reach the person managing the list at
> ntg-context-ow...@ntg.nl
>
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of ntg-context digest..."
>
>
> Today's Topics:
>
> 1. Re: Manipulating the left blank page when chapter starts on
> the right page (Wolfgang Schuster)
> 2. Re: Footnotes in float combinations missing in output
> (Wolfgang Schuster)
> 3. Re: Manipulating the left blank page when chapter starts on
> the right page (Jan U. Hasecke)
>
>
> --
>
> Message: 1
> Date: Sun, 13 Jan 2019 16:56:40 +0100
> From: Wolfgang Schuster
> To: mailing list for ConTeXt users , "Jan U.
> Hasecke"
> Subject: Re: [NTG-context] Manipulating the left blank page when
> chapter starts on the right page
> Message-ID:
> Content-Type: text/plain; charset=utf-8; format=flowed
>
> Jan U. Hasecke schrieb am 12.01.19 um 22:08:
>> Hi Aditya,
>>
>> Am 12.01.19 um 20:11 schrieb Aditya Mahajan:
>>> On Sat, 12 Jan 2019, Jan U. Hasecke wrote:
>>>
Hi all,
in my document \startchapter and \starttitle starts a new chapter on the
right (odd) page. So sometimes, there is a blank even page just before a
new chapter.
I would like to manipulate this blank even page.
There are several things I would like to do, eg. having no headers and
footers, setting the background color to a named color, placing an image
or some graphics on the page.
Is there a way to define such a page, name it and call it in
\startchapter so that it is placed on the left side.
>>> See https://tex.stackexchange.com/q/457428/323
>> Thanks a lot, but I wasn't looking for a way to just delete page numbers
>> but to style the empty page in arbitrary ways.
>>
>> Maybe it is better to do this manually.
>>
>> I would let chapter open on even pages too and just insert a styled page
>> by hand.
>
> Here is a example which shows how you can change the background color
> of a empty page before the chapter title.
>
> \setuppagenumbering
> [alternative=doublesided]
>
> \startsetups [chapter:before]
> \doifoddpageelse
> {}
> {\pushbackground[page]
> \setupbackgrounds[page][background=color,backgroundcolor=black]
> \page[empty,right]
> \popbackground}
> \stopsetups
>
> \setuphead
> [chapter]
> [page=yes,
>before=\directsetup{chapter:before}]
>
> \starttext
>
> \startchapter[title={Knuth}]
> \dorecurse{10}{\samplefile{knuth}}
> \stopchapter
>
> \startchapter[title={Zapf}]
> \dorecurse{10}{\samplefile{zapf}}
> \stopchapter
>
> \startchapter[title={Ward}]
> \dorecurse{10}{\samplefile{ward}}
> \stopchapter
>
> \stoptext
>
> Wolfgang
>
>
>
> --
>
> Message: 2
> Date: Sun, 13 Jan 2019 21:06:42 +0100
> From: Wolfgang Schuster
> To: mailing list for ConTeXt users , Lars
>
> Subject: Re: [NTG-context] Footnotes in float combinations missing in
> output
> Message-ID:
> Content-Type: text/plain; charset=utf-8; format=flowed
>
> Lars schrieb am 09.01.19 um 23:01:
>> Hi there, hi Hans,
>>
>> I just want to let you know that footnotes insterted in
>> float-combinations don't get rendered properly, i. e. only the last
>> footnote is placed in the output. MWE:
>>
>> \starttext
>> \startplacefigure[title={OuterCap\footnote{Outer footnote}}]
>>
>> \startfloatcombination[nx=3]
>> \placefigure{Fnote1\footnote{Hello}}{\externalfigure[cow][width={.2\textwidth}]}
>> \placefigure{Fnote2\footnote{small}}{\externalfigure[cow][width={.2\textwidth}]}
>> \placefigure{Fnote3\footnote{world}}{\externalfigure[cow][width={.2\textwidth}]}
>> \stopfloatcombination
>>
>> \stopplacefigure
>> \stoptext
>
> Not very nice but the following
