Adds a new directional light object to the document.
Rhino.AddDirectionalLight (arrStartPoint, arrEndPoint)
arrStartPoint |
Required. Array. The 3-D starting point of the light. |
arrEndPoint |
Required. Array. The 3-D ending point and direction of the light. |
String |
The identifier of the new object if successful. |
Null |
If not successful, or on error. |
Dim arrStart, arrEnd
arrEnd = Rhino.GetPoint("End of light vector direction")
If IsArray(arrEnd) Then
arrStart = Rhino.GetPoint("Start of light vector direction", arrEnd)
If IsArray(arrStart) Then
Rhino.AddDirectionalLight arrStart, arrEnd
End If
End If