Announcement

Collapse
No announcement yet.

Julianisches Datum

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Julianisches Datum

    Hat jemand eine Idee oder einen Code wie ich das Julianische Datum berechnen kann ???

  • #2
    www.google.de mit "Julianische Datum berechnen"

    da finden sich jede Menge Erläuterungen.

    http://www.nabkal.de/kalrech2.html
    Hier gibt es einen Kalender dessen Javascript nach C++ umgesetzt werden kann und ein Download von C++
    Christian

    Comment


    • #3
      Hallo,<p>
      haste schon die Lösung? Wenn nicht, versuchs hiermit:<p>
      <PRE>
      //---------------------------------------------------------------------------
      // Tag, Monat, Jahr nach julianischer Tagesnummer
      int TForm1::fsti_datjul(int tag,int monat,int jahr)
      {
      int c,ya,julday;
      // int check_d,check_m,check_y,mm,yy;

      if (monat > 2)
      monat -= 3;
      else
      {
      monat += 9;
      jahr--;
      }
      c = jahr/100;
      ya = jahr - 100 * c;
      julday = (146097L * c)/4 + (1461 * ya)/4 + (153 * monat+2)/5 + tag+1721119L;
      return julday;
      }
      //---------------------------------------------------------------------------
      // Julianische Tagesnummer nach Tag, Monat, Jahr
      int TForm1::fsti_juldat(int julian,int *tag,int *monat,int *jahr)
      { int rc;
      int t,m,j;

      rc=0;

      if (julian < 2299161L)
      {
      rc = 1;
      }
      else {
      julian -= 1721119L;
      j = (4 * julian - 1) / 146097L;
      t = (julian = 4 * julian - 1 - 146097L * j) / 4;
      t = 4 * t + 3 - 1461 * (julian = (4 * t + 3) / 1461);
      t = (t + 4) / 4;
      m = (5 * t - 3) / 153;
      t = 5 * t - 3 - 153 * m;
      t = (t + 5) / 5;
      j = 100 * j + julian;
      if (m < 10)
      m += 3;
      else
      {
      m -= 9;
      j += 1;
      }
      *tag = (int)t;
      *monat = (int)m;
      *jahr = (int)j;
      }
      return rc;
      }
      </pre&gt

      Comment


      • #4
        Danke hat funktionier

        Comment

        Working...
        X