Look for Script to Resize, add © text (various aspect ratio)

Moderator: Kathy_9

Post Reply
Jan Shim
Posts: 135
Joined: Tue Jul 03, 2012 3:13 am
operating_system: Windows 7 Home Premium
System_Drive: C
32bit or 64bit: 64 Bit
motherboard: ASUS ROG Maximus V GENE
processor: Core i7-3770K 4.4GHz
ram: 16GB
Video Card: nVidia GeForce 2GB GTX 660
Monitor/Display Make & Model: Dell UltraSharp U2713H
Location: Brunei Darussalam
Contact:

Look for Script to Resize, add © text (various aspect ratio)

Post by Jan Shim »

Hi,

I'm looking for a script to automatically resize images to 1200 pixels and add a copyright text to the lower right corner of the image.

The resize part is easy but copyright text disappears when resizing images of a different aspect ratio.


Jan
Forriner
Posts: 449
Joined: Mon Aug 13, 2012 9:35 pm
operating_system: Windows 10
System_Drive: C
32bit or 64bit: 64 Bit
motherboard: ASUS Z170M-PLUS
processor: Intel Core i5-6400
ram: 16 GB
Hard_Drive_Capacity: 1250 GB
Monitor/Display Make & Model: Philips Brilliance 272b 2560 × 1440
Corel programs: PSP 2023
Location: The Netherlands

