r3wp [groups: 83 posts: 189283]
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

World: r3wp

[Postscript] Emitting Postscript from REBOL

Graham
15-Apr-2006
[574x3]
I don't know if it's a bug, but Text in Draw does not obey the rotate 
commands, or the scaling commands.
the shaded box is in the wrong place .. not sure why, and I had to 
shift the bottom text up so I could see it.
So, my aim is to preview a page on screen in this dialect and using 
a different parser on the same dialect, create postscript which I 
can send to the printer.
JaimeVargas
15-Apr-2006
[577x3]
Graham, what I meant is that even to the unit is a *point* the fact 
is that you can more than 72 pixels in a inch. For example laserprinters 
have 300 to 1200. And there is some displays that 96dpi, and I have 
seem e-ink that gives you 150dpi(s).
So the unit of measure doesn't have anything to do with the actual 
size of pixel or (dot).
(Excuse  my overscrupulous comments, now time for sleep.
Graham
15-Apr-2006
[580x3]
do http://www.compkarori.com/reb/psd2draw.rversion 0.0.8
Allows a preview in 50%, 75% and 100% mode.
the print button, unimplemented, would send the post script file 
to your printer.
Henrik
15-Apr-2006
[583x3]
wow
that's really all I can say at this point
graham, out of curiosity, can you scale as you want? could you implement 
a slider? I'd like to see how fast it is.
Graham
15-Apr-2006
[586]
Yes, could implement a slider .. if I can remember how to do sliders!
Henrik
15-Apr-2006
[587]
SLIDER in the layout and then use /data to extract the position which 
is between 0 and 1
Graham
15-Apr-2006
[588x8]
:)
There's a free postscript viewer and allows you to print in windows 
here: http://www.rops.org/
It's http://www.rops.org/download/freescript53.exeand does only 
Level 1.
a measly 324Kb.
Uses windows installed fonts instead of postscript fonts to preview 
and print.
http://www.compkarori.com/reb/psd2draw.r
has a slider now for Henrik :)
it gets all screwed up when really small.
Henrik
15-Apr-2006
[596]
the fonts scale a little funny
Graham
15-Apr-2006
[597]
Just uploaded a newer version that places the slider vertically.
Henrik
15-Apr-2006
[598x2]
I thought there was subpixel accuracy
it scales transforms as well, it seems
Graham
15-Apr-2006
[600x4]
Perhaps I've done something wrong.
that gray box is not right.
as you scale it, you can see it moving closer to the other box.
It is supposed to be superimposed on the other box from the start.
Henrik
15-Apr-2006
[604x2]
no it moves and rotates. maybe SCALE is working too well?
As in, scales all transform parameters
Graham
15-Apr-2006
[606x2]
Text does undergo scaling or rotations.
*doesn't
Henrik
15-Apr-2006
[608]
what if you convert the text to vectors?
Graham
15-Apr-2006
[609x3]
could do ... use vectorial text.
I didn't try.
For those without postscript printers, using the free version of 
rops.exe might be a solution for them.
Henrik
15-Apr-2006
[612]
there is a free version?
Graham
15-Apr-2006
[613x5]
I'm hoping someone who knows more about draw can fix this for me 
:)
free version of rops is level 1 ps.
the versions that cost do level 2 and 3.
http://www.rops.org/download/freescript53.exewhich is the free version 
for windows
I got the impression that AGG draw is skewed a little to assist producing 
SVG graphics .. but there's a strong case to support postscript better 
instead.
Geomol
15-Apr-2006
[618]
Looks good, Graham. I hope to get time one of the comming days to 
investigate PS a little more, so the dialect can be more complete. 
I like your idea about getting rid of blocks, and I hope to make 
a consistent version with few blocks, maybe only for font.
Gabriele
15-Apr-2006
[619]
text in draw can only be transformed if rendered in vector mode
Graham
15-Apr-2006
[620]
changing the text to vector mode now has the text obeying the rotation.
Henrik
15-Apr-2006
[621]
did you upload that one?
Graham
15-Apr-2006
[622x2]
no.
text: [err:
		set txt string! (
			fontcount: fontcount + 1
			set to-word join "font" fontcount  make face/font compose [
				 size: (fontsize) 
				 name: (fontname) 
				 color: (rgb)
			] 
			pos/y: pos/y - fontsize

   repend output  [ 'font (to-word join "font" fontcount) 'pen rgb 'text 
   'vectorial txt pos ]
		) 
	]