#######################################################################################################################################
# #
# G E N E R A T I O N D E S I M A G E S D E Q U E L Q U E S C L I E N T S : #
# #
# #
# Author of '$xivP/disk.000000008/face.2/.CHUR.3.12.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss). #
# #
#######################################################################################################################################
$Z set _____Palette=`$GRE 'set .*=\$xiP/' $xrFf/FTcorrele$vv$Y | $SE -e "s/^.*=//"`
$Z set _____Palette=`eval echo "$_____Palette"`
$Z $xci/init$X \
$Z niveau=$NOIR \
$Z $formatI | \
$Z $xci/mire$X \
$Z h=3 \
$Z $formatI | \
$Z $xci/vraies_C$X \
$Z p=$_____Palette \
$Z RVB=VRAI \
$Z R=$xTV/MIRE \
$Z $formatI
$Z
$Z eval `$xci/genere$X \\\
$Z commande='($xci/scale$X \\\
$Z A=$xTV/MIRE$%s \\\
$Z a=0.50 \\\
$Z R=$xTV/MIRE$%s \\\
$Z $formatI)' \\\
$Z en_tete=FAUX RVB=VRAI postfixes_RVB=FAUX separateur=VRAI`
$Z set Pmessages="anti_aliasing=VRAI taille=2 X=0.50 Y=0.04 centrer=VRAI"
$c #include <stdio.h>
$c
$c #define DECOUPE0 1
$c #define DECOUPE 4
$c
$c #define DIMENSION ((int)sqrt((double)DECOUPE))
$c
$c extern int atoi();
$c extern char *getenv();
$c
$c extern double sqrt();
$c
$c #define CLIENT0 (atoi(getenv("PremiereA")))
$c #define CLIENT (atoi(getenv("DerniereA")))
$c
$c int main()
$c {
$c int client;
$c
$c for (client=CLIENT0 ; client<=CLIENT ; client=client+1)
$c {
$c int numero;
$c
$c for (numero=DECOUPE0 ; numero<=DECOUPE ; numero=numero+1)
$c {
$c int numero_X=((numero-DECOUPE0)%DIMENSION)+1;
$c int numero_Y=((numero-DECOUPE0)/DIMENSION)+1;
$c
$c printf("correle
$c $_____Fichier
$c %d
$c $_____CritereX%1d%1d
$c $_____CritereY%1d%1d
$c $xTV/CHUR.1.%04d
$c %c$_____MessageX%1d%1d%c
$c %c$_____MessageY%1d%1d%c
$c %c%c\n"
$c ,client
$c ,numero_Y,numero_X
$c ,numero_Y,numero_X
$c ,numero
$c ,'"',numero_Y,numero_X,'"'
$c ,'"',numero_Y,numero_X,'"'
$c ,'"','"'
$c );
$c }
$c
$c printf("$xci/reduction_04$Z
$c $xTV/CHUR.1.
$c $xTV/CHUR
$c %d
$c %d\n"
$c ,DECOUPE0,DECOUPE
$c );
$c
$c printf("$xci/cache$X
$c A=$xTV/MIRE$ROUGE
$c M=$xTV/CHUR$R04$ROUGE
$c $formatI |
$c $xci/message$X
$c $Pmessages
$c message=%c$_____BaseDeDonnees : Client=%08d%c
$c R=$_____images.%04d$ROUGE
$c $formatI\n"
$c ,'"',client,'"'
$c ,client
$c );
$c printf("$xci/cache$X
$c A=$xTV/MIRE$VERTE
$c M=$xTV/CHUR$R04$VERTE
$c $formatI |
$c $xci/message$X
$c $Pmessages
$c message=%c$_____BaseDeDonnees : Client=%08d%c
$c R=$_____images.%04d$VERTE
$c $formatI\n"
$c ,'"',client,'"'
$c ,client
$c );
$c printf("$xci/cache$X
$c A=$xTV/MIRE$BLEUE
$c M=$xTV/CHUR$R04$BLEUE
$c $formatI |
$c $xci/message$X
$c $Pmessages
$c message=%c$_____BaseDeDonnees : Client=%08d%c
$c R=$_____images.%04d$BLEUE
$c $formatI\n"
$c ,'"',client,'"'
$c ,client
$c );
$c }
$c }