#######################################################################################################################################
# #
# G E N E R A T I O N D ' U N B I L L I A R D S E M I - C I R C U L A I R E S I M P L E : #
# #
# #
# Author of '$xiirk/.REFN.D5.1.$U' : #
# #
# Jean-Francois COLONNA (LACTAMME, 20220620122849). #
# #
#######################################################################################################################################
$Z SformatI
# Par compatibilite avec 'v $xivP_d09_f2/.REFL.c.21.$U SformatI'... #
$Z set TrAnSlAtIoN=0.5
$Z $xci/gauss$X \
$Z c=5 \
$Z TRANSLATION_OY=$TrAnSlAtIoN \
$Z $formatI | \
$Z $xci/complement$X \
$Z $formatI | \
$Z $xci/seuil$X \
$Z seuil=`calculINS $BLANC-$SeuilBOITE` \
$Z $formatI | \
$Z $xci/complement$X \
$Z $formatI | \
$Z $xci/scroll$X \
$Z trY=`calcul $TrAnSlAtIoN/2` \
$Z R=$xTV/BOITE.6 \
$Z $formatI