Description This subroutine retrieves the R,G,B integer values from a Source Primitive's draw color setting.
Syntax SourcePrimGetDrawColor( spNode, R, G, B )
Parameters spNode As Long Node number of the source primitive being queried.
R As Integer Retrieved integer for the Red component.
G As Integer Retrieved integer for the Green component.
B As Integer Retrieved integer for the Blue component.
Example The example below demonstrates how to retrieve the source draw color settings from a Source Primitive.
Sub Main
Dim spNode As Long spNode = FindFullName( "Optical Sources.Point Source (incoherent)" )
Dim r As Integer, g As Integer, b As Integer SourcePrimGetDrawColor( spNode, r, g, b ) Print "Source primitive draw color: " & r & "," & g & "," & b
End Sub
See Also Source Primitive Script Commands
|