3 cadre=(llcorner texto+(-eb,-eb))--(lrcorner texto+(eb,-eb))--(urcorner texto+(eb,eb))--(ulcorner texto+(-eb,eb))--cycle;
6 fill cadre withcolor DarkPink;
8 draw (llcorner texto+(-eb,-eb))--(lrcorner texto+(eb,-eb))--(urcorner texto+(eb,eb))--(ulcorner texto+(-eb,eb))--cycle;
13 vardef Jouer(expr phrase)=
17 label.lrt(LATEX("\bfseries\color{white}Jouer le son \colorbox{LightPink}{\textcolor{white}{"&phrase&" \tiny\textcolor{black}{$\blacktriangledown$}}}"),if unknown _coinprec: (0,0) else:_coinprec fi);
19 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
20 _coinprec:=llcorner $;
24 vardef JouerT(expr phrase)=
28 label.lrt(LATEX("\bfseries\color{white}Jouer le son \colorbox{LightPink}{\textcolor{white}{"&phrase&" \tiny\textcolor{black}{$\blacktriangledown$}}} jusqu'au bout"),if unknown _coinprec: (0,0) else:_coinprec fi);
30 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
31 _coinprec:=llcorner $;
39 label.lrt(LATEX("\bfseries\color{white}Arrêter tous les sons"),if unknown _coinprec: (0,0) else:_coinprec fi);
41 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
42 _coinprec:=llcorner $;
46 vardef Tambour(expr nb,tps)=
50 label.lrt(LATEX("\bfseries\color{white}Jouer du tambour "&if numeric nb:"\colorbox{white}{\textcolor{black}{"&decimal(nb)&" \tiny$\blacktriangledown$}}" else: nb fi&" pendant "&if numeric tps:"\colorbox{white}{\textcolor{black}{"&decimal(tps)&"}}" else: tps fi&" temps"),if unknown _coinprec: (0,0) else:_coinprec fi);
52 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
53 _coinprec:=llcorner $;
57 vardef Pause(expr tps)=
61 label.lrt(LATEX("\bfseries\color{white}Faire une pause pour "&if numeric tps:"\colorbox{white}{\textcolor{black}{"&decimal(tps)&"}}" else: tps fi&" temps"),if unknown _coinprec: (0,0) else:_coinprec fi);
63 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
64 _coinprec:=llcorner $;
68 vardef JouerNote(expr nb,tps)=
72 label.lrt(LATEX("\bfseries\color{white}Jouer la note "&if numeric nb:"\colorbox{white}{\textcolor{black}{"&decimal(nb)&" \tiny\textcolor{black}{$\blacktriangledown$}}}" else : nb fi&" pendant "&if numeric tps:"\colorbox{white}{\textcolor{black}{"&decimal(tps)&"}}" else: tps fi&" temps"),if unknown _coinprec: (0,0) else:_coinprec fi);
74 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
75 _coinprec:=llcorner $;
79 vardef ChoisirInstrument(expr nb)=
83 label.lrt(LATEX("\bfseries\color{white}Choisir l'instrument \no "&if numeric nb:"\colorbox{white}{\textcolor{black}{"&decimal(nb)&" \tiny$\blacktriangledown$}}" else: nb fi&""),if unknown _coinprec: (0,0) else:_coinprec fi);
85 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
86 _coinprec:=llcorner $;
90 vardef AjouterVol(expr nb)=
94 label.lrt(LATEX("\bfseries\color{white}Ajouter "&if numeric nb:"\colorbox{white}{\textcolor{black}{"&decimal(nb)&"}}" else: nb fi&" au volume"),if unknown _coinprec: (0,0) else:_coinprec fi);
96 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
97 _coinprec:=llcorner $;
101 vardef MettreVol(expr nb)=
105 label.lrt(LATEX("\bfseries\color{white}Mettre le volume au niveau "&if numeric nb:"\colorbox{white}{\textcolor{black}{"&decimal(nb)&"}}" else: nb fi&"~\%"),if unknown _coinprec: (0,0) else:_coinprec fi);
107 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
108 _coinprec:=llcorner $;
112 vardef AjouterTempo(expr nb)=
116 label.lrt(LATEX("\bfseries\color{white}Ajouter "&if numeric nb:"\colorbox{white}{\textcolor{black}{"&decimal(nb)&"}}" else: nb fi&" au tempo"),if unknown _coinprec: (0,0) else:_coinprec fi);
118 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
119 _coinprec:=llcorner $;
123 vardef MettreTempo(expr nb)=
127 label.lrt(LATEX("\bfseries\color{white}Mettre le tempo à "&if numeric nb:"\colorbox{white}{\textcolor{black}{"&decimal(nb)&"}}" else: nb fi&"~bpm"),if unknown _coinprec: (0,0) else:_coinprec fi);
129 $=AffichageSon shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner AffichageSon);
130 _coinprec:=llcorner $;