From: Christophe Poulain <cp@DebianFixe.home>
Date: Fri, 17 Feb 2017 13:54:20 +0000 (+0100)
Subject: Ajout des nouvelles balises lorsque la scène est sélectionnée. Mise à jour de la... 
X-Git-Url: https://melusine.eu.org/syracuse/G/git/?p=mp-scratch.git;a=commitdiff_plain;h=e59b6180eb100cbc58fc230b38169024a754aa73

Ajout des nouvelles balises lorsque la scène est sélectionnée. Mise à jour de la documentation.
---

diff --git a/doc/mp-scratch.pdf b/doc/mp-scratch.pdf
index 5a37bac..0effbd8 100644
Binary files a/doc/mp-scratch.pdf and b/doc/mp-scratch.pdf differ
diff --git a/doc/mp-scratch.tex b/doc/mp-scratch.tex
index bf1270a..3309912 100644
--- a/doc/mp-scratch.tex
+++ b/doc/mp-scratch.tex
@@ -185,15 +185,15 @@ Les \og opérateurs\footnote{Je nomme \og opérateurs\fg\ les variables ou comma
       \par\hfill\includegraphics{CommandeApparence.5}
     \item[\textbullet]\lstinline!draw Cacher;!
       \par\hfill\includegraphics{CommandeApparence.6}
-    \item[\textbullet]\lstinline!draw Basculer("\opAp{costume2}");!
+    \item[\textbullet]\lstinline!draw Basculer("\opApMenu{costume2}");!
       \par\hfill\includegraphics{CommandeApparence.7}
     \item[\textbullet]\lstinline!draw CostumeSuivant;!
       \par\hfill\includegraphics{CommandeApparence.8}
-    \item[\textbullet]\lstinline!draw BasculerAR("\opAp{arriere-plan2}");!
+    \item[\textbullet]\lstinline!draw BasculerAR("\opApMenu{arriere-plan2}");!
       \par\hfill\includegraphics{CommandeApparence.9}
-    \item[\textbullet]\lstinline!draw AjouterEffet("\opAp{couleur}",10);!
+    \item[\textbullet]\lstinline!draw AjouterEffet("\opApMenu{couleur}",10);!
       \par\hfill\includegraphics{CommandeApparence.10}
-    \item[\textbullet]\lstinline!draw MettreEffet("\opAp{couleur}",10);!
+    \item[\textbullet]\lstinline!draw MettreEffet("\opApMenu{couleur}",10);!
       \par\hfill\includegraphics{CommandeApparence.11}
     \item[\textbullet]\lstinline!draw AnnulerEffet;!
       \par\hfill\includegraphics{CommandeApparence.12}
@@ -206,8 +206,15 @@ Les \og opérateurs\footnote{Je nomme \og opérateurs\fg\ les variables ou comma
     \item[\textbullet]\lstinline!draw DeplacerAP("\opOp{$\opMouv{abscisse x}\bm{+}\opSimple{10}$}");!
       \par\hfill\includegraphics{CommandeApparence.16}
     \end{itemize}
+\vspace{1em}\par Quand \og la scène\fg\ est sélectionnée, on dispose également des commandes :
+    \begin{itemize}
+    \item[\textbullet]\lstinline!draw BasculerARA("\opApMenu{arriere-plan2}");!
+      \par\hfill\includegraphics{CommandeApparence.20}
+    \item [\textbullet]\lstinline!draw ARSuivant;!
+      \par\hfill\includegraphics{CommandeApparence.21}
+    \end{itemize}
     \par\vspace*{2em}\par Les \og opérateurs\fg\ 
-\[\includegraphics{CommandeApparence.17}\kern0.1\linewidth\includegraphics{CommandeApparence.18}\kern0.1\linewidth\includegraphics{CommandeApparence.19}\]
+\[\includegraphics{CommandeApparence.17}\kern0.1\linewidth\includegraphics{CommandeApparence.18}\kern0.1\linewidth\includegraphics{CommandeApparence.19}\kern0.1\linewidth\includegraphics{CommandeApparence.22}\]
 s'obtiennent avec la commande \LaTeX\ \lstinline!\opAp{}!.
     \par\vspace*{2em}\par
   \item[Groupe {\sffamily Son}]\hfil\newline
@@ -326,6 +333,12 @@ label(LATEX("\opList{\opSousList{Pythagore}
   \item[\textbullet]\lstinline!draw EnvoyerMessageA("message1");!
     \par\hfill\includegraphics{CommandeEvenements.8}
   \end{itemize}
+\vspace{1em}\par
+Quand \og la scène\fg\ est sélectionnée, on dispose de :
+\begin{itemize}
+  \item[\textbullet]\lstinline!draw QScenePressee;!
+    \par\hfill\includegraphics{CommandeEvenements.9}\footnote{C'est le seul endroit où il y a une majuscule dans les notations {\sffamily Scratch}\ldots}
+\end{itemize}
     \vspace*{2em}\par
 \item[Groupe {\sffamily Contrôle}]\hfil\newline
   \begin{itemize}
@@ -335,6 +348,7 @@ label(LATEX("\opList{\opSousList{Pythagore}
     \par\hfill\includegraphics{CommandeControle.6}
   \item[\textbullet]\lstinline!draw Stop("ce script");!
     \par\hfill\includegraphics{CommandeControle.8}
+\newpage
   \item[\textbullet]\lstinline!draw CommencerClone;!
     \par\hfill\includegraphics{CommandeControle.9}
   \item[\textbullet]\lstinline!draw CreerClone("Lutin1");!
diff --git a/src/Apparence.mp b/src/Apparence.mp
index bd7b977..c5f39a6 100644
--- a/src/Apparence.mp
+++ b/src/Apparence.mp
@@ -128,6 +128,30 @@ _coinprec:=_coinprec+(0,eb);
 $
 enddef;
 
+vardef BasculerARA(expr costume)=
+  save $;
+  picture $,texto;
+  texto=image(
+      label.lrt(LATEX("\bfseries\color{white} basculer sur l'arrière-plan "&costume&" et attendre"),if unknown _coinprec: (0,0) else:_coinprec fi);
+  );
+$=AffichageA shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageA);
+_coinprec:=llcorner $;
+_coinprec:=_coinprec+(0,eb);
+$
+enddef;
+
+vardef ARSuivant=
+  save $;
+  picture $,texto;
+  texto=image(
+      label.lrt(LATEX("\bfseries\color{white} arrière-plan suivant"),if unknown _coinprec: (0,0) else:_coinprec fi);
+  );
+$=AffichageA shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageA);
+_coinprec:=llcorner $;
+_coinprec:=_coinprec+(0,eb);
+$
+enddef;
+
 vardef AjouterEffet(expr costume,nb)=
   save $;
   picture $,texto;
diff --git a/src/Evenements.mp b/src/Evenements.mp
index 3630d0a..96343ea 100644
--- a/src/Evenements.mp
+++ b/src/Evenements.mp
@@ -95,6 +95,18 @@ _coinprec:=_coinprec+(0,eb);
   $
 enddef;
 
+vardef QScenePressee=
+  save $;
+  picture $,texto;
+  texto=image(
+      label.lrt(LATEX("\bfseries\color{white}quand la Scène est cliquée"),if unknown _coinprec:(0,0) else: _coinprec fi);
+  );
+$=AffichageEA shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageEA);
+_coinprec:=llcorner $;
+_coinprec:=_coinprec+(0,eb);
+  $
+enddef;
+
 vardef QBasculeAR(expr touche)=
   save $;
   picture $,texto;