//--- VARIABLES
i est un entier
xCol_Base est une chaîne
xNom_Col est une chaîne
xType_Exercice est une chaîne
xY_Max est un entier

//--- EFFACER LE GRAPHE
grEffaceDessin(Graphe_EXERCICE)

//--- AFFECTATIONS
xCol_Base = "Table_STAT_ACTIVITES_SEMAINE.ACTIV_"

//--- 8 EXERCICES POSSIBLES SUR 52 SEMAINES
POUR J = 1 À 8

//-- INDIRECTION SUR LA COLONNE
xNom_Col = xCol_Base+NumériqueVersChaîne(J)

//--- SI LA COLONNE EST VISIBLE
SI {xNom_Col,indChamp}..Visible = Vrai ALORS

//--- ON RECUPERE LE NOM DE L'EXERCICE
xType_Exercice = {xNom_Col,indChamp}..Libellé

//--- AFFECTATION DE LA LEGENDE A LA SERIE
Graphe_EXERCICE[j].Légende = xType_Exercice

//--- COULEUR DE LA SERIE
SI xLangue = 5 ALORS HLitRecherche(EXERCICES,EXERCICE_TYPE_FR,xType_Exercice)
SI xLangue = 3 ALORS HLitRecherche(EXERCICES,EXERCICE_TYPE_EN,xType_Exercice)
grCouleurSérie(Graphe_EXERCICE,j,EXERCICES.EXERCICE_COULEUR)

//--- ON RECUPERE LES DONNEES DES 52 SEMAINES
POUR i = 1 À 52
TableSelectPlus(Table_STAT_ACTIVITES_SEMAINE,i)
Graphe_EXERCICE[j][i] = {xNom_Col,indChamp}
SI {xNom_Col,indChamp} > xY_Max ALORS xY_Max = {xNom_Col,indChamp}
FIN

FIN

FIN
TableSelectPlus(Table_STAT_ACTIVITES_SEMAINE,1)


//--- VALEUR MAX DE L'AXE DES Y
grOrigine(Graphe_EXERCICE,0,xY_Max+10,grOrdonnée)

//--- Dessin du graphe
grDessine(Graphe_EXERCICE)