scrn-pag.lua /size: 1614 b    last modification: 2020-07-01 14:35
1
if
not
modules
then
modules
=
{
}
end
modules
[
'
scrn-pag
'
]
=
{
2
version
=
1
.
001
,
3
comment
=
"
companion to scrn-pag.mkiv
"
,
4
author
=
"
Hans Hagen, PRAGMA-ADE, Hasselt NL
"
,
5
copyright
=
"
PRAGMA ADE / ConTeXt Development Team
"
,
6
license
=
"
see context related readme files
"
7
}
8 9
interactions
=
interactions
or
{
}
10
interactions
.
pages
=
interactions
.
pages
or
{
}
11
local
pages
=
interactions
.
pages
12 13
local
implement
=
interfaces
.
implement
14 15
local
codeinjections
=
backends
.
codeinjections
16 17
function
pages
.
setupcanvas
(
specification
)
18
codeinjections
.
setupcanvas
(
specification
)
19
end
20 21
function
pages
.
setpagetransition
(
specification
)
22
codeinjections
.
setpagetransition
(
specification
)
23
end
24 25
implement
{
26
name
=
"
setupcanvas
"
,
27
actions
=
pages
.
setupcanvas
,
28
arguments
=
{
29
{
30
{
"
mode
"
}
,
31
{
"
singlesided
"
,
"
boolean
"
}
,
32
{
"
doublesided
"
,
"
boolean
"
}
,
33
{
"
leftoffset
"
,
"
dimen
"
}
,
34
{
"
topoffset
"
,
"
dimen
"
}
,
35
{
"
width
"
,
"
dimen
"
}
,
36
{
"
height
"
,
"
dimen
"
}
,
37
{
"
paperwidth
"
,
"
dimen
"
}
,
38
{
"
paperheight
"
,
"
dimen
"
}
,
39
{
"
cropoffset
"
,
"
dimen
"
}
,
40
{
"
bleedoffset
"
,
"
dimen
"
}
,
41
{
"
artoffset
"
,
"
dimen
"
}
,
42
{
"
trimoffset
"
,
"
dimen
"
}
,
43
{
"
copies
"
,
"
integer
"
}
,
44
{
"
print
"
,
"
string
"
}
,
-- , tohash
45
}
46
}
47
}
48 49
implement
{
50
name
=
"
setpagetransition
"
,
51
actions
=
pages
.
setpagetransition
,
52
arguments
=
{
53
{
54
{
"
n
"
}
,
55
{
"
delay
"
,
"
integer
"
}
,
56
}
57
}
58
}
59