Спиралевидное армирование: какой командой можно создать ?

[GIPPY]

Всем привет. Прошу помощи. Подскажите какой командой можно создать спиралевидное армирование ?
В частности интересует такое армирование по кругу.
Спасибо.

[Александр Игнатович]

такое

Какое?

Как бы ты сделал это руками, а не программно?

[GIPPY]

К сожалению, понятия не имею как это сделать в ревите.
Я в ревите не работаю, но плагин нужно написать, пока все сделала, но вот со спиралевидным армированием проблема.

[Александр Пекшев aka Modis]

Как-будто есть выбор )))

Метод, по сути, всего один - CreateFromCurves

[GIPPY]

я создавал контур из дуг для выдавливания, но они создаются в ортогональных плоскостях

Код - vb.net [Выбрать]

1. Dim pl As Plane = Plane.CreateByNormalAndOrigin(New XYZ(0, 0, 1), p00)
2.         Dim skpl As SketchPlane = SketchPlane.Create(family, pl)
3.         Dim profile As CurveArrArray = New CurveArrArray()
4.         Dim loop1 As CurveArray = New CurveArray()
5.         loop1.Append(Arc.Create(pl, Diametr / 2, 0, Math.PI * 2))
6.         profile.Append(loop1)
7.  
8.         Return family.FamilyCreate.NewExtrusion(True, profile, skpl, Height)
9.  

как это сделать в произвольной плоскости ?

увидел, что можно создать Plane.Create по трем точкам.....буду пробовать...

[Александр Ривилис]

увидел, что можно создать Plane.Create по трем точкам.....буду пробовать...

Ну вообще-то и в том методе, который ты уже использовал, можно задать вектор нормали не ортогональный осям. Например,

Код - vb.net [Выбрать]

1. Dim pl As Plane = Plane.CreateByNormalAndOrigin(New XYZ(1, 1, 1), p00)