####################################################################################################################################### # # # R E N O R M A L I S A T I O N D ' U N E N S E M B L E D E C O U L E U R S : # # # # # # Author of '$xiirs/.CYLI.31.1.$U' : # # # # Jean-Francois Colonna (LACTAMME, 20170201121143). # # # ####################################################################################################################################### $Z setParam _____MinimumROUGE $NOIR $Z setParam _____MaximumROUGE $BLANC $Z setParam _____MinimumVERTE $NOIR $Z setParam _____MaximumVERTE $BLANC $Z setParam _____MinimumBLEUE $NOIR $Z setParam _____MaximumBLEUE $BLANC $Z FileTmpB FiLeTmP_COULEURS $Z $CA $_____FSurface | \ $Z $SE -e "s/^.* ROUGE=//" \ $Z -e 's/ .*$//' \ $Z >>! $FiLeTmP_COULEURS$ROUGE ` $Z $CA $_____FSurface | \ $Z $SE -e "s/^.* VERTE=//" \ $Z -e 's/ .*$//' \ $Z >>! $FiLeTmP_COULEURS$VERTE ` $Z $CA $_____FSurface | \ $Z $SE -e "s/^.* BLEUE=//" \ $Z -e 's/ .*$//' \ $Z >>! $FiLeTmP_COULEURS$BLEUE $Z # Recuperation des couleurs {ROUGE,VERTE,BLEUE}. # $Z $CA $FiLeTmP_COULEURS$ROUGE | \ $Z $xrv/normalise.01$X \ $Z ne=0 fichier== \ $Z origine=$_____MinimumROUGE extremite=$_____MaximumROUGE \ $Z formater=VRAI entiers=VRAI | \ $Z $SE -e "s/^/ROUGE=/" \ $Z >>! $FiLeTmP_COULEURS.1$ROUGE $Z $CA $FiLeTmP_COULEURS$VERTE | \ $Z $xrv/normalise.01$X \ $Z ne=0 fichier== \ $Z origine=$_____MinimumVERTE extremite=$_____MaximumVERTE \ $Z formater=VRAI entiers=VRAI | \ $Z $SE -e "s/^/VERTE=/" \ $Z >>! $FiLeTmP_COULEURS.1$VERTE $Z $CA $FiLeTmP_COULEURS$BLEUE | \ $Z $xrv/normalise.01$X \ $Z ne=0 fichier== \ $Z origine=$_____MinimumBLEUE extremite=$_____MaximumBLEUE \ $Z formater=VRAI entiers=VRAI | \ $Z $SE -e "s/^/BLEUE=/" \ $Z >>! $FiLeTmP_COULEURS.1$BLEUE $Z # Renormalisation des couleurs {ROUGE,VERTE,BLEUE}. # $Z $CA $_____FSurface | \ $Z $SE -e 's/\([^ ]\) *ROUGE=.* *VERTE=.* *BLEUE=.*$/\1/' \ $Z >>! $FiLeTmP_COULEURS.1 $Z $PAST $FiLeTmP_COULEURS.1 \ $Z $FiLeTmP_COULEURS.1$ROUGE \ $Z $FiLeTmP_COULEURS.1$VERTE \ $Z $FiLeTmP_COULEURS.1$BLEUE | \ $Z $SE -e 's/$/ /' | \ $Z $R "$K_TAB" "$K_BLANC" \ $Z >>! $FiLeTmP_COULEURS.2 $Z # Reconstitution du fichier original ('$_____FSurface' avec les couleurs renormalisees... # $Z $DELETE $_____FSurface $Z $MV $FiLeTmP_COULEURS.2 $_____FSurface $Z FileTmpE FiLeTmP_COULEURS