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





Description

One Point Access Result.

Object Model


Public Properties

Public Property AccessSatisfied Whether Satisfaction is enabled.
Public Property Constraints List of constraints.
Public Property Time Time of access.

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