QuarkXpress Kästche setzen per Apple Script

Anonym

Hallo Hans,
lang nichts mehr gehört, ich hoffe es geht Dir gut soweit.

Doch nun zur Sache, ich hätte da mal wieder eine kleine Script Aufgabe für Dich denn Du liebst ja die Herausforerung ;-)

Also:
Bei Quarkdokumenten veerschiedener grösse (z.B. 300 x 80 oder 400x 400)
sollen kleine Kästchen in der Farbe Schwarz immer genau 2 mm nach innen versetzt um das Dokument laufen.

Die Kästchen sollen ein Grösse von 0,5 x 0,5mm haben.

Und der Abstand zwischen den Kästchen soll variabel einstellbar sein, also z.B. bei 300 x 80 sollen 6 Kästchen im Abstand von 50mm erzeugt werden.

Zur Erklärung, das Ganze sollen Makierungspunkte werden, immer dort wo ein Punkt sitzt soll später eine Öse gestezt werden.

Meinst Du das ist machbar ????

Grüsse Mike

Hans_Haesler

Hallo Mike,

ich nehme mal an, dass Du in einem früheren Leben (sprich: dtpro-Forum) als
'dosman' aufgetreten bist. Stimmt's? ;-)

Ich nehme weiter an, dass Du immer noch QuarkXPress 6.1 benutzest.

Doch wie stellst Du Dir das Variabel-Einstellen vor? Ein Dialog, in welchem man den
Abstand zwischen den Kästchen eingeben kann?

Zu Deinem Beispiel: 6 Kästchen in einem Abstand von 50 mm brauchen horizontal
250 mm Platz (plus die Kästchen-Breite). Doch was ist mit den restlichen 49.5 mm?

Oder sollen 7 Kästchen erzeugt werden? Das erste 2 mm vom linken Rand entfernt,
das letzte 2 mm vom rechten Rand entfernt. Und die übrigen 5 gleichmässig
dazwischen positioniert. Aber dann ist der Abstand von Kästchen zu Kästchen
(Mitte bis Mitte) nur noch 49.25 mm.

Und was ist mit dem linken und dem rechten Rand? Wie sollen die vertikalen 80 mm
aufgeteilt werden?

Würdest Du mir bitte ein Musterprojekt zustellen? Mit Angaben, wie bei anderen
Layout-Dimensionen der Anwender welche Wünsche anbringen können sollte.

Gruss, Hans

TMA

hallo zusammen,
hab da noch was gefunden:

http://www.visionsedge.com/XTensions/index.asp?id=gridmaster

wenn ich euch richtig verstanden habe müsste man mit der xtension so was machen können.

könnt ihr euch ja mal anschauen...

gruß und ein schönes wochenende
TMA

Anonym

Hallo Hans,

ja Du hast Recht ich bin der dosman ;-) und ich benutze immer noch QuarkXPress 6.1 bzw. 6.5
Ein entsprechendes Quar File sende ich Dir gleich per Mail.

Doch wie stellst Du Dir das Variabel-Einstellen vor?
Ein Dialog, in welchem man den Abstand zwischen den Kästchen eingeben kann?

Ja, ein Dialog wäre perfekt. Nochmal zur Erklärung:
Wenn das Format z.B. 300 x 80 mm ist und die Vorgabe = Punkte alle 50 mm zusetzen, dann müssen jeweils in den Ecken Punkte sitzen und Mittelpunkt des Punktes muss 2mm nach innen versetzt sein.
Problemmatik ist das ja alle 50 mm mathematisch dann nicht mehr möglich ist, also müssen die restlichen Punkte bzw. Kästchen gleichmässig verteilt auf dem Rest der Strecke liegen, genau so wie Du es beschrieben hier hast:

