# Chapter 5 – Solar System Orbits (Kepler’s Law)

**Posted:**March 28, 2013

**Filed under:**Solar System Orbits, ZX Spectrum Astronomy |

**Tags:**Aphelion, Astronomy, Ellipse, Kepler, Laws of Planetary Motion, Maurice Gavin, Perihelion, Programming, Sinclair Basic, ZX Spectrum Astronomy Leave a comment

Orrery, simulates the scale and relative movement of the planets about the Sun

Bode’s Law

Kepler’s Orbits, demonstrates the first two of Kepler’s Laws

Orbit Foci, plotting the second focus

Comet Orbit, eccentric orbits

Halley’s Comet, depicts one complete orbit, 1948-2023

Pluto’s Orbit, plots the relative positions of Pluto and Neptune from 1880-2128, one complete orbit for Pluto

Solar Apex, corkscrew motion of a planet towards the Solar Apex

## Kepler’s Orbits

Johannes Kepler, between 1609 and 1618, found that planets, and in fact all orbiting bodies, follow three laws of planetary motion:

- The orbit of the planet is an ellipse with the Sun at one focus of that ellipse.
- The planet moves in its orbit at such velocity that its radius vector (the angle as seen from the Sun to any point on the orbit) sweeps out an equal area in a similar time interval — see Figures 5.4 and 5.5.
- The orbital period squared is proportional to the mean (average) distance from the Sun cubed.

The following program demonstrates the first two of Kepler’s Laws of Planetary Motion by PLOTting elliptical orbits with the spacing between the individual PLOT positions at equal time intervals. The PLOTted pixel (representing the orbiting planet) is seen to ‘accelerate’ as it passes close to the Sun (the small CIRCLE in the centre of the screen) particularly as the orbits become more elliptical (higher eccentricity) against the values INPUT for initial velocity.

These INPUT values are purely arbitrary. Effectively, the higher the value the more circular the orbit, the lower the value (Figure 5.6) the more eccentric the orbit and the closer the planet passes to the Sun. The first position PLOTted marks the point of ‘aphelion’, ie the most remote part of the orbit from the Sun. The point of the orbit closest to the Sun is called ‘perihelion’.

**Figure 5.4: Kepler’s 1st and 2nd Laws of Planetary Motion**

A planet PE (shown in a highly elliptical orbit for clarity) sweeps out an equal area (shaded) in an equal time interval — its velocity constantly changing according to its current distance from the Sun.

**Figure 5.5: Kepler’s 3rd Law of Planetary Motion**

Each planet sweeps out an area (shaded) in an equal time interval proportional to the orbit radius. In this simplified solar system with the orbits equally spaced, P1 covers a complete quadrant whilst P2 covers 0.35 of a quadrant (1/√2^{3}) and P3 covers 0.19 of a quadrant (1/√3^{3}).

If an INPUT of >12 is ENTERed then odd things start happening with the PLOTted results. These have nothing to do with Kepler’s Laws — but with short-comings of the program. They have, however, been deliberately left in to demonstrate three effects that can happen to a body in orbit about, or passing close to, a more massive planet.

An INPUT of 12 will cause rotation of the whole orbit so that the aphelion position (and also the perihelion position although this is not obvious) moves in a clockwise direction. This effect mimics the orbit rotation of any planet but even in the case of Mercury, the planet closest to the Sun and with the highest velocity of all the planets, it is only detectable over hundreds of complete orbits. (See Figure 5.7)

**Figure 5.6**

Lower INPUT values produce more elliptical orbits.

**Figure 5.7**

Rotation of orbit.

An INPUT of 10 will cause the capture of the body into a smaller and faster orbit. It is believed that many comets have been captured into smaller orbits by passing sufficiently close to the massive planet Jupiter and, to a lesser extent, Saturn. This obviously assumes a third body which our program does not contain but it remains of interest to demonstrate an effect. (See Figure 5.8)

**Figure 5.8**

Capture of larger orbit into a smaller orbit.

An INPUT of 7 or less will cause the planet to pass so close to the Sun that the planet is ejected out of the solar system in what is called a sling-shot manoeuvre. In reality no planet would be subjected to this indignity — if such a thing ever occurred it would have been billions of years ago — there is no place for rebel planets today. However space scientists use this effect to send spacecraft from one planet to the next in a game of planetary billiards, poaching a little of the host planet’s gravitational field to accelerate the craft to high velocities impossible to achieve by rocket power from Earth.

*An explanation*

Why does this program produce these effects? Quite simply because the program does not calculate with sufficient accuracy the position of the planet when close to the Sun. The minutest error is added to the next computation producing the effects displayed. The situation is not assisted by the fact that, at the point of perihelion, the vertical or y coordinates as PLOTted pass from positive to negative values. All in all, a case of using a potential disadvantage to good effect, even if not good mathematics!

*Amending the program*

Once the program has been RUN a few times, try amending (one at a time) some of the variables. The most important variable to change is h, which controls the STEP intervals in the FOR/NEXT loops to RUN the program. If it is made smaller then the orbit will be PLOTted with greater accuracy, particularly at perihelion position. However it will now PLOT incredibly slowly whilst the planet is near aphelion. You change the value — you take your choice.

This particular program is used a number of times elsewhere in this book — usually with modifications to suit particular purposes.

**10 PRINT “Kepler’s Orbits : “;
30 INPUT “Velocity (5 to 30): “;w
40 PRINT w: CIRCLE 128,85,2
50 LET h=.5: LET g=1000000
60 LET x=g/1000: LET y=0
70 LET i=h/4: LET v=0
80 LET r=x: LET s=y
90 LET x=x+i*v: LET y=y+i*w
100 GO SUB 200
110 LET x=r: LET y=s: LET o=h/2
120 LET v=v+o*b: LET w=w+o*c
130 GO SUB 300
140 FOR t=0 TO 400 STEP h
150 LET x=x+h*v: LET y=y+h*w
160 GO SUB 200
170 LET v=v+h*b: LET w=w+h*c
180 GO SUB 300: NEXT t: STOP
200 LET e=x*x+y*y: LET d=SQR e
220 LET a=-g/e: LET b=a*x/d
240 LET c=a*y/d: RETURN
300 PLOT x/10+128,y/10+85
305 PRINT AT 20,0;”x=”;x'”y=”;y
310 RETURN**