gcal-common 3.6.3-3 / usr / share / doc / gcal-common / examples / moon / moon2.awk

#  $Id: moon2.awk 0.04 2000/01/12 00:00:04 tom Exp $
#
#  moon2.awk:  Used by `moon.bat' for displaying the dates at which the next
#                Full Moon and New Moon phases take place, plus some
#                additionally information about today's date.
#
#  Copyright (c) 2000  Thomas Esken      <esken@uni-muenster.de>
#                      Im Hagenfeld 84
#                      D-48147 M"unster
#                      GERMANY
#
#  This software doesn't claim completeness, correctness or usability.
#  On principle I will not be liable for ANY damages or losses (implicit
#  or explicit), which result from using or handling my software.
#  If you use this software, you agree without any exception to this
#  agreement, which binds you LEGALLY !!
#
#  This program is free software; you can redistribute it and/or modify
#  it under the terms of the `GNU General Public License' as published by
#  the `Free Software Foundation'; either version 2, or (at your option)
#  any later version.
#
#  You should have received a copy of the `GNU General Public License'
#  along with this program; if not, write to the:
#
#
#
{
  if ($(NF-1)+1 <= 12)
    printf "%%%04d%02d1\n", $NF, $(NF-1)+1
  else
    printf "%%%04d%02d1\n", $NF+1, 1
}