202
Example 51.1
-- PPD File Combined
--
-- Make a new document
-- Get the PPDs
-- Get the name, PS Level, screens, screen spot functions, and file path of the
first PPD
-- For each screen, get the name, angle, and frequency
-- For each spot function, get the name and the function
-- Make a new text frame with the PPD info as its contents
--
tell application "Illustrator CS"
activate
make new document
set PPDFiles to PPDs
set PPDName to name of item 1 of PPDFiles
set PPDProperties to get properties of item 1 of PPDFiles
set PPDLevel to language level of PPDProperties
set PPDPath to file path of PPDProperties
set PPDScreens to screens of PPDProperties
set screensText to "Screens" & return
repeat with PPDScreen in PPDScreens
set PPDScreenName to name of PPDScreen
set PPDScreenAngle to angle of properties of PPDScreen
set PPFScreenFrequency to frequency of properties of PPDScreen
set screensText to screensText & tab & PPDScreenName & " - Angle: " &
PPDScreenAngle & ", Frequency: " & PPFScreenFrequency & return as string
end repeat
set PPDSpotFunctions to spot functions of PPDProperties
set PPDSpotFunctionText to "Spot Functions" & return
repeat with PPDSpotFunction in PPDSpotFunctions
set PPDSpotFunctionName to name of PPDSpotFunction
set PPDSpotFunctionTX to spot function of PPDSpotFunction
set PPDSpotFunctionText to PPDSpotFunctionText & tab & PPDSpotFunctionName &
": " & PPDSpotFunctionTX & return as string
end repeat
set textContents to PPDName & return & "PostScript Level " & PPDLevel & return
& "PPD Path: " & PPDPath ¬
& return & return & screensText & return & return & PPDSpotFunctionText as
string
make new text frame in document 1 with properties {contents:textContents,
position:{20, 700}}
end tell
12 Aug 03
AppleScript Reference