####################################################################################################################################### # # # R E D I M E N S I O N N E M E N T D ' I M A G E S D E ' $xiHi ' : # # # # # # Author of '$xiia/.BOTTICELLI.71.1.$U' : # # # # Jean-Francois COLONNA (LACTAMME, 20220216082811). # # # ####################################################################################################################################### #20220216102551____:$Z setParam _____FacteurX 0.75 # $Z setParam _____FacteurX 0.72 $Z setParam _____FacteurY 0.75 $Z setParam _____Seuil $GRIS_5 $Z $xci/luminance.01$X \ $Z A=$_____ImageA \ $Z $formatI | \ $Z $xci/complement$X \ $Z $formatI | \ $Z $xci/seuil$X \ $Z seuil=$_____Seuil \ $Z R=$xTV/IMAGE_REDIMENSIONNEE.21 \ $Z $formatI $Z set SaVe_dimX=$dimX $Z set SaVe_dimY=$dimY $Z set DiMeNsIoN_X=`calculINS $_____FacteurX*$dimX` $Z set DiMeNsIoN_Y=`calculINS $_____FacteurY*$dimY` $Z set formatI_A1="$formatI" $Z set formatI_R2=`echo "$formatI" | $SE -e "s/\(=\)/R\1/g"` $Z gFITn FIT1 $DiMeNsIoN_X $DiMeNsIoN_Y $Z FIT1 $Z set formatI_A2="$formatI" $Z set formatI_R1=`echo "$formatI" | $SE -e "s/\(=\)/R\1/g"` $Z $xci/format.01$X \ $Z A=$xTV/IMAGE_REDIMENSIONNEE.21 \ $Z $formatI_A1 \ $Z mode=7 \ $Z R=$xTV/IMAGE_REDIMENSIONNEE.22 \ $Z $formatI_R1 $Z $xci/format.01$X \ $Z A=$xTV/IMAGE_REDIMENSIONNEE.22 \ $Z $formatI_A2 \ $Z mode=2 \ $Z R=$xTV/IMAGE_REDIMENSIONNEE.23 \ $Z $formatI_R2 $Z gFITn FIT2 $SaVe_dimX $SaVe_dimY $Z FIT2