AGI STK Objects 11 Send comments on this topic.
IAgOnePtAccessConstraint Interface





Description

One Point Access Result.

Public Properties

Public Property Constraint The selected access constraint.
Public Property ObjectPath The object path.
Public Property Status The access status.
Public Property Value The range.

Example

Compute an access for one point
[C#] Copy Code
IAgOnePtAccess onePtAccess = facility.CreateOnePointAccess("Satellite/Satellite1"); 
 
// Configure properties (if necessary) 
onePtAccess.StartTime = "1 Jan 2012 12:00:00.000"
onePtAccess.StopTime = "1 Jan 2012 13:00:00.000"
onePtAccess.StepSize = 120
onePtAccess.SummaryOption = AgEOnePtAccessSummary.eOnePtAccessSummaryDetailed; 
 
// Compute results 
IAgOnePtAccessResultCollection results = onePtAccess.Compute(); 
 
// Print results 
for (int i = 0; i < results.Count; i++) 

    IAgOnePtAccessResult result = results[i]; 
 
    Console.WriteLine("Time: {0}, HasAccess: {1}", result.Time, result.AccessSatisfied); 
 
    for (int j = 0; j < result.Constraints.Count; j++) 
    { 
        IAgOnePtAccessConstraint constraint = result.Constraints[j]; 
        Console.WriteLine("Constraint: {0}, Object {1}, Status {2}, Value {3}"
            constraint.Constraint, 
            constraint.ObjectPath, 
            constraint.Status, 
            constraint.Value); 
    } 

 

Compute an access for one point
[Visual Basic .NET] Copy Code
Dim onePtAccess As IAgOnePtAccess = facility.CreateOnePointAccess("Satellite/Satellite1")

' Configure properties (if necessary)
onePtAccess.StartTime = "1 Jan 2012 12:00:00.000"
onePtAccess.StopTime = "1 Jan 2012 13:00:00.000"
onePtAccess.StepSize = 120
onePtAccess.SummaryOption = AgEOnePtAccessSummary.eOnePtAccessSummaryDetailed

' Compute results
Dim results As IAgOnePtAccessResultCollection = onePtAccess.Compute()

' Print results
Dim i As Integer = 0
While i <>
    Dim result As IAgOnePtAccessResult = results(i)

    Console.WriteLine("Time: {0}, HasAccess: {1}", result.Time, result.AccessSatisfied)

    Dim j As Integer = 0
    While j <>
        Dim constraint As IAgOnePtAccessConstraint = result.Constraints(j)
        Console.WriteLine("Constraint: {0}, Object {1}, Status {2}, Value {3}", constraint.Constraint, constraint.ObjectPath, constraint.Status, constraint.Value)
        System.Math.Max(System.Threading.Interlocked.Increment(j),j - 1)
    End While
    System.Math.Max(System.Threading.Interlocked.Increment(i),i - 1)
End While

© 2016 Analytical Graphics, Inc. All Rights Reserved.

STK Programming Interface 11.0.1