Re: Look for Script to Resize, add © text (various aspect ra

Post by Forriner »

Have you tried this? Menu Image/Watermarking/Visible watermark... scales an image you use to watermark another image. The 'size' parameter is a percentage of the width (as far as I could see in a quick check) of the target image, to size the watermark. This would change the size of the watermark for each image if the width changes, so I suppose you wouldn't want to vary the width too much.
This could be put in the batch file.
Good luck, happy processing.
Jan Shim
Posts: 135
Joined: Tue Jul 03, 2012 3:13 am
operating_system: Windows 7 Home Premium
System_Drive: C
32bit or 64bit: 64 Bit
motherboard: ASUS ROG Maximus V GENE
processor: Core i7-3770K 4.4GHz
ram: 16GB
Video Card: nVidia GeForce 2GB GTX 660
Monitor/Display Make & Model: Dell UltraSharp U2713H
Location: Brunei Darussalam
Contact:

Re: Look for Script to Resize, add © text (various aspect ra

Post by Jan Shim »

I tried the watermarking approach and it didn't turn out very well. Plain text at a fixed font size works the best and cleanest.
LeviFiction
Advisor
Posts: 6831
Joined: Thu Oct 02, 2008 1:07 pm
operating_system: Windows 10
System_Drive: C
32bit or 64bit: 64 Bit
motherboard: Alienware M17xR4
processor: Intel Core i7-3630QM CPU - 2_40GH
ram: 6 GB
Video Card: NVIDIA GeForce GTX 660M
sound_card: Sound Blaster Recon3Di
Hard_Drive_Capacity: 500GB
Corel programs: PSP: 8-2023
Location: USA

Re: Look for Script to Resize, add © text (various aspect ra

Post by LeviFiction »

You can use a PSPImage file for the watermark. Just keep the text as a vector and it should resize fine. At least it seemed to in my tests, I may not be shrinking or growing it as largely as you are but worth testing.

Otherwise, if you want a script to do it, you'll have to make the script intelligent.

You can take the image's new width and height, calculate size requirements, and place the text.
https://levifiction.wordpress.com/
Jan Shim
Posts: 135
Joined: Tue Jul 03, 2012 3:13 am
operating_system: Windows 7 Home Premium
System_Drive: C
32bit or 64bit: 64 Bit
motherboard: ASUS ROG Maximus V GENE
processor: Core i7-3770K 4.4GHz
ram: 16GB
Video Card: nVidia GeForce 2GB GTX 660
Monitor/Display Make & Model: Dell UltraSharp U2713H
Location: Brunei Darussalam
Contact:

Re: Look for Script to Resize, add © text (various aspect ra

Post by Jan Shim »

Thanks! I managed to get the desired result with this script (works for landscape oriented images only)

from PSPApp import *

def ScriptProperties():
return {
'Author': u'',
'Copyright': u'',
'Description': u'',
'Host': u'PaintShop Pro',
'Host Version': u'16.00'
}


def Do(Environment):
# EnableOptimizedScriptUndo
App.Do( Environment, 'EnableOptimizedScriptUndo', {
'GeneralSettings': {
'ExecutionMode': App.Constants.ExecutionMode.Silent,
'AutoActionMode': App.Constants.AutoActionMode.Match,
'Version': ((16,0,0),1)
}
})

# Resize
App.Do( Environment, 'Resize', {
#'AspectRatio': 1.33333,
'CurrentDimensionUnits': App.Constants.UnitsOfMeasure.Pixels,
'CurrentResolutionUnits': App.Constants.ResolutionUnits.PixelsPerIn,
#'Height': 900,
'MaintainAspectRatio': True,
'Resample': True,
'ResampleType': App.Constants.ResampleType.Bicubic,
'ResizeAllLayers': True,
'Resolution': 72,
'Width': 1200,
'SharpnessValue': 100,
'AdvancedMode': True,
'GeneralSettings': {
'ExecutionMode': App.Constants.ExecutionMode.Silent,
'AutoActionMode': App.Constants.AutoActionMode.Match,
'Version': ((16,0,0),1)
}
})

# VisibleWatermark
App.Do( Environment, 'VisibleWatermark', {
'Opacity': 50,
'Placement': 1,
'Stretch': 18,
'Emboss': 0,
'Foreground': u'C:\\Program Files (x86)\\Corel\\Corel PaintShop Pro X6\\Languages\\EN\Scripts-Trusted\\Watermark.pspim'\
u'age',
'GeneralSettings': {
'ExecutionMode': App.Constants.ExecutionMode.Silent,
'AutoActionMode': App.Constants.AutoActionMode.Match,
'Version': ((16,0,0),1)
}
})
User avatar
hartpaul
Advisor
Posts: 2893
Joined: Tue Mar 20, 2012 3:38 pm
operating_system: Windows 10
System_Drive: C
32bit or 64bit: 64 Bit
motherboard: ASUSTeK P7P55D STRIX B240F GAMING
processor: IntelCore i7 7700 3.60 Ghz
ram: 8 Gb
Video Card: Nvidia GeForce GTX 1050
sound_card: Nvidia High Definition Audio
Hard_Drive_Capacity: 1000 Gb
Monitor/Display Make & Model: AOC
Corel programs: PSP8,X2 to X9,2018,2019,2020
Location: Australia

Re: Look for Script to Resize, add © text (various aspect ra

Post by hartpaul »

Free program Irfanview allows bulk resize of images both portrait and landscape based on longest side set to say 1200 pixels. Also allows placing of plain overlay text in any font present at bottom left, right, top or middle.
Systems available Win7, Win 8.1,Win 10 Version 1607 Build 14393.2007 & version 20H2 Build 19042.867
Jan Shim
Posts: 135
Joined: Tue Jul 03, 2012 3:13 am
operating_system: Windows 7 Home Premium
System_Drive: C
32bit or 64bit: 64 Bit
motherboard: ASUS ROG Maximus V GENE
processor: Core i7-3770K 4.4GHz
ram: 16GB
Video Card: nVidia GeForce 2GB GTX 660
Monitor/Display Make & Model: Dell UltraSharp U2713H
Location: Brunei Darussalam
Contact:

Re: Look for Script to Resize, add © text (various aspect ra

Post by Jan Shim »

Thanks. I use Faststone's Image Viewer when I need to batch process. This script helps me automate the occasional single image I want to share on social media.
Post Reply