From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

WYANT / Astro-App-Satpass2-0.055 / eg / tle_celestia.tt2 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

              
[%# Astro::App::Satpass2 template to render TLE data in a format
    appropriate for loading into Celestia planetarium software. To use,
    load the TLE data, then do
    satpass2> formatter format eg/tle_celestia.tt
    or,
    satpass2> formatter template tle_celestia <eg/tle_celestia.tt
    satpass2> tle -celestia
    -%]
[% UNLESS data %]
    [%- SET data = sp.tle( arg ) %]
[%- END %]
[%- FOR item IN data -%]
[% CALL item.fixed_width( 0 ) %]
# Keplerian elements for [% item.name %]
# Generated by [% provider %]
# Epoch: [% item.epoch( units = 'zulu' ) %] UT
#
# CAVEAT: This is just a demonstration, and is known (or at least
# strongly suspected) NOT to make Celestia display satellites where they
# actually are. I strongly suspect that the problem is an equivocation
# on the use of epoch, but I can not prove this.
Modify "[% item.name( missing = 'oid' ) %]" "Sol/Earth" {
    EllipticalOrbit {
        Epoch  [% item.epoch( units = 'julian', places = '' ) %]
        Period  [% item.period( units = 'days', places = '' ) %]
        SemiMajorAxis  [% item.semimajor( places = '' ) %]
        Eccentricity  [% item.eccentricity( places = '' ) %]
        Inclination  [% item.inclination( places = '' ) %]
        AscendingNode  [% item.ascending_node( units = 'degrees',
            places = '' ) %]
        ArgOfPericenter  [% item.argument_of_perigee( places = '' ) %]
        MeanAnomaly  [% item.mean_anomaly( places = '' ) %]
    }
    UniformRotation {
        Inclination  [% item.inclination( places = '' ) %]
        MeridianAngle  90
        AscendingNode  [% item.ascending_node( units = 'degrees',
            places = '' ) %]
    }
}
[% END -%]