0 1 1 633615250273593750 0 5 90 true true Shaded 109 success.ghx 633602215211562500 0 -90 -121 1 0 8 fb6aba99-fead-4e42-b5d8-c6de5ff90ea6 VB.NET Script ''' <your code> Dim pts As New List(Of On3dPoint) Dim EndPointLine As On3dPoint = x.PointAt(0, 100, 0) 'centre of first arc Dim Line As New OnLine(x.origin, EndPointLine) ' Dim pt As On3dPoint = Line.PointAt(0) 'origin of spiral Dim rot As On3dPoint pts.Add(pt) Dim Vector As New On3dVector(x.PointAt(z / 2 * 100, 0, 0)) Line.Translate(Vector) pt = Line.PointAt(0) 'second point on spiral pts.Add(pt) For i As Int32 = 1 To y rot = Line.PointAt(1 / i) Line.Rotate(z * i, x.zaxis, rot) 'rotates line pt = Line.PointAt(0) 'third point on spiral etc pts.Add(pt) Next A = pts ''' </your code> 0 VB 80526210-39d2-46d2-9230-014182e9633c true longest_list 3 x y z 3 A B C 785 364 76 84 805 366 27 80 805 366 false true false x 8d5b43e1-a5f8-4a3c-a363-74139a61b2e5 true false 1 f26b758f-224a-474a-b958-f17a274336f8 0 OnPlane true 0 0 0 0 785 366 20 26.66667 785 366 false true false y 3c3778cd-3ee7-44dc-baf9-2ae35ab89dbd true false 1 95299cdb-1ffc-4c7e-882e-802e3965795b 0 true 0 0 0 0 785 393 20 26.66667 785 393 false true false z 8b59e486-ba6b-48fe-8adb-b724edc93a1f true false 1 16b955ee-0a02-4def-9b67-6d36fad0a4fb 0 true 0 0 0 0 785 419 20 26.66667 785 419 false true false out a4fbdef2-bd6d-4170-a935-b4cc9f9349d4 true false 0 0 0 0 0 0 0 832 366 29 20 832 366 false true false A ab227123-488e-431f-986a-7ca85a8aeb6d true false 0 0 0 0 0 0 832 386 29 20 832 386 false true false B ad5e4f21-1078-4571-8ff6-89600fddea79 true false 0 0 0 0 0 0 832 406 29 20 832 406 false true false C ad860a59-1731-437b-935a-c93e56176e4b true false 0 0 0 0 0 0 832 426 29 20 832 426 false true false 8cc3a196-f6a0-49ea-9ed9-0cb343a3ae64 XZ Plane XZ 27aca263-f76b-43f7-b576-6416cf16097d true longest_list 623.4134 319.6779 71 34 646.4134 321.6779 27 30 646.4134 321.6779 false true false O 7a644dba-e26c-474c-9008-54d104ed6b9e true false 0 0 1 0 0 0 0 623.4134 321.6779 23 30 623.4134 321.6779 false true false 0 0 0 P f26b758f-224a-474a-b958-f17a274336f8 true false 0 0 0 0 0 0 0 673.4134 321.6779 21 30 673.4134 321.6779 false true false 57da07bd-ecab-415d-9d86-af36d7073abc Number Slider Number of rotations 95299cdb-1ffc-4c7e-882e-802e3965795b true false 0 0 374.2642 396.7724 350.7358 20 374.2642 396.7724 110 20 374.2642 396.7724 false true false 50 1 75 4 1 57da07bd-ecab-415d-9d86-af36d7073abc Number Slider Rotation in radians 16b955ee-0a02-4def-9b67-6d36fad0a4fb true false 0 0 375.6334 462.6819 349.3666 20 375.6334 462.6819 105 20 375.6334 462.6819 false true false 0.0080078125 0 0.01 4 0 f5ea9d41-f062-487e-8dbf-7666ca53fbcd Interpolate IntCrv ba500219-9685-4a07-824a-394cfb344777 true longest_list 937.9 382.6 71 64 959.9 384.6 27 60 959.9 384.6 false true false V 846b66d7-ef80-4d03-b9f5-a496905384a4 true true 1 ab227123-488e-431f-986a-7ca85a8aeb6d 0 0 0 0 0 0 937.9 384.6 22 20 937.9 384.6 false true false D f7a8fa15-f7aa-4d5c-8a99-d0542a89d959 true false 0 0 1 0 0 0 0 937.9 404.6 22 20 937.9 404.6 false true false 3 P 12ca2f3f-e821-4eaa-a40a-b8cc17f88bb3 true false 0 0 1 false 0 0 0 0 937.9 424.6 22 20 937.9 424.6 false true false false C e27a2240-8c00-4431-b0fa-237a543a068d true false 0 0 0 false 0 0 0 0 986.9 384.6 22 20 986.9 384.6 false true false L 78d8c8b3-49af-4730-af7a-4e065e315c09 true false 0 0 0 0 0 0 0 986.9 404.6 22 20 986.9 404.6 false true false D d93461d1-e938-458d-a71c-adccc74d64a4 true false 0 0 0 0 0 0 0 986.9 424.6 22 20 986.9 424.6 false true false 59e0b89a-e487-49f8-bab8-b5bab16be14c Panel Panel 8ed9565e-91b3-4986-9aee-a35cd7d9b368 true false 0 0 This script generates a list of points true 0 false 768.4 472.2 112.6 67.59998 770.4 473.2 108.6 65.59998 768.4 472.2 false true false 59e0b89a-e487-49f8-bab8-b5bab16be14c Panel Panel 82faf02c-0b9b-496e-b157-c05e4cd32315 true false 0 0 Plane to determine orientation of spiral true 0 false 613.6 239.8 112.6 67.59998 615.6 240.8 108.6 65.59998 613.6 239.8 false true false 59e0b89a-e487-49f8-bab8-b5bab16be14c Panel Panel 1cc4263b-ba29-4747-8d17-4e0f4bcd7037 true false 0 0 This file generates a cornu spiral, approximated by a number of arcs. Each arc length is equal. Radius and rotation angle varies as follows: 1st arc: Radius=r, Angle=v 2nd arc: Radius=r/2, Angle=v*2 2rd arc: Radius=r/3, Angle=v*3 4th arc: Radius=r/4, Angle=v*4 and so on... Mårten Nettelbladt 2008-11-05 true 0 false 128.6 176.4 446.4 180.6 130.6 177.4 442.4 178.6 128.6 176.4 true true false