From: "John R. Culleton" <john@wexfordpress.com>
Cc: Hans Hagen <pragma@wxs.nl>
Subject: Re: Why must I move frame to center it?
Date: Mon, 27 Nov 2006 18:59:05 -0500 [thread overview]
Message-ID: <200611271859.06045.john@wexfordpress.com> (raw)
In-Reply-To: <4569C05B.9040300@wxs.nl>
On Sunday 26 November 2006 11:27, Hans Hagen wrote:
> setbounds currentpicture to Page ;
Unfortunately the recommended line had no effect. Did I put it in the right
place?
So here is the file that works (so far!)
\setupoutput[pdftex]
\definepapersize[bok][width=6.0in,height=9.0in]
\setuppapersize[bok][letter]
\setuplayout[marking=on,margin=.5in,textwidth=4.5in,width=middle,location=middle]
\input fonts.tex
\setupcolors[state=start]
\starttext
\noheaderandfooterlines
\startuseMPgraphic{bg}
StartPage ;
setbounds currentpicture to Page ;
path p ; p := Page enlarged -10mm ;
path q ; q := Page enlarged -15mm ;
drawoptions(withcolor .85white) ;
fill reverse topboundary q -- topboundary p -- cycle ;
fill reverse bottomboundary q -- bottomboundary p -- cycle ;
drawoptions(withcolor .65white) ;
fill reverse leftboundary q -- leftboundary p -- cycle ;
fill reverse rightboundary q -- rightboundary p -- cycle ;
StopPage ;
\stopuseMPgraphic
\vglue -1.55in
\hglue -.75in
\useMPgraphic{bg}
\vglue -6.5in
%\hglue .2in
\BigSans
\centerline{Part I}
\vskip .4in
\Mythe
\centerline{Prerequisite for Success:}
\vskip .2in
\centerline{A Thorough Understanding}
\vfil
\tfa
\page[yes]
\stoptext
--
John Culleton
Able Indexing and Typesetting
Precision typesetting (tm) at reasonable cost.
Satisfaction guaranteed.
http://wexfordpress.com
next prev parent reply other threads:[~2006-11-27 23:59 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2006-11-24 23:40 John R. Culleton
2006-11-26 16:27 ` Hans Hagen
2006-11-27 23:59 ` John R. Culleton [this message]
2006-11-28 0:44 ` Aditya Mahajan
2006-11-28 21:43 ` John R. Culleton
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=200611271859.06045.john@wexfordpress.com \
--to=john@wexfordpress.com \
--cc=ntg-context@ntg.nl \
--cc=pragma@wxs.nl \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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).