Oder sollen 7 Kästchen erzeugt werden? Das erste 2 mm vom linken Rand entfernt,
das letzte 2 mm vom rechten Rand entfernt. Und die übrigen 5 gleichmässig
dazwischen positioniert. Aber dann ist der Abstand von Kästchen zu Kästchen
(Mitte bis Mitte) nur noch 49.25 mm.

Und was ist mit dem linken und dem rechten Rand? Wie sollen die vertikalen 80 mm
aufgeteilt werden?

Genauso wie die anderen. Das Problem ist das das Format auch z.B. 300 x 125 mm sein kann.
Meinst Du das das überhaupt lösbar ist ??

Grüsse Mike

Hans_Haesler

Hallo Mike,

danke für die Datei. Doch habe ich im Moment eine dringende Arbeit zu erledigen
(für eine Beilage anlässlich der Fussball WM). Ich kann deshalb nicht vor heute
Abend mit dem Studium Deines Problems beginnen.

@ TMA: Danke für den Hinweis. Werde ich mir anschauen.

Gruss, Hans

Hans_Haesler

Hallo Mike,

Zwischenbericht: Es sieht gut aus. Erste Versuche ergeben, dass es möglich ist.
Der Code ist allerdings noch nicht präsentabel. Und ich kann voraussichtlich
erst im Laufe des Sonntagabends weiterfahren.

Gruss, Hans

Hans_Haesler

Hallo Mike,

und hier ist eine erste Lösung. Schon recht komfortabel, kannst Du im Script das Ausrechnen der
Abstände steuern, indem Du die als 'property' definierte Variable 'boxDistance' auf "enger", "mittel"
oder "weiter" setzest.

Was bedeuten diese drei Ausdrücke?
Mit "enger" wird die Anzahl der zu setzenden Kästchen auf die nächsthöhere Ganzzahl aufgerundet.
Egal, ob 5.12 oder 5.92: Beide werden zu 6.
Mit "mittel" werden Dezimalstellen von 0.5 und höher aufgerundet. Darunter wird abgerundet.
Mit "weiter" wird die Anzahl der zu setzenden Kästchen auf die nächstkleinere Ganzzahl abgerundet.
Die genannten 5.12 und 5.92 werden beide zu 5.

Je nach Dimension des Layouts wird zwischen "mittel" und "weiter" kein Unterschied zu sehen sein.
Aber mit dem von Dir genannten Format von 300 x 125 mm (und einem gewünschten Abstand von
50 mm) schon.

Die Properties 'boxH' und 'boxW' dienen zum Bestimmen der Boxenhöhe und -breite. Mit 'boxC'
definiert man die Distanz vom Seitenrand zur Boxenmitte und mit 'fillColor' die Hintergrundfarbe.

property boxDistance : "enger"
--property boxDistance : "mittel"
--property boxDistance : "weiter"

property boxH : 0.5
property boxW : 0.5
property boxC : 2
property fillColor : "Schwarz"

global decSep
set decSep to ""
try
[nbsp] "1.5" as real
[nbsp] set decSep to "."
on error
[nbsp] set decSep to ","
end try

