// codé en C99 (au format ANSI)

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
//--#include <time.h>

/* retourne le numéro du jour du premier janvier
numJour = 1 => Me 1 jan 2020 */
int numJ(int an){
  int plusUn, numJour=1;
  if(an>2020){
    for(int i=2021;i<=an;i++){plusUn=0;
      if( (i-1) % 4==0) plusUn=1;
      numJour+=365+plusUn;
    }
  }
  return numJour;
}

int main()
{
  FILE *fichier;char nomFichier[]="agendaAAAA.txt",contenu[5000];
  char ligne[80],jour[3],annee[5],mois[]="jan",di[4];
  int i,plusUn,numJour,an,nbJours=365,x=0,j=-1,num;
  const unsigned char FEV[]={'f',233,'v',0};
  const unsigned char DEC[]={'d',233,'c',0};
  // L'agenda sera créé en 0,15 milli-seconde
  printf("Cr%ce un fichier TEXTE, dans le dossier de cet EXE,\n",130);
  printf("nomm%c agendaAAAA.txt et cod%c en ANSI.\n",130,130);
  printf("Chaque ligne d%cbute par une date au format : 'JJ MMM : '\n\n",130);
  printf("Donnez une date comprise entre 2020 et 2099 : "); scanf("%s",annee);
  an=atoi(annee);
  if(an<2020){ printf("Ann%ce invalide !\n",130); return 0; }
  if(an>2099){ printf("Ann%ce invalide !\n",130); return 0; }

  nomFichier[6]=annee[0]; nomFichier[7]=annee[1];
  nomFichier[8]=annee[2]; nomFichier[9]=annee[3];

  //--clock_t start,end;start=clock();int k;
  //--for(k=0;k<100;k++){strcpy(contenu,"");x=0;j=0;

  sprintf(contenu,"Agenda %s :\n\n",annee);
  if((an%4)==0) nbJours=366; num=numJ(an);

  for(i=0;i<nbJours;i++){ x++; j++;
    if (i==31) {strcpy(mois,FEV);x=1;strcat(contenu,"\n");}
    if (i==59 && nbJours==365){
      strcpy(mois,"mar");x=1;strcat(contenu,"\n");}
    if (i==59 && nbJours==366){
      sprintf(ligne,"%2d %s : \n",29,FEV);
      strcat(contenu,ligne); nbJours=365;i--;continue;}
    if (i==90) {strcpy(mois,"avr");x=1;strcat(contenu,"\n");}
    if (i==120) {strcpy(mois,"mai");x=1;strcat(contenu,"\n");}
    if (i==151) {strcpy(mois,"jun");x=1;strcat(contenu,"\n");}
    if (i==181) {strcpy(mois,"jul");x=1;strcat(contenu,"\n");}
    if (i==212) {strcpy(mois,"aou");x=1;strcat(contenu,"\n");}
    if (i==243) {strcpy(mois,"sep");x=1;strcat(contenu,"\n");}
    if (i==273) {strcpy(mois,"oct");x=1;strcat(contenu,"\n");}
    if (i==304) {strcpy(mois,"nov");x=1;strcat(contenu,"\n");}
    if (i==334) {strcpy(mois,DEC);x=1;strcat(contenu,"\n");}
    strcpy(di,""); if((num+j)%7==5)strcpy(di,"Di ");
    sprintf(ligne,"%2d %s %s: \n",x,mois,di); strcat(contenu,ligne);
  }

  //--}
  //--end = clock ();
  fichier=fopen(nomFichier,"w"); fprintf(fichier,"%s",contenu);
  fclose(fichier); printf("%s cr%c%c !\n", nomFichier,130,130);
  //--printf ("%d => en secondes : %f\n",k, (end - start)/(double)CLOCKS_PER_SEC);
  return 0;
}