World: r3wp

at least we gain by .. losing the rpn notation, and also using pairs 
instead of two numbers.

A higher level is that .. writing a better poscript.

well, is C a better assembler?

it's slower :)

there we go... http://www.hmkdesign.dk/barcode.ps

now to redesign the API. it's too clunky right now

that looks pretty neat!

I take it that was much harder to do in pdf-maker.r ??

it's a bit harder but not much different

actually only the text was harder because in PS you point to a position 
and start writing, where you in PDF-maker need to define a text box 
before writing

Is this EAN ?

EAN13

works fine with barcode readers. have tested with both cheap and 
expensive ones. just need a good printer

where's the barcode function?

http://www.hmkdesign.dk/rebol/barcode/ean13.r

do %postscript.r
do %ean13.r
ean13-ps ean13-create "123456789012" ; 12-digit code

will output a block to be inserted in the postscript block

Ok, not trivial !

a bit clunky

Luckily I have no need for a barcode at present.

the string is necessary, but I should probably put the create function 
inside the barcode generator function

you can take any 12 digit string, but the 13th digit is a checksum 
which must be correct or the barcode can't be read

http://www.compkarori.com/reb/test2.pdf

neat

make-circles: func [ count /local out ][
	out: copy []
	loop count [

  repend out [ 'newpath 'circle to-pair reduce [ random 700 random 
  700 ] random 40 
			'color 
			to-tuple rejoin [ random 255 "." random 255 "." random 255 ]
			'fill
		] 
	]
	out
]

test5: form ps/header compose [
	gsave
	(make-circles 500)
	grestore
	showpage
]

I think it's bedtime... can hardly see the code anymore

night

borrow some matchsticks to keep the eyelids open!

night

this is a multipage postscript file

ps/header [
	newpage "Title"
	at 72x72 font Times-Roman 12 "page 1"
	showpage
	newpage "Body"
	at 144x144 "page 2"
	showpage
]

and produces this postscript output

%!PS-Adobe-3.0 
%%Creator: ps.r ver 0.0.6 
%%Pages: (atend) 
%%EndComments 
%%Page: Title 1 
72 72 moveto /Times-Roman findfont 
12 scalefont 
setfont 
(page 1) show 
showpage 
%%Page: Body 2 
144 144 moveto (page 2) show 
showpage 

%%Trailer 
%%Pages: 2 
%%EOF

http://www.compkarori.com/reb/starburst.pdfis a starburst

http://www.compkarori.com/reb/clipped.pdfare the words "REBOL Rulz" 
clipped to the starburst.

ie . the starburst is only visible inside the text.

looks like port 9100 is pretty standard for most postscript printers

if a print server has multiple printers attached, they are likely 
to be on different ports eg, 9101, 02 ...

newpath sets up a new line which can be drawn.  Stroke has the same 
effect as newpath

Does moveto always indicate a newpath?

If it does, the basic rule of the dialect might be: at <pos> <content>
And then we get rid of blocks.

no, it doesn't.

my next step is to now convert the ps dialect to draw - so I can 
have a print preview ( confined to lines, boxes and text ).

anyone know what the draw coordinates mean?  What is point 20x20 
.. measured from the top left, but what is 20 based upon?

I've looked at http://www.rebol.com/docs/draw-ref.htmland it doens't 
mention how the coordinate system is based.

it's probably pixel based

screens are 72 dots per inch.

postscript is 72 points per inch.

Good match!

strange coincidence

unlikely to be a coincidence.