tell document 1 of application "QuarkXPress 6.1"
[nbsp] set tmpVal to text returned of (display dialog "Abstand der Kästchen (in mm):" default answer "")
[nbsp] set stepVal to ""
[nbsp] repeat with i from 1 to count of tmpVal
[nbsp] [nbsp] set curChar to character i of tmpVal
[nbsp] [nbsp] if curChar is in "0123456789" then
[nbsp] [nbsp] [nbsp] set stepVal to stepVal & curChar
[nbsp] [nbsp] else if curChar is in ",." then
[nbsp] [nbsp] [nbsp] set stepVal to stepVal & decSep
[nbsp] [nbsp] else
[nbsp] [nbsp] [nbsp] display dialog "Die Eingabe für den Abstand ist ungültig.
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] [nbsp] 
Du hast getippt: " & tmpVal buttons "OK" default button 1 with icon 0
[nbsp] [nbsp] [nbsp] error number -128
[nbsp] [nbsp] end if
[nbsp] end repeat
[nbsp] if not (color spec fillColor exists) then
[nbsp] [nbsp] set fillColor to name of color spec 1 whose locked = true and RGB color value = {0, 0, 0}
[nbsp] end if
[nbsp] set pageWidth to page width as millimeter units as real
[nbsp] set pageHeight to page height as millimeter units as real
[nbsp] set xMargin to boxC - (boxW / 2)
[nbsp] set yMargin to boxC - (boxH / 2)
[nbsp] set ty1 to yMargin
[nbsp] set by1 to pageHeight - yMargin - boxH
[nbsp] set x1 to xMargin
[nbsp] set lastX1 to pageWidth - xMargin - boxW
[nbsp] set lastY1 to by1
[nbsp] set totX to lastX1 - x1
[nbsp] set totY to lastY1 - ty1
[nbsp] set tmpXVal to (totX / stepVal)
[nbsp] set tmpYVal to (totY / stepVal)
[nbsp] if boxDistance is "enger" then
[nbsp] [nbsp] if not ((tmpXVal as string) ends with ".0") then
[nbsp] [nbsp] [nbsp] set nBoxesH to (tmpXVal + 1) div 1
[nbsp] [nbsp] else
[nbsp] [nbsp] [nbsp] set nBoxesH to tmpXVal div 1
[nbsp] [nbsp] end if
[nbsp] [nbsp] if not ((tmpYVal as string) ends with ".0") then
[nbsp] [nbsp] [nbsp] set nBoxesV to (tmpYVal + 1) div 1
[nbsp] [nbsp] else
[nbsp] [nbsp] [nbsp] set nBoxesV to tmpYVal div 1
[nbsp] [nbsp] end if
[nbsp] else if boxDistance is "mittel" then
[nbsp] [nbsp] set nBoxesH to (tmpXVal + 0.5) div 1
[nbsp] [nbsp] set nBoxesV to (tmpYVal + 0.5) div 1
[nbsp] else if boxDistance is "weiter" then
[nbsp] [nbsp] set nBoxesH to tmpXVal div 1
[nbsp] [nbsp] set nBoxesV to tmpYVal div 1
[nbsp] else
[nbsp] [nbsp] display dialog "Die Einstellung \"" & boxDistance & "\" ist nicht vorgesehen." buttons [nbsp]¬
[nbsp] [nbsp] [nbsp] "OK" default button 1 with icon 0
[nbsp] [nbsp] error number - 128
[nbsp] end if
[nbsp] set defXstep to totX / nBoxesH
[nbsp] set defYstep to totY / nBoxesV
[nbsp] tell page 1
[nbsp] [nbsp] try
[nbsp] [nbsp] [nbsp] delete (every graphic box whose name is "blackBox")
[nbsp] [nbsp] end try
[nbsp] [nbsp] repeat with i from 1 to nBoxesH + 1
[nbsp] [nbsp] [nbsp] make graphic box at beginning with properties [nbsp]¬
[nbsp] [nbsp] [nbsp] [nbsp] {bounds:{"" & ty1 & "mm", "" & x1 & "mm", "" & (ty1 + boxH) & "mm", "" & (x1 + boxW) & "mm"} [nbsp]¬
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] , color:fillColor, shade:100, name:"blackBox"}
[nbsp] [nbsp] [nbsp] make graphic box at beginning with properties [nbsp]¬
[nbsp] [nbsp] [nbsp] [nbsp] {bounds:{"" & by1 & "mm", "" & x1 & "mm", "" & (by1 + boxH) & "mm", "" & (x1 + boxW) & "mm"} [nbsp]¬
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] , color:fillColor, shade:100, name:"blackBox"}
[nbsp] [nbsp] [nbsp] set x1 to x1 + defXstep
[nbsp] [nbsp] end repeat
[nbsp] [nbsp] set x1 to xMargin
[nbsp] [nbsp] repeat with i from 2 to nBoxesV
[nbsp] [nbsp] [nbsp] set ty1 to ty1 + defYstep
[nbsp] [nbsp] [nbsp] make graphic box at beginning with properties [nbsp]¬
[nbsp] [nbsp] [nbsp] [nbsp] {bounds:{"" & ty1 & "mm", "" & x1 & "mm", "" & (ty1 + boxH) & "mm", "" & (x1 + boxW) & "mm"} [nbsp]¬
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] , color:fillColor, shade:100, name:"blackBox"}
[nbsp] [nbsp] [nbsp] make graphic box at beginning with properties [nbsp]¬
[nbsp] [nbsp] [nbsp] [nbsp] {bounds:{"" & ty1 & "mm", "" & lastX1 & "mm", "" & (ty1 + boxH) & "mm", "" & (lastX1 + boxW) & "mm"} [nbsp]¬
[nbsp] [nbsp] [nbsp] [nbsp] [nbsp] , color:fillColor, shade:100, name:"blackBox"}
[nbsp] [nbsp] end repeat
[nbsp] end tell
end tell

