test

KAPITEL 4: Erweiterte Skripttechniken Schleifen 48
VBS
Set appRef = CreateObject("Photoshop.Application")
Set myDoc = appRef.Open("/c/Program Files/Adobe/Adobe Photoshop
CS6/Samples/Ducky1.tif")
If myDoc.ArtLayers.Count < 2 Then
myDoc.ActiveLayer.FillOpacity = 50
Else
myDoc.ActiveLayer.FillOpacity = 65
End If
Schleifen
Sie können durch ein Skript alle Objekte eines bestimmten Typs suchen und ändern. Beispiel: Ein Dokument
enthält sichtbare und nicht sichtbare Ebenen und Sie möchten alle Ebenen sichtbar machen. Sie möchten
dieses Skript für mehrere Dokumente anwenden; die Dokumente verfügen jedoch über eine verschiedene
Anzahl von Ebenen.
In dieser Situation ist die Anweisung repeat (AS) oder eine Schleife (JS und VBS) praktisch. Eine Schleife
„durchläuft“ eine Kollektion von Objekten und führt eine Aktion für jedes Objekt aus.
Um Skripte in diesem Abschnitt zu verwenden, öffnen Sie die Adobe-Anwendung und erstellen ein
Dokument, das über mindestens neun Ebenen verfügt. Ein Teil der Ebenen soll sichtbar und ein Teil
ausgeblendet werden. Speichern Sie das Dokument und führen Sie das Skript aus. Ersetzen Sie dabei den
Namen der Anwendung und den layer-Objektnamen im DOM der Anwendung.
Das Grundprinzip dieser Schleifen ist, dass das Skript die erste Ebene im Element oder in der Kollektion
kennzeichnet und die Sichtbarkeit der Ebene auf true festlegt und anschließend die nächste Ebene
kennzeichnet und die Aktion wiederholt und anschließend die nächste Ebene kennzeichnet, bis jede
Ebene erfasst wurde.
AS
tell application "Adobe Illustrator CS6"
set myDoc to current document
tell myDoc
set myLayerCount to (count layers)
set myCounter to 1
repeat while myCounter