-- ************************************************** -- Provide Moho with the name of this script object -- ************************************************** ScriptName = "SS_MultiLayerTransformPoints" -- ************************************************** -- Transform points on multiple layers -- based on: LM_TransformPoints 10.0 (Lost Marble) -- version: +01.04 MH12+ #530605 -- by: Sam Cogheil (SimplSam) -- ************************************************** SS_MultiLayerTransformPoints = {} -- SS_MultiLayerTransformPoints.BASE_STR = 2375 function SS_MultiLayerTransformPoints:Name() return "Multi-Layer Transform Points" end function SS_MultiLayerTransformPoints:Version() return "10+01.04 #5306" end function SS_MultiLayerTransformPoints:Description() return "Move/Scale/Rotate selected points on multiple layers (hold <shift> to constrain, <alt> to scale to center, <shift> while scaling to squash, <ctrl/cmd> to select points)" end function SS_MultiLayerTransformPoints:Creator() return "Lost Marble LLC + Sam Cogheil (SimplSam)" end function SS_MultiLayerTransformPoints:UILabel() return ("Multi-Layer Transform Points") -- return (MOHO.Localize("/Scripts/Tool/TransformPoints/TransformPoints=Multi-Layer Transform Points")) end function SS_MultiLayerTransformPoints:LoadPrefs(prefs) self.autoWeld = prefs:GetBool("SS_MultiLayerTransformPoints.autoWeld", false) self.autoFill = prefs:GetBool("SS_MultiLayerTransformPoints.autoFill", false) self.autoStroke = prefs:GetBool("SS_MultiLayerTransformPoints.autoStroke", false) self.showHandles = prefs:GetBool("SS_MultiLayerTransformPoints.showHandles", false) self.fixedHandles = prefs:GetBool("SS_MultiLayerTransformPoints.fixedHandles", false) end function SS_MultiLayerTransformPoints:SavePrefs(prefs) prefs:SetBool("SS_MultiLayerTransformPoints.autoWeld", self.autoWeld) prefs:SetBool("SS_MultiLayerTransformPoints.autoFill", self.autoFill) prefs:SetBool("SS_MultiLayerTransformPoints.autoStroke", self.autoStroke) prefs:SetBool("SS_MultiLayerTransformPoints.showHandles", self.showHandles) prefs:SetBool("SS_MultiLayerTransformPoints.fixedHandles", self.fixedHandles) end function SS_MultiLayerTransformPoints:ResetPrefs() SS_MultiLayerTransformPoints.autoWeld = false SS_MultiLayerTransformPoints.autoWeldRadius = 12 SS_MultiLayerTransformPoints.autoFill = false SS_MultiLayerTransformPoints.autoStroke = false SS_MultiLayerTransformPoints.showHandles = false SS_MultiLayerTransformPoints.fixedHandles = true end function SS_MultiLayerTransformPoints:ColorizeIcon() return true end function SS_MultiLayerTransformPoints:NonDragMouseMove() return true -- Call MouseMoved() even if the mouse button is not down end function SS_MultiLayerTransformPoints:HideConstructionCurves(moho) return false -- true end -- ************************************************** -- Recurring values -- ************************************************** SS_MultiLayerTransformPoints.dragging = false SS_MultiLayerTransformPoints.keyMovement = false SS_MultiLayerTransformPoints.mode = 0 -- 0:translate, 1:rotate, 2:top left scale, 3:top right scale, 4: bottom left scale, 5: bottom right scale, 6:left scale, 7:right scale, 8:top scale, 9:bottom scale, 10:bezier handle, 11:pivot offset, 100:select points SS_MultiLayerTransformPoints.MODE_TRANS = 0 SS_MultiLayerTransformPoints.MODE_ROTATE = 1 SS_MultiLayerTransformPoints.MODE_SCALE_ = 2 SS_MultiLayerTransformPoints.MODE_SCALE_TOPLFT = 2 SS_MultiLayerTransformPoints.MODE_SCALE_TOPRGT = 3 SS_MultiLayerTransformPoints.MODE_SCALE_BOTLFT = 4 SS_MultiLayerTransformPoints.MODE_SCALE_BOTRGT = 5 SS_MultiLayerTransformPoints.MODE_SCALE_LEFT = 6 SS_MultiLayerTransformPoints.MODE_SCALE_RIGHT = 7 SS_MultiLayerTransformPoints.MODE_SCALE_TOP = 8 SS_MultiLayerTransformPoints.MODE_SCALE_BOT = 9 SS_MultiLayerTransformPoints.MODE_SCALE_MAX_ = 9 SS_MultiLayerTransformPoints.MODE_BEZIER = 10 SS_MultiLayerTransformPoints.MODE_PIVOT = 11 SS_MultiLayerTransformPoints.MODE_SELECT = 100 SS_MultiLayerTransformPoints.numSel = 0 SS_MultiLayerTransformPoints.selID = -1 SS_MultiLayerTransformPoints.fillingShape = false SS_MultiLayerTransformPoints.NumNotSet = -10000000 SS_MultiLayerTransformPoints.endWeldVec = LM.Vector2:new_local() SS_MultiLayerTransformPoints.endWeldVec:Set(SS_MultiLayerTransformPoints.NumNotSet, SS_MultiLayerTransformPoints.NumNotSet) SS_MultiLayerTransformPoints.endWeldToPoint = true SS_MultiLayerTransformPoints.startAngle = 0 SS_MultiLayerTransformPoints.lastVec = LM.Vector2:new_local() SS_MultiLayerTransformPoints.lastVecPt = LM.Point:new_local() SS_MultiLayerTransformPoints.pivotCenterVec = LM.Vector2:new_local() SS_MultiLayerTransformPoints.pivotCenterVec:Set(SS_MultiLayerTransformPoints.NumNotSet, SS_MultiLayerTransformPoints.NumNotSet) SS_MultiLayerTransformPoints.lastSelectedCount = 0 SS_MultiLayerTransformPoints.pivotOffset = LM.Vector2:new_local() SS_MultiLayerTransformPoints.markerR = 8 SS_MultiLayerTransformPoints.selMesh = nil SS_MultiLayerTransformPoints.selLayer = nil SS_MultiLayerTransformPoints.selCenter = LM.Vector2:new_local() SS_MultiLayerTransformPoints.selCenter3z = LM.Vector3:new_local() SS_MultiLayerTransformPoints.selectedMin = LM.Vector2:new_local() SS_MultiLayerTransformPoints.selectedMax = LM.Vector2:new_local() SS_MultiLayerTransformPoints.centerVecPt = LM.Point:new_local() SS_MultiLayerTransformPoints.offsetCenterPt = LM.Point:new_local() SS_MultiLayerTransformPoints.selCenterIsDirty = true SS_MultiLayerTransformPoints.mmeshPickWidth = 6 SS_MultiLayerTransformPoints.allowShapePicking = true SS_MultiLayerTransformPoints.lastFrame = SS_MultiLayerTransformPoints.NumNotSet SS_MultiLayerTransformPoints.multiMeshes = {} SS_MultiLayerTransformPoints.multiSelectedPointsCount = -1 SS_MultiLayerTransformPoints.AltKeyCode1 = 92 -- backslash SS_MultiLayerTransformPoints.AltKeyCode2 = 96 -- backtick math.atan2 = math.atan2 or math.atan -- ************************************************** -- The guts of this script -- ************************************************** function SS_MultiLayerTransformPoints:IsEnabled(moho) self.selCenterIsDirty = true return true end function SS_MultiLayerTransformPoints:IsRelevant(moho) local mesh = moho:DrawingMesh() if (mesh or moho.layer:IsGroupType()) then self.numSel = self:MultimeshCountSelectedPoints(moho, true) self.selCenterIsDirty = true return true else return false end end function SS_MultiLayerTransformPoints:MultimeshCountPoints(moho) local _count = 0 for _, mmesh in pairs(self.multiMeshes) do _count = _count + mmesh.mesh:CountPoints() end return _count end function SS_MultiLayerTransformPoints:MultimeshCountSelectedPoints(moho, doRecalc) local function MeshCountSelectedPoints(_mesh) local count = 0 for i = 0, _mesh:CountPoints() - 1 do count = count + (_mesh:Point(i).fSelected and 1 or 0) end return count end if (doRecalc or (self.multiSelectedPointsCount == -1)) then self.multiMeshes = {} self.multiLayersCount = 0 self.multiSelectedPointsCount = 0 self.multiPointsCount = 0 local function ProcessLayer(_layer) if (_layer:IsGroupType()) then local groupLayer = moho:LayerAsGroup(_layer) for j = 0, groupLayer:CountLayers() - 1 do ProcessLayer(groupLayer:Layer(j)) end else if (_layer:LayerType() == MOHO.LT_VECTOR) and (not self.multiMeshes[moho.document:LayerAbsoluteID(_layer) + 1]) then local mmesh = {} mmesh.layer = _layer mmesh.mesh = moho:LayerAsVector(mmesh.layer):Mesh() mmesh.pointsCount = mmesh.mesh:CountPoints() if (mmesh.pointsCount > 0) then self.multiLayersCount = self.multiLayersCount + 1 mmesh.selectedPointsCount = MeshCountSelectedPoints(mmesh.mesh) self.multiMeshes[moho.document:LayerAbsoluteID(mmesh.layer) + 1] = mmesh self.multiSelectedPointsCount = self.multiSelectedPointsCount + mmesh.selectedPointsCount end self.multiPointsCount = self.multiPointsCount + mmesh.pointsCount end end end for i = 0, moho.document:CountSelectedLayers() - 1 do ProcessLayer(moho.document:GetSelectedLayer(i)) end end return self.multiSelectedPointsCount end -- Find nearesrt point - in 'Group children + Selected layers' function SS_MultiLayerTransformPoints:MultimeshPickClosestPoint(moho, pt, pickWidth) -- pt not vec local lastMag = pickWidth or 10000000 lastMag = lastMag + 1 local lastPointID = -1 local lastLayer, lastMesh local m = LM.Matrix:new_local() for _, mmesh in pairs(self.multiMeshes) do mmesh.layer:GetFullTransform(moho.frame, m, moho.document) local v = moho.view:Point2Vec(pt, m) local pointID = mmesh.mesh:ClosestPoint(v) if (pointID ~= -1) then local point = mmesh.mesh:Point(pointID) local ptPos = LM.Point:new_local() local vcPos = LM.Vector2:new_local() vcPos:Set(point.fPos) m:Transform(vcPos) moho.view:Graphics():WorldToScreen(vcPos, ptPos) local mag = math.abs(ptPos.x - pt.x) + math.abs(ptPos.y - pt.y) if (mag < lastMag) then lastPointID = pointID lastMesh = mmesh.mesh lastLayer = mmesh.layer lastMag = mag end end end return lastLayer, lastMesh, lastPointID, lastMag end function SS_MultiLayerTransformPoints:MultimeshMovePoints(moho, offset) if (self.multiSelectedPointsCount < 1) then return end local m = LM.Matrix:new_local() local vec = LM.Vector2:new_local() local vec3zFrom = LM.Vector3:new_local() local vec3zTo = LM.Vector3:new_local() for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then if (self:UseFixedHandles(moho)) then mmesh.mesh:PrepFixedHandles() end mmesh.layer:GetFullTransform(moho.frame, m, moho.document) m:Invert() vec3zFrom:Set(self.centerVec3z) vec3zTo:Set(self.centerVec3z.x + offset.x, self.centerVec3z.y + offset.y, self.centerVec3z.z) if (moho.gridOn) and (self.multiSelectedPointsCount == 1) then local snapVec = LM.Vector2:new_local() snapVec:Set(vec3zTo.x, vec3zTo.y) moho:SnapToGrid(snapVec) vec3zTo.x, vec3zTo.y = snapVec.x, snapVec.y end m:Transform(vec3zFrom) m:Transform(vec3zTo) vec:Set(vec3zTo.x - vec3zFrom.x, vec3zTo.y - vec3zFrom.y) mmesh.mesh:TranslatePoints(vec) moho:AddPointKeyframe(moho.drawingFrame, mmesh.layer, true) -- MOHO.MohoGlobals.EditMultipleKeys) if (self:UseFixedHandles(moho)) then mmesh.mesh:PreserveHandlePositions() end end end end function SS_MultiLayerTransformPoints:MultimeshSelectedMeshBounds(moho, frame, view) local bbox = LM.BBox:new_local() local vec = LM.Vector2:new_local() local m = LM.Matrix:new_local() -- pre-Transform for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.layer:GetFullTransform(frame, m, moho.document) for i = 0, mmesh.mesh:CountPoints() - 1 do if (mmesh.mesh:Point(i).fSelected) then vec:Set(mmesh.mesh:Point(i).fPos) m:Transform(vec) bbox:AccumulatePoint(vec) end end end end -- make sure the bounding box is not too thin in one direction local xLen = bbox.fMax.x - bbox.fMin.x local yLen = bbox.fMax.y - bbox.fMin.y local center if (xLen < yLen / 10.0) then center = (bbox.fMin.x + bbox.fMax.x) / 2.0 bbox.fMin.x = center - yLen / 10.0 bbox.fMax.x = center + yLen / 10.0 elseif (yLen < xLen / 10.0) then center = (bbox.fMin.y + bbox.fMax.y) / 2.0 bbox.fMin.y = center - xLen / 10.0 bbox.fMax.y = center + xLen / 10.0 end -- make sure the bounding box is not too small local minLength = 150 local v = LM.Vector2:new_local() local pt1 = LM.Point:new_local() local pt2 = LM.Point:new_local() v:Set(bbox.fMin.x, bbox.fMin.y) view:Graphics():WorldToScreen(v, pt1) v:Set(bbox.fMax.x, bbox.fMax.y) view:Graphics():WorldToScreen(v, pt2) pt1 = pt2 - pt1 local length = math.sqrt(pt1.x * pt1.x + pt1.y * pt1.y) if (length < minLength) then center = (bbox.fMin + bbox.fMax) / 2.0 v = bbox.fMax - center bbox.fMax = center + v * (minLength / length) / 2.0 v = bbox.fMin - center bbox.fMin = center + v * (minLength / length) / 2.0 end return bbox end function SS_MultiLayerTransformPoints:MultimeshTestMousePoint(moho, mouseEvent) -- Returns what mode the tool would be in if the user clicked at the current mouse location self.numSel = self:MultimeshCountSelectedPoints(moho) -- moho:CountSelectedPoints() if (self.numSel < 2) then return self.MODE_TRANS end local bbox = self:MultimeshSelectedMeshBounds(moho, moho.frame, mouseEvent.view) local v = LM.Vector2:new_local() local pt = LM.Point:new_local() -- #SC test for Pivot first (priority) -- test for pivot point if (self.dragging) then v:Set(self.centerVec) else v = self:MultimeshSelectedCenter(moho) + self.pivotOffset end mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_PIVOT end -- test for uniform scaling v:Set(bbox.fMin.x, bbox.fMin.y) mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_SCALE_BOTLFT end v:Set(bbox.fMin.x, bbox.fMax.y) mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_SCALE_TOPLFT end v:Set(bbox.fMax.x, bbox.fMax.y) mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_SCALE_TOPRGT end v:Set(bbox.fMax.x, bbox.fMin.y) mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_SCALE_BOTRGT end -- test for X scaling v:Set(bbox.fMin.x, (bbox.fMin.y + bbox.fMax.y) * 0.5) mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_SCALE_LEFT end v:Set(bbox.fMax.x, (bbox.fMin.y + bbox.fMax.y) * 0.5) mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_SCALE_RIGHT end -- test for Y scaling v:Set((bbox.fMin.x + bbox.fMax.x) * 0.5, bbox.fMin.y) mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_SCALE_BOT end v:Set((bbox.fMin.x + bbox.fMax.x) * 0.5, bbox.fMax.y) mouseEvent.view:Graphics():WorldToScreen(v, pt) if (math.abs(pt.x - mouseEvent.pt.x) < self.markerR and math.abs(pt.y - mouseEvent.pt.y) < self.markerR) then return self.MODE_SCALE_TOP end -- test for translation outside the bounding box mouseEvent.view:Graphics():ScreenToWorld(mouseEvent.pt, v) local rotWidth = bbox.fMax.x - bbox.fMin.x if (bbox.fMax.y - bbox.fMin.y > rotWidth) then rotWidth = bbox.fMax.y - bbox.fMin.y end rotWidth = rotWidth * 0.1 if (v.x < bbox.fMin.x - rotWidth or v.x > bbox.fMax.x + rotWidth or v.y < bbox.fMin.y - rotWidth or v.y > bbox.fMax.y + rotWidth) then -- #SC return self.MODE_TRANS end -- test for rotation if (v.x < bbox.fMin.x or v.x > bbox.fMax.x or v.y < bbox.fMin.y or v.y > bbox.fMax.y) then -- #SC return self.MODE_ROTATE end return self.MODE_TRANS -- translation inside the bounding box end function SS_MultiLayerTransformPoints:MultimeshSelectNone() for _, mmesh in pairs(self.multiMeshes) do mmesh.mesh:SelectNone() end self.multiSelectedPointsCount = 0 end function SS_MultiLayerTransformPoints:MultimeshSelectAll(moho) for _, mmesh in pairs(self.multiMeshes) do mmesh.mesh:SelectAll() end self:MultimeshSelectedCenter(moho, true) end function SS_MultiLayerTransformPoints:MultimeshSelectConnected(moho) for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.mesh:SelectConnected() end end self:MultimeshSelectedCenter(moho, true) end function SS_MultiLayerTransformPoints:MultimeshSelectedBounds(moho) local bbox = LM.BBox:new_local() local m = LM.Matrix:new_local() local v3 = LM.Vector3:new_local() -- pre-Transform + also reCount points/selected self.multiPointsCount = 0 self.multiSelectedPointsCount = 0 for _, mmesh in pairs(self.multiMeshes) do mmesh.selectedPointsCount = 0 mmesh.layer:GetFullTransform(moho.drawingFrame, m, moho.document) mmesh.pointsCount = mmesh.mesh:CountPoints() for i = 0, mmesh.pointsCount - 1 do if (mmesh.mesh:Point(i).fSelected) then v3:Set(mmesh.mesh:Point(i).fPos.x, mmesh.mesh:Point(i).fPos.y, 0) m:Transform(v3) bbox:AccumulatePoint(v3) mmesh.selectedPointsCount = mmesh.selectedPointsCount + 1 end end self.multiPointsCount = self.multiPointsCount + mmesh.pointsCount self.multiSelectedPointsCount = self.multiSelectedPointsCount + mmesh.selectedPointsCount end return bbox -- 3D end function SS_MultiLayerTransformPoints:MultimeshSelectedCenter(moho, doRecalc) -- #SC called in Draw if (doRecalc or self.selCenterIsDirty or (moho.drawingFrame ~= self.lastFrame)) then self.selBBox = self:MultimeshSelectedBounds(moho) self.selCenter:Set(self.selBBox:Center2D()) self.selCenter3z:Set(self.selBBox:Center()) self.selCenterIsDirty = false self.lastFrame = moho.drawingFrame end return self.selCenter, self.selCenter3z, self.selBBox end function SS_MultiLayerTransformPoints:MultimeshSelectOnMouseDown(moho, mouseEvent) self.selCenterIsDirty = true LM_SelectPoints.isMouseDragging = true local lassoMode = false LM_SelectPoints.ctrlKeySelection = false if (LM_SelectPoints.lassoMode) then if (not (mouseEvent.ctrlKey)) then lassoMode = true else LM_SelectPoints.ctrlKeySelection = true end else if (mouseEvent.ctrlKey) then lassoMode = true LM_SelectPoints.ctrlKeySelection = true end end LM_SelectPoints.selMode = LM_SelectPoints.SELMODE_GROUP_PTS if (not mouseEvent.shiftKey and not mouseEvent.altKey) then self:MultimeshSelectNone() -- #SC Only 1 lined changed end if (LM_SelectPoints.selMode == LM_SelectPoints.SELMODE_GROUP_PTS) then if (lassoMode) then LM_SelectPoints.lassoList = {{mouseEvent.startPt.x, mouseEvent.startPt.y}} LM_SelectPoints.previousX = mouseEvent.startPt.x LM_SelectPoints.previousY = mouseEvent.startPt.y else LM_SelectPoints.selRect.left = mouseEvent.startPt.x LM_SelectPoints.selRect.top = mouseEvent.startPt.y LM_SelectPoints.selRect.right = mouseEvent.pt.x LM_SelectPoints.selRect.bottom = mouseEvent.pt.y mouseEvent.view:Graphics():SelectionRect(LM_SelectPoints.selRect) end end mouseEvent.view:DrawMe() end function SS_MultiLayerTransformPoints:OnMouseDown(moho, mouseEvent) self.dragging = true self.endWeldVec:Set(self.NumNotSet, self.NumNotSet) self.pivotCenterVec:Set(self.NumNotSet, self.NumNotSet) self.centerVec = self:MultimeshSelectedCenter(moho) self.centerVec = self.centerVec + self.pivotOffset self.startPivotOffset = LM.Vector2:new_local() self.startPivotOffset:Set(self.pivotOffset) self.startPivotOffsetPt = LM.Point:new_local() -- #SC mouseEvent.view:Graphics():WorldToScreen(self.startPivotOffset, self.startPivotOffsetPt) mouseEvent.view:Graphics():WorldToScreen(self.centerVec, self.centerVecPt) self.mode = self:MultimeshTestMousePoint(moho, mouseEvent) if (mouseEvent.ctrlKey) then self.mode = self.MODE_SELECT mouseEvent.ctrlKey = false self:MultimeshSelectOnMouseDown(moho, mouseEvent) -- LM_SelectPoints:OnMouseDown(moho, mouseEvent) return end local bbox = self:MultimeshSelectedBounds(moho) self.selectedMin, self.selectedMax = bbox.fMin, bbox.fMax self.selectedMin.y, self.selectedMax.y = self.selectedMax.y, self.selectedMin.y -- make min Y at Top moho.document:SetDirty() self.numSel = self:MultimeshCountSelectedPoints(moho, true) -- self.numSel = moho:CountSelectedPoints(true) if (self.selID == -1) then -- if this isn't true, then a point has already been selected (maybe by the add point tool) -- if (self.mode == self.MODE_TRANS and self.numSel < 2 and self.showHandles) then -- #SC -- LM_Curvature:TestForClosestHandle(moho, mouseEvent) -- if (LM_Curvature.selID >= 0 and LM_Curvature.handleSide ~= 0) then -- a bezier handle was selected -- self.mode = self.MODE_BEZIER -- local point = mesh:Point(LM_Curvature.selID) -- if (point:IsEndpoint()) then -- -- If working with a curve endpoint, and its handles have not been extended, don't do it with this tool. -- -- It's preferable to just move the endpoint. -- -- If the user wants to move the handle, they must use the curvature tool. -- local curve = nil -- local ptPos = -1 -- curve, ptPos = point:Curve(0, ptPos) -- local weight = curve:GetWeight(ptPos, moho.drawingFrame, LM_Curvature.handleSide == -1) -- local offset = curve:GetOffset(ptPos, moho.drawingFrame, LM_Curvature.handleSide == -1) -- local wDiff = weight - 1.0 -- local oDiff = offset - 0.0 -- if (math.abs(wDiff) < 0.0001 and math.abs(oDiff) < 0.0001 and curve:CountPoints() > 2) then -- self.mode = self.MODE_TRANS -- end -- end -- end -- self.selID = -1 -- self.handleSide = 0 -- end -- if (self.mode ~= self.MODE_PIVOT) then moho.document:PrepUndo() -- end end if (self.mode == self.MODE_TRANS) then -- translate if (self.selID == -1) then mouseEvent.shiftKey = mouseEvent.altKey mouseEvent.ctrlKey = mouseEvent.altKey self.numSel = self:MultimeshCountSelectedPoints(moho) -- self.numSel = moho:CountSelectedPoints(true) if (self.numSel < 2) then -- move just a single point local pickWidth if (self.numSel < 1) then -- else nil pickWidth = self.mmeshPickWidth * 10 end self.selLayer, self.selMesh, self.selID = self:MultimeshPickClosestPoint(moho, mouseEvent.startPt, pickWidth) if (self.selMesh and self.selID >= 0) then self.numSel = 1 self:MultimeshSelectNone() self.selMesh:Point(self.selID).fSelected = true self.numSel = self:MultimeshCountSelectedPoints(moho, true) else self.mode = self.MODE_SELECT self:MultimeshSelectOnMouseDown(moho, mouseEvent) return end else self.selLayer, self.selMesh, self.selID = self:MultimeshPickClosestPoint(moho, mouseEvent.startPt) end end elseif (self.mode == self.MODE_ROTATE) then -- rotate mouseEvent.shiftKey = mouseEvent.altKey mouseEvent.ctrlKey = mouseEvent.altKey self.numSel = self:MultimeshCountSelectedPoints(moho, true) self.startAngle = 0 self.lastVec:Set(mouseEvent.drawingVec) self.lastVecPt:Set(mouseEvent.pt) elseif (self.mode == self.MODE_BEZIER) then -- bezier handle LM_Curvature:OnMouseDown(moho, mouseEvent) return elseif (self.mode == self.MODE_PIVOT) then -- pivot point self.numSel = self:MultimeshCountSelectedPoints(moho, true) self.lastVec:Set(mouseEvent.drawingVec) else -- scale self.lastScaleX = 1.0 self.lastScaleY = 1.0 if (self.numSel < 2) then mouseEvent.shiftKey = mouseEvent.altKey mouseEvent.ctrlKey = mouseEvent.altKey self.numSel = self:MultimeshCountSelectedPoints(moho, true) end if (self.numSel < 2) then mouseEvent.view:DrawMe() return end local selectedMaxPt = LM.Point:new_local() local selectedMinPt = LM.Point:new_local() local center = LM.Vector2:new_local() if (mouseEvent.altKey or self.isPivotSet) then center:Set(self.centerVec3z.x + self.pivotOffset.x, self.centerVec3z.y + self.pivotOffset.y) mouseEvent.view:Graphics():WorldToScreen(center, self.offsetCenterPt) mouseEvent.altKey = true else mouseEvent.view:Graphics():WorldToScreen(self.selectedMin, selectedMinPt) mouseEvent.view:Graphics():WorldToScreen(self.selectedMax, selectedMaxPt) if (self.mode == self.MODE_SCALE_LEFT) then -- LEFT self.offsetCenterPt:Set(selectedMaxPt.x, (selectedMinPt.y + selectedMaxPt.y) / 2.0) elseif (self.mode == self.MODE_SCALE_RIGHT) then -- RIGHT self.offsetCenterPt:Set(selectedMinPt.x, (selectedMinPt.y + selectedMaxPt.y) / 2.0) elseif (self.mode == self.MODE_SCALE_TOP) then -- TOP self.offsetCenterPt:Set((selectedMinPt.x + selectedMaxPt.x) / 2.0, selectedMaxPt.y) elseif (self.mode == self.MODE_SCALE_BOT) then -- BOTTOM self.offsetCenterPt:Set((selectedMinPt.x + selectedMaxPt.x) / 2.0, selectedMinPt.y) elseif (self.mode == self.MODE_SCALE_BOTLFT) then -- BL self.offsetCenterPt:Set(selectedMaxPt.x, selectedMinPt.y) elseif (self.mode == self.MODE_SCALE_TOPLFT) then -- TL self.offsetCenterPt:Set(selectedMaxPt.x, selectedMaxPt.y) elseif (self.mode == self.MODE_SCALE_TOPRGT) then -- TR self.offsetCenterPt:Set(selectedMinPt.x, selectedMaxPt.y) elseif (self.mode == self.MODE_SCALE_BOTRGT) then -- BR self.offsetCenterPt:Set(selectedMinPt.x, selectedMinPt.y) end end end for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.mesh:PrepMovePoints() end end mouseEvent.view:DrawMe() moho:UpdateUI() end function SS_MultiLayerTransformPoints:MultimeshSelectOnMouseMoved(moho, mouseEvent) local lassoMode = false if (LM_SelectPoints.lassoMode) then if (not (LM_SelectPoints.ctrlKeySelection)) then lassoMode = true end else if (LM_SelectPoints.ctrlKeySelection) then lassoMode = true end end if (LM_SelectPoints.selMode == LM_SelectPoints.SELMODE_GROUP_PTS) then if (lassoMode) then local g = mouseEvent.view:Graphics() g:SetSmoothing(true) g:Push() local m = g:CurrentTransform() m:Invert() g:ApplyMatrix(m) g:SetColor(MOHO.MohoGlobals.SelCol) g:MoveTo(LM_SelectPoints.previousX, LM_SelectPoints.previousY) g:LineTo(mouseEvent.pt.x, mouseEvent.pt.y) g:Pop() g:SetSmoothing(false) mouseEvent.view:RefreshView() table.insert(LM_SelectPoints.lassoList, {mouseEvent.pt.x, mouseEvent.pt.y}) LM_SelectPoints.previousX = mouseEvent.pt.x LM_SelectPoints.previousY = mouseEvent.pt.y else mouseEvent.view:Graphics():SelectionRect(LM_SelectPoints.selRect) LM_SelectPoints.selRect.right = mouseEvent.pt.x LM_SelectPoints.selRect.bottom = mouseEvent.pt.y mouseEvent.view:Graphics():SelectionRect(LM_SelectPoints.selRect) mouseEvent.view:RefreshView() end mouseEvent.view:DrawMe() end end function SS_MultiLayerTransformPoints:OnMouseMoved(moho, mouseEvent) if (not self.dragging) then self.centerVec, self.centerVec3z = self:MultimeshSelectedCenter(moho) local mode = self:MultimeshTestMousePoint(moho, mouseEvent) if (mode == self.MODE_TRANS) then if (self.numSel == 0) then local _, _, selID = self:MultimeshPickClosestPoint(moho, mouseEvent.pt, self.mmeshPickWidth * 10) if (selID >= 0) then mouseEvent.view:SetCursor(MOHO.moveCursor) else mouseEvent.view:SetCursor(MOHO.crosshairCursor) return end else mouseEvent.view:SetCursor(MOHO.moveCursor) end elseif (mode == self.MODE_ROTATE) then mouseEvent.view:SetCursor(MOHO.rotateCursor) elseif (mode == self.MODE_PIVOT) then mouseEvent.view:SetCursor(MOHO.crosshairCursor) else mouseEvent.view:SetCursor(MOHO.scaleCursor) end mouseEvent.view:DrawMe() return end if (self.mode == self.MODE_SELECT) then mouseEvent.ctrlKey = false self:MultimeshSelectOnMouseMoved(moho, mouseEvent) -- LM_SelectPoints:OnMouseMoved(moho, mouseEvent) elseif (self.mode == self.MODE_TRANS) then self:OnMouseMoved_T(moho, mouseEvent) elseif (self.mode == self.MODE_ROTATE) then self:OnMouseMoved_R(moho, mouseEvent) elseif (self.mode == self.MODE_BEZIER) then LM_Curvature:OnMouseMoved(moho, mouseEvent) return elseif (self.mode == self.MODE_PIVOT) then self:OnMouseMoved_P(moho, mouseEvent) else -- scale self:OnMouseMoved_S(moho, mouseEvent) end end function SS_MultiLayerTransformPoints:OnMouseMoved_T(moho, mouseEvent) if (mouseEvent.ctrlKey) then -- hold down the control key to just select a single point and not move it return end self:MultimeshCountSelectedPoints(moho) -- ? local curVec3z = LM.Vector3:new_local() local startVec3z = LM.Vector3:new_local() local m = LM.Matrix:new_local() startVec3z:Set(mouseEvent.drawingStartVec.x, mouseEvent.drawingStartVec.y, 0) curVec3z:Set(mouseEvent.drawingVec.x, mouseEvent.drawingVec.y, 0) moho.drawingLayer:GetFullTransform(moho.frame, m, moho.document) m:Transform(startVec3z) m:Transform(curVec3z) if (mouseEvent.shiftKey) then if (math.abs(curVec3z.x - startVec3z.x) > math.abs(curVec3z.y - startVec3z.y)) then curVec3z.y = startVec3z.y else curVec3z.x = startVec3z.x end end if (moho.gridOn) and (self.multiSelectedPointsCount > 1) then local snapVec = LM.Vector2:new_local() snapVec:Set(curVec3z.x, curVec3z.y) moho:SnapToGrid(snapVec) curVec3z.x, curVec3z.y = snapVec.x, snapVec.y end local mouseDist = math.abs(mouseEvent.pt.x - mouseEvent.startPt.x) + math.abs(mouseEvent.pt.y - mouseEvent.startPt.y) if (mouseDist >= 4) then self:MultimeshMovePoints(moho, curVec3z - startVec3z) end mouseEvent.view:DrawMe() end function SS_MultiLayerTransformPoints:OnMouseMoved_S(moho, mouseEvent) if (self.numSel < 2) then return end local center = LM.Vector2:new_local() local scaling = LM.Vector2:new_local() local p1 = mouseEvent.startPt - self.offsetCenterPt -- self.centerVecPt local p2 = mouseEvent.pt - self.offsetCenterPt -- self.centerVecPt scaling.x = p2.x / p1.x scaling.y = p2.y / p1.y if (self.mode == 6 or self.mode == 7) then -- horizontal scaling scaling.y = 1 if (mouseEvent.shiftKey) then scaling.y = 1 / scaling.x end elseif (self.mode == 8 or self.mode == 9) then -- vertical scaling scaling.x = 1 if (mouseEvent.shiftKey) then scaling.x = 1 / scaling.y end else if (not mouseEvent.shiftKey) then scaling.x = (scaling.x + scaling.y) / 2 scaling.y = scaling.x end end local flip = false if (scaling.x * self.lastScaleX < -0.0001) and (scaling.y * self.lastScaleY > 0.0001) then flip = true elseif (scaling.y * self.lastScaleY < -0.0001) and (scaling.x * self.lastScaleX > 0.0001) then flip = true end local mInv = LM.Matrix:new_local() local vec = LM.Vector2:new_local() local vec3 = LM.Vector3:new_local() local lVec = LM.Vector2:new_local() local scaleVec = LM.Vector2:new_local() local angle moho.view:Graphics():ScreenToWorld(self.offsetCenterPt, center) self.pivotCenterVec:Set(center) for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then scaleVec:Set(scaling) mmesh.layer:GetFullTransform(moho.frame, mInv, moho.document) mInv:Invert() lVec:Set(1, 0) mInv:Transform(lVec) angle = math.deg(math.atan2(lVec.y, lVec.x)) if ((angle > 45) and (angle < 135)) or ((angle < -45) and ((angle > -135))) then scaleVec.x, scaleVec.y = scaleVec.y, scaleVec.x end vec3:Set(center.x, center.y, self.centerVec3z.z) mInv:Transform(vec3) vec:Set(vec3.x, vec3.y) mmesh.mesh:ScalePoints(scaleVec.x, scaleVec.y, vec, flip) moho:AddPointKeyframe(moho.frame, mmesh.layer, MOHO.MohoGlobals.EditMultipleKeys) if (self:UseFixedHandles(moho)) then mmesh.mesh:PreserveHandlePositions() end end end if (mouseEvent.altKey) then self.pivotOffset = self.pivotCenterVec - self:MultimeshSelectedCenter(moho) -- , true) else local v = self.centerVec - center v.x = v.x * scaling.x v.y = v.y * scaling.y v = v + center self.pivotOffset = v - self:MultimeshSelectedCenter(moho, true) end if (flip) then self.lastScaleX = scaling.x self.lastScaleY = scaling.y end mouseEvent.view:DrawMe() end function SS_MultiLayerTransformPoints:OnMouseMoved_R(moho, mouseEvent) if (self.numSel < 2) then return end local v1, v2 = LM.Vector2:new_local(), LM.Vector2:new_local() local angle = self.startAngle local p1 = self.lastVecPt - self.centerVecPt local p2 = mouseEvent.pt - self.centerVecPt v1:Set(p1.x, -p1.y) v2:Set(p2.x, -p2.y) v2:Rotate(-math.atan2(v1.y, v1.x)) angle = angle + math.atan2(v2.y, v2.x) self.startAngle = angle if (mouseEvent.shiftKey) then angle = angle / (math.pi / 8) angle = (math.pi / 8) * LM.Round(angle) end local mInv = LM.Matrix:new_local() local vec3 = LM.Vector3:new_local() local vec = LM.Vector2:new_local() self.pivotCenterVec:Set(self.selCenter3z.x + self.pivotOffset.x, self.selCenter3z.y + self.pivotOffset.y) for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then local _angle = angle if (mmesh.layer.fFlipH.value ~= mmesh.layer.fFlipV.value) then _angle = -_angle end mmesh.layer:GetFullTransform(moho.frame, mInv, moho.document) mInv:Invert() vec3:Set(self.pivotCenterVec.x, self.pivotCenterVec.y, self.selCenter3z.z) mInv:Transform(vec3) vec:Set(vec3.x, vec3.y) mmesh.mesh:RotatePoints(_angle, vec) moho:AddPointKeyframe(moho.frame, mmesh.layer, true) if (self:UseFixedHandles(moho)) then mmesh.mesh:PreserveHandlePositions() end end end self.lastVecPt:Set(mouseEvent.pt) -- self.lastVec:Set(mouseEvent.drawingVec) mouseEvent.view:DrawMe() end function SS_MultiLayerTransformPoints:OnMouseMoved_P(moho, mouseEvent) local curPt = mouseEvent.pt - mouseEvent.startPt if (false and mouseEvent.ctrlKey) then -- #SC Set to 0,0 on Canvas -- local v = self:MultimeshSelectedCenter(moho) -- self.pivotOffset:Set(-v.x, -v.y) else if (mouseEvent.shiftKey) then if (math.abs(mouseEvent.drawingVec.x - mouseEvent.drawingStartVec.x) > math.abs(mouseEvent.drawingVec.y - mouseEvent.drawingStartVec.y)) then curPt.y = 0 else curPt.x = 0 end end self.pivotOffsetPt = self.startPivotOffsetPt + curPt mouseEvent.view:Graphics():ScreenToWorld(self.pivotOffsetPt, self.pivotOffset) self.centerVec = self:MultimeshSelectedCenter(moho) + self.pivotOffset if (moho.gridOn) then moho:SnapToGrid(self.centerVec) self.pivotOffset = self.centerVec - self:MultimeshSelectedCenter(moho) end end mouseEvent.view:DrawMe() end function SS_MultiLayerTransformPoints:MultimeshSelectSingleClickSelect(moho, mouseEvent, tryToPreserveSelection, allowEmptySelection) -- if tryToPreserveSelection is true, then don't change the selection if some points will remain selected self:MultimeshCountSelectedPoints(moho, true) if (self.multiPointsCount < 1) then return end if (tryToPreserveSelection and self.multiSelectedPointsCount < 2) then -- self:MultimeshCountSelectedPoints(moho) -- moho:CountSelectedPoints() self:MultimeshSelectNone() end if (not tryToPreserveSelection and not mouseEvent.shiftKey and not mouseEvent.altKey) then self:MultimeshSelectNone() end local layer, mesh, id = self:MultimeshPickClosestPoint(moho, mouseEvent.pt, self.mmeshPickWidth * 2) local p = LM.Point:new_local() local c = LM.Point:new_local() -- cursor local m = LM.Matrix:new_local() local v = LM.Vector2:new_local() c:Set(mouseEvent.pt) if (id >= 0) then -- pick a point moho.layer:GetFullTransform(moho.drawingFrame, m, moho.document) v:Set(mesh:Point(id).fPos) m:Transform(v) mouseEvent.view:Graphics():WorldToScreen(v, p) self.selMode = self.SELMODE_PT if (tryToPreserveSelection) then if (not mesh:Point(id).fSelected) then self:MultimeshSelectNone() end end if (mouseEvent.altKey) then mesh:Point(id).fSelected = false else mesh:Point(id).fSelected = true end else if (tryToPreserveSelection) then for _, mmesh in pairs(self.multiMeshes) do for i = 0, mmesh.mesh:CountPoints() - 1 do local point = mmesh.mesh:Point(i) point.fPrevSelected = point.fSelected point.fSelected = false end end self.multiSelectedPointsCount = 0 end local curveID = -1 local segID = -1 local didShape if (self.allowShapePicking) then -- try to pick a shape local mmesh, shape id, mmesh = next(self.multiMeshes) if (self.multiLayersCount == 1) and (moho.document:LayerAbsoluteID(moho.drawingLayer) + 1 == id) then -- sngl layer selected local shapeID = mouseEvent.view:PickShape(mouseEvent.pt) if (shapeID ~= -1) then shape = mmesh.mesh:Shape(shapeID) end else -- try Pick Globally mmesh = self.multiMeshes[moho.document:LayerAbsoluteID(mouseEvent.view:PickGlobalLayer(mouseEvent.pt)) + 1] shape = mouseEvent.view:PickGlobalShape(mouseEvent.pt) end if not (mmesh and shape) then -- else try Active layer priority mmesh = self.multiMeshes[moho.document:LayerAbsoluteID(moho.layer) + 1] local shapeID = mouseEvent.view:PickShape(mouseEvent.pt) if (shapeID ~= -1) then shape = mmesh.mesh:Shape(shapeID) else shape = nil end end if (mmesh and shape) then self.selMode = LM_SelectPoints.SELMODE_SHAPE for i = 0, shape:CountEdges() - 1 do curveID, segID = shape:GetEdge(i, curveID, segID) local curve = mmesh.mesh:Curve(curveID) if (mouseEvent.altKey) then curve:Point(segID).fSelected = false curve:Point(segID + 1).fSelected = false else curve:Point(segID).fSelected = true curve:Point(segID + 1).fSelected = true end end didShape = true end end if (not didShape) then layer, curveID, segID = mouseEvent.view:PickGlobalEdge(mouseEvent.pt, curveID, segID, self.mmeshPickWidth) -- ** local mmesh = layer and self.multiMeshes[moho.document:LayerAbsoluteID(layer) + 1] -- #SC Is Edge in Selected Layers? if (mmesh and curveID >= 0 and segID >= 0) then -- an edge was clicked on self.selMode = LM_SelectPoints.SELMODE_EDGE local curve = mmesh.mesh:Curve(curveID) -- new method - select the points in the curve that was clicked on if (mouseEvent.altKey) then local isCurveSelected = true for i = 0, curve:CountPoints() - 1 do if (not curve:Point(i).fSelected) then isCurveSelected = false break end end for i = 0, curve:CountPoints() - 1 do local point = curve:Point(i) if ((not isCurveSelected) or (point:CountCurves() < 2)) then point.fSelected = false if (point.fHidden) then point.fSelected = false end end end else for i = 0, curve:CountPoints() - 1 do local point = curve:Point(i) if (not point.fHidden) then point.fSelected = true end end end end end if (not allowEmptySelection) then local numSel = self:MultimeshCountSelectedPoints(moho, true) -- moho:CountSelectedPoints(true) if (numSel < 1) then for _, mmesh in pairs(self.multiMeshes) do for i = 0, mmesh.mesh:CountPoints() - 1 do local point = mmesh.mesh:Point(i) point.fSelected = point.fPrevSelected point.fPrevSelected = false end end end end if (tryToPreserveSelection) then local preserveSelection = false -- pass 1 - check if any of the selection is still selected for _, mmesh in pairs(self.multiMeshes) do for i = 0, mmesh.mesh:CountPoints() - 1 do local point = mmesh.mesh:Point(i) if (point.fPrevSelected and point.fSelected) then preserveSelection = true end end end -- pass 2 - preserve the selection if (preserveSelection) then for _, mmesh in pairs(self.multiMeshes) do for i = 0, mmesh.mesh:CountPoints() - 1 do local point = mmesh.mesh:Point(i) point.fSelected = point.fPrevSelected point.fPrevSelected = false end end else for _, mmesh in pairs(self.multiMeshes) do for i = 0, mmesh.mesh:CountPoints() - 1 do local point = mmesh.mesh:Point(i) point.fPrevSelected = false end end end end end self:MultimeshCountSelectedPoints(moho, true) if (mouseEvent.doubleClick) and (self.multiSelectedPointsCount > 0) then for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then moho:AddPointKeyframe(moho.drawingFrame, mmesh.layer, MOHO.MohoGlobals.EditMultipleKeys) end end end self.pivotOffset:Set(0, 0) -- #SC+ self.isPivotSet = false end function SS_MultiLayerTransformPoints:MultimeshSelectOnMouseUp(moho, mouseEvent) -- from LM_SelectPoints if (self.multiSelectedPointsCount == -1) then self:MultimeshCountSelectedPoints(moho, true) end self.allowShapePicking = true local lassoMode = false if (LM_SelectPoints.lassoMode) then if (not (LM_SelectPoints.ctrlKeySelection)) then lassoMode = true end else if (LM_SelectPoints.ctrlKeySelection) then lassoMode = true end end local mouseDist = math.abs(mouseEvent.pt.x - mouseEvent.startPt.x) + math.abs(mouseEvent.pt.y - mouseEvent.startPt.y) if (mouseDist < 8) then -- Single-click selection - select a shape or curve under the mouse self:MultimeshSelectSingleClickSelect(moho, mouseEvent, false, true) elseif (LM_SelectPoints.selMode == LM_SelectPoints.SELMODE_GROUP_PTS and lassoMode) then -- draw the finalized lasso outline local g = mouseEvent.view:Graphics() g:SetSmoothing(true) g:Push() local m = g:CurrentTransform() m:Invert() g:ApplyMatrix(m) g:SetColor(MOHO.MohoGlobals.SelCol) g:MoveTo(LM_SelectPoints.previousX, LM_SelectPoints.previousY) g:LineTo(mouseEvent.startPt.x, mouseEvent.startPt.y) g:Pop() g:SetSmoothing(false) mouseEvent.view:RefreshView() LM.Snooze(100) end LM_SelectPoints.isMouseDragging = false if (LM_SelectPoints.selMode == LM_SelectPoints.SELMODE_GROUP_PTS and self:MultimeshCountPoints(moho) > 0) then if (lassoMode) then local g = mouseEvent.view:Graphics() -- draw the lasso shape, and do hit testing -- 1 - draw the lasso shape local end1 = LM.Vector2:new_local() local end2 = LM.Vector2:new_local() g:Clear(0, 0, 0, 0) g:Push() local m = g:CurrentTransform() m:Invert() g:ApplyMatrix(m) g:SetColor(255, 255, 255, 255) g:BeginShape() for i = 1, #LM_SelectPoints.lassoList - 1 do end1:Set(LM_SelectPoints.lassoList[i][1], LM_SelectPoints.lassoList[i][2]) end2:Set(LM_SelectPoints.lassoList[i + 1][1], LM_SelectPoints.lassoList[i + 1][2]) g:AddLine(end1, end2) end end1:Set(LM_SelectPoints.lassoList[#LM_SelectPoints.lassoList][1], LM_SelectPoints.lassoList[#LM_SelectPoints.lassoList][2]) end2:Set(LM_SelectPoints.lassoList[1][1], LM_SelectPoints.lassoList[1][2]) g:AddLine(end1, end2) g:EndShape() g:Pop() -- test code to view the lasso's shape -- mouseEvent.view:RefreshView() -- LM.Snooze(1000) -- 2 - do hit testing on the lasso shape local v = LM.Vector2:new_local() local screenPt = LM.Point:new_local() -- local m = LM.Matrix:new_local() for _, mmesh in pairs(self.multiMeshes) do mmesh.layer:GetFullTransform(moho.frame, m, moho.document) for i = 0, mmesh.mesh:CountPoints() - 1 do local pt = mmesh.mesh:Point(i) if (not pt.fHidden) then v:Set(pt.fPos) m:Transform(v) g:WorldToScreen(v, screenPt) if (g:IsFullWhite(screenPt)) then if (mouseEvent.altKey) then pt.fSelected = false else pt.fSelected = true end end end end end else -- box select local v = LM.Vector2:new_local() local screenPt = LM.Point:new_local() local m = LM.Matrix:new_local() LM_SelectPoints.selRect:Normalize() for _, mmesh in pairs(self.multiMeshes) do mmesh.layer:GetFullTransform(moho.frame, m, moho.document) for i = 0, mmesh.mesh:CountPoints() - 1 do local pt = mmesh.mesh:Point(i) if (not pt.fHidden) then v:Set(pt.fPos) m:Transform(v) mouseEvent.view:Graphics():WorldToScreen(v, screenPt) if (LM_SelectPoints.selRect:Contains(screenPt)) then if (mouseEvent.altKey) then pt.fSelected = false else pt.fSelected = true end end end end end end end LM_SelectPoints.lassoList = nil -- moho:UpdateSelectedChannels() -- #SC Todo? self:MultimeshCountSelectedPoints(moho, true) end function SS_MultiLayerTransformPoints:OnMouseUp(moho, mouseEvent) self.allowShapePicking = true if (self.mode == self.MODE_SELECT) then mouseEvent.ctrlKey = false self:MultimeshSelectOnMouseUp(moho, mouseEvent) -- LM_SelectPoints:OnMouseUp(moho, mouseEvent) self.dragging = false self.selID = -1 mouseEvent.view:DrawMe() moho:UpdateUI() return end if (self.multiPointsCount < 1) then return end self.dragging = false if (self.mode == self.MODE_BEZIER) then -- bezier handle LM_Curvature:OnMouseUp(moho, mouseEvent) elseif (self.mode == self.MODE_PIVOT) then if (self.pivotOffset.x ~= 0 or self.pivotOffset.y ~= 0) then self.isPivotSet = true else self.isPivotSet = false end else -- if (self.mode ~= self.MODE_PIVOT) then moho:UpdateUI() if (self.mode == self.MODE_TRANS) then -- translate : don't modify the pivot elseif (self.mode == self.MODE_ROTATE) then -- rotate : move the pivot local v = self:MultimeshSelectedCenter(moho, true) self.pivotOffset = self.centerVec - v elseif (self.mode >= self.MODE_SCALE_) and (self.mode <= self.MODE_SCALE_MAX_) then -- scale : update the pivot if (self.isPivotSet) then self.pivotOffset = self.pivotCenterVec - self:MultimeshSelectedCenter(moho, true) else self.pivotOffset:Set(0, 0) end end end self.selID = -1 -- if (mouseEvent.pt.x == mouseEvent.startPt.x and mouseEvent.pt.y == mouseEvent.startPt.y) then local mouseDist = math.abs(mouseEvent.pt.x - mouseEvent.startPt.x) + math.abs(mouseEvent.pt.y - mouseEvent.startPt.y) if (mouseDist < 4) then -- #34389 - allow shift key to pass to select points so extended selections are possible -- mouseEvent.shiftKey = false mouseEvent.ctrlKey = false mouseEvent.altKey = false self:MultimeshSelectSingleClickSelect(moho, mouseEvent, false, true) -- sel from multlayer end moho:UpdateUI() end function SS_MultiLayerTransformPoints:OnKeyDown(moho, keyEvent) if (keyEvent.keyCode == LM.GUI.KEY_BIND) then -- Add Keyframe (no weld) for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then moho:AddPointKeyframe(moho.drawingFrame, mmesh.layer, MOHO.MohoGlobals.EditMultipleKeys) end end elseif ((keyEvent.keyCode == LM.GUI.KEY_DELETE) or (keyEvent.keyCode == LM.GUI.KEY_BACKSPACE)) then if (not self.dragging) then moho.document:PrepUndo() moho.document:SetDirty() for _, mmesh in pairs(self.multiMeshes) do MOHO.DeleteSelectedPoints(mmesh.mesh) end end elseif (keyEvent.keyCode == 9) or (keyEvent.altKey and ((keyEvent.keyCode == self.AltKeyCode1) or (keyEvent.keyCode == self.AltKeyCode2))) then -- tab -- Select connected glob" if (self.multiSelectedPointsCount > 0) then moho.document:PrepUndo() moho.document:SetDirty() self:MultimeshSelectConnected(moho) end elseif (keyEvent.keyCode == LM.GUI.KEY_ESCAPE) or (keyEvent.keyCode == 27) or (keyEvent.keyCode == self.AltKeyCode1) or (keyEvent.keyCode == self.AltKeyCode2) or (keyEvent.keyCode == LM.GUI.KEY_DESELECT) then -- Deselect All in Group if (self.multiSelectedPointsCount > 0) then moho.document:PrepUndo() moho.document:SetDirty() self:MultimeshSelectNone() end elseif (keyEvent.ctrlKey and keyEvent.altKey and (keyEvent.keyCode == 65 or keyEvent.keyCode == 97)) then -- A -- Select All in Group moho.document:PrepUndo() moho.document:SetDirty() self:MultimeshSelectAll(moho) elseif (keyEvent.ctrlKey) then -- nudge local pt1, pt2 = LM.Point:new_local(), LM.Point:new_local() local vc1, vc2 = LM.Vector2:new_local(), LM.Vector2:new_local() local inc = 1 if (keyEvent.shiftKey) then inc = 10 end pt1:Set(0, 0) moho.view:Graphics():ScreenToWorld(pt1, vc1) local function Nudge(xoff, yoff) moho.document:PrepUndo() for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.mesh:PrepMovePoints() end end pt2:Set(xoff, yoff) moho.view:Graphics():ScreenToWorld(pt2, vc2) self:MultimeshMovePoints(moho, vc2 - vc1) end if (keyEvent.keyCode == LM.GUI.KEY_UP) then Nudge(0, -inc) elseif (keyEvent.keyCode == LM.GUI.KEY_DOWN) then Nudge(0, inc) elseif (keyEvent.keyCode == LM.GUI.KEY_LEFT) then Nudge(-inc, 0) elseif (keyEvent.keyCode == LM.GUI.KEY_RIGHT) then Nudge(inc, 0) end end -- print(("KEY: Alt/Opt: %s, Ctrl/Cmd: %s, Shft: %s :: "):format(tostring(keyEvent.altKey), tostring(keyEvent.ctrlKey), tostring(keyEvent.shiftKey)), tostring(keyEvent.keyCode)) -- , " - ", keyEvent.key) keyEvent.view:DrawMe() moho:UpdateUI() end function SS_MultiLayerTransformPoints:OnInputDeviceEvent(moho, deviceEvent) if (self:MultimeshCountSelectedPoints(moho) < 1) then -- moho:CountSelectedPoints() < 1) then return false end -- #SC TODO -- if (deviceEvent.inputData:GetString("DeviceType") == "Wacom Multitouch") then -- local mtState = deviceEvent.inputData:GetInt("MultitouchState") -- if (mtState == 1) then -- first finger down -- self.mtFingersTouching = 0 -- we'll get the correct number on the next event -- self.mtTranslate = LM.Vector2:new_local() -- self.mtStartVec = LM.Vector2:new_local() -- self.mtAccumTranslate = LM.Vector2:new_local() -- self.mtScale = 1.0 -- self.mtStartScale = 1.0 -- self.mtAccumScale = 1.0 -- self.mtAngle = 0.0 -- self.mtStartAngle = 0.0 -- self.mtAccumAngle = 0.0 -- moho.document:SetDirty() -- moho.document:PrepUndo() -- self.numSel = self:MultimeshCountSelectedPoints(moho) -- moho:CountSelectedPoints() -- mesh:PrepMovePoints() -- if (self:UseFixedHandles(moho)) then -- mesh:PrepFixedHandles() -- end -- self.centerVec = self:MultimeshSelectedCenter(moho) -- self.centerVec = self.centerVec + self.pivotOffset -- self.mtTranslate:Set(0.0, 0.0) -- self.mtScale = 1.0 -- self.mtAngle = 0.0 -- elseif (mtState == 3) then -- last finger up -- self.mtFingersTouching = 0 -- moho:AddPointKeyframe(moho.drawingFrame, nil, MOHO.MohoGlobals.EditMultipleKeys) -- moho:NewKeyframe(CHANNEL_POINT) -- moho:UpdateUI() -- elseif (mtState == 2) then -- dragging -- local fingersTouching = deviceEvent.inputData:GetInt("FingersTouching") -- if (fingersTouching ~= self.mtFingersTouching) then -- self.mtAccumTranslate = self.mtAccumTranslate + self.mtTranslate -- self.mtAccumScale = self.mtAccumScale * self.mtScale -- self.mtAccumAngle = self.mtAccumAngle + self.mtAngle -- self.mtFingersTouching = fingersTouching -- self.mtStartVec = deviceEvent.inputData:GetVector2("MultitouchCenterVector") -- self.mtStartAngle = deviceEvent.inputData:GetFloat("MultitouchAngle") -- self.mtStartScale = deviceEvent.inputData:GetFloat("MultitouchScale") -- end -- if (deviceEvent.inputData:GetBool("DoubleTouch")) then -- if (fingersTouching == 2) then -- self:HandleMessage(moho, deviceEvent.view, self.RESET) -- if (frame ~= moho.frame) then -- moho:SetCurFrame(moho.frame) -- force a refresh when editing a key at a different frame -- end -- moho.document:DepthSort() -- end -- return true -- end -- self.mtTranslate = deviceEvent.inputData:GetVector2("MultitouchCenterVector") - self.mtStartVec -- if (deviceEvent.shiftKey) then -- if (math.abs(self.mtTranslate.x) > math.abs(self.mtTranslate.y)) then -- self.mtTranslate.y = 0 -- else -- self.mtTranslate.x = 0 -- end -- end -- self.mtScale = 1.0 -- self.mtAngle = 0.0 -- if (self.mtFingersTouching > 1) then -- self.mtAngle = deviceEvent.inputData:GetFloat("MultitouchAngle") - self.mtStartAngle -- self.mtScale = deviceEvent.inputData:GetFloat("MultitouchScale") / self.mtStartScale -- end -- mesh:TransformPoints(self.mtAccumTranslate + self.mtTranslate, self.mtAccumScale * self.mtScale, self.mtAccumScale * self.mtScale, self.mtAccumAngle + self.mtAngle, self.centerVec) -- if (self:UseFixedHandles(moho)) then -- mesh:PreserveHandlePositions() -- end -- moho:AddPointKeyframe(moho.drawingFrame) -- end -- return true -- end return false end function SS_MultiLayerTransformPoints:DrawMe(moho, view) if (moho:IsPlaying()) then return end if (self.lastSelectedCount ~= self:MultimeshCountSelectedPoints(moho)) then -- moho:CountSelectedPoints()) then self.lastSelectedCount = self:MultimeshCountSelectedPoints(moho) self.pivotOffset:Set(0, 0) self.isPivotSet = false end if (self.mode == self.MODE_SELECT and self.dragging) then LM_SelectPoints:DrawMe(moho, view) elseif (self.dragging and self.numSel == 1) then if (moho.drawingLayer:CurrentAction() ~= "" or moho:DisableDrawingTools()) then return -- welding in the middle of an action can lead to unexpected results end local g = view:Graphics() local matrix = LM.Matrix:new_local() moho.drawingLayer:GetFullTransform(moho.frame, matrix, moho.document) g:Push() g:ApplyMatrix(matrix) if (self.endWeldToPoint) then g:SetColor(0, 255, 0, 128) else g:SetColor(255, 0, 0, 128) end g:SetSmoothing(true) g:SetBezierTolerance(2) g:FillCircle(self.endWeldVec, moho:PixelToDoc(self.autoWeldRadius) / g:CurrentScale(false)) g:SetSmoothing(false) g:Pop() elseif (not self.dragging or self.mode == self.MODE_PIVOT) then self.numSel = self:MultimeshCountSelectedPoints(moho) if (self.numSel >= 2) then local g = view:Graphics() local min = LM.Vector2:new_local() local max = LM.Vector2:new_local() local centerVec = LM.Vector2:new_local() local v = LM.Vector2:new_local() local vc1 = LM.ColorVector:new_local() local vc2 = LM.ColorVector:new_local() vc1:Set(MOHO.MohoGlobals.SelCol) vc2:Set(MOHO.MohoGlobals.BackCol) -- vc1 = (vc1 * 3 + vc2 * 4) / 7 vc1 = (vc1 + vc2) / 2 local col = vc1:AsColorStruct() local bbox = self:MultimeshSelectedMeshBounds(moho, moho.drawingFrame, view) min:Set(bbox.fMin.x, bbox.fMin.y) max:Set(bbox.fMax.x, bbox.fMax.y) -- moho.drawingLayer:GetFullTransform(moho.frame, matrix, moho.document) -- #SC pre-Trans g:Push() -- g:ApplyMatrix(matrix) g:SetColor(col) g:SetPenWidth(1) g:SetSmoothing(true) g:DrawLine(min.x, min.y, max.x, min.y) -- bigbox g:DrawLine(min.x, max.y, max.x, max.y) g:DrawLine(min.x, min.y, min.x, max.y) g:DrawLine(max.x, min.y, max.x, max.y) g:SetPenWidth(1) local rotWidth = max.x - min.x if (max.y - min.y > rotWidth) then rotWidth = max.y - min.y end rotWidth = rotWidth * 0.1 g:DrawLine(min.x - rotWidth, min.y - rotWidth, min.x - rotWidth, max.y + rotWidth) -- outer g:DrawLine(min.x - rotWidth, max.y + rotWidth, max.x + rotWidth, max.y + rotWidth) g:DrawLine(max.x + rotWidth, max.y + rotWidth, max.x + rotWidth, min.y - rotWidth) g:DrawLine(max.x + rotWidth, min.y - rotWidth, min.x - rotWidth, min.y - rotWidth) g:SetPenWidth(2) v:Set(min.x, min.y) g:FrameCirclePixelRadius(v, self.markerR) v:Set(min.x, max.y) g:FrameCirclePixelRadius(v, self.markerR) v:Set(max.x, min.y) g:FrameCirclePixelRadius(v, self.markerR) v:Set(max.x, max.y) g:FrameCirclePixelRadius(v, self.markerR) v:Set((min.x + max.x) / 2, min.y) g:FrameCirclePixelRadius(v, self.markerR) v:Set((min.x + max.x) / 2, max.y) g:FrameCirclePixelRadius(v, self.markerR) v:Set(min.x, (min.y + max.y) / 2) g:FrameCirclePixelRadius(v, self.markerR) v:Set(max.x, (min.y + max.y) / 2) g:FrameCirclePixelRadius(v, self.markerR) g:SetPenWidth(1) -- Pivot if (self.dragging) then centerVec:Set(self.centerVec) else centerVec = self:MultimeshSelectedCenter(moho) centerVec = centerVec + self.pivotOffset end g:SetColor(col) g:SetSmoothing(true) g:DrawLine(centerVec.x - 0.05, centerVec.y, centerVec.x + 0.05, centerVec.y) g:DrawLine(centerVec.x, centerVec.y - 0.05, centerVec.x, centerVec.y + 0.05) v:Set(centerVec.x, centerVec.y) g:FrameCirclePixelRadius(v, self.markerR) g:Pop() elseif (self.dragging) then -- #SC end end -- Draw bezier handles if (self.showHandles) then local g = view:Graphics() local layerMatrix = LM.Matrix:new_local() moho.layer:GetFullTransform(moho.frame, layerMatrix, moho.document) g:Push() g:ApplyMatrix(layerMatrix) g:SetSmoothing(true) local selectedOnly = false if (self:MultimeshCountSelectedPoints(moho) < 2) then -- moho:CountSelectedPoints() < 2) then for _, mmesh in pairs(self.multiMeshes) do moho:LayerAsVector(mmesh.layer):DrawHandles(moho.document, g, selectedOnly) -- #SC Only works on Active layer end end g:Pop() end local g = view:Graphics() local m = LM.Matrix:new_local() -- #SC draw dem dots for _, mmesh in pairs(self.multiMeshes) do mmesh.layer:GetFullTransform(moho.frame, m, moho.document) g:Push() g:ApplyMatrix(m) for iPoint = 0, mmesh.mesh:CountPoints() - 1 do local point = mmesh.mesh:Point(iPoint) if not point.fHidden then if point.fSelected then g:SetColor(MOHO.MohoGlobals.SelCol) g:DrawDiamondMarker(point.fPos.x, point.fPos.y, 6) else g:SetColor(MOHO.MohoGlobals.ElemCol) g:DrawDiamondMarker(point.fPos.x, point.fPos.y, 4) end end end g:Pop() end -- #SC Show circ cross target @ pivot if (self.dragging) then g:Push() g:SetSmoothing(true) g:SetColor(MOHO.MohoGlobals.InacCol) -- g:SetColor(0, 0, 255, 255) g:DrawLine(self.pivotCenterVec.x - 0.01, self.pivotCenterVec.y, self.pivotCenterVec.x + 0.01, self.pivotCenterVec.y) g:DrawLine(self.pivotCenterVec.x, self.pivotCenterVec.y - 0.01, self.pivotCenterVec.x, self.pivotCenterVec.y + 0.01) g:FrameCirclePixelRadius(self.pivotCenterVec, self.markerR / 2) g:FrameCirclePixelRadius(self.pivotCenterVec, self.markerR) g:Pop() end end function SS_MultiLayerTransformPoints:WeldPoints(moho, view, dragging) -- if (moho.drawingLayer:CurrentAction() ~= "" or moho:DisableDrawingTools()) then -- return false -- welding in the middle of an action can lead to unexpected results -- end -- moho.document:SetDirty() -- -- try welding to the nearest point -- if (not dragging) then -- self.selID = -1 -- self.numSel = 0 -- for i = 0, mesh:CountPoints() - 1 do -- local pt = mesh:Point(i) -- if (pt.fSelected) then -- self.numSel = self.numSel + 1 -- self.selID = i -- if (self.numSel > 1) then -- break -- end -- end -- end -- if (self.numSel > 1) then -- self.selID = -1 -- end -- if (self.selID < 0) then -- return false -- end -- moho.document:PrepUndo() -- end -- if (self.selID < 0) then -- return false -- end -- local testVec1 = LM.Vector2:new_local() -- local testVec2 = LM.Vector2:new_local() -- testVec1:Set(mesh:Point(self.selID).fPos) -- local closestID = mesh:ClosestPoint(testVec1, self.selID) -- if (closestID < 0) then -- self.selID = -1 -- return false -- end -- testVec2:Set(mesh:Point(closestID).fPos) -- if (mesh:Point(self.selID).fHidden or mesh:Point(closestID).fHidden) then -- return false -- end -- -- convert the two chosen points to pixel coordinates -- -- this is to make sure that they are actually close enough in screen space -- local p1 = LM.Point:new_local() -- local p2 = LM.Point:new_local() -- local m = LM.Matrix:new_local() -- moho.drawingLayer:GetFullTransform(moho.frame, m, moho.document) -- m:Transform(testVec1) -- m:Transform(testVec2) -- view:Graphics():WorldToScreen(testVec1, p1) -- view:Graphics():WorldToScreen(testVec2, p2) -- p1.x = p1.x - p2.x -- p1.y = p1.y - p2.y -- closest = (p1.x * p1.x) + (p1.y * p1.y) -- if (closest < self.autoWeldRadius * self.autoWeldRadius) then -- found one close enough to weld -- if (mesh:ArePointsAdjacent(self.selID, closestID)) then -- -- this avoids welding adjacent points, particularly the end point of a curve to the previous point -- return true -- end -- if (mesh:WeldPoints(self.selID, closestID, moho.drawingLayerFrame)) then -- moho:Click() -- if (self.selID < closestID) then -- closestID = closestID - 1 -- end -- self.selID = -1 -- flag to end this interaction -- if ((self.autoFill or self.autoStroke) and (not mesh:ContinuousTriangulation())) then -- self:CreateShape(moho, mesh, closestID, self.autoFill) -- end -- end -- else -- return false -- end -- self.selID = -1 -- return true end function SS_MultiLayerTransformPoints:CreateShape(moho, mesh, ptID, filled) -- mesh:Point(ptID).fSelected = true -- mesh:SelectConnected() -- self.fillingShape = true -- moho.view:DrawMe() -- local shapeID = moho:CreateShape(filled, false, 0) -- self.fillingShape = false -- if (shapeID >= 0) then -- local shape = mesh:Shape(shapeID) -- shape.fSelected = true -- if (shape.fFillAllowed) then -- shape.fHasFill = self.autoFill -- end -- shape.fHasOutline = self.autoStroke -- moho:NewKeyframe(CHANNEL_FILL) -- moho:NewKeyframe(CHANNEL_LINE) -- moho:UpdateSelectedChannels() -- else -- self:MultimeshSelectNone() -- mesh:SelectNone() -- mesh:Point(ptID).fSelected = true -- end -- return shapeID end function SS_MultiLayerTransformPoints:UseFixedHandles(moho) if (not MOHO.IsMohoPro()) then return false end if (self.showHandles and self.fixedHandles) then -- and moho.drawingFrame == 0) then return true else return false end end -- ************************************************** -- Tool options - create and respond to tool's UI -- ************************************************** SS_MultiLayerTransformPoints.DUMMY = MOHO.MSG_BASE SS_MultiLayerTransformPoints.CHANGE = MOHO.MSG_BASE + 1 SS_MultiLayerTransformPoints.MODIFY_S = MOHO.MSG_BASE + 2 SS_MultiLayerTransformPoints.MODIFY_R = MOHO.MSG_BASE + 3 SS_MultiLayerTransformPoints.RESET = MOHO.MSG_BASE + 4 SS_MultiLayerTransformPoints.AUTOWELD = MOHO.MSG_BASE + 5 SS_MultiLayerTransformPoints.AUTOFILL = MOHO.MSG_BASE + 6 SS_MultiLayerTransformPoints.AUTOSTROKE = MOHO.MSG_BASE + 7 SS_MultiLayerTransformPoints.SHOWHANDLES = MOHO.MSG_BASE + 8 SS_MultiLayerTransformPoints.FIXEDHANDLES = MOHO.MSG_BASE + 9 SS_MultiLayerTransformPoints.FLIP_H = MOHO.MSG_BASE + 10 SS_MultiLayerTransformPoints.FLIP_V = MOHO.MSG_BASE + 11 SS_MultiLayerTransformPoints.SELECTITEM = MOHO.MSG_BASE + 12 SS_MultiLayerTransformPoints.autoWeld = false SS_MultiLayerTransformPoints.autoWeldRadius = 12 SS_MultiLayerTransformPoints.autoFill = false SS_MultiLayerTransformPoints.autoStroke = false SS_MultiLayerTransformPoints.showHandles = false SS_MultiLayerTransformPoints.fixedHandles = true SS_MultiLayerTransformPoints.ALIGN_ = MOHO.MSG_BASE + 20 SS_MultiLayerTransformPoints.ALIGN_LEFT = MOHO.MSG_BASE + 21 SS_MultiLayerTransformPoints.ALIGN_HORIZ = MOHO.MSG_BASE + 22 SS_MultiLayerTransformPoints.ALIGN_RIGHT = MOHO.MSG_BASE + 23 SS_MultiLayerTransformPoints.ALIGN_CENTER = MOHO.MSG_BASE + 24 SS_MultiLayerTransformPoints.ALIGN_TOP = MOHO.MSG_BASE + 25 SS_MultiLayerTransformPoints.ALIGN_VERT = MOHO.MSG_BASE + 26 SS_MultiLayerTransformPoints.ALIGN_BOT = MOHO.MSG_BASE + 27 SS_MultiLayerTransformPoints.ALIGN_MAX_ = MOHO.MSG_BASE + 29 function SS_MultiLayerTransformPoints:DoLayout(moho, layout) self.numSel = self:MultimeshCountSelectedPoints(moho, true) self.selCenterIsDirty = true self.menu = LM.GUI.Menu(MOHO.Localize("/Scripts/Tool/TransformPoints/SelectGroup=Select Group")) self.popup = LM.GUI.PopupMenu(120, false) self.popup:SetMenu(self.menu) layout:AddChild(self.popup) self.resetBut = LM.GUI.Button(MOHO.Localize("/Scripts/Tool/TransformPoints/Reset=Reset"), self.RESET) layout:AddChild(self.resetBut) layout:AddChild(LM.GUI.StaticText(MOHO.Localize("/Scripts/Tool/TransformPoints/Position=Position"))) self.textX = LM.GUI.TextControl(0, "00.000", self.CHANGE, LM.GUI.FIELD_FLOAT, MOHO.Localize("/Scripts/Tool/TransformPoints/X=X:")) self.textX:SetWheelInc(0.1) layout:AddChild(self.textX) self.textY = LM.GUI.TextControl(0, "00.000", self.CHANGE, LM.GUI.FIELD_FLOAT, MOHO.Localize("/Scripts/Tool/TransformPoints/Y=Y:")) self.textY:SetWheelInc(0.1) layout:AddChild(self.textY) layout:AddChild(LM.GUI.StaticText(MOHO.Localize("/Scripts/Tool/TransformLayer/Scale=Scale"))) self.scaleX = LM.GUI.TextControl(0, "00.000", self.MODIFY_S, LM.GUI.FIELD_FLOAT, MOHO.Localize("/Scripts/Tool/TransformPoints/X=X:")) self.scaleX:SetWheelInc(0) layout:AddChild(self.scaleX) self.scaleY = LM.GUI.TextControl(0, "00.000", self.MODIFY_S, LM.GUI.FIELD_FLOAT, MOHO.Localize("/Scripts/Tool/TransformPoints/Y=Y:")) self.scaleY:SetWheelInc(0) layout:AddChild(self.scaleY) layout:AddChild(LM.GUI.StaticText(MOHO.Localize("/Scripts/Tool/TransformLayer/Angle=Angle:"))) self.angle = LM.GUI.TextControl(0, "000.000", self.MODIFY_R, LM.GUI.FIELD_FLOAT) self.angle:SetWheelInc(0) layout:AddChild(self.angle) -- #SC self.autoWeldCheck = LM.GUI.CheckBox(MOHO.Localize("/Scripts/Tool/TransformPoints/AutoWeld=Auto-weld"), self.AUTOWELD) -- layout:AddChild(self.autoWeldCheck) -- self.autoFillCheck = LM.GUI.CheckBox(MOHO.Localize("/Scripts/Tool/TransformPoints/AutoFill=Auto-fill"), self.AUTOFILL) -- layout:AddChild(self.autoFillCheck) -- self.autoStrokeCheck = LM.GUI.CheckBox(MOHO.Localize("/Scripts/Tool/TransformPoints/AutoStroke=Auto-stroke"), self.AUTOSTROKE) -- layout:AddChild(self.autoStrokeCheck) -- if (MOHO.IsMohoPro()) then -- self.showHandleCheck = LM.GUI.ImageButton("ScriptResources/show_handles", MOHO.Localize("/Scripts/Tool/TransformPoints/ShowBezierHandles=Show Bezier Handles"), true, self.SHOWHANDLES, true) -- layout:AddChild(self.showHandleCheck) -- self.fixedHandleCheck = LM.GUI.ImageButton("ScriptResources/fixed_handles", MOHO.Localize("/Scripts/Tool/TransformPoints/FixedBezierHandles=Fixed Bezier Handles"), true, self.FIXEDHANDLES, true) -- layout:AddChild(self.fixedHandleCheck) -- end self.flipH = LM.GUI.ImageButton("ScriptResources/flip_points_h", MOHO.Localize("/Scripts/Tool/SelectPoints/FlipH=Flip Horizontally"), false, self.FLIP_H, true) layout:AddChild(self.flipH) self.flipV = LM.GUI.ImageButton("ScriptResources/flip_points_v", MOHO.Localize("/Scripts/Tool/SelectPoints/FlipV=Flip Vertically"), false, self.FLIP_V, true) layout:AddChild(self.flipV) -- #SC layout:AddChild(LM.GUI.Divider(true), LM.GUI.ALIGN_FILL) -- | layout:AddChild(LM.GUI.StaticText("Align:")) self.alignLeftButton = LM.GUI.ImageButton("ScriptResources/ss_multi_layer_transform_points/ss_align_left", "Align Left", false, self.ALIGN_LEFT, true) layout:AddChild(self.alignLeftButton) self.alignHorzButton = LM.GUI.ImageButton("ScriptResources/ss_multi_layer_transform_points/ss_align_center_horiz", "Align Center Horizontally", false, self.ALIGN_HORIZ, true) layout:AddChild(self.alignHorzButton) self.alignRightButton = LM.GUI.ImageButton("ScriptResources/ss_multi_layer_transform_points/ss_align_right", "Align Right", false, self.ALIGN_RIGHT, true) layout:AddChild(self.alignRightButton) self.alignCntrButton = LM.GUI.ImageButton("ScriptResources/ss_multi_layer_transform_points/ss_align_center", "Align Centers", false, self.ALIGN_CENTER, true) layout:AddChild(self.alignCntrButton) self.alignTopButton = LM.GUI.ImageButton("ScriptResources/ss_multi_layer_transform_points/ss_align_top", "Align Top", false, self.ALIGN_TOP, true) layout:AddChild(self.alignTopButton) self.alignVertButton = LM.GUI.ImageButton("ScriptResources/ss_multi_layer_transform_points/ss_align_center_vert", "Align Center Vertically", false, self.ALIGN_VERT, true) layout:AddChild(self.alignVertButton) self.alignBottButton = LM.GUI.ImageButton("ScriptResources/ss_multi_layer_transform_points/ss_align_bottom", "Align Bottom", false, self.ALIGN_BOT, true) layout:AddChild(self.alignBottButton) end function SS_MultiLayerTransformPoints:UpdateWidgets(moho) if (moho:CurrentTool() ~= "SS_MultiLayerTransformPoints") then return -- this could get called when doing a double-tap on a multitouch Wacom device with a different active tool end -- MOHO.BuildGroupMenu(self.menu, mesh, self.SELECTITEM, self.DUMMY) --#SC todo local center = self:MultimeshSelectedCenter(moho) self.textX:SetValue(center.x) self.textY:SetValue(center.y) self.scaleX:SetValue(1) self.scaleY:SetValue(1) self.angle:SetValue(0) -- #SC -- if (MOHO.IsMohoPro()) then -- self.showHandleCheck:SetValue(self.showHandles) -- self.fixedHandleCheck:SetValue(self.fixedHandles) -- self.fixedHandleCheck:Enable(self.showHandles) -- end self.resetBut:Enable(moho.drawingFrame > 0) local isMultiSelect = self.multiSelectedPointsCount > 1 self.scaleX:Enable(isMultiSelect) self.scaleY:Enable(isMultiSelect) self.angle:Enable(isMultiSelect) self.flipH:Enable(isMultiSelect) self.flipV:Enable(isMultiSelect) self.alignLeftButton:Enable(isMultiSelect) self.alignHorzButton:Enable(isMultiSelect) self.alignRightButton:Enable(isMultiSelect) self.alignCntrButton:Enable(isMultiSelect) self.alignTopButton:Enable(isMultiSelect) self.alignVertButton:Enable(isMultiSelect) self.alignBottButton:Enable(isMultiSelect) end function SS_MultiLayerTransformPoints:HandleMessage(moho, view, msg) local v = LM.Vector2:new_local() local vec = LM.Vector2:new_local() local vec3 = LM.Vector3:new_local() local m = LM.Matrix:new_local() local mInv = LM.Matrix:new_local() local lVec = LM.Vector2:new_local() local offset = LM.Vector2:new_local() local angle local center, center3z, bbox = self:MultimeshSelectedCenter(moho, true) -- recount, bbox etc if (self.multiSelectedPointsCount > 0) then if (msg == self.CHANGE) then -- translate moho.document:PrepUndo() moho.document:SetDirty() offset.x = self.textX:FloatValue() - center.x offset.y = self.textY:FloatValue() - center.y self.pivotCenterVec:Set(center + offset) for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.mesh:PrepMovePoints() end end self:MultimeshMovePoints(moho, offset) moho:NewKeyframe(CHANNEL_POINT) moho:UpdateUI() elseif (msg == self.MODIFY_S) then moho.document:PrepUndo() moho.document:SetDirty() local center3zOff = LM.Vector3:new_local() center3zOff:Set(center3z.x + self.pivotOffset.x, center3z.y + self.pivotOffset.y, center3z.z) self.pivotCenterVec:Set(center3zOff.x, center3zOff.y) local scaleX = self.scaleX:FloatValue() local scaleY = self.scaleY:FloatValue() self.scaleX:SetValue(1) self.scaleY:SetValue(1) local flip = false if (scaleX < 0.001) and (scaleY > 0.001) then flip = true elseif (scaleY < 0.001) and (scaleX > 0.001) then flip = true end for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then if (self:UseFixedHandles(moho)) then mmesh.mesh:PrepFixedHandles() end mmesh.mesh:PrepMovePoints() mmesh.layer:GetFullTransform(moho.frame, mInv, moho.document) mInv:Invert() lVec:Set(1, 0) mInv:Transform(lVec) angle = math.deg(math.atan2(lVec.y, lVec.x)) if ((angle > 45) and (angle < 135)) or ((angle < -45) and ((angle > -135))) then scaleX, scaleY = scaleY, scaleX end vec3:Set(center3zOff) mInv:Transform(vec3) vec:Set(vec3.x, vec3.y) mmesh.mesh:ScalePoints(scaleX, scaleY, vec, flip) moho:AddPointKeyframe(moho.frame, mmesh.layer, MOHO.MohoGlobals.EditMultipleKeys) if (self:UseFixedHandles(moho)) then mmesh.mesh:PreserveHandlePositions() end end end self.pivotOffset = self.pivotCenterVec - self:MultimeshSelectedCenter(moho, true) moho:NewKeyframe(CHANNEL_POINT) moho:UpdateUI() elseif (msg == self.MODIFY_R) then moho.document:PrepUndo() moho.document:SetDirty() local center3zOff = LM.Vector3:new_local() center3zOff:Set(center3z.x + self.pivotOffset.x, center3z.y + self.pivotOffset.y, center3z.z) self.pivotCenterVec:Set(center3zOff.x, center3zOff.y) angle = math.rad(self.angle:FloatValue()) self.angle:SetValue(0) for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.mesh:PrepMovePoints() local _angle = angle if (mmesh.layer.fFlipH.value ~= mmesh.layer.fFlipV.value) then _angle = -_angle end mmesh.layer:GetFullTransform(moho.frame, mInv, moho.document) mInv:Invert() vec3:Set(center3zOff) mInv:Transform(vec3) vec:Set(vec3.x, vec3.y) mmesh.mesh:RotatePoints(_angle, vec) moho:AddPointKeyframe(moho.frame, mmesh.layer, MOHO.MohoGlobals.EditMultipleKeys) if (self:UseFixedHandles(moho)) then mmesh.mesh:PreserveHandlePositions() end end end self.pivotOffset = self.pivotCenterVec - self:MultimeshSelectedCenter(moho, true) moho:NewKeyframe(CHANNEL_POINT) moho:UpdateUI() elseif (msg == self.FLIP_H) or (msg == self.FLIP_V) then if (self.multiSelectedPointsCount > 1) then moho.document:PrepUndo() moho.document:SetDirty() center3z.x, center3z.y = center3z.x + self.pivotOffset.x, center3z.y + self.pivotOffset.y for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.mesh:PrepMovePoints() mmesh.layer:GetFullTransform(moho.frame, m, moho.document) mInv:Set(m) mInv:Invert() for i = 0, mmesh.mesh:CountPoints() - 1 do local pt = mmesh.mesh:Point(i) if (pt.fSelected) then vec3:Set(pt.fPos.x, pt.fPos.y, 0) m:Transform(vec3) -- > wrld if (msg == self.FLIP_H) then vec3.x = center3z.x + center3z.x - vec3.x else -- > self.FLIP_V vec3.y = (2 * center3z.y) - vec3.y end mInv:Transform(vec3) pt.fPos:Set(vec3.x, vec3.y) pt:FlipControlHandles(moho.drawingFrame) end end moho:AddPointKeyframe(moho.drawingFrame, mmesh.layer) mmesh.layer:UpdateCurFrame() end end v:Set(center3z.x, center3z.y) self.pivotOffset = v - self:MultimeshSelectedCenter(moho, true) moho:NewKeyframe(CHANNEL_POINT) moho:UpdateUI() end elseif (msg == self.RESET) then if (moho.drawingFrame > 0) then moho.document:PrepUndo() moho.document:SetDirty() for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.mesh:PrepMovePoints() for i = 0, mmesh.mesh:CountPoints() - 1 do local pt = mmesh.mesh:Point(i) if (pt.fSelected) then pt:SetPos(pt.fAnimPos:GetValue(0), moho.drawingLayerFrame) end end moho:AddPointKeyframe(moho.drawingFrame, mmesh.layer, false) end end end self:UpdateWidgets(moho) moho:NewKeyframe(CHANNEL_POINT) moho:UpdateUI() elseif (msg > self.ALIGN_) and (msg <= self.ALIGN_MAX_) then moho.document:PrepUndo() moho.document:SetDirty() local xloc, yloc if (msg == self.ALIGN_LEFT) then xloc = bbox.fMin.x elseif (msg == self.ALIGN_HORIZ) then xloc = center.x elseif (msg == self.ALIGN_RIGHT) then xloc = bbox.fMax.x elseif (msg == self.ALIGN_CENTER) then xloc, yloc = center.x, center.y elseif (msg == self.ALIGN_TOP) then yloc = bbox.fMax.y -- dn/up elseif (msg == self.ALIGN_VERT) then yloc = center.y elseif (msg == self.ALIGN_BOT) then yloc = bbox.fMin.y -- up/dn end self.pivotCenterVec:Set(xloc or center.x, yloc or center.y) for _, mmesh in pairs(self.multiMeshes) do if (mmesh.selectedPointsCount > 0) then mmesh.mesh:PrepMovePoints() if (self:UseFixedHandles(moho)) then mmesh.mesh:PrepFixedHandles() end mmesh.layer:GetFullTransform(moho.frame, m, moho.document) mInv:Set(m) mInv:Invert() for i = 0, mmesh.mesh:CountPoints() - 1 do local pt = mmesh.mesh:Point(i) if (pt.fSelected) then vec3:Set(pt.fPos.x, pt.fPos.y, 0) m:Transform(vec3) vec3.x, vec3.y = xloc or vec3.x, yloc or vec3.y mInv:Transform(vec3) pt.fPos:Set(vec3.x, vec3.y) end end moho:AddPointKeyframe(moho.drawingFrame, mmesh.layer, true) if (self:UseFixedHandles(moho)) then mmesh.mesh:PreserveHandlePositions() end end end moho:NewKeyframe(CHANNEL_POINT) moho:UpdateUI() end self:MultimeshSelectedCenter(moho, true) end -- if (msg == self.AUTOWELD) then -- -- #SC self.autoWeld = self.autoWeldCheck:Value() -- elseif (msg == self.AUTOFILL) then -- -- #SC self.autoFill = self.autoFillCheck:Value() -- elseif (msg == self.AUTOSTROKE) then -- -- #SC self.autoStroke = self.autoStrokeCheck:Value() -- elseif (msg == self.SHOWHANDLES) then -- -- #SC if (MOHO.IsMohoPro()) then -- -- self.showHandles = self.showHandleCheck:Value() -- -- moho:UpdateUI() -- -- end -- elseif (msg == self.FIXEDHANDLES) then -- -- #SC if (MOHO.IsMohoPro()) then -- -- self.fixedHandles = self.fixedHandleCheck:Value() -- -- end -- elseif (msg >= self.SELECTITEM) then -- -- #SC mesh:SelectNone() -- -- local i = msg - self.SELECTITEM -- -- local name = mesh:Group(i):Name() -- -- mesh:SelectGroup(name) -- -- moho:UpdateUI() -- end end
SS - Multi Layer Transform Points
Listed
Author: simplsam
View Script
Script type: Tool
Uploaded: Jun 04 2023, 05:42
Last modified: Jun 05 2023, 12:44
Script Version: 10+01.04 #5306
Quickly Select & Transform multiple points across multiple selected layer groups (ver +1.04)
SS Multi-Layer Transform Points is a convenience tool which allows you to quickly transform selected points across multiple selected layers. The tool was developed as an addition to the existing built-in Transform Points tool, and does not replace it, but allows you to select, move, scale and rotate selected points on multiple layers at the same time, or simply select child-content layers from one or more groups of layers - without having to leave the currently selected groups/layers.
Enhanced Features:
- Multi-Layer points visibility & editing - if the layer is selected, or the layer is a child of a selected group layer
- Proximity based Select or Transform
- Scale & Flip can use pivot offset
- Nearest (single) point manipulation - across all selected layers
- Global Shape, Edge and Bounding Box selection - across all selected layers
- Does not create static-keyframe during a simple single-click selection / deselection
- Can add static-keyframe using double-click selection, or keyboard [Enter] with selected points
- Align points to other points - left, mid-l/r, right, middles, top, mid-t/b, bottom
- The Transformation bounding box is always upright rectangular (does not rotate with layer)
- Use Ctrl-Alt-A to select all points on all selected layers / groups of layers
- Eight angular-points of fixed rotation (when using the Rotation Shift modifier)
It should otherwise be very similarly to the built-in Transform Points tool.
Video Demo:
Tool Options:
The tool has 4 main modes of operation - plus flip & point alignment, all working with multiple-layers
1. Select
Single or multiple Points/Shapes/Edges can be selected by single-click, drag / ctrl-drag or ctrl-alt-a (select all). You can ctrl-shift-click to add individual points to selection, or you can shift-click Shapes or Edges to add them to selection. Esc or single-click canvas background to deselect. All point selection actions will be limited to content in the currently selected Groups and Layers.
2. Translate
Used to move a single or groups of selected Points. This can be achieved via numerical entry, or using the mouse to drag the selection, or by using ctrl-[up/down/left/right] to nudge the selected points. If zero points are selected the tools will automatically switch between Select and Transform mode - based on point proximity. If 1 points are already selected, the one-click select will choose the nearest point to the mouse - so you can easily drag the nearest point.
3.Scale
Used to scale & resize the group of selected Points. Drag side-handles (Top / Bottom / Left / Right) to stretch with pivot anchor at the opposite side, or alt-drag side-handles to stretch uniformly from center. Drag corner-handles to uniformly scale to the opposite corner, or shift-drag corner-handles to freeform scale from the opposite corner. You can also move the Pivot point to scale (in any of the above modes) towards that pivot location.
4. Rotate
Drag between the inner and outer bounding box guide lines to rotate the selection about the pivot point. Shift-drag allows you to rotate in 8 fixed 45° increments. You can also drag and move the pivot point to change the pivot point of rotation.
5. Flip & Align
Allows you to Flip points Horizontally and Vertically about the center or about the pivot point, and Align selected points Left, mid-Left/Right, Right, Centers, Top, mid-Top/Bottom & Bottom.
For the most part the tool behaves like the built-in Transform Points tool, so you can refer to the docs for that for further options.
So … Why do you need the Multi-Layer Transform Points tool?
Speed and convenience. The addon can enhance your animation and point manipulation workflow. Particularly handy when wishing to maintain point and shape alignment across different layers, but also handy for selecting or picking content on different layers without having to change the currently selected layers.
Version:
- version: 01.04 #530605 MH12.5+
- release: 10.0+1.04 (based on LM Transform Points 10.0)
- by Sam Cogheil (SimplSam)
How do I get set up ?
To install:
- Use the Moho ‘Scripts’ > ‘Install Script …’ menu (after you Download for Install Script, and extract the zip files)
To use:
- Run the Multi-Layer Transform Points tool from the Tools palette
- The tool will be invoked allowing you to manipulate the vector points of your animation content
- You can select multiple vector layers and/or multiple parent group layers to enable them for editing
Notes & Limitations
Notes:
- Compatible with MH12.5+
Known Limitations:
- Construction curves are only visible on the Active layer (last selected), but can be turned on manually using layer quick-properties
- Point Welding across multiple layers is not possible, thus the feature (as a whole) is not supported
- Bezier Handles would only be visible on a single-selected layer, thus they are not currently supported
- Copy/Paste only works from and to the Active (last selected) layer - if it is a vector layer
- Point Groups are not currently supported
- Some odd point placement / behaviour may occur with:
- Switch layers & Frame by Frame content layers – so they are not officially supported
- Scaling of content on rotated layers which are not rotated close to 0, 90, 180 or 270 degrees
- 3D translated layers (i.e. Rotated about X or Y axis) and Sheared layers
Special Thanks to:
- Stan (and the team): MOHO Scripting – https://mohoscripting.com
- The friendly faces @ Lost Marble Moho forum – https://www.lostmarble.com/forum/
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: 1058
SS - Multi Layer Transform Points
Listed
Author: simplsam
View Script
Script type: Tool
Uploaded: Jun 04 2023, 05:42
Last modified: Jun 05 2023, 12:44
Script Version: 10+01.04 #5306
Quickly Select & Transform multiple points across multiple selected layer groups (ver +1.04)
SS Multi-Layer Transform Points is a convenience tool which allows you to quickly transform selected points across multiple selected layers. The tool was developed as an addition to the existing built-in Transform Points tool, and does not replace it, but allows you to select, move, scale and rotate selected points on multiple layers at the same time, or simply select child-content layers from one or more groups of layers - without having to leave the currently selected groups/layers.
Enhanced Features:
- Multi-Layer points visibility & editing - if the layer is selected, or the layer is a child of a selected group layer
- Proximity based Select or Transform
- Scale & Flip can use pivot offset
- Nearest (single) point manipulation - across all selected layers
- Global Shape, Edge and Bounding Box selection - across all selected layers
- Does not create static-keyframe during a simple single-click selection / deselection
- Can add static-keyframe using double-click selection, or keyboard [Enter] with selected points
- Align points to other points - left, mid-l/r, right, middles, top, mid-t/b, bottom
- The Transformation bounding box is always upright rectangular (does not rotate with layer)
- Use Ctrl-Alt-A to select all points on all selected layers / groups of layers
- Eight angular-points of fixed rotation (when using the Rotation Shift modifier)
It should otherwise be very similarly to the built-in Transform Points tool.
Video Demo:
Tool Options:
The tool has 4 main modes of operation - plus flip & point alignment, all working with multiple-layers
1. Select
Single or multiple Points/Shapes/Edges can be selected by single-click, drag / ctrl-drag or ctrl-alt-a (select all). You can ctrl-shift-click to add individual points to selection, or you can shift-click Shapes or Edges to add them to selection. Esc or single-click canvas background to deselect. All point selection actions will be limited to content in the currently selected Groups and Layers.
2. Translate
Used to move a single or groups of selected Points. This can be achieved via numerical entry, or using the mouse to drag the selection, or by using ctrl-[up/down/left/right] to nudge the selected points. If zero points are selected the tools will automatically switch between Select and Transform mode - based on point proximity. If 1 points are already selected, the one-click select will choose the nearest point to the mouse - so you can easily drag the nearest point.
3.Scale
Used to scale & resize the group of selected Points. Drag side-handles (Top / Bottom / Left / Right) to stretch with pivot anchor at the opposite side, or alt-drag side-handles to stretch uniformly from center. Drag corner-handles to uniformly scale to the opposite corner, or shift-drag corner-handles to freeform scale from the opposite corner. You can also move the Pivot point to scale (in any of the above modes) towards that pivot location.
4. Rotate
Drag between the inner and outer bounding box guide lines to rotate the selection about the pivot point. Shift-drag allows you to rotate in 8 fixed 45° increments. You can also drag and move the pivot point to change the pivot point of rotation.
5. Flip & Align
Allows you to Flip points Horizontally and Vertically about the center or about the pivot point, and Align selected points Left, mid-Left/Right, Right, Centers, Top, mid-Top/Bottom & Bottom.
For the most part the tool behaves like the built-in Transform Points tool, so you can refer to the docs for that for further options.
So … Why do you need the Multi-Layer Transform Points tool?
Speed and convenience. The addon can enhance your animation and point manipulation workflow. Particularly handy when wishing to maintain point and shape alignment across different layers, but also handy for selecting or picking content on different layers without having to change the currently selected layers.
Version:
- version: 01.04 #530605 MH12.5+
- release: 10.0+1.04 (based on LM Transform Points 10.0)
- by Sam Cogheil (SimplSam)
How do I get set up ?
To install:
- Use the Moho ‘Scripts’ > ‘Install Script …’ menu (after you Download for Install Script, and extract the zip files)
To use:
- Run the Multi-Layer Transform Points tool from the Tools palette
- The tool will be invoked allowing you to manipulate the vector points of your animation content
- You can select multiple vector layers and/or multiple parent group layers to enable them for editing
Notes & Limitations
Notes:
- Compatible with MH12.5+
Known Limitations:
- Construction curves are only visible on the Active layer (last selected), but can be turned on manually using layer quick-properties
- Point Welding across multiple layers is not possible, thus the feature (as a whole) is not supported
- Bezier Handles would only be visible on a single-selected layer, thus they are not currently supported
- Copy/Paste only works from and to the Active (last selected) layer - if it is a vector layer
- Point Groups are not currently supported
- Some odd point placement / behaviour may occur with:
- Switch layers & Frame by Frame content layers – so they are not officially supported
- Scaling of content on rotated layers which are not rotated close to 0, 90, 180 or 270 degrees
- 3D translated layers (i.e. Rotated about X or Y axis) and Sheared layers
Special Thanks to:
- Stan (and the team): MOHO Scripting – https://mohoscripting.com
- The friendly faces @ Lost Marble Moho forum – https://www.lostmarble.com/forum/
Enhanced Features:
- Multi-Layer points visibility & editing - if the layer is selected, or the layer is a child of a selected group layer
- Proximity based Select or Transform
- Scale & Flip can use pivot offset
- Nearest (single) point manipulation - across all selected layers
- Global Shape, Edge and Bounding Box selection - across all selected layers
- Does not create static-keyframe during a simple single-click selection / deselection
- Can add static-keyframe using double-click selection, or keyboard [Enter] with selected points
- Align points to other points - left, mid-l/r, right, middles, top, mid-t/b, bottom
- The Transformation bounding box is always upright rectangular (does not rotate with layer)
- Use Ctrl-Alt-A to select all points on all selected layers / groups of layers
- Eight angular-points of fixed rotation (when using the Rotation Shift modifier)
It should otherwise be very similarly to the built-in Transform Points tool.
Video Demo:
Tool Options:
The tool has 4 main modes of operation - plus flip & point alignment, all working with multiple-layers
1. Select
Single or multiple Points/Shapes/Edges can be selected by single-click, drag / ctrl-drag or ctrl-alt-a (select all). You can ctrl-shift-click to add individual points to selection, or you can shift-click Shapes or Edges to add them to selection. Esc or single-click canvas background to deselect. All point selection actions will be limited to content in the currently selected Groups and Layers.
2. Translate
Used to move a single or groups of selected Points. This can be achieved via numerical entry, or using the mouse to drag the selection, or by using ctrl-[up/down/left/right] to nudge the selected points. If zero points are selected the tools will automatically switch between Select and Transform mode - based on point proximity. If 1 points are already selected, the one-click select will choose the nearest point to the mouse - so you can easily drag the nearest point.
3.Scale
Used to scale & resize the group of selected Points. Drag side-handles (Top / Bottom / Left / Right) to stretch with pivot anchor at the opposite side, or alt-drag side-handles to stretch uniformly from center. Drag corner-handles to uniformly scale to the opposite corner, or shift-drag corner-handles to freeform scale from the opposite corner. You can also move the Pivot point to scale (in any of the above modes) towards that pivot location.
4. Rotate
Drag between the inner and outer bounding box guide lines to rotate the selection about the pivot point. Shift-drag allows you to rotate in 8 fixed 45° increments. You can also drag and move the pivot point to change the pivot point of rotation.
5. Flip & Align
Allows you to Flip points Horizontally and Vertically about the center or about the pivot point, and Align selected points Left, mid-Left/Right, Right, Centers, Top, mid-Top/Bottom & Bottom.
For the most part the tool behaves like the built-in Transform Points tool, so you can refer to the docs for that for further options.
So … Why do you need the Multi-Layer Transform Points tool?
Speed and convenience. The addon can enhance your animation and point manipulation workflow. Particularly handy when wishing to maintain point and shape alignment across different layers, but also handy for selecting or picking content on different layers without having to change the currently selected layers.
Version:
- version: 01.04 #530605 MH12.5+
- release: 10.0+1.04 (based on LM Transform Points 10.0)
- by Sam Cogheil (SimplSam)
How do I get set up ?
To install:
- Use the Moho ‘Scripts’ > ‘Install Script …’ menu (after you Download for Install Script, and extract the zip files)
To use:
- Run the Multi-Layer Transform Points tool from the Tools palette
- The tool will be invoked allowing you to manipulate the vector points of your animation content
- You can select multiple vector layers and/or multiple parent group layers to enable them for editing
Notes & Limitations
Notes:
- Compatible with MH12.5+
Known Limitations:
- Construction curves are only visible on the Active layer (last selected), but can be turned on manually using layer quick-properties
- Point Welding across multiple layers is not possible, thus the feature (as a whole) is not supported
- Bezier Handles would only be visible on a single-selected layer, thus they are not currently supported
- Copy/Paste only works from and to the Active (last selected) layer - if it is a vector layer
- Point Groups are not currently supported
- Some odd point placement / behaviour may occur with:
- Switch layers & Frame by Frame content layers – so they are not officially supported
- Scaling of content on rotated layers which are not rotated close to 0, 90, 180 or 270 degrees
- 3D translated layers (i.e. Rotated about X or Y axis) and Sheared layers
Special Thanks to:
- Stan (and the team): MOHO Scripting – https://mohoscripting.com
- The friendly faces @ Lost Marble Moho forum – https://www.lostmarble.com/forum/
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: 1058