tell application "Finder" set anImagesFolder to "images" set anImagesExt to "jpg" set anOutFolder to "out" set aProject to "Untitled.box3d" -- get the path of the current folder set aCurrent to get folder of (path to me) as string -- define paths to the source and destination folders set aSrcFolder to aCurrent & anImagesFolder as alias set aDstFolder to aCurrent & anOutFolder as alias -- define name of the project set aProject to aCurrent & aProject as alias -- enumerate files in the source folder set aList to every file of (aSrcFolder as alias) repeat with i from 1 to number of items in aList set aFile to item i of aList -- process PNG-files only if the name extension of the aFile is anImagesExt then -- append the name of file to the path of the destination folder set aDestPath to aDstFolder & (name of the aFile as string) -- convert destination path to POSIX style set aDst to the POSIX path of (aDestPath as string) -- convert source path to POSIX style set aSrc to the POSIX path of (aFile as string) -- call Box Shot 3D, see the user manual for commands tell application "Box Shot 3D" activate open aProject -- load project set image aSrc for side "Front" -- set image for the "Front" side fit shape to images set target quality to 1 with timeout of 10000 seconds render to aDst -- render end timeout quit -- quit end tell end if end repeat end tell