Hallo Michael,
wenn echte Doppelseiten eingefügt werden sollen, dann ist es besser, eine
Arbeitsfläche (= spread) einzuschieben. Damit wird zwar nur _eine_ Seite
erzeugt, aber die folgenden werden auf einen Rutsch nach unten geschoben.
Man vermeidet damit, dass die Seiten über das "Rückgrat" wechseln und
wieder zurück, wenn die nächste Seite eingefügt wird:
---
tell document 1 of application "QuarkXPress 4.11"
make spread at after page 2
make page at after page 2
end tell
---
Man muss aber unbedingt die gewünschte Musterseite angeben, sonst kann es
geschehen, dass per Script jene Musterseite verwendet wird, welche bei der
letzten _manuellen_ Aktion im Spiel war...
Damit das ganze benutzerfreundlicher wird, sollte per Dialog die Anzahl der
einzufügenden Seiten und die Position erfragt werden. Die Eingabe muss so
aussehen: "2 91". Nur Ziffern und ein Zwischenraum oder ein Komma als Separator.
Die Seitenzahl muss der relativen entsprechen, das heisst jener, welche in der
Layoutpalette erscheint.
---
tell application "QuarkXPress 4.11"
activate
set dR to text returned of (display dialog ¬
"Wieviele Seiten nach welcher Seite einfügen?" default answer "")
set nPage to (word 1 of dR) as integer
set prevPage to page number of page (word 2 of dR) of document 1
tell master document 1
set masterA to name of spread 1
end tell
tell document 1
repeat with i from 1 to nPage div 2
make spread at after page prevPage
set master spread of page (prevPage + 1) to masterA
set master spread of (make page at after page prevPage) to masterA
end repeat
end tell
end tell
---
Dieses Script funktioniert. Man kann 2 oder 4 Seiten einfügen.
Aber: es ist keine Prüfung eingebaut, ob die Eingabe nur Ziffern enthält, ob sie
"vernünftig" ist, das heisst ob die Anzahl Seiten nicht mit jener der Seitenzahl
verwechselt wurde, und ob die angegebene Seite existiert.
Alle diese Tests benötigen voraussichtlich mehr Zeilen als hier Platz haben
(und ich benötige auch etwas Zeit, um sie zu schreiben). Deshalb werde ich Dir
das fertige Script per Mail zustellen. Ich nehme an, dass Du mit unserem neuen
Mitglied 210, Michael Slomski, identisch bist...
Wer Interesse an der ergänzten Version hat, soll sich bitte bei mir melden.
Hans Haesler, <a href="mailto:hsa@ringier.ch">hsa@ringier.ch</a>
