input mp-scratch;

beginfig(1);
  draw Tournerg("\opOp{\opList{élément \opVar{varpi} de \opSousList{pi}}}");
endfig;

end



beginfig(1);
  draw Orienter(10);
  draw Orienter("\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}");
  draw Orienterdirection("pointeur de souris");
  draw Allera("pointeur de souris");
  draw FixerSensRotation("à 360\degre");
  draw Basculer("costume1");
  draw BasculerAR("arrière-plan1");
  draw AjouterEffet("couleur",25);
  draw MettreEffet("couleur","\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}");
  draw Tambour(10,0.25);
  draw Tambour("\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}","\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}");
  draw JouerNote(10,0.5);
  draw JouerNote("\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}","\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}");
  draw ChoisirInstrument(10);
  draw ChoisirInstrument("\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}");
  draw MettreVar("z",2);
  draw AjouterVar("z",1);
  draw MontrerVar("z");
  draw CacherVar("z");
  draw AjouterList("\opSimple{thing}","suite");
  draw SupprimerList(1,"Suite");
  draw SupprimerList("\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}","Suite");
  draw InsererList("\opSimple{\LaTeX}",2,"Suite");
  draw InsererList("\opSimple{\LaTeX}","\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}","Suite");
  draw RemplacerList(1,"Suite","\opSimple{\LaTeX}");
  draw RemplacerList("\opOp{$\opSimple{10}\bm{+}\opSimple{25}$}","Suite","\opSimple{\LaTeX}");
  draw MontrerList("Suite");
  draw CacherList("Suite");
  draw Stop("tout");
  draw CreerClone("moi-même");
endfig;

end

beginfig(2);
  
endfig;

end


beginfig(1);
  draw Jouer("miaou");
endfig;

beginfig(2);
  draw JouerT("miaou");
endfig;

beginfig(3);
  draw ArreterSon;
endfig;

beginfig(4);
  draw Tambour(2,0.25);
endfig;

beginfig(5);
draw Pause(0.25);
endfig;

beginfig(6);
  draw JouerNote(50,0.25);
endfig;

beginfig(7);
  draw ChoisirInstrument(17);
endfig;

beginfig(8);
  draw AjouterVol(-10);
endfig;

beginfig(9);
  draw MettreVol(15);
endfig;

beginfig(10);
  draw AjouterTempo(20);
endfig;

beginfig(11);
  draw MettreTempo(15);
endfig;

end

beginfig(1)%François Morellet - Oeuvre Pi piquant, 1=1°, 38 décimales
  draw Drapeau;
  draw Effacer;
  draw Aller(-50,0);
  draw Orienter(180);
  draw PoserStylo;
  draw Tournerg("\opList{élément \opSimple{1} de \opSousList{Pi}}");
  draw Avancer(150);
  draw MettreVar("varpi","\opSimple{2}");
  draw RepeterJ1("$\opOp{\opVar{varpi}\,>\,38}$");
  draw Si2("$\opOp{\opVar{varpi}\mbox{ modulo }\opSimple{2}\,=\,\opSimple{0}}$");
%  draw Tournerg("$\opOp{\opSimple{180}}-\opList{élément \opVar{varpi} de \opSousList{pi}}$");
  draw Sinon2;
    draw Tournerd("$\opOp{\opSimple{180}-\opList{élément \opVar{varpi} de \opSousList{pi}}}$");
  draw FinBlocSi2;
  draw Avancer(150);
  draw AjouterVar("varpi","\opSimple{1}");
  draw FinBlocRepeter1(10);
  draw ReleverStylo;
endfig;
end


beginfig(1);
  draw Drapeau;
  draw QTouche("pointeur de souris");
  draw CouleurTouche("Abricot")("{rgb}{0.75,0.5,0.25}");
  draw CouleurToucheTouche("Abricot")("{rgb}{0.75,0.5,0.25}")("Pomme")("{rgb}{0.75,1,0.5}");
  draw Distance("pointeur de souris");
  draw Demander("What's your name ?");
  draw ToucheP("espace");
  draw SourisP;
  draw ActiverVideo("Activé");
  draw TransparenceVideo(50);
  draw TransparenceVideo("\opOp{\colorbox{white}{\textcolor{black}{50}}$+$\colorbox{white}{\textcolor{black}{50}}}");
  draw ReinitChrono;
  draw Caracteristique("abscisse x")("Lutin1");
endfig;
end


beginfig(1);
  draw NouveauBloc("Carré \opBloc{côté}");
  draw Avancer("\opBloc{côté}");
  draw Tournerd(90);
  draw Avancer("\opBloc{côté}");
  draw Tournerd(90);
  draw Avancer("\opBloc{côté}");
  draw Tournerd(90);
  draw Avancer("\opBloc{côté}");
  draw Tournerd(90);
endfig;

end



beginfig(1);
  draw Drapeau;
  draw RepeterJ1("$\mbox{cote}=10$");
  draw FinBlocRepeter1(10);
  draw Si1("titi=10");
  draw Dire("Bonjour");
  draw Sinon1;
  draw Avancer(10);
  draw FinBlocSi1;
  draw Avancer(50);
endfig;
end
  

  
  draw Drapeau;
  draw LigneVide("Bonjour");
  draw Presse("espace");
  draw LigneVide("Bonjour");
  draw LutinPresse;
  draw LigneVide("Bonjour");
  draw BasculeAR("arrière-plan 1");
  draw LigneVide("Bonjour");
  draw VolumeSup("volume sonore",10);
  draw LigneVide("Bonjour");
  draw VolumeSup("volume sonore","10+35");
  draw LigneVide("Bonjour");
  draw RecevoirMessage("fini");
  draw LigneVide("Bonjour");
  draw EnvoyerMessage("une nouvelle journée");
  draw LigneVide("Bonjour");
  draw EnvoyerMessageA("une belle après-midi");
  draw Dire("Bonjour");
  draw Repeter1(4);
  draw Avancer(90);
  draw Tournerd(90);
  draw Repeter2(3);
  draw Dire("Salut");
  draw FinBlocRepeter2(3);
  draw FinBlocRepeter1(4);
endfig;

end
  draw DireT("Bonjour",1);
  draw Dire("Bonjour");
  draw PenserT("Bonjour",1);
  draw Penser("Bonjour");
  draw Montrer;
  draw Cacher;
  draw Basculer("costume1");
  draw CostumeSuivant;
  draw BasculerAR("Tour");
  draw AjouterEffet("couleur",10);
  draw MettreEffet("couleur",50);
  draw AnnulerEffet;
  draw AjouterTaille(10);
  draw MettreA(50);
  draw AllerPPlan;
  draw DeplacerAP(2);
endfig;

end

  %  draw Repeter1(10);
%  draw Aller(40,50);
%  draw Repeter2(4);
%  draw Avancer(50);
%  draw Tournerd(90);
%  draw FinBlocRepeter2(4);
%  draw Tournerg(15);
%  draw FinBlocRepeter1(10);
%  draw Avancer(40);