* page ranges in \markpage
@ 2018-07-18 16:19 Pablo Rodriguez
2018-07-18 17:40 ` Wolfgang Schuster
0 siblings, 1 reply; 8+ messages in thread
From: Pablo Rodriguez @ 2018-07-18 16:19 UTC (permalink / raw)
To: mailing list for ConTeXt users
Hans,
would it be possible that \markpage could have page ranges as in the
following sample?
\setuplayout
[backspace=0pt,
topspace=0pt,
width=middle,
height=middle,
location=middle,
header=0pt,
footer=0pt]
\setupinteraction[state=start]
\setupinteractionscreen[option={portrait, paper}, print=pages]
\markpage[pages][100-300]
\starttext
\insertpages[i-context.pdf][width=0pt]
\stoptext
Many thanks for your help,
Pablo
--
http://www.ousia.tk
___________________________________________________________________________________
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
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 8+ messages in thread
* Re: page ranges in \markpage
2018-07-18 16:19 page ranges in \markpage Pablo Rodriguez
@ 2018-07-18 17:40 ` Wolfgang Schuster
2018-07-18 18:44 ` Pablo Rodriguez
0 siblings, 1 reply; 8+ messages in thread
From: Wolfgang Schuster @ 2018-07-18 17:40 UTC (permalink / raw)
To: mailing list for ConTeXt users
[-- Attachment #1.1: Type: text/plain, Size: 564 bytes --]
> Pablo Rodriguez <mailto:oinos@gmx.es>
> 18. Juli 2018 um 18:19
> Hans,
>
> would it be possible that \markpage could have page ranges as in the
> following sample?
>
> \setuplayout
> [backspace=0pt,
> topspace=0pt,
> width=middle,
> height=middle,
> location=middle,
> header=0pt,
> footer=0pt]
\setuplayout[page]
> \setupinteraction[state=start]
> \setupinteractionscreen[option={portrait, paper}, print=pages]
> \markpage[pages][100-300]
> \starttext
> \insertpages[i-context.pdf][width=0pt]
> \stoptext
\startmarkpages[page]
...
\stopmarkpages
Wolfgang
[-- Attachment #1.2: Type: text/html, Size: 1973 bytes --]
[-- Attachment #2: Type: text/plain, Size: 492 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://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 8+ messages in thread
* Re: page ranges in \markpage
2018-07-18 17:40 ` Wolfgang Schuster
@ 2018-07-18 18:44 ` Pablo Rodriguez
2018-07-18 19:08 ` Wolfgang Schuster
0 siblings, 1 reply; 8+ messages in thread
From: Pablo Rodriguez @ 2018-07-18 18:44 UTC (permalink / raw)
To: ntg-context
On 07/18/2018 07:40 PM, Wolfgang Schuster wrote:
>
>> Pablo Rodriguez 18. Juli 2018 um 18:19
>> Hans,
>>
>> would it be possible that \markpage could have page ranges as in the
>> following sample?
>>
>> \setuplayout
>> [backspace=0pt,
>> topspace=0pt,
>> width=middle,
>> height=middle,
>> location=middle,
>> header=0pt,
>> footer=0pt]
>
> \setuplayout[page]
Many thanks for your reply, Wolfgang.
I didn’t know the already defined layout. In which source file is it
defined? (I would like to know whether there are more already defined
layouts.)
>> \insertpages[i-context.pdf][width=0pt]
>> [...]
> \startmarkpages[page]
> ...
> \stopmarkpages
Sorry, but how do I apply that with to imposed pages with \insertpages?
I know that \filterpages is there, but I need to have the complete
document to print only some of the pages.
Many thanks for your help,
Pablo
--
http://www.ousia.tk
___________________________________________________________________________________
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
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 8+ messages in thread
* Re: page ranges in \markpage
2018-07-18 18:44 ` Pablo Rodriguez
@ 2018-07-18 19:08 ` Wolfgang Schuster
2018-07-18 19:38 ` Pablo Rodriguez
2018-07-19 19:56 ` Pablo Rodriguez
0 siblings, 2 replies; 8+ messages in thread
From: Wolfgang Schuster @ 2018-07-18 19:08 UTC (permalink / raw)
To: mailing list for ConTeXt users
[-- Attachment #1.1: Type: text/plain, Size: 2969 bytes --]
> Pablo Rodriguez <mailto:oinos@gmx.es>
> 18. Juli 2018 um 18:19
> Hans,
>
> would it be possible that \markpage could have page ranges as in the
> following sample?
>
> \setuplayout
> [backspace=0pt,
> topspace=0pt,
> width=middle,
> height=middle,
> location=middle,
> header=0pt,
> footer=0pt]
> \setupinteraction[state=start]
> \setupinteractionscreen[option={portrait, paper}, print=pages]
> \markpage[pages][100-300]
> \starttext
> \insertpages[i-context.pdf][width=0pt]
> \stoptext
>
> Many thanks for your help,
>
> Pablo
> Wolfgang Schuster <mailto:schuster.wolfgang@gmail.com>
> 18. Juli 2018 um 19:40
>
>> Pablo Rodriguez <mailto:oinos@gmx.es>
>> 18. Juli 2018 um 18:19
>> Hans,
>>
>> would it be possible that \markpage could have page ranges as in the
>> following sample?
>>
>> \setuplayout
>> [backspace=0pt,
>> topspace=0pt,
>> width=middle,
>> height=middle,
>> location=middle,
>> header=0pt,
>> footer=0pt]
>
> \setuplayout[page]
>
>> \setupinteraction[state=start]
>> \setupinteractionscreen[option={portrait, paper}, print=pages]
>> \markpage[pages][100-300]
>> \starttext
>> \insertpages[i-context.pdf][width=0pt]
>> \stoptext
>
> \startmarkpages[page]
> ...
> \stopmarkpages
>
>
> Wolfgang
> Pablo Rodriguez <mailto:oinos@gmx.es>
> 18. Juli 2018 um 20:44
> On 07/18/2018 07:40 PM, Wolfgang Schuster wrote:
>>> Pablo Rodriguez 18. Juli 2018 um 18:19
>>> Hans,
>>>
>>> would it be possible that \markpage could have page ranges as in the
>>> following sample?
>>>
>>> \setuplayout
>>> [backspace=0pt,
>>> topspace=0pt,
>>> width=middle,
>>> height=middle,
>>> location=middle,
>>> header=0pt,
>>> footer=0pt]
>> \setuplayout[page]
>
> Many thanks for your reply, Wolfgang.
>
> I didn’t know the already defined layout. In which source file is it
> defined? (I would like to know whether there are more already defined
> layouts.)
page-lay.mkiv
>>> \insertpages[i-context.pdf][width=0pt]
>>> [...]
>> \startmarkpages[page]
>> ...
>> \stopmarkpages
>
> Sorry, but how do I apply that with to imposed pages with \insertpages?
>
> I know that \filterpages is there, but I need to have the complete
> document to print only some of the pages.
You can get the number of pages of the included file with
\getfiguredimensions.
Afterwards you can use a loop where you add the markpage commands at
the begin and end of the range, below is a simple example but it’s easy
to write
a better loop with Lua.
\setuplayout[page]
\setupinteraction[state=start]
\setupinteractionscreen[option={portrait, paper}, print=pages]
\starttext
\getfiguredimensions[i-context.pdf]
\dostepwiserecurse{1}{99}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
\startmarkpages[page]
\dostepwiserecurse{100}{300}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
\stopmarkpages
\dostepwiserecurse{301}{\noffigurepages}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
\stoptext
Wolfgang
[-- Attachment #1.2: Type: text/html, Size: 7377 bytes --]
[-- Attachment #2: Type: text/plain, Size: 492 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://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 8+ messages in thread
* Re: page ranges in \markpage
2018-07-18 19:08 ` Wolfgang Schuster
@ 2018-07-18 19:38 ` Pablo Rodriguez
2018-07-19 19:56 ` Pablo Rodriguez
1 sibling, 0 replies; 8+ messages in thread
From: Pablo Rodriguez @ 2018-07-18 19:38 UTC (permalink / raw)
To: ntg-context
On 07/18/2018 09:08 PM, Wolfgang Schuster wrote:
>> Sorry, but how do I apply that with to imposed pages with \insertpages?
>>
>> I know that \filterpages is there, but I need to have the complete
>> document to print only some of the pages.
>
> You can get the number of pages of the included file with
> \getfiguredimensions.
>
> Afterwards you can use a loop where you add the markpage commands at
> the begin and end of the range, below is a simple example but it’s easy
> to write a better loop with Lua.
I see that not having a way to specify ranges in \markpages makes
complex to specify many ranges in a document.
Sorry, I understood the solution (I used a Lua loop for to impose pages
in a new PDF document some time ago), but I cannot stop thinking why the
approach to get page ranges looks so complex to me.
Many thanks for your help,
Pablo
--
http://www.ousia.tk
___________________________________________________________________________________
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
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 8+ messages in thread
* Re: page ranges in \markpage
2018-07-18 19:08 ` Wolfgang Schuster
2018-07-18 19:38 ` Pablo Rodriguez
@ 2018-07-19 19:56 ` Pablo Rodriguez
2018-07-19 22:19 ` Hans Hagen
1 sibling, 1 reply; 8+ messages in thread
From: Pablo Rodriguez @ 2018-07-19 19:56 UTC (permalink / raw)
To: ntg-context
On 07/18/2018 09:08 PM, Wolfgang Schuster wrote:
>
> [...]
> Afterwards you can use a loop where you add the markpage commands at
> the begin and end of the range, below is a simple example but it’s easy
> to write a better loop with Lua.
>
> \setuplayout[page]
> \setupinteraction[state=start]
> \setupinteractionscreen[option={portrait, paper}, print=pages]
> \starttext
> \getfiguredimensions[i-context.pdf]
> \dostepwiserecurse{1}{99}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
> \startmarkpages[page]
> \dostepwiserecurse{100}{300}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
> \stopmarkpages
> \dostepwiserecurse{301}{\noffigurepages}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
> \stoptext
Wolfgang
a different approach would be (code was mainly provided by anoter person):
\startluacode
function document.splitarray(inputstr, sep)
local t={}
for str in inputstr:gmatch("([^"..sep.."]+)") do
table.insert(t, str)
end
return t
end
function document.getpagearray(page_ranges)
local page_array={}
local ranges = document.splitarray(page_ranges, ",")
for _, pp in ipairs(ranges) do
if string.find(pp, "-") then
aux = document.splitarray(pp, "-")
for i=tonumber(aux[1]), tonumber(aux[2]), 1 do
table.insert(page_array, i)
end
else
table.insert(page_array, tonumber(pp))
end
end
return page_array
end
function document.printmarkedpageranges(tag, page_ranges)
page_array = document.getpagearray(page_ranges)
context("\\markpage[" .. tag .. "][" ..
table.concat(page_array, ", ") .. "]")
end
\stopluacode
\def\getmarkedpageranges#1#2{%
\ctxlua{document.printmarkedpageranges("#1","#2")}}
\setuplayout[page]
\setupinteraction[state=start]
\setupinteractionscreen[option={portrait, paper}, print=pages]
\getmarkedpageranges{pages}{5, 25-30, 100-200, 235, 298, 304}
\starttext
\insertpages[i-context.pdf][width=0pt]
\stoptext
This makes easier to add more complex page intervals (such as the one
above).
Before adding this to the wiki, my question would be whether it might
not be easier to add page ranges to \markpage.
I mean, as a standard user I think there is too much code (which may be
improved and made part of ConTeXt) for such a simple need.
Of course, I may be missing the whole point in this issue.
I would really appreciate, if someone could explain me what is wrong in
my assumption that \markpages need also page intervals.
Many thanks for your help,
Pablo
--
http://www.ousia.tk
___________________________________________________________________________________
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
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 8+ messages in thread
* Re: page ranges in \markpage
2018-07-19 19:56 ` Pablo Rodriguez
@ 2018-07-19 22:19 ` Hans Hagen
2018-07-22 11:28 ` Pablo Rodriguez
0 siblings, 1 reply; 8+ messages in thread
From: Hans Hagen @ 2018-07-19 22:19 UTC (permalink / raw)
To: mailing list for ConTeXt users
On 7/19/2018 9:56 PM, Pablo Rodriguez wrote:
> On 07/18/2018 09:08 PM, Wolfgang Schuster wrote:
>>
>> [...]
>> Afterwards you can use a loop where you add the markpage commands at
>> the begin and end of the range, below is a simple example but it’s easy
>> to write a better loop with Lua.
>>
>> \setuplayout[page]
>> \setupinteraction[state=start]
>> \setupinteractionscreen[option={portrait, paper}, print=pages]
>> \starttext
>> \getfiguredimensions[i-context.pdf]
>> \dostepwiserecurse{1}{99}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
>> \startmarkpages[page]
>> \dostepwiserecurse{100}{300}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
>> \stopmarkpages
>> \dostepwiserecurse{301}{\noffigurepages}{1}{\externalfigure[i-context.pdf][height=\textheight,page=\recurselevel]}
>> \stoptext
>
> Wolfgang
>
> a different approach would be (code was mainly provided by anoter person):
>
> \startluacode
> function document.splitarray(inputstr, sep)
> local t={}
> for str in inputstr:gmatch("([^"..sep.."]+)") do
> table.insert(t, str)
> end
> return t
> end
>
> function document.getpagearray(page_ranges)
> local page_array={}
> local ranges = document.splitarray(page_ranges, ",")
> for _, pp in ipairs(ranges) do
> if string.find(pp, "-") then
> aux = document.splitarray(pp, "-")
> for i=tonumber(aux[1]), tonumber(aux[2]), 1 do
> table.insert(page_array, i)
> end
> else
> table.insert(page_array, tonumber(pp))
> end
> end
> return page_array
> end
>
> function document.printmarkedpageranges(tag, page_ranges)
> page_array = document.getpagearray(page_ranges)
> context("\\markpage[" .. tag .. "][" ..
> table.concat(page_array, ", ") .. "]")
> end
> \stopluacode
>
> \def\getmarkedpageranges#1#2{%
> \ctxlua{document.printmarkedpageranges("#1","#2")}}
> \setuplayout[page]
> \setupinteraction[state=start]
> \setupinteractionscreen[option={portrait, paper}, print=pages]
> \getmarkedpageranges{pages}{5, 25-30, 100-200, 235, 298, 304}
> \starttext
> \insertpages[i-context.pdf][width=0pt]
> \stoptext
>
> This makes easier to add more complex page intervals (such as the one
> above).
>
> Before adding this to the wiki, my question would be whether it might
> not be easier to add page ranges to \markpage.
nicer code
local function getpagearray(page_ranges)
local list = { }
local ranges = string.split(page_ranges, ",")
for i=1,#ranges do
local f = string.split(ranges[i], "-")
for i=tonumber(f[1]), tonumber(f[2] or f[1]) do
list[i] = true
end
end
return table.sortedkeys(list)
end
inspect(getpagearray("1-5,8,12-19"))
or even better
local function getpagearray(str,max)
local list = { }
local function add(i)
list[i] = true
end
if max then
utilities.parsers.stepper(str,max,add)
else
utilities.parsers.stepper(str,add)
end
return table.sortedkeys(list)
end
inspect(getpagearray("1-5,8,12-19,88-",100))
and then
function document.printmarkedpageranges(tag,str)
context.markpage({ tag }, getpagearray(str))
end
> I mean, as a standard user I think there is too much code (which may be
> improved and made part of ConTeXt) for such a simple need.
>
> Of course, I may be missing the whole point in this issue.
>
> I would really appreciate, if someone could explain me what is wrong in
> my assumption that \markpages need also page intervals.
--
-----------------------------------------------------------------
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
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 8+ messages in thread
* Re: page ranges in \markpage
2018-07-19 22:19 ` Hans Hagen
@ 2018-07-22 11:28 ` Pablo Rodriguez
0 siblings, 0 replies; 8+ messages in thread
From: Pablo Rodriguez @ 2018-07-22 11:28 UTC (permalink / raw)
To: ntg-context
On 07/20/2018 12:19 AM, Hans Hagen wrote:
> [...]
> or even better
>
> local function getpagearray(str,max)
> local list = { }
> local function add(i)
> list[i] = true
> end
> if max then
> utilities.parsers.stepper(str,max,add)
> else
> utilities.parsers.stepper(str,add)
> end
> return table.sortedkeys(list)
> end
> [...]
> and then
>
> function document.printmarkedpageranges(tag,str)
> context.markpage({ tag }, getpagearray(str))
> end
Many thanks for your code, Hans.
Is there no chance that this functionality could make its way into the
ConTeXt source?
Many thanks for your help,
Pablo
--
http://www.ousia.tk
___________________________________________________________________________________
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
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 8+ messages in thread
end of thread, other threads:[~2018-07-22 11:28 UTC | newest]
Thread overview: 8+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2018-07-18 16:19 page ranges in \markpage Pablo Rodriguez
2018-07-18 17:40 ` Wolfgang Schuster
2018-07-18 18:44 ` Pablo Rodriguez
2018-07-18 19:08 ` Wolfgang Schuster
2018-07-18 19:38 ` Pablo Rodriguez
2018-07-19 19:56 ` Pablo Rodriguez
2018-07-19 22:19 ` Hans Hagen
2018-07-22 11:28 ` Pablo Rodriguez
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).