0 1 1 633710394107573750 0 5 99 true true Shaded 090224_lalaj_rudi_a.ghx 633710354836948750 0 51 109 0.640000045 0 14 deaf8653-5528-4286-807c-3de8b8dad781 Surface Srf 9eed64f0-6bde-47a3-b70a-5b139112b9e4 false false 0 0 1 true 55.75 107.5 60 20 55.75 107.5 60 20 55.75 107.5 false true false 6a7a801e-6b49-46b3-ba8c-6f7b6953debb fb6aba99-fead-4e42-b5d8-c6de5ff90ea6 VB.NET Script ''' <your code> 'Paseed Brep (Srf) is a single face brep Dim nSrf As New OnNurbsSurface nSrf = Srf.Face(0).NurbsSurface Dim retCurves As ArrayList = New ArrayList For vi As Integer = 0 To countV Dim v As Double = vi / countV Dim z As Integer = ((vi Mod 2) * 2) - 1 Dim CPoints As List(Of On3dPoint) = New List(Of On3dPoint) For ui As Integer = 0 To countU Dim u As Double = ui / countU Dim frame As ONPlane = New OnPlane If (ui = 0) Or (ui = countU) Then nSrf.FrameAt(u, v, frame) CPoints.Add(frame.PointAt(0, 0, z * arrThickness(ui))) Else Dim frameA As ONPlane = New OnPlane nSrf.FrameAt(u - ((1 / countU) * flatT / 2), v, frameA) CPoints.Add(frameA.PointAt(0, 0, z * arrThickness(ui))) z = z * -1 Dim frameB As ONPlane = New OnPlane nSrf.FrameAt(u + ((1 / countU) * flatT / 2), v, frameB) CPoints.Add(frameB.PointAt(0, 0, z * arrThickness(ui))) End If Next 'Create nurbs curve Dim dimension As Integer = 3 Dim order As Integer = 4 Dim nc As New OnNurbsCurve nc.CreateClampedUniformNurbs(dimension, 2, CPoints.ToArray()) retCurves.Add(nc) Next curvesOut = retCurves ''' </your code> 0 Lines 9a3ed0f1-de5f-4d8d-921a-374026fa5996 true longest_list 5 Srf countU countV flatT arrThickness 1 CurvesOut 728.1737 158.291 171 104 805.1737 160.291 27 100 805.1737 160.291 false true false Srf fdf3becf-2b90-4d42-8ba0-c67be7a1ca45 true false 1 9eed64f0-6bde-47a3-b70a-5b139112b9e4 0 OnBrep true 0 0 0 0 728.1737 160.291 77 20 728.1737 160.291 false true false countU 71ccfebc-681a-4647-9936-d9b82559c547 true false 1 7e627ce7-765f-4915-b52c-84aad2d739f5 0 Integer true 0 0 0 0 728.1737 180.291 77 20 728.1737 180.291 false true false countV 138086c0-1491-4651-9e45-13734080bc65 true false 1 fa12dd42-6bfb-440c-87d9-42e71cb71e52 0 Integer true 0 0 0 0 728.1737 200.291 77 20 728.1737 200.291 false true false flatT 52a6f7ba-f3ee-4828-87e4-0391c7c78f34 true false 1 03299987-d4e5-4dd4-a942-2ece5bbcbe07 0 true 0 0 0 0 728.1737 220.291 77 20 728.1737 220.291 false true false arrThickness 94d87a76-3cb9-4d47-abe3-ad92ebeccd5c true true 1 5ec49614-4e2b-4c37-8925-0cab26f73df9 0 Double true 0 0 0 0 728.1737 240.291 77 20 728.1737 240.291 false true false out 1f31e6c0-5925-47e0-99ae-e58fe3901d32 true false 0 0 0 0 0 0 0 832.1737 160.291 67 50 832.1737 160.291 false true false CurvesOut 2c2a330f-a147-4197-8110-99ae029b2d7d true false 0 0 0 0 0 0 832.1737 210.291 67 50 832.1737 210.291 false true false 57da07bd-ecab-415d-9d86-af36d7073abc Number Slider countU 7e627ce7-765f-4915-b52c-84aad2d739f5 true false 0 0 32.5 156.25 148 20 32.5 156.25 48 20 32.5 156.25 false true false 7 3 30 4 2 59e0b89a-e487-49f8-bab8-b5bab16be14c Panel Panel 6a0be3c0-246a-4b72-8a42-7ec3820d3e70 true false 1 1f31e6c0-5925-47e0-99ae-e58fe3901d32 0 Double click to edit panel content… true 0 false 994.4863 95.10352 150 146 996.4863 96.10352 146 144 994.4863 95.10352 false true false 57da07bd-ecab-415d-9d86-af36d7073abc Number Slider crossOverRange 03299987-d4e5-4dd4-a942-2ece5bbcbe07 true false 0 0 27.25 212.75 195 20 27.25 212.75 95 20 27.25 212.75 false true false 0.648531063079834 0.01 0.99 4 0 fb6aba99-fead-4e42-b5d8-c6de5ff90ea6 VB.NET Script ''' <your code> 'Paseed Brep (Srf) is a single face brep Dim nSrf As New OnNurbsSurface nSrf = Srf.Face(0).NurbsSurface Dim retPts As ArrayList = New ArrayList Dim z As Integer For vi As Integer = 0 To countV Dim v As Double = vi / countV z = ((vi Mod 2) * 2) - 1 For ui As Integer = 0 To countU Dim u As Double = ui / countU Dim frame As ONPlane = New OnPlane If (ui = 0) Or (ui = countU) Then nSrf.FrameAt(u, v, frame) retPts.Add(frame.PointAt(0, 0, z)) Else Dim frameA As ONPlane = New OnPlane nSrf.FrameAt(u - ((1 / countU) * flatT / 2), v, frameA) retPts.Add(frameA.PointAt(0, 0, z)) z = z*-1 Dim frameB As ONPlane = New OnPlane nSrf.FrameAt(u + ((1 / countU) * flatT / 2), v, frameB) retPts.Add(frameB.PointAt(0, 0, z)) End If Next Next ptsOut = retPts ''' </your code> 0 Custom Points cbd922e8-efd5-4570-8cf3-cee15aefb647 true longest_list 4 Srf countU countV flatT 1 ptsOut 401.5702 627.5244 122 113 450.5702 629.5244 27 109 450.5702 629.5244 false true false Srf ab0681ab-bca6-4669-94b7-d7b4aa3a01de true false 0 0 OnBrep true 0 0 0 0 401.5702 629.5244 49 27.25 401.5702 629.5244 false true false countU 715b4f51-1db7-4ea2-a86d-23909904c759 true false 0 0 Integer true 0 0 0 0 401.5702 656.5244 49 27.25 401.5702 656.5244 false true false countV 473d6c9d-0406-424d-9207-94d0cfac33aa true false 0 0 Integer true 0 0 0 0 401.5702 683.5244 49 27.25 401.5702 683.5244 false true false flatT 7a8fea84-283a-4a67-968e-4085aa94b268 true false 0 0 true 0 0 0 0 401.5702 711.5244 49 27.25 401.5702 711.5244 false true false out ef654104-aa6a-44e6-aecb-48ea8f455656 true false 0 0 0 0 0 0 0 477.5702 629.5244 46 54.5 477.5702 629.5244 false true false ptsOut b3a62449-f401-4711-8bb6-1ab6eaef89a0 true false 0 0 0 0 0 0 477.5702 683.5244 46 54.5 477.5702 683.5244 false true false 69ede63c-4ca0-40c6-a684-e2e4ff8946c5 Loft Loft 41745d1c-5eb7-45ce-8eef-221cb5f29b58 true longest_list 934.4863 348.1035 70 44 957.4863 350.1035 27 40 957.4863 350.1035 false true false S bc0aa3c7-166d-47c0-b822-61797746c45c true true 1 2c2a330f-a147-4197-8110-99ae029b2d7d 0 0 false 0 0 0 0 934.4863 350.1035 23 20 934.4863 350.1035 false true false O 68f1a5d1-d9e0-43d4-b232-5676c0b7237f true false 0 0 1 0 0 0 0 934.4863 370.1035 23 20 934.4863 370.1035 false true false false false 10 0.01 3 3 0 L a0337bed-e6a1-4850-959f-f8ef58e1a61f true false 0 0 0 false 0 0 0 0 984.4863 350.1035 20 40 984.4863 350.1035 false true false 57da07bd-ecab-415d-9d86-af36d7073abc Number Slider countV fa12dd42-6bfb-440c-87d9-42e71cb71e52 true false 0 0 27.5 184.5 147 20 27.5 184.5 47 20 27.5 184.5 false true false 13 3 40 4 1 59e0b89a-e487-49f8-bab8-b5bab16be14c Panel Panel f414feae-2f9f-4a34-b85f-c857169cb732 true false 0 0 A SIMPLER EXAMPLE _ JUST POINTS true 0 false 553.3203 578.1494 150 100 555.3203 579.1494 146 98 553.3203 578.1494 false true false 2844fec5-142d-4381-bd5d-4cbcef6d6fed Sketch Sketch 994a5d32-5f2e-4fa5-8221-e8ff70dfbfd5 1 305.6172 493.5557 515.1367 415.0391 305.6172 493.5557 515.1367 415.0391 305.6172 493.5557 false true false 3 0 0 0 255 0 33 601.02734375 498.4384765625 593.703125 495.9970703125 564.40625 493.5556640625 537.55078125 498.4384765625 500.9296875 503.3212890625 464.30859375 505.7626953125 388.625 537.5009765625 373.9765625 549.7080078125 352.00390625 571.6806640625 308.05859375 637.5986328125 308.05859375 666.8955078125 305.6171875 725.4892578125 305.6171875 752.3447265625 659.62109375 908.5947265625 681.59375 901.2705078125 725.5390625 874.4150390625 754.8359375 847.5595703125 781.69140625 835.3525390625 796.33984375 810.9384765625 815.87109375 752.3447265625 818.3125 713.2822265625 820.75390625 686.4267578125 818.3125 640.0400390625 808.546875 608.3017578125 798.78125 588.7705078125 774.3671875 559.4736328125 752.39453125 544.8251953125 730.421875 525.2939453125 720.65625 517.9697265625 710.890625 515.5283203125 681.59375 515.5283203125 647.4140625 517.9697265625 640.08984375 515.5283203125 bc984576-7aa6-491f-a91d-e444c33675a7 Graph Mapper Graph 5ec49614-4e2b-4c37-8925-0cab26f73df9 true false 1 6c76ad43-3a10-4563-8514-9d41bf3aae97 0 173.75 270.3125 209.0625 145.9375 179.75 276.3125 197.0625 133.9375 173.75 270.3125 false true false false 0 1 0 1 30d3a94f-e362-43f1-9ce1-2e2dabbf7265 Parabola 0.50713598728179932 0.77648162841796875 0.863939106464386 0.60149329900741577 9445ca40-cc73-4861-a455-146308676855 Range Range 189b9294-5eb6-4e6e-8f59-b471c6e457b3 true longest_list 872.5 1058.2 71 58 894.5 1060.2 27 54 894.5 1060.2 false true false D ff73011e-5597-49fd-afa9-c6dcf401e977 true false 0 0 1 0 0 0 0 872.5 1060.2 22 27 872.5 1060.2 false true false 0 1 N efc8ccd9-624d-4e0e-8214-aebf4fa4f177 true false 0 0 1 0 0 0 0 872.5 1087.2 22 27 872.5 1087.2 false true false 10 R 6f62cb44-e58f-4917-a67f-800594aa5045 true false 0 0 0 0 0 0 0 921.5 1060.2 22 54 921.5 1060.2 false true false 9445ca40-cc73-4861-a455-146308676855 Range Range 7e389052-de95-45f1-be7d-9f2b4c744658 true longest_list 71.25 315.25 71 58 93.25 317.25 27 54 93.25 317.25 false true false D ee96f05f-1a9b-4b2b-8006-789fbb381615 true false 0 0 1 0 0 0 0 71.25 317.25 22 27 71.25 317.25 false true false 0 1 N 6162bfe6-d7c1-464c-9579-69564f951cdd true false 1 7e627ce7-765f-4915-b52c-84aad2d739f5 0 1 0 0 0 0 71.25 344.25 22 27 71.25 344.25 false true false 10 R 6c76ad43-3a10-4563-8514-9d41bf3aae97 true false 0 0 0 0 0 0 0 120.25 317.25 22 54 120.25 317.25 false true false 59e0b89a-e487-49f8-bab8-b5bab16be14c Panel Panel 8309cb72-304d-4610-a603-6fa87bc17043 true false 1 5ec49614-4e2b-4c37-8925-0cab26f73df9 0 Double click to edit panel content… true 0 false 455.3906 296.1914 150 116.25 457.3906 297.1914 146 114.25 455.3906 296.1914 false true false