(
--change this value if the script is deleting too few or too many faces
local limit = 0.01
local obj = selection

fn p3Equal p3a p3b = —"close enough" for point3 values
(
local pm = limit / 2.0
if (p3b > (p3a - pm)) and (p3b < (p3a + pm)) and
(p3b > (p3a - pm)) and (p3b < (p3a + pm)) and
(p3b > (p3a - pm)) and (p3b < (p3a + pm))
then
true
else
false
)

(
local polyList = #{}
polyCount = polyOp.getNumFaces obj
polyList.count = polyCount
for p = 1 to polyCount - 1 do
(
if not polyList
then
(
polyLoc = polyOp.getFaceCenter obj p
for np = p + 1 to polyCount do
(
npolyLoc = polyOp.getFaceCenter obj np
if p3Equal polyLoc npolyLoc then
polyList = true
)
)
)
--could be replaced with a setFaceSelection if required
polyOp.deleteFaces obj polyList
)
)

close file

sp = SplineShape () -- скобки вместо этого “pos:[0,0,0]”
(
addNewSpline sp --создать новый сплайн
close sp 1 -- замкнуть этот сплайн по завершении, можно и желательно написать в конце этого блока после последней точки сплайна, но и так тоже работает
addKnot sp 1 #Corner #curve [0,0,0] -- первая точка первого сплайна” #тип вершины #тип линии(кривая или прямая), если кривая то тип нужен не Corner и нужно добавить координаты маркеров, как в строке ниже в этом блоке , хотя можно и не ставить координаты для маркеров (как в этой строке) если тип вершины Corner
addKnot sp 1 #Corner #line [50,50,0] -- вторая точка
addKnot sp 1 #bezierCorner #curve[100,0,0] [100,25,0] [50,-50,0] -- третья точка


addNewSpline sp - новый сплайн этого сплайна
addKnot sp 2 #Corner #curve [110,0,0] -- первая точка
addKnot sp 2 #Corner #line [160,50,0] -- вторая
addKnot sp 2 #bezierCorner #curve[210,0,0] [100,25,0] [50,-50,0] -- третья (не замкнут)
) -- завершение команды SplineShape ()

updateshape sp

N1
M14X0Y0
X250Y50
X100Y0
N2
M14X110Y0
X160Y50
X210Y0
N3
...

addNewspline sp
addKnot sp 1 #Corner #Line [0,0,0]
addKnot sp 1 #Corner #Line [250,0,0]
addKnot sp 1 #Corner #Line [50,0,0]
addNewspline sp
addKnot sp 2 #Corner #Line [110,0,0]
addKnot sp 2 #Corner #Line [160,50,0]
addKnot sp 2 #Corner #Line [210,0,0]
addNewspline sp
...