Description Returns the number of ray filter operations applied to a detector entity.
Syntax opCount = DEGetOpCount( deNode )
Parameters opCount (Long) Returned number of ray filter operations applied to a detector entity.
deNode As Long Node number of the detector entity being queried.
Example The following example demonstrates the use of the ray filter operation commands as they relate to detector entities. In this example the operation count for a detector entity is retrieved and the operation at index 0 is retrieved and modified before the analysis is performed.
Sub Main
Dim rfOp As T_RAYFILTEROP Dim deNode As Long, opCount As Long, cnt As Long, arnNode As Long Dim success As Boolean
deNode = FindFullName( "Analysis Surface(s).Cylinder Detector Entity" )
opCount = DEGetOpCount( deNode ) Print "Detector entity " & deNode & " has " & opCount & " ray filter operations."
'Get, modify, and set the 0'th operation in the list success = DEGetIthOp( deNode, 0, rfOp ) rfOp.opCode = 23 'scattered rays DESetIthOp deNode, 0, rfOp
'Perform analysis with modified ray filter cnt = DEPerformAnalysis( deNode )
Print "Detector entity analysis results stored in ARN " & DEGetMostRecentARNNum( deNode )
End Sub
See Also
|