Re: Need minimum/tutorial Postscript code

Path	csiph.com!x330-a1.tempe.blueboxinc.net!usenet.pasdenom.info!weretis.net!feeder4.news.weretis.net!news.mixmin.net!news2.arglkargh.de!news.visyn.net!visyn.net!not-for-mail
From	"Mark T. B. Carroll" <mtbc@bcs.org>
Newsgroups	comp.lang.postscript
Subject	Re: Need minimum/tutorial Postscript code
Date	Mon, 09 Jan 2012 12:44:12 -0500
Organization	none
Lines	39
Message-ID	<87sjjobwk3.fsf@ixod.org> (permalink)
References	<4fa36c55-6006-43fc-bb03-3347d4d644a1@k10g2000yqk.googlegroups.com>
Mime-Version	1.0
Content-Type	text/plain; charset=us-ascii
X-Trace	hoshi.visyn.net otvfcZaC+qURIBikUGrtt0fUqtuP9zwb2E549KrFhqM=
X-Complaints-To	abuse@open-news-network.org
NNTP-Posting-Date	Mon, 9 Jan 2012 17:44:12 +0000 (UTC)
X-User-ID	3L5w7Q0c0k36Ty2EFS2/2DNbZkjhxjprqwO9BAtcwPU=
Cancel-Lock	sha1:4BiqtZEORng9Q8yzLgLALWZt1KU=
User-Agent	Gnus/5.13 (Gnus v5.13) Emacs/23.3 (gnu/linux)
Xref	x330-a1.tempe.blueboxinc.net comp.lang.postscript:550

Show key headers only | View raw

Ramon F Herrera <ramon@conexus.net> writes:

> Again, all I need is to display 10 horizontal lines and 10 vertical
> lines.

I'm not sure if this is quite what you need, but how about something
like,

/in { 72 mul } def

/size 10 def          % can change this
/width 8.5 in def     % can change this
/margin 0.5 in def    % can change this

/makelines
{
  0 1 size
  {
      unit mul dup
      0 moveto
      extent lineto
  }
  for
} def

/size size 1 sub def
/extent width margin 2 mul sub def
/unit extent size div def

1 setlinecap

newpath
margin dup translate makelines
[ 0 1 1 0 0 0 ] concat makelines
stroke
showpage


-- Mark

Back to comp.lang.postscript | Previous | Next — Previous in thread | Next in thread | Find similar

Thread

Need minimum/tutorial Postscript code Ramon F Herrera <ramon@conexus.net> - 2012-01-09 09:12 -0800
  Re: Need minimum/tutorial Postscript code "Mark T. B. Carroll" <mtbc@bcs.org> - 2012-01-09 12:44 -0500
    Re: Need minimum/tutorial Postscript code Ramon F Herrera <ramon@conexus.net> - 2012-01-09 10:13 -0800
      Re: Need minimum/tutorial Postscript code Ramon F Herrera <ramon@conexus.net> - 2012-01-09 12:54 -0800

csiph-web