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 17646 days, 9 hours, 35 minutes ago.