Calendrier universel

[Temps-x]

Bonjour à tous et à toutes,

L’utilitaire que voici, qui est pour PC, permets de générer des calendriers allants de 1500 ans à 3000 ans, on peut dire qu'il est un calendrier universel.

TrouJour.png

J'ai conçu ce programme afin d'obtenir le nom du jour de la semaine. pour être plus explicible, si je vous annonce que nous sommes le 05-10-2025.

Vous allez me dire nous sommes le 5 octobre 2025, mais vous ne pourrez pas me dire le nom du jour de cette semaine

Ce programme sera réécrit en ASM pour microcontrôleur Pic, pour savoir le jour de la semaine lors de la réception des données GPS

Mise en ligne du programme TrouvJour le Jeudi 5 décembre 2024, Téléchargement du programme ICI

Je tiens à signaler que ce programme et entièrement gratuit, vous pouvez l’échanger, le diffuser, le donner…… par contre, il est formellement interdit d’en faire un usage lucratif par n’importe quel moyen.

Il est protégé contre les virus, si le fichier est touché par un virus, une alerte vous avertira.

A+

[paulfjujo]

.....
TrouveJour.exe testé OK .. apres confirmation (sinon refusé par Norton)


Ce programme sera réécrit en ASM pour microcontrôleur Pic,
pour savoir le jour de la semaine lors de la réception des données GPS

en attendant la version asm,
voici la version XC8,

extrait d'une des versions Chaudiere...
sachant que le numero du jour Js donné par la RTC DS3231 est completement arbiraire :
un chiffre variant de 0 à 6 qui s'incremente chaque franchissement de 00H:00M:00S
on definit alors si 0 c'est lundi , ou 0 dimanche aux USA

Code : Tout sélectionner

   
// ----date et RTC -----
long Jour_Julien;
const char All_Jour_Semaine[]="LuMaMeJeVeSaDiEr";
const  char Jour0[]="Lundi ";
const  char Jour1[]="Mardi ";
const  char Jour2[]="Mercredi ";
const  char Jour3[]="Jeudi ";
const  char Jour4[]="Vendredi ";
const  char Jour5[]="Samedi ";
const  char Jour6[]="Dimanche ";
const  char Jour7[]="Error ";
const  char * JourSemaine[]={Jour0,Jour1,Jour2,Jour3,Jour4,Jour5,Jour6,Jour7};
char time[]="00H00M00S";
char date[]="00/00/00";
char Jour_en_cours; // 1 à 7
char Jour_Select;  // 1  à 7

long jour2jul(char jour , char mois , int annee)
{
 long jule, gregorien, a , j , m;
/* Attention, cette routine ne doit etre appellee que si on est sur
   que le jour fourni en parametre existe !!!!!! */
a = (long)annee;
m = (long)mois;
j = (long)jour;
// On commence par faire un ajustement pour les annnees negatives 
    if (annee < 0)    a++;
    jule = ((489L *m - 481 ) >>4) + j + 1721423L - (((a&3)+7)>>2)*((m+13)>>4)    + ((1461L*(a-1))>>2);
   /* Avant le 04/10/1582 on est en calendrier julien, et en calendrier  gregorien apres le 15/10/1582 */
    if (jule <= 2299160L)
        return jule;
    /* En calendrier gregorien les ajustements à faire sont :
       - les annees divisibles par 100 ne sont pas bissextiles
       - les annees divisibles par 400 sont bissextiles.
    */
     gregorien = jule - (a/100L - a/400L - 2L);
     if ( ( (a%100) == 0 ) && (m < 3) && ( (a%400) != 0)) gregorien++;
    return gregorien;
}

char *j_txt(long n , char *num)
{
char c;
    if (n < 0L)
        c = 6 - (char)((-n-1)%7);
    else
    c = (char)(n%7);
    *num = c;
    return (char *)JourSemaine[c];
}


// usage dans le main programme

    CPrint(" Test jour Julien\r\n");
    Jour_Julien=jour2jul(29,8,1996);  // date GPS à mettre ici
    sprintf(txt," date 29/08/1996 -> jour julien # %ld",Jour_Julien);
    Print(txt);PrintChar(TAB);
    // jour de la semaine 
    Print(j_txt(Jour_Julien , &cx));
    CPrint("  jour # ");PrintChar(cx);
    PrintChar(cx+48);
    CRLF1();
  


[Temps-x]

Bonjour paulfjujo, et tous le forum,

J'ai mis une nouvelle version, avec des modifications de certain blocage plus son lors de la capture de l’image du calendrier, qui peut être imprimé par la suite… et ça sera la dernière version.

J'ai à peu près fait la même chose que toi, sauf que je compte de 1 = Lundi, à 7 = Dimanche, je prends une date de référence, qui est le lundi 1 janvier 1500

J’ai vu dans ta routine que tu utilises une formule

je n'utilise pas de formule, comme j'ai pu voir ICI ça sera plus pratique en ASM il me faut juste une date de référence.

Le code principal est très cour, à peine une dizaine de ligne .... ça sera pas la même chose en ASM.

A+

[Gérard]

Tu es trop fort Temps-x.

J'ai téléchargé ton fichier, j'ai vérifié, le 18 septembre 1964 est un vendredi, je le sais, c'était le jour de ma rentrée de CP.

[venom]

Bonjour à tous.

Merci pour le partage Temps-x. Je testerai ça a l'occasion. (Même si pour le moment je n'ai pas d'utilité)
C'est toujours intéressant et bien de recevoir des codes / utilitaires entres codeurs. J'aime bien cet état d'esprit.






@++