####################################################################################################################################### # # # C O N D I T I O N S I N I T I A L E S " C H A I N E " D ' U N A U T O M A T E C E L L U L A I R E # # M O N O D I M E N S I O N N E L B I N A I R E E L E M E N T A I R E : # # # # # # Author of '$xiird/.AC1B.1.14.$U' : # # # # Jean-Francois Colonna (LACTAMME, 20081212114120). # # # ####################################################################################################################################### $Z setParam _____TranslationX 50 $Z setParam _____Chaine "1" $Z Pal $Z @ AbScIsSe = $Xmax - $_____TranslationX $Z set SeUiL=`echo "0" | $OD | $R "$K_TAB" "$K_BLANC" | $GRE " " | $AW ' { print $2 } ' | $SE -e 's/^.*\(..\)$/0x\1/'` $Z # Conversion du caractere "0" en un code hexa-decimal... # $Z $xci/init$X \ $Z niveau=$NOIR \ $Z $formatI | \ $Z $xci/S_points$X \ $Z X=$AbScIsSe \ $Z Y=$Ymin \ $Z chaine="$_____Chaine" \ $Z $formatI | \ $Z $xci/seuil$X \ $Z seuil=$SeUiL \ $Z R=$_____CondInitiales \ $Z $formatI