Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (
- /*
- / Script: Shift-Move poly edge copy emulation
- / Author: Panteleev Sergey
- / Year: 2019
- / Contacts: fatbbc @ gmail.com
- */
- -- 1. Create a clone of current open edges
- with undo off
- (
- esel = (polyop.getEdgeSelection $) * (polyop.getOpenEdges $)
- polyop.setEdgeSelection $ esel
- prevEH = $.edgeExtrudeHeight
- prevEW = $.edgeExtrudeWidth
- $.edgeExtrudeHeight = 0
- $.edgeExtrudeWidth = 0
- )
- $.buttonOp #Extrude
- $.previewAccept()
- with undo off
- (
- $.edgeExtrudeWidth = prevEW
- $.edgeExtrudeHeight = prevEH
- )
- -- 2. Set focus on TypeIn controls
- if statusPanel.visible do
- (
- for c in windows.getChildrenHWND #max where c[4] == "StatusPanel" do
- (
- hwnd = windows.getChildHWND c[1] "X:"
- if hwnd != undefined do
- (
- windows.sendMessage (UIAccessor.GetNextWindow hwnd[1]) 0x7 0 0
- )
- exit
- )
- )
- )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement