3 cadre=(llcorner texto+(-eb,-eb))--(lrcorner texto+(eb,-eb))--(urcorner texto+(eb,eb))--(ulcorner texto+(-eb,eb))--cycle;
6 fill cadre withcolor DarkBlue;
8 draw (llcorner texto+(-eb,-eb))--(lrcorner texto+(eb,-eb))--(urcorner texto+(eb,eb))--(ulcorner texto+(-eb,eb))--cycle;
13 vardef Avancer(expr nbpas)=
18 label.lrt(LATEX("\bfseries\color{white}Avancer de \colorbox{white}{\textcolor{black}{"&decimal(nbpas)&"}}"),if unknown _coinprec:(0,0) else: _coinprec fi);
20 label.lrt(LATEX("\bfseries\color{white}Avancer de "&nbpas&""),if unknown _coinprec:(0,0) else: _coinprec fi);
23 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
24 _coinprec:=llcorner $;
28 vardef Tournerd(expr nbang)=
33 label.lrt(LATEX("\bfseries\color{white}Tourner à droite de \colorbox{white}{\textcolor{black}{"&decimal(nbang)&"}} degré(s)"),if unknown _coinprec:(0,0) else: _coinprec fi);
35 label.lrt(LATEX("\bfseries\color{white}Tourner à droite de "&nbang&" degré(s)"),if unknown _coinprec:(0,0) else: _coinprec fi);
38 $=Affichage shifted (if unknown _coinprec:(0,0) else : _coinprec fi - ulcorner Affichage);
39 _coinprec:=llcorner $;
43 vardef Tournerg(expr nbang)=
48 label.lrt(LATEX("\bfseries\color{white}Tourner à gauche de \colorbox{white}{\textcolor{black}{"&decimal(nbang)&"}} degré(s)"),if unknown _coinprec:(0,0) else : _coinprec fi);
50 label.lrt(LATEX("\bfseries\color{white}Tourner à gauche de "&nbang&" degré(s)"),if unknown _coinprec:(0,0) else : _coinprec fi);
53 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
54 _coinprec:=llcorner $;
58 vardef Orienter(expr nbang)=
62 label.lrt(LATEX("\bfseries\color{white}S'orienter à "&if numeric nbang:"\colorbox{white}{\textcolor{black}{"&decimal(nbang)&" \tiny$\blacktriangledown$}}" else: nbang fi&""),if unknown _coinprec: (0,0) else:_coinprec fi);
64 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
65 _coinprec:=llcorner $;
69 vardef Orienterdirection(expr nbang)=
73 label.lrt(LATEX("\bfseries\color{white}S'orienter vers \colorbox{LightBlue}{\textcolor{black}{"&nbang&" \tiny$\blacktriangledown$}}"),if unknown _coinprec: (0,0) else:_coinprec fi);
75 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
76 _coinprec:=llcorner $;
80 vardef Aller(expr xa,ya)=
84 if (numeric xa) and (numeric ya):
85 label.lrt(LATEX("\bfseries\color{white} Aller à x : \colorbox{white}{\textcolor{black}{"&decimal(xa)&"}} y : \colorbox{white}{\textcolor{black}{"&decimal(ya)&"}}"),if unknown _coinprec:(0,0) else: _coinprec fi);
87 label.lrt(LATEX("\bfseries\color{white} Aller à x : \colorbox{white}{\textcolor{black}{"&decimal(xa)&"}} y : "&ya&""),if unknown _coinprec:(0,0) else: _coinprec fi);
89 label.lrt(LATEX("\bfseries\color{white} Aller à x : "&xa&" y : \colorbox{white}{\textcolor{black}{"&decimal(ya)&"}}"),if unknown _coinprec:(0,0) else: _coinprec fi);
91 label.lrt(LATEX("\bfseries\color{white} Aller à x : "&xa&" y : "&ya&""),if unknown _coinprec:(0,0) else: _coinprec fi);
94 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
95 _coinprec:=llcorner $;
99 vardef Allera(expr pointeur)=
103 label.lrt(LATEX("\bfseries\color{white} Aller à : \colorbox{LightBlue}{\textcolor{black}{"&pointeur&" \tiny$\blacktriangledown$}}"),if unknown _coinprec:(0,0) else: _coinprec fi);
105 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
106 _coinprec:=llcorner $;
110 vardef Glisser(expr tps,xa,ya)=
114 label.lrt(LATEX("\bfseries\color{white}Glisser en "&if numeric tps:"\colorbox{white}{\textcolor{black}{"&decimal(tps)&"}}" else: tps fi&" seconde(s) à x : "&if numeric xa:"\colorbox{white}{\textcolor{black}{"&decimal(xa)&"}}" else: xa fi&" y : "&if numeric ya:"\colorbox{white}{\textcolor{black}{"&decimal(ya)&"}}" else: ya fi), if unknown _coinprec:(0,0) else:_coinprec fi);
116 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
117 _coinprec:=llcorner $;
121 vardef Ajouter(expr xa,xx)=
126 label.lrt(LATEX("\bfseries\color{white} Ajouter \colorbox{white}{\textcolor{black}{"&decimal(xa)&"}} à "&xx),if unknown _coinprec: (0,0) else:_coinprec fi);
128 label.lrt(LATEX("\bfseries\color{white} Ajouter "&xa&" à "&xx),if unknown _coinprec: (0,0) else:_coinprec fi);
131 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
132 _coinprec:=llcorner $;
136 vardef Mettre(expr xa,xx)=
141 label.lrt(LATEX("\bfseries\color{white}Donner la valeur \colorbox{white}{\textcolor{black}{"&decimal(xa)&"}} à "&xx),if unknown _coinprec: (0,0) else:_coinprec fi);
143 label.lrt(LATEX("\bfseries\color{white}Donner la valeur "&xa&" à "&xx),if unknown _coinprec: (0,0) else:_coinprec fi);
146 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
147 _coinprec:=llcorner $;
155 label.lrt(LATEX("\bfseries\color{white} Rebondir si le bord est atteint"),if unknown _coinprec: (0,0) else:_coinprec fi);
157 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
158 _coinprec:=llcorner $;
162 vardef FixerSensRotation(expr sens)=
166 label.lrt(LATEX("\bfseries\color{white} Fixer le sens de rotation \colorbox{LightBlue}{\textcolor{black}{"&sens&" \tiny$\blacktriangledown$}}"),if unknown _coinprec: (0,0) else:_coinprec fi);
168 $=Affichage shifted (if unknown _coinprec:(0,0) else :_coinprec fi - ulcorner Affichage);
169 _coinprec:=llcorner $;