The following is a PaintShopPro v8.0 script for resizing a base layer map image to the correct dimensions.
from JascApp import * def ScriptProperties(): return { 'Author': '', 'Copyright': '', 'Description': '', 'Host': 'Paint Shop Pro', 'Host Version': '8.00' } def Do(Environment): App.Do( Environment, 'Offset', { 'FillColor': (0,0,0), 'EdgeMode': App.Constants.EdgeMode.Background, 'HorizontalOffset': 0, 'VerticalOffset': -1, 'Center': App.Constants.Boolean.false, 'GeneralSettings': { 'ExecutionMode': App.Constants.ExecutionMode.Default, 'AutoActionMode': App.Constants.AutoActionMode.Match } }) App.Do( Environment, 'ResizeCanvas', { 'AspectRatio': 1, 'FillColor': (0,0,0), 'HoriPlace': App.Constants.HorizontalType.Left, 'MaintainAspect': App.Constants.Boolean.true, 'NewDimUnits': App.Constants.UnitsOfMeasure.Pixels, 'NewHeight': 241, 'NewWidth': 241, 'PlaceBottom': 0, 'PlaceLeft': 0, 'PlaceRight': -15, 'PlaceTop': -15, 'VertPlace': App.Constants.VerticalType.Bottom, 'GeneralSettings': { 'ExecutionMode': App.Constants.ExecutionMode.Default, 'AutoActionMode': App.Constants.AutoActionMode.Match } }) App.Do( Environment, 'Resize', { 'AspectRatio': 1, 'CurrentDimensionUnits': App.Constants.UnitsOfMeasure.Pixels, 'CurrentResolutionUnits': App.Constants.ResolutionUnits.PixelsPerIn, 'Height': 256, 'MaintainAspectRatio': App.Constants.Boolean.true, 'Resample': App.Constants.Boolean.true, 'ResampleType': App.Constants.ResampleType.SmartSize, 'ResizeAllLayers': App.Constants.Boolean.true, 'Resolution': 72, 'Width': 256, 'GeneralSettings': { 'ExecutionMode': App.Constants.ExecutionMode.Default, 'AutoActionMode': App.Constants.AutoActionMode.Match } })