fenetrecas (7may23)

git-svn-id: svn://tug.org/texlive/trunk@67043 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 39 insertions, 12 deletions

diff --git a/Master/texmf-dist/doc/latex/fenetrecas/FenetreCas-doc.pdf b/Master/texmf-dist/doc/latex/fenetrecas/FenetreCas-doc.pdf
index 25954ebfced..b7e764b0cf3 100644
--- a/Master/texmf-dist/doc/latex/fenetrecas/FenetreCas-doc.pdf
+++ b/Master/texmf-dist/doc/latex/fenetrecas/FenetreCas-doc.pdf
diff --git a/Master/texmf-dist/doc/latex/fenetrecas/FenetreCas-doc.tex b/Master/texmf-dist/doc/latex/fenetrecas/FenetreCas-doc.tex
index 834a013182b..7b2606afd4b 100644
--- a/Master/texmf-dist/doc/latex/fenetrecas/FenetreCas-doc.tex
+++ b/Master/texmf-dist/doc/latex/fenetrecas/FenetreCas-doc.tex
@@ -3,8 +3,8 @@
 % arara: pdflatex: {shell: yes, synctex: no, interaction: batchmode} if found('log', '(undefined references|Please rerun|Rerun to get)')
 
 \documentclass[french,a4paper,11pt]{article}
-\def\TPversion{0.1.0}
-\def\TPdate{17 Mars 2023}
+\def\TPversion{0.1.1}
+\def\TPdate{7 mai 2023}
 \usepackage[utf8]{inputenc}
 \usepackage[T1]{fontenc}
 \usepackage{amsmath,amssymb}
@@ -265,6 +265,8 @@ Le fonctionnement global est :
 
 \section{Historique}
 
+\verb|v0.1.1|~:~~~~Clés [Fond] et [FondCouleur] pour le fond des lignes
+
 \verb|v0.1.0|~:~~~~Version initiale.
 
 \hspace*{1cm}
@@ -363,6 +365,8 @@ Le premier argument, optionnel et entre \texttt{[...]} propose les \Cle{clés} s
 	\hfill~défaut : \Cle{true}
 	\item \Cle{TailleCommande} pour la taille de la commande ; \hfill~défaut : \Cle{\textbackslash normalsize}
 	\item \Cle{TailleResultat} pour la taille du résultat ; \hfill~défaut : \Cle{\textbackslash large}
+	\item le booléen \Cle{Fond} activer la coloration de fond de la ligne ; \hfill~défaut : \Cle{false}
+	\item \Cle{CouleurFond} pour spécifier une couleur de fond si \Cle{Fond=true} ; \hfill~défaut : \Cle{white}
 	\item \Cle{MargeH} pour spécifier l'espacement horizontal entre les calculs et les bords verticaux ;
 	
 	\hfill~défaut : \Cle{0.2}
@@ -380,6 +384,7 @@ Les arguments obligatoires, et entre \texttt{\{...\}}, correspondent à la comma
 	\item les tailles des caractères sont fixées par les \Cle{clés} précédemment explicitées ;
 	\item la saisie est libre au niveau du contenu, de la police et des couleurs.
 \end{itemize}
+\vspace*{-\baselineskip}\leavevmode
 \end{tipblock}
 
 \begin{PresentationCode}{}
@@ -397,7 +402,7 @@ Les arguments obligatoires, et entre \texttt{\{...\}}, correspondent à la comma
 		{(1/4+1/3)/(1/5+2/7)}
 		{$\rightarrow$ \: $\dfrac{\dfrac14+\dfrac13}{\dfrac15+\dfrac27}=
 			\fpeval{(1/4+1/3)/(1/5+2/7)}$}
-	\LigneCalculsGeogebra[HauteurAuto=false,HauteurLigne=5]
+	\LigneCalculsGeogebra[HauteurAuto=false,HauteurLigne=5,Fond,CouleurFond=cyan!10]
 		{(1+i)\textasciicircum{}2}
 		{$2\text{i}$}
 \end{CalculFormelGeogebra}
@@ -497,6 +502,10 @@ Le premier argument, optionnel et entre \texttt{[...]} propose les \Cle{clés} s
 	\item \Cle{PosRes} pour la position du résultat ; \hfill~défaut : \Cle{centre}
 	\item \Cle{TailleCommande} pour la taille de la commande ; \hfill~défaut : \Cle{\textbackslash normalsize}
 	\item \Cle{TailleResultat} pour la taille du résultat ; \hfill~défaut : \Cle{\textbackslash large}
+	\item le booléen \Cle{Fond} activer la coloration de fond de la ligne ; \hfill~défaut : \Cle{false}
+	\item \Cle{CouleurFond} pour spécifier une couleur (sous la forme \Cle{Couleur} ou \Cle{CouleurCmd/CouleurRes}) de fond si \Cle{Fond=true} ;
+	
+	\hfill~défaut : \Cle{white}
 	\item \Cle{MargeH} pour spécifier l'espacement horizontal entre les calculs et les bords verticaux ;
 	
 	\hfill~défaut : \Cle{0.15}
@@ -530,10 +539,10 @@ Un exemple en ligne :~
 	\LigneCalculsXcas
 		{f(x):=1+sqrt(x+3)}
 		{$x \rightarrow 1+\sqrt{x+3}$}
-	\LigneCalculsXcas
+	\LigneCalculsXcas[,Fond,CouleurFond=yellow!10]
 		{\texttt{Dériver[exp(0.1*x)]}}
 		{\texttt{x $\rightarrow$ 0.1*exp(0.1*x)}}
