圆管规则文件CGA代码
version "2024.1"
@Description("Inner diameter") @Distance @Range(min=0.1, max=5)
attr diameter = 1
@Description("Culvert length") @Distance @Range(min=0.1, max=20)
attr length = 2
@Description("Wall thickness") @Distance @Range(min=0.1, max=1)
attr thickness = 0.1
@Description("Number of subdivisions of the outer mantle")
attr sides = min(128,max(16,floor(8*diameter)*4))
@StartRule
Culvert --> Annulus
Annulus -->
primitiveDisk(sides, diameter+thickness)
offset(-thickness)
comp(f) { border = Extrude}
Extrude -->
extrude (length)
comp(f) { side = setNormals(soft) Culvert. | all : Culvert. }
没有回复内容