Modification des blocs Dire; DireT, Penser, PenserT
[mp-scratch.git] / src / Apparence.mp
index ed7a6d8..bd7b977 100644 (file)
@@ -24,7 +24,7 @@ vardef DireT(expr phrase,tps)=
   save $;
   picture $,texto;
   texto=image(
-      label.lrt(LATEX("\bfseries\color{white}dire \colorbox{white}{\textcolor{black}{\normalfont "&phrase&"}} pendant \colorbox{white}{\textcolor{black}{"&if numeric tps:decimal(tps)&"}}" else: tps fi&" secondes"),if unknown _coinprec: (0,0) else:_coinprec fi);
+      label.lrt(LATEX("\bfseries\color{white}dire "&phrase&" pendant \colorbox{white}{\textcolor{black}{"&if numeric tps:decimal(tps)&"}}" else: tps fi&" secondes"),if unknown _coinprec: (0,0) else:_coinprec fi);
   );
 $=AffichageA shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageA);
 _coinprec:=llcorner $;
@@ -36,7 +36,7 @@ vardef Dire(expr phrase)=
   save $;
   picture $,texto;
   texto=image(
-      label.lrt(LATEX("\bfseries\color{white}dire \colorbox{white}{\normalfont\textcolor{black}{"&phrase&"}}"),if unknown _coinprec: (0,0) else:_coinprec fi);
+      label.lrt(LATEX("\bfseries\color{white}dire "&phrase&""),if unknown _coinprec: (0,0) else:_coinprec fi);
   );
 $=AffichageA shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageA);
 _coinprec:=llcorner $;
@@ -48,7 +48,7 @@ vardef PenserT(expr phrase,tps)=
   save $;
   picture $,texto;
   texto=image(
-      label.lrt(LATEX("\bfseries\color{white}penser \colorbox{white}{\normalfont\textcolor{black}{"&phrase&"}} pendant \colorbox{white}{\textcolor{black}{"&if numeric tps:decimal(tps)&"}}" else: tps fi&" secondes"),if unknown _coinprec: (0,0) else:_coinprec fi);
+      label.lrt(LATEX("\bfseries\color{white}penser "&phrase&" pendant \colorbox{white}{\textcolor{black}{"&if numeric tps:decimal(tps)&"}}" else: tps fi&" secondes"),if unknown _coinprec: (0,0) else:_coinprec fi);
   );
 $=AffichageA shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageA);
 _coinprec:=llcorner $;
@@ -60,7 +60,7 @@ vardef Penser(expr phrase)=
   save $;
   picture $,texto;
   texto=image(
-      label.lrt(LATEX("\bfseries\color{white}penser \colorbox{white}{\normalfont\textcolor{black}{"&phrase&"}}"),if unknown _coinprec: (0,0) else:_coinprec fi);
+      label.lrt(LATEX("\bfseries\color{white}penser "&phrase&""),if unknown _coinprec: (0,0) else:_coinprec fi);
   );
 $=AffichageA shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageA);
 _coinprec:=llcorner $;

Licence Creative Commons Les fichiers de Syracuse sont mis à disposition (sauf mention contraire) selon les termes de la
Licence Creative Commons Attribution - Pas d’Utilisation Commerciale - Partage dans les Mêmes Conditions 4.0 International.