-	\LigneCalculsXcas[TailleResultat=\Huge]
+	\LigneCalculsXcas[TailleResultat=\Huge,Fond,CouleurFond=orange!5/cyan!5]
 		{(1/4+1/3)/(1/5+2/7)}
 		{$\rightarrow$ \: $\dfrac{\dfrac14+\dfrac13}{\dfrac15+\dfrac27}$}
 	\end{CalculFormelXcas}
diff --git a/Master/texmf-dist/tex/latex/fenetrecas/FenetreCas.sty b/Master/texmf-dist/tex/latex/fenetrecas/FenetreCas.sty
index 56b12746f53..d192cbe6927 100644
--- a/Master/texmf-dist/tex/latex/fenetrecas/FenetreCas.sty
+++ b/Master/texmf-dist/tex/latex/fenetrecas/FenetreCas.sty
@@ -3,7 +3,8 @@
 % or later, see http://www.latex-project.org/lppl.txtf
 
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{FenetreCas}[2023/03/17 0.1.0 Simuer une fenetre CAS type Geogebra ou Xcas]
+\ProvidesPackage{FenetreCas}[2023/05/07 0.1.1 Simuler une fenetre CAS type Geogebra ou Xcas]
+% 0.1.1	Clés [FondCouleur] pour le fond des cases
 % 0.1.0	Version initiale
 
 %------Option(s)
@@ -86,7 +87,8 @@
 	TailleResultat=\def\GEOCFtailleres{#1},%
 	ElargirAuto=\def\GEOCFelargirauto{#1},%
 	MargeV=\def\GEOCFoffset{#1},%
-	MargeH=\def\GEOCFoffseth{#1}
+	MargeH=\def\GEOCFoffseth{#1},%
+	CouleurFond=\def\GEOCFcolfond{#1}
 }
 \setKVdefault[paramlgeogebra]{%
 	HauteurLigne=2,%
@@ -95,7 +97,9 @@
 	ElargirAuto=1,%
 	HauteurAuto=true,%
 	MargeV=6pt,%
-	MargeH=0.2
+	MargeH=0.2,%
+	Fond=false,%
+	CouleurFond=white
 }
 
 \NewDocumentCommand\LigneCalculsGeogebra{ O{} m m }{%
@@ -124,7 +128,10 @@
 	\coordinate (A3\GGBL) at ($(A1\GGBL) + ({\GEOCFlargnum},0)$);
 	%les tracés
 	\draw[semithick,fill=\GEOCFcoulnum] (A0\GGBL) rectangle (A3\GGBL) node[midway,font=\GEOCFpolnum] {\GGBL} ;
-	\draw[semithick] (A2\GGBL) rectangle++({\GEOCFlarg-\GEOCFlargnum},{-\GEOCFhauteur}) ;
+	\ifboolKV[paramlgeogebra]{Fond}
+		{\draw[semithick,fill=\GEOCFcolfond] (A2\GGBL) rectangle++({\GEOCFlarg-\GEOCFlargnum},{-\GEOCFhauteur}) ;}
+		{\draw[semithick] (A2\GGBL) rectangle++({\GEOCFlarg-\GEOCFlargnum},{-\GEOCFhauteur}) ;}
+	
 	%les commande/résultat
 	\ifboolKV[paramlgeogebra]{HauteurAuto}
 		{%
@@ -204,7 +211,8 @@
 	MargeH=\def\XCCFoffseth{#1},%
 	CouleurCmd=\def\XCCFcoulcmd{#1},%
 	CouleurRes=\def\XCCFcoulres{#1},%
-	PosRes=\def\XCCFposres{#1}
+	PosRes=\def\XCCFposres{#1},%
+	CouleurFond=\def\XCCFcolfond{#1}
 }
 
 \setKVdefault[paramlgxcas]{%
@@ -215,7 +223,9 @@
 	MargeH=0.15,%
 	CouleurCmd=red,%
 	CouleurRes=blue,%
-	PosRes=centre
+	PosRes=centre,%
+	Fond=false,%
+	CouleurFond=white
 }
 
 \NewDocumentCommand\LigneCalculsXcas{ O{} m m }{%
@@ -242,7 +252,15 @@
 	\coordinate (A2\XCL) at ($(A0\XCL) + ({\XCCFlarg},0)$);
 	\coordinate (A3\XCL) at ($(A1\XCL) + ({\XCCFlarg},0)$);
 	%les tracés
-	\draw[semithick,\XCCFcouleur] (A0\XCL) rectangle (A3\XCL) ;
+	\ifboolKV[paramlgxcas]{Fond}%si on met une couleur de fond
+		{%
+			\IfSubStr{\XCCFcolfond}{/}%
+				{\StrCut{\XCCFcolfond}{/}{\XCCFcolfondC}{\XCCFcolfondR}}%
+				{\def\XCCFcolfondC{\XCCFcolfond}\def\XCCFcolfondR{\XCCFcolfond}}%
+			\draw[semithick,\XCCFcouleur,fill=\XCCFcolfondC] (A0\XCL) rectangle++ ($(0,{-2*\the\offsetcfxcas-\XCCFelargirauto*\the\hauteurboitecmdxcas})+({\XCCFlarg},0)$) ;%
+			\draw[semithick,\XCCFcouleur,fill=\XCCFcolfondR] ($(A0\XCL)+(0,{-2*\the\offsetcfxcas-\XCCFelargirauto*\the\hauteurboitecmdxcas})$) rectangle (A3\XCL) ;%
+		}
+		{\draw[semithick,\XCCFcouleur] (A0\XCL) rectangle (A3\XCL) ;}
 	%LA COMMANDE À GAUCHE
 	\draw ($(A0\XCL) + ({\XCCFoffseth},{-\the\offsetcfxcas-0.5*\XCCFelargirauto*\the\hauteurboitecmdxcas})$) node[\XCCFcoulcmd,font=\XCCFtaillecmd,right] {#2} ;
 	%LE RÉSULTAT