#######################################################################################################################################
# #
# G E N E R A T I O N D E T A P I S D E S I E R P I N S K I : #
# #
# #
# Author of '$xiirf/.SIER.51.1.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, 20140910090028). #
# #
#######################################################################################################################################
$Z setParam _____RapportHomothetie `GetParam $xrf/EpongeDeMenger.01$X rapport`
$Z # Parametre introduit le 20171106105450. #
$Z setParam _____Cote `GetParam $xrf/EpongeDeMenger.01$X cote`
$Z # Parametre introduit le 20171112095816. #
$Z setParam _____OptimiserCote `GetParam $xrf/EpongeDeMenger.01$X optimiser_cote`
$Z # Parametre introduit le 20171113102910. #
$Z setParam _____EditerCote `GetParam $xrf/EpongeDeMenger.01$X editer_cote`
$Z # Parametre introduit le 20171113102910. #
$Z setParam _____Iterations 4
$Z setParam _____DimensionXY `calculINS 333*3`
$Z # Parametre introduit le 20140921091620. #
$Z # #
$Z # Doit etre un multiple de 3 ('v $xrf/EpongeDeMenger.01$K NON_DIVISIBLE')... #
$Z setParam _____Zmax `calculINS (5*3)-1`
$Z # Doit etre un multiple de 3 moins 1 ('v $xrf/EpongeDeMenger.01$K NON_DIVISIBLE')... #
$Z setParam _____NiveauBordure $NOIR
$Z setParam _____NiveauEponge $GRIS_8
$Z setParam _____NiveauComplement $GRIS_2
$Z setParam _____MarquerBordX FAUX
$Z # Parametre introduit le 20150326155834. #
$Z setParam _____MarquerBordY FAUX
$Z # Parametre introduit le 20150326155834. #
$Z setParam _____MarquerBordZ FAUX
$Z # Parametre introduit le 20150326155834. #
$Z setParam _____NiveauBord $GRIS_4
$Z # Parametre introduit le 20150326155834. #
$Z setParam _____ModeFormat 7
$Z # Parametre introduit le 20171112082547. #
$Z setParam _____ParamMenger "$K_VIDE"
$Z # Parametre introduit le 20171216100810... #
$Z SformatI
$Z # Doit etre un multiple de 3 ('v $xrf/EpongeDeMenger.01$K NON_DIVISIBLE')... #
$Z set XYmax=`calculINS $_____DimensionXY-1`
$Z XYmaxNe $XYmax $XYmax
$Z $xrf/EpongeDeMenger.01$X \
$Z rapport_homothetie=$_____RapportHomothetie \
$Z cote=$_____Cote \
$Z optimiser_cote=$_____OptimiserCote \
$Z editer_cote=$_____EditerCote \
$Z nombre_iterations=$_____Iterations \
$Z tapis_Sierpinski=VRAI \
$Z niveau_eponge=$_____NiveauEponge \
$Z niveau_complement_eponge=$_____NiveauComplement \
$Z marquer_bord_X=$_____MarquerBordX \
$Z marquer_bord_Y=$_____MarquerBordY \
$Z marquer_bord_Z=$_____MarquerBordZ \
$Z niveau_bord_eponge=$_____NiveauBord \
$Z $_____ParamMenger \
$Z R=$_____imageR \
$Z Zmax=$_____Zmax \
$Z $formatI
$Z $xci/format.01$X \
$Z A=$_____imageR \
$Z $formatI \
$Z mode=$_____ModeFormat \
$Z marquer=VRAI niveau=$_____NiveauBordure \
$Z R=$_____imageR \
$Z $sformatIR
$Z RformatI