Das Script "Kaestchen_6x_01d" ist unterwegs zu Dir.

Gruss, Hans

Anonym

Hallo Hans,

erstmal 1000 Danke, das ist wieder einmal perfekte Arbeit von Dir, genauso wie ich das brauche.

Aber wenn Du Lust und Zeit hast könntest Du ja noch folgendes einbauen um den Script Komfort noch zu verbessern:

Die Optionen enger, mittel, weiter sowie die boxH, boxW, boxC und fillColor Angaben mit in den Dialog aufnehmen in der der Abstand abgefragt wird.

Dann wäre es wirklich absolut perfekt und komfortabel wäre gar kein Ausdruck.

Es wäre quasi ein TRAUM !nnnDanke nochmal und Grüsse
Mike

Hans_Haesler

Hallo Mike,

bitteschön! Deine Wünsche betreffend Erweiterung des Dialoges werde ich ausführen.
Hatte ich von Anfang an geplant, aber es fehlte mir die Zeit. Denn bei so vielen
Angaben ist es nicht anwenderfreundlich, wenn alle einzeln abgefragt werden.

Doch wenn man die Optionen in einem einzigen Dialog zeigen will, dann muss man zu
einem Hilfsmittel greifen (z.B. Pashua) und der Entwicklungsaufwand wird recht gross.

Frage: Ist es wünschenswert, für die vertikal angeordneten Kästchen einen anderen
Abstand eingeben zu können?

Gruss, Hans

Anonym

Hallo Hans,

also für meine Zwecke reicht es aus, wenn die Abstände vertikal wie auch horiztal immer gleich bleiben.

Eine andere Frage habe ich noch, wenn ich die neue Version von Pashua habe, müssen dann die Scripts angepasst werden ?

Grüsse Mike

Hans_Haesler

Hallo Mike,

ja, dem ist so. Der Code eines Scripts muss auf die vorhandene Version
von "Pashua" abgestimmt sein.

Näheres steht im Thema "Neue Version von "Pashua" (erweiterte Dialoge)"
http://www.page-online.de/page/forum/viewthread/2947/

Wenn Du bei Deiner aktuellen Version von Pashua bleiben möchtest, dann
teile mir bitte deren Nummer mit (per E-Mail) und ich werde das vorliegende
Script mit dem passenden Code ausstatten.

Gruss, Hans

Hans_Haesler

Hallo Mike,

Das Kästchen-Script mit dem Pashua-Dialog ist unterwegs zu Dir.
Ich kann es hier nicht veröffentlichen, weil es 18'560 Zeichen umfasst -[nbsp] unformatiert!
(ein neuer Eintrag in diesem Forum ist auf 6000 Zeichen beschränkt).

Gruss, Hans

Anonym

Hallo Hans,

bei uns in der Praxis ist folgende Frage aufgetreten.

Könnte man in das Script noch einbauen, das man nur bestimmte Seiten des Dokuments mit Kästchen versieht ?

Also entweder nur oben oder nur unten oder links und rechts, oder evtl auch nur an 3 Seiten ?

Grüsse Mike

Hans_Haesler

Hallo Mike,

ja, das ist sicher möglich. Ich werde den Dialog mit vier Checkboxen ergänzen.
Kann mich aber erst heute Abend dahintersetzen.

Gruss, Hans

Anonym

Hallo Hans,

super....DANKE und nicht hetzen ich warte gern.

Achja, wenn Du noch eine Option für nur in jede Ecke des Dokuments ein Kästchen einbauen könntest, ware das mal wieder ein völlig perfektes, Nein ein noch perfekteres Script von Dir.

Danke im Voraus.

Grüsse Mike

Hans_Haesler

Hallo Mike,

wird gemacht! Wird nicht einfach sein, dies alles rationell umzusetzen, weil die
Kästchen in den Ecken je zu den horizontalen sowie den vertikalen gehören.

In der aktuellen Version werden zuerst die horizontalen erzeugt. Bei den vertikal
angeordneten Kästchen wird mit dem zweiten begonnen und mit dem vorletzten
aufgehört, damit in den Ecken nur je eines erscheint.

Wenn nun aber, sagen wir, die obere horiontale Reihe weggelassen werden soll,
dann müssen die beiden ersten vertikalen erzeugt werden.

Wie gesagt: nicht einfach. Aber es wird schon werden. :-)

Gruss, Hans

Anonym

Hallo Hans,
ich bin vollkommen überzeugt davon das Du das hinkriegst.

Es sind doch die Herausforderungen die Du so liebst.

Mir fallen bestimmt bald wieder ein paar neue Sachen ein ;-)

Grüsse Mike

Hans_Haesler

Hallo Mike,

das Script "Kaestchen_6x_03d" ist unterwegs zu Dir. Ja, es war eine Herausforderung. :-) Aber die
Umsetzung Deiner Wünsche scheint mir gut gelungen.

Weil viele Kombinationen möglich sind und weil die Eckpunkte nicht doppelt erzeugt werden sollten,
habe ich den Code in acht Handler aufgeteilt: Vier für die Ränder und vier für die Ecken. Je nach
Wahl des Anwenders, werden die entsprechenden Handler aufgerufen.

Die Kästchen werden im Uhrzeigersinn erzeugt. Das bedingt, dass die 15 Möglichkeiten einzeln und
komplett -[nbsp] d.h. ohne Kombinierungen untereinander -[nbsp] codiert sind. Dadurch wird das Script zwar länger,
aber der Ablauf ist harmonischer.

Wenn die Checkbox "nur in jeder Ecke der Seite ein Kästchen" aktiviert ist, dann werden natürlich einige
Angaben ignoriert: der Abstand; oben, links, unten, rechts; die Ausrichtung (enger, mittel, weiter).

Und noch: Kann sein, dass mal das Resultat nicht den Vorstellungen entspricht. Dann ganz einfach das
Script nochmals starten. Im Dialog erscheint die letzte Einstellung. Die Korrekturen anbringen und
"OK" klicken. Die "alten" Kästchen werden abgeräumt (sie sind benannt) und die neuen erzeugt.

Gruss, Hans

Anonym

Hallo Hans,

DU BIST ECHT DER HAMMER !!!

Dieses Script übertrifft wieder einmal alle meine Erwartungen und Du hast Dich wie so oft schon wieder mal selbst übertroffen.

1000 Dank !!! PERFEKT !!!

Grüsse Mike

Anonym

und doch stellt sich mir die Frage.....:

GEHT DAS AUCH FÜR INDESIGN ???[nbsp] ;-)

Grüsse Mike

Nächste Seite »