#######################################################################################################################################
# #
# G E N E R A T I O N D ' U N P L A N P E R T U B E V E R T I C A L E M E N T P A R U N E I M A G E #
# P A R L A M E T H O D E D E S P R O J E C T O R S : #
# #
# #
# Author of '$xiirs/.PROJ.51.1.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, 20041128213736). #
# #
#######################################################################################################################################
$Z SETParam _____NormaliserFz $EXIST
$Z # Parametre introduit le 20050208122749... #
$Z setParam _____Ppu 0.025
$Z # Parametre introduit le 20050208113155... #
$Z setParam _____Ppv 0.025
$Z # Parametre introduit le 20050208113155... #
$Z setParam _____Peu 20
$Z # Parametre introduit le 20050208113155... #
$Z setParam _____Pev 20
$Z # Parametre introduit le 20050208113155... #
$Z setParam _____Pdpu 40
$Z # Parametre introduit le 20050208113155... #
$Z setParam _____Pdpv 40
$Z # Parametre introduit le 20050208113155... #
$Z setParam _____dxyzFxyz "$K_VIDE"
$Z # Parametre introduit le 20050313182559... #
$Z setParam _____Hauteur 0.4
$Z setParam _____Zoom 1.0
$Z setParam _____RotationX 0
$Z setParam _____RotationY 0
$Z setParam _____RotationZ 0
$Z setParam _____DepthCueing 0.2
$Z # Parametre introduit le 20160413091457... #
$Z # #
$Z # On rappelle que : #
$Z # #
$Z # _____DepthCueing=1 : pas de depth-cueing, #
$Z # _____DepthCueing=0 : depth-cueing maximal. #
$Z # #
$Z setParam _____Rayon 0.012
$Z # Parametre introduit le 20050208134333... #
$Z setParam _____Fz_prolonger_u FAUX
$Z # Parametre introduit le 20050313103948... #
$Z setParam _____Fz_periodiser_u VRAI
$Z # Parametre introduit le 20050313103948... #
$Z setParam _____Fz_prolonger_v FAUX
$Z # Parametre introduit le 20050313103948... #
$Z setParam _____Fz_periodiser_v VRAI
$Z # Parametre introduit le 20050313103948... #
$Z setParam _____Arguments "$K_VIDE"
$Z # Parametre introduit le 20060130141241 pour permettre, par exemple, de generer les normales. #
#20120423150044____:$Z Pal #
$Z $xci/lineaire$X \
$Z standard=FAUX \
$Z carre_X_CHAMP_3D_____compatibilite_20100210=VRAI \
$Z carre_Y_CHAMP_3D_____compatibilite_20100210=VRAI \
$Z carre_X_CHAMP_3D=FAUX carre_Y_CHAMP_3D=FAUX \
$Z amplificateur=2 translateur=-1 \
$Z Tx=0 Ty=0 \
$Z A=1 B=0 C=0 \
$Z R=$xTV/Fx \
$Z $formatI
$Z # Les compatibilites "compatibilite_20100210=VRAI" ont ete introduites le 20100914102959... #
$Z $xci/lineaire$X \
$Z standard=FAUX \
$Z carre_X_CHAMP_3D_____compatibilite_20100210=VRAI \
$Z carre_Y_CHAMP_3D_____compatibilite_20100210=VRAI \
$Z carre_X_CHAMP_3D=FAUX carre_Y_CHAMP_3D=FAUX \
$Z amplificateur=2 translateur=-1 \
$Z Tx=0 Ty=0 \
$Z A=0 B=1 C=0 \
$Z R=$xTV/Fy \
$Z $formatI
$Z # Les compatibilites "compatibilite_20100210=VRAI" ont ete introduites le 20100914102959... #
$Z if ($_____NormaliserFz == $EXIST) then
$Z $xci/normalise.01$X \
$Z A=$xTV/Fz \
$Z R=$xTV/Fz \
$Z $formatI
$Z else
$Z endif
$Z if ($?_____imagesRFx == $EXIST) then
$Z $xci/acces$X \
$Z A=$xTV/Fx \
$Z standard=FAUX \
$Z zero=FAUX \
$Z R=$_____imagesRFx \
$Z $formatI
$Z else
$Z endif
$Z if ($?_____imagesRFy == $EXIST) then
$Z $xci/acces$X \
$Z A=$xTV/Fy \
$Z standard=FAUX \
$Z zero=FAUX \
$Z R=$_____imagesRFy \
$Z $formatI
$Z else
$Z endif
$Z if ($?_____imagesRFz == $EXIST) then
$Z $xci/acces$X \
$Z A=$xTV/Fz \
$Z standard=FAUX \
$Z zero=FAUX \
$Z R=$_____imagesRFz \
$Z $formatI
$Z else
$Z endif
$Z if ($?_____imagesRZ == $EXIST) then
$Z set Z_BuFfEr="Z-Buffer=VRAI imageZ=$_____imagesRZ mrz=VRAI"
$Z # Parametre introduit le 20050419155134 afin de pouvoir utiliser 'v $xci/DepthFiel.11$Z'. #
$Z else
$Z set Z_BuFfEr="$K_VIDE"
$Z endif
$Z set Parametres="$K_VIDE"
$Z set Parametres="$Parametres"" np=1"
$Z set Parametres="$Parametres"" brume=FAUX"
$Z set Parametres="$Parametres"" pu=$_____Ppu pv=$_____Ppv"
$Z set Parametres="$Parametres"" eu=$_____Peu ev=$_____Pev"
$Z set Parametres="$Parametres"" dpu=$_____Pdpu dpv=$_____Pdpv"
$Z set Parametres="$Parametres"" $_____dxyzFxyz"
$Z set Parametres="$Parametres"" ddu=0.001 ddv=0.001"
$Z set Parametres="$Parametres"" ZOOM=$_____Zoom"
$Z set Parametres="$Parametres"" ROTATION_OX=$_____RotationX"
$Z set Parametres="$Parametres"" ROTATION_OY=$_____RotationY"
$Z set Parametres="$Parametres"" ROTATION_OZ=$_____RotationZ"
$Z set Parametres="$Parametres"" Zminimum=$_____DepthCueing ZminimumT=$_____DepthCueing"
$Z set Parametres="$Parametres"" Zmaximum=1 ZmaximumT=1"
$Z set Parametres="$Parametres"" Lz=100"
$Z set Parametres="$Parametres"" rayon_de_visualisation=$_____Rayon"
$Z set Parametres="$Parametres"" N_AU_CARRE=VRAI"
$Z set Parametres="$Parametres"" edc=VRAI"
$Z $xrs/project2D.11$X \
$Z aFx=1.0 Fx=$xTV/Fx \
$Z aFy=1.0 Fy=$xTV/Fy \
$Z aFz=$_____Hauteur Fz=$xTV/Fz \
$Z mu=0 Mu=1.0 \
$Z mv=0 Mv=1.0 \
$Z Fx_periodiser_u=FAUX Fy_periodiser_u=FAUX Fz_periodiser_u=$_____Fz_periodiser_u \
$Z Fx_symetriser_u=FAUX Fy_symetriser_u=FAUX Fz_symetriser_u=FAUX \
$Z Fx_prolonger_u=VRAI Fy_prolonger_u=VRAI Fz_prolonger_u=$_____Fz_prolonger_u \
$Z Fx_periodiser_v=FAUX Fy_periodiser_v=FAUX Fz_periodiser_v=$_____Fz_periodiser_v \
$Z Fx_symetriser_v=FAUX Fy_symetriser_v=FAUX Fz_symetriser_v=FAUX \
$Z Fx_prolonger_v=VRAI Fy_prolonger_v=VRAI Fz_prolonger_v=$_____Fz_prolonger_v \
$Z $Parametres \
$Z $Z_BuFfEr \
$Z chiffres=0 \
$Z R=$_____imagesR \
$Z $_____Arguments \
$Z $formatI
$Z # Les champs {Fx,Fy} n'etant pas periodiques (contrairement a {Fz}) ne doivent pas etre #
$Z # "periodises" mais "prolonges". Dans le cas contraire, cela donne des artefacts (des points #
$Z # "incoherents") lies a des problemes d'interpolations aux bords des champs, lorsqu'il faut #
$Z # utiliser la periodicite supposee mais inexistante... #
$Z $DELETE $xTV/Fx
$Z $DELETE $xTV/Fy
$Z $DELETE $xTV/Fz