Adobe PHOTOSHOP CS 2.0 - SCRIPTING GUIDE Manual page 54

Adobe Photoshop CS2 Scripting Guide
Creating an ArtLayer Object
The following examples demonstrate how to create an
the current document.
AS
tell application "Adobe Photoshop CS2"
make new art layer at beginning of current document ¬
select all current document
fill selection of current document with contents ¬
end tell
VBS
Dim appRef
Set appRef = CreateObject("Photoshop.Application")
' Create a new art layer at the beginning of the current document
Dim docRef
Dim layerObj
Set docRef = appRef.ActiveDocument
Set layerObj = appRef.ActiveDocument.ArtLayers.Add
layerObj.Name = "MyBlendLayer"
layerObj.BlendMode = psNormalBlend
' Select all so we can apply a fill to the selection
appRef.ActiveDocument.Selection.SelectAll
' Create a color to be used with the fill command
Dim colorObj
Set colorObj = CreateObject("Photoshop.SolidColor")
colorObj.RGB.Red = 255
colorObj.RGB.Green = 100
colorObj.RGB.Blue = 0
' Now apply fill to the current selection
appRef.ActiveDocument.Selection.Fill colorObj
JS
// Create a new art layer at the beginning of the current document
var layerRef = app.activeDocument.artLayers.add()
layerRef.name = "MyBlendLayer"
layerRef.blendMode = BlendMode.NORMAL
// Select all so we can apply a fill to the selection
app.activeDocument.selection.selectAll
// Create a color to be used with the fill command
var colorRef = new SolidColor
colorRef.rgb.red = 255
colorRef.rgb.green = 100
colorRef.rgb.blue = 0
// Now apply fill to the current selection
app.activeDocument.selection.fill(colorRef)
with properties {name:"MyBlendLayer", blend mode:normal}
{class:RGB color, red:255, green:0, blue:0}
Photoshop CS2
ArtLayer
Scripting Photoshop CS2
object filled with red at the beginning of
50