-- ************************************************** -- Provide Moho with the name of this script object -- ************************************************** ScriptName = "SS_AddWarpLayer" -- ************************************************** -- "Add & Assign an empty Warp Layer" -- -------------------------------------------------- -- version: 01.00 MH12+ #5312 -- by: Sam Cogheil (SimplSam) -- Licence & Warranty: None -- Use/Reuse/Adapt Freely. Attribution appreciated -- ************************************************** -- ************************************************** -- General information about this script -- ************************************************** SS_AddWarpLayer = {} function SS_AddWarpLayer:Name() return 'Add Warp Layer' end function SS_AddWarpLayer:Version() return '1.0 #5312' end function SS_AddWarpLayer:UILabel() return 'Add Warp Layer' end function SS_AddWarpLayer:Creator() return 'Sam Cogheil (SimplSam)' end function SS_AddWarpLayer:Description() return 'Add & Assign an empty Warp Layer' end -- ************************************************** -- Is Relevant / Is Enabled -- ************************************************** function SS_AddWarpLayer:IsRelevant(moho) return true end function SS_AddWarpLayer:IsEnabled(moho) return (moho.layer:LayerType() == MOHO.LT_IMAGE) or (moho.layer:LayerType() == MOHO.LT_VECTOR) end -- ************************************************** -- The guts of this script -- ************************************************** function SS_AddWarpLayer:Run(moho) moho.document:SetDirty() moho.document:PrepUndo(nil) local imgLayer = moho.layer local warpLayer = moho:LayerAsVector(moho:CreateNewLayer(MOHO.LT_VECTOR)) warpLayer:SetName(("%s (warp)"):format(imgLayer:Name())) if (imgLayer.SetWarpLayer) then imgLayer:SetWarpLayer(warpLayer) else imgLayer:SetDistortionMeshLayer(warpLayer) end warpLayer:SetContinuousTriangulation(true) end
SS - Add Warp Layer
Listed
Author: simplsam
View Script
Script type: Button/Menu
Uploaded: Dec 18 2023, 03:54
Add & Assign an empty Mesh Warp Layer
Add and Assign an empty Mesh Warp Layer to an existing Image or Vector layer - ready for manual Mesh Warp creation.
This script, and all other scripts on this site are distributed as free software under the GNU General Public License 3.0 or later.
Downloads count: 292
SS - Add Warp Layer
Listed
Author: simplsam
View Script
Script type: Button/Menu
Uploaded: Dec 18 2023, 03:54
Add & Assign an empty Mesh Warp Layer
Add and Assign an empty Mesh Warp Layer to an existing Image or Vector layer - ready for manual Mesh Warp creation.
This script, and all other scripts on this site are distributed as free software under the GNU General Public License 3.0 or later.
Downloads count: 292