3 \startenvironment luatexref-env
8 % \lua : native lua code
9 % \luatex : lua lib, function, value defined in luatex
20 [alternative=doublesided
]
44 \def\showfields#1{\ctxlua
46 local t = string.split('
#1',',')
48 for _,a in pairs(node.fields(t
[1],t
[2])) do
49 if not (a == 'id' or a == 'subtype' or a =='next' or a=='prev') then
50 table.insert(r,'\
\type{'.. a .. '
}')
53 tex.sprint(table.concat(r, ', '))
60 local t = string.split('
#1',',')
61 tex.sprint('\
\type{'.. node.id(t
[1]) .. '
}')
63 tex.sprint(', \
\type{'.. node.subtype(t
[2]) .. '
}')
69 \starttexdefinition unexpanded todo
#1
77 \definetypeface[mainfacenormal
] [ss
][sans
] [iwona
] [default
]
78 \definetypeface[mainfacenormal
] [rm
][serif
][palatino
] [default
]
79 \definetypeface[mainfacenormal
] [tt
][mono
] [modern
] [default
][rscale=
1.1]
80 \definetypeface[mainfacenormal
] [mm
][math
] [iwona
] [default
][encoding=default
]
82 \definetypeface[mainfacemedium
] [ss
][sans
] [iwona-medium
][default
]
83 \definetypeface[mainfacenormal
] [rm
][serif
][palatino
] [default
]
84 \definetypeface[mainfacemedium
] [tt
][mono
] [modern
] [default
][rscale=
1.1]
85 \definetypeface[mainfacemedium
] [mm
][math
] [iwona-medium
][default
][encoding=default
]
87 \definetypeface[mainfacenarrowtt
][tt
][mono
] [modern
] [default
][rscale=
1.1]
96 \setuphead [chapter
] [style=
\mainfacemedium\bfd,
color=blue
]
97 \setuphead [section
] [style=
\mainfacemedium\bfc,
color=blue
]
98 \setuphead [subsection
] [style=
\mainfacemedium\bfb,
color=blue
]
99 \setuphead [subsubsection
][style=
\mainfacemedium\bfa,
color=blue
]
105 [color=blue
] % style=\mainfacenarrowtt
111 [color=blue
] % style=\mainfacenarrowtt
113 \definecolor[blue
] [b=
.5]
114 \definecolor[red
] [r=
.5]
115 \definecolor[green
][g=
.5]
117 \startuseMPgraphic{lualogo
}
118 color luaplanetcolor ; luaplanetcolor :=
.5blue ;
119 color luaholecolor ; luaholecolor := white ;
120 numeric luaextraangle ; luaextraangle :=
0 ;
122 vardef lualogo = image (
123 % Graphic design by A. Nakonechnyj. Copyright (c) 1998, All rights reserved.
125 save luaorbitcolor, d, r, p ;
color luaorbitcolor ; numeric d, r, p ;
127 luaorbitcolor :=
.5luaholecolor ; d := sqrt(
2)/
4 ; r :=
1/
4 ; p := r/
8 ;
129 fill fullcircle scaled
1 withcolor luaplanetcolor ;
130 draw fullcircle rotated
40.5 scaled (
1+r) dashed evenly scaled p withpen pencircle scaled (p/
2) withcolor luaorbitcolor ;
131 fill fullcircle scaled r shifted (d+
1/
8,d+
1/
8) rotated luaextraangle withcolor luaplanetcolor ;
132 fill fullcircle scaled r shifted (d-
1/
8,d-
1/
8) withcolor luaholecolor ;
137 \startuseMPgraphic{luapage
}
138 \includeMPgraphic{lualogo
}
142 fill Page withcolor (white-luaplanetcolor) ;
144 picture p ; p := lualogo xsized (
3PaperWidth/
5) ;
145 draw p shifted center Page shifted (
0,-ypart center ulcorner p) ;
150 \starttexdefinition luaextraangle
151 % we can also just access the last page and so in mp directly
153 context(
\lastpage ==
0 and
0 or
\realfolio*
360/
\lastpage)
157 \startuseMPgraphic{luanumber
}
158 \includeMPgraphic{lualogo
}
159 luaextraangle :=
\luaextraangle;
160 picture p ; p := lualogo ;
161 setbounds p to boundingbox fullcircle ;
178 \startsetups pagenumber:right
181 [preset=rightbottom,offset=
1cm
]
182 [frame=off,height=
1cm,offset=overlay
]
183 {\useMPgraphic{luanumber
}}
186 [preset=rightbottom,offset=
1cm,x=
1.5cm
]
187 [frame=off,height=
1cm,width=
1cm,offset=overlay
]
191 [preset=rightbottom,offset=
1cm,x=
2.5cm
]
192 [frame=off,height=
1cm,offset=overlay
]
193 {\getmarking[chapter
]}% Lua\TeX\ Reference Manual}
196 \startsetups pagenumber:left
199 [preset=leftbottom,offset=
1cm,x=
2.5cm
]
200 [frame=off,height=
1cm,offset=overlay
]
201 {\getmarking[chapter
]}
204 [preset=leftbottom,offset=
1cm,x=
1.5cm
]
205 [frame=off,height=
1cm,width=
1cm,offset=overlay
]
209 [preset=leftbottom,offset=
1cm
]
210 [frame=off,height=
1cm,offset=overlay
]
211 {\useMPgraphic{luanumber
}}
214 \startsetups [titlepage
]
218 \switchtobodyfont[mainfacemedium
]
219 \definedfont[Bold at
\the\dimexpr.08\paperheight\relax] \setupinterlinespace
221 \setlayer[page
]{\useMPgraphic{luapage
}}
226 voffset=
.05\paperheight]
228 foregroundcolor=blue,
232 \definedfont[Bold at
24pt
] \setupinterlinespace
237 voffset=
.35\paperheight]
239 foregroundcolor=blue,
242 {\getvariable{document}{snapshot
}}
243 {snapshot
\getvariable{document}{snapshot
}}%
245 {\getvariable{document}{beta
}}
246 {beta
\getvariable{document}{beta
}}%
255 \definedfont[Bold at
48pt
] \setupinterlinespace
257 \start \blue Lua
\TeX \endgraf Reference
\endgraf Manual
\stop
261 \definedfont[Bold at
24pt
] \setupinterlinespace
267 \definedfont[Bold at
12pt
] \setupinterlinespace
269 copyright: Lua
\TeX\ development team
\endgraf
270 more info: www.luatex.org
\endgraf
271 version:
\currentdate \doifsomething{\getvariable{document}{snapshot
}}{(snapshot
\getvariable{document}{snapshot
})
} \endgraf
277 [setups=pagenumber:left
]
281 [setups=pagenumber:right
]
285 \def\nonterminal#1>
{\mathematics{\langle\hbox{{\rm #1}}\rangle}}
287 % taco's brainwave -)
289 \newcatcodetable\syntaxcodetable
291 \def\makesyntaxcodetable
293 \catcode`\<=
13 \catcode`\|=
12
294 \catcode`\!=
0 \catcode`\\=
12
295 \savecatcodetable\syntaxcodetable
300 \def\startsyntax {\begingroup\catcodetable\syntaxcodetable \dostartsyntax}
301 \def\syntax {\begingroup\catcodetable\syntaxcodetable \dosyntax}
303 \def\syntaxenvbody#1%
314 \bgroup \catcodetable\syntaxcodetable
316 !gdef!dostartsyntax
#1\stopsyntax{!let<!nonterminal!syntaxenvbody
{#1}!endgroup
}
317 !gdef!dosyntax
#1{!let<!nonterminal!syntaxbody
{#1}!endgroup
}
330 [chapter,section,subsection
]
333 [chapter,section,subsection,subsubsection
]
336 % Hans doesn't like the bookmarks opening by default so we comment this:
338 % \setupinteractionscreen[option=bookmark]
341 \let\luatex\firstofoneargument
342 \to \simplifiedcommands