Files
resatennis_tyroltenn/www/site_inscription/tctcer/tab/tab_ancien.reg_aux

38 lines
919 B
Plaintext
Executable File

;***********************************************************************;
;COMPTAGE DU NOMBRE DE JOUEUR PAR CLASSEMENT;
;
SI
(JOUEUR_X) EST_CLASSE (CLASSEMENT_X)
ALORS
NB_JOUEUR (CLASSEMENT_X) <-- ((NB_JOUEUR (CLASSEMENT_X)) + 1)
NB_JOUEUR_TOTAL ' <-- (NB_JOUEUR_TOTAL ' + 1)
;
;*********************************A MODIFIER*****************************;
;REGLE CALCUL_NB_TOUR;
;CALCUL DU NOMBRE DE TOURS DANS LA TRANCHE;
;
SI
NB_JOUEUR_TOTAL ' > NB_JOUEUR_QUALIF '
ALORS
NB_TOUR ' <-- ((NB_JOUEUR_TOTAL ' / NB_JOUEUR_QUALIF ' ))
TOUR_COURANT ' <--((NB_JOUEUR_TOTAL ' / NB_JOUEUR_QUALIF ' ))
;
;*****************************************************************;
;REGLE SUPPRESSION_TOUR;
;SUPPRESSION DES TOURS QU'ON N'AURAIT PAS DU CREER;
;
SI
(TOUR_X) ' = TOUR
NB_TOUR ' > 0
(TOUR_X) NUMERO (X)
(X) > NB_TOUR '
ALORS
(TOUR_X) ' <-- INEXISTANT
;
;**********************************A MODIFIER*******************;