Files
ps/scripts/dojs.vbs
Unknown e90c491450 Text can now be formatted
- Added black to the colors
- Fixed setStroke to be skipped when needed
2018-04-12 13:07:56 -04:00

13 lines
397 B
Plaintext

Dim appRef
Set appRef = CreateObject("Photoshop.Application")
if wScript.Arguments.Count = 0 then
wScript.Echo "Missing parameters"
else
path = wScript.Arguments(0)
args = wScript.Arguments(1)
error = appRef.DoJavaScriptFile(path, Split(args, ","))
if Not error = "true" and Not error = "[ActionDescriptor]" and Not error = "undefined" Then
Err.raise 1, "dojs.vbs", error
end if
end if