Erzeugen von PostScript Dateien

[bikerboy]

Hallo,

ich soll aus Script heraus eine PostscriptDatei erzeugen. Habe nun schon ein bisschen gesucht, und probiert. Ich bekomme keine vernünftiges Material in die Finger. Habe einfach mal ein ps-Datei mit meinem Druckertreiber erzeugt und gemerkt das das ganz schön viel kryptisches Zeug drin steht. Deswegen wollte ich mich hier mal erkundigen, ob das hier schon jemand gemacht hat, und falls ja ob er ein paar Links an der Hand hat die einen weiter helfen.

Besten Dank im Voraus.

[koehlerbv]

Diese Frage solltest Du Dir vom Aufgabengeber nochmal erläutern lassen. Natürlich kann man mit LS eine PostScript-Datei erzeugen, aber um das zu entwickeln, reicht Deine Lehrzeit nicht aus, wenn Du Einzelkämpfer bist (es sei denn, Du solltest nur "hello world" auf ein weisses Blattl packen).

Bernhard

PS: Wenn Du es natürlich auf die "harte Tour" möchtest, dann sei Dir dieser Download empfohlen 

[bikerboy]

(es sei denn, Du solltest nur "hello world" auf ein weisses Blattl packen)

Neee so einfach wollten sie es mir nicht machen......

Soll schon formatiert raus kommen.

ich habe schon ein ähnlich dickes (771 Seiten langes pdf) aber die zeit zu lesen gibt mir hier auch keiner.

Trotzdem danke

PS: Wenn noch einmal der Satz kommt "Fertig werden"  muss ich schreien (Lieblingssatz von meinem Aufgabengeber)

[bikerboy]

da ich ein sehr sehr ungeduldiger mensch bin könntest du mir vllt ein einfaches hello world beispiel geben ?

[pram]

Darfst du weitere Anwendungen installieren?

dann könntest du dir "latex" oder "miktex" installieren. Du erzeugst dann mittels Notes ein *.tex Dokument und kannst dieses dann mittels TeX in ein PDF oder PS compilieren.

Der Aufbau eines TeX Files ist zwar auch etwas kryptisch (während meiner Studienzeit hab ich oft darüber geflucht) aber wenn man den Dreh etwas heraus hat, kann man recht einfach gut formatierte Papers machen.

Alternativ halt als Notes-Maske rendern und mittels Druckertreiber drucken. Ist aber wohl schwer automatisierbar.
Die "harte Tour" würde ich nur als letzten Ausweg nehmen 

Gruß
Roland

[m3]

ROTFL. Du solltest lernen, "NEIN" zu sagen.

Ein Hello World ist mit rudimentären LotusScript-Kenntnissen und der Wikipedia schnell geschrieben:

Code

	Dim session As NotesSession
	Dim stream As NotesStream
	
	Set session = New NotesSession
	Set stream = session.CreateStream
	If Not stream.Open({D:\TEMP\x.ps}, "ASCII") Then
		Messagebox {D:\TEMP\x.ps},, "Open failed"
		Exit Sub
	End If
	
	Call stream.WriteText( {%!PS}, EOL_CRLF)
	Call stream.WriteText( {/Courier findfont}, EOL_CRLF)
	Call stream.WriteText( {20 scalefont}, EOL_CRLF)
	Call stream.WriteText( {	setfont}, EOL_CRLF)
	Call stream.WriteText( {72 500 moveto}, EOL_CRLF)
	Call stream.WriteText( {(Hello world!) show}, EOL_CRLF)
	Call stream.WriteText( {showpage}, EOL_CRLF)
	
	Call stream.Close

Aber um die Leküre von PostScript Language Reference, third edition und dem Supplement dazu wirst Du nicht herumkommen, wenn Du keinen PS-Drucker einsetzt.

[bikerboy]

Ich bedanke mich schon mal für die guten Beiträge.

@Pram

weitere Anwendungen sind leider nicht zulässig. Mein Aufgabengeber hat zugesagt, dass wir das so können.

[bikerboy]

Für interessiert habe ich hier noch eine schöne Seite gefunden.

Link : http://www.tailrecursive.org/postscript/postscript.html

[bikerboy]

Code

%!PS
/cm {29 mul} def
/Times-Roman findfont
20 scalefont
setfont
15 cm 27 cm moveto
(Zusatz) show
2 cm 27 cm moveto
(Robert Kreutzer \n
-keiner-\n
Musteralle5 \n
33xxx Musterstadt) show
2 cm 20 cm moveto
(ErsterFreitextblock \n
Zweiter Freitextblock) show
() show
6 cm 8.5 cm moveto
(UserPassword) show

So warum macht er jetzt keinen Zeilenumbruch ?

Within a text string, the \ (backslash) character is treated as an “escape” for various
purposes, such as including newline characters, unbalanced parentheses, and
the \ character itself in the string. The character immediately following the \ determines
its precise interpretation.
\n line feed (LF)
\r carriage return (CR)
\t horizontal tab
\b backspace
\f form feed
\\ backslash
\( left parenthesis
\) right parenthesis
\ddd character code ddd (octal)

Habe es auch schon mit "\r" versucht aber er macht es nicht warum