moonDrawingTest.frink

View or download moonDrawingTest.frink in plain text format


// Program to test moon drawing routines in sun.frink.

use sun.frink

n = now[]
lat = 39 deg North
long = 104 deg West

g = new graphics
gp = drawMoonPolygon[0, 0, 1, moonPositionAngleRelativeToZenith[n, lat, long], moonIlluminatedFraction[n], false]
g.add[gp]
g.show[]

//gp = drawMoonPolygon[0, 0, 1, 90 degrees, moonIlluminatedFraction[n], false]

g = new graphics

for a = 0 to 12
{
   angle = 30 degrees a
   for kf = 0 to 10
   {
      k = kf / 10
      gp = drawMoonPolygon[2.2 a, 2.2 kf, 1, angle, k, false]
      g.add[gp]
   }
   for kf = 9 to 0 step -1
   {
      k = (9 - kf) / 10
      gp = drawMoonPolygon[2.2 a, 2.2 kf + 24.2, 1, angle, k, false]
      g.add[gp]
   }
}

g.show[]


View or download moonDrawingTest.frink in plain text format


This is a program written in the programming language Frink.
For more information, view the Frink Documentation or see More Sample Frink Programs.

Alan Eliasen was born 17591 days, 17 hours, 41 minutes ago.