Modifications (couleurs, chanfreins...) pour un rapprochement vers Scratch
[mp-scratch.git] / src / LATEXScratch.mp
1 vardef LATEX primary s =
2   write "verbatimtex" to "mptextmp.mp";
3   write "%&latex" to "mptextmp.mp";
4   write "\documentclass[12pt]{article}" to "mptextmp.mp";
5   write "\usepackage[utf8]{inputenc}" to "mptextmp.mp";
6   write "\usepackage[T1]{fontenc}" to "mptextmp.mp";
7   write "\usepackage[sfdefault,lf]{carlito}" to "mptextmp.mp";
8   write "\usepackage{pifont}" to "mptextmp.mp";
9   write "\usepackage{fancybox}" to "mptextmp.mp";
10   write "\usepackage[frenchb]{babel}" to "mptextmp.mp";
11   write "\usepackage[autolanguage]{numprint}" to "mptextmp.mp";
12   write "\usepackage{amssymb}" to "mptextmp.mp";
13   write "\usepackage{xcolor}" to "mptextmp.mp";
14 %  write "\definecolor{LightGreen}{rgb}{0.625,1,0.250}" to "mptextmp.mp";
15   write "\definecolor{DarkGreen}{rgb}{0.359,0.715,0.070}" to "mptextmp.mp";
16   write "\definecolor{dDarkGreen}{rgb}{0.328,0.656,0.0625}" to "mptextmp.mp";
17   write "\definecolor{mLightBlue}{rgb}{0.266,0.387,0.762}" to "mptextmp.mp";
18 %  write "\definecolor{LightBlue}{rgb}{0.172,0.645,0.883}" to "mptextmp.mp";%0.75,0.875,1
19   write "\definecolor{DarkBlue}{rgb}{0.289,0.422,0.828}" to "mptextmp.mp";%0.5,0.75,1
20   write "\definecolor{cDarkBlue}{rgb}{0.172,0.645,0.883}" to "mptextmp.mp";
21   write "\definecolor{cLightBlue}{rgb}{0.156,0.590,0.809}" to "mptextmp.mp";
22   write "\definecolor{dDarkBlue}{rgb}{0,0.375,0.75}" to "mptextmp.mp";
23   %write "\definecolor{LightViolet}{rgb}{0.875,0.75,1}" to "mptextmp.mp";
24   write "\definecolor{LightPurple}{rgb}{0.54,0.332,0.84}" to "mptextmp.mp";%0.75,0.5,1
25   write "\definecolor{DarkPurple}{rgb}{0.492,0.305,0.77}" to "mptextmp.mp";
26   write "\definecolor{DdarkPurple}{rgb}{0.348,0.277,0.691}" to "mptextmp.mp";
27   write "\definecolor{LightOrange}{rgb}{0.93,0.488,0.086}" to "mptextmp.mp";%1,0.625,0.25
28   write "\definecolor{DarkOrange}{rgb}{0.797,0.355,0.133}" to "mptextmp.mp";%0.852,0.445,0.078%0.875,0.438,0
29     write "\definecolor{cDarkOrange}{rgb}{0.809,0.605,0.09}" to "mptextmp.mp";
30   write "\definecolor{dDarkOrange}{rgb}{0.730,0.324,0.121}" to "mptextmp.mp";%0.750,0.375,0
31   write "\definecolor{DarkMarron}{rgb}{0.719,0.469,0.172}" to "mptextmp.mp";%0.625,0.312,0
32   write "\definecolor{LightPink}{rgb}{0.672,0.234,0.699}" to "mptextmp.mp";%0.875,0.125,0.875
33   write "\newcommand\opSon[1]{\colorbox{LightPink}{\bfseries\textcolor{white}{#1}}}" to "mptextmp.mp";
34   write "\newcommand\opSimple[1]{\colorbox{white}{\bfseries\textcolor{black}{#1}}}" to "mptextmp.mp";
35   write "\newcommand\opMouv[1]{\colorbox{DarkBlue}{\bfseries\textcolor{white}{#1}}}" to "mptextmp.mp";
36   write "\newcommand\opAp[1]{\colorbox{LightPurple}{\bfseries\textcolor{white}{#1}}}" to "mptextmp.mp";
37   write "\newcommand\opApMenu[1]{\colorbox{DarkPurple}{\bfseries\textcolor{white}{\normalfont #1 \textcolor{black}{\tiny$\blacktriangledown$}}}}" to "mptextmp.mp";
38   write "\newcommand\opBloc[1]{\colorbox{DdarkPurple}{\bfseries\textcolor{white}{#1}}}" to "mptextmp.mp";
39   write "\newcommand\opOp[1]{\colorbox{DarkGreen}{\bfseries\textcolor{white}{#1}}}" to "mptextmp.mp";
40   write "\newcommand\opSousOp[1]{\colorbox{dDarkGreen}{#1}}" to "mptextmp.mp";
41   write "\newcommand\opOpMenu[1]{\colorbox{dDarkGreen}{\normalfont \textcolor{white}{#1} \tiny\textcolor{black}{$\blacktriangledown$}}}" to "mptextmp.mp";
42   write "\newcommand\opCap[1]{\colorbox{cDarkBlue}{\bfseries\textcolor{white}{\bfseries #1}}}" to "mptextmp.mp";
43   write "\newcommand\opCapCap[1]{\colorbox{cLightBlue}{\normalfont #1 \tiny\textcolor{black}{$\blacktriangledown$}}}" to "mptextmp.mp";
44   write "\newcommand\opVar[1]{\colorbox{LightOrange}{\bfseries\textcolor{white}{#1}}}" to "mptextmp.mp";
45   write "\newcommand\opList[1]{\colorbox{DarkOrange}{\bfseries\textcolor{white}{#1}}}" to "mptextmp.mp";
46   write "\newcommand\opSousList[1]{\colorbox{dDarkOrange}{\normalfont #1 \tiny\textcolor{black}{$\blacktriangledown$}}}" to "mptextmp.mp";
47   write "\usepackage{amsmath}" to "mptextmp.mp";
48   write "\usepackage{mathrsfs}" to "mptextmp.mp";
49   write "\usepackage{ifsym}" to "mptextmp.mp";
50   write "\usepackage{bm}" to "mptextmp.mp";
51   write "\usepackage{mflogo}" to "mptextmp.mp";
52   write "\usepackage{graphicx}" to "mptextmp.mp";
53   write "\graphicspath{{/home/cp/texmf/metapost/Scratch/}}" to "mptextmp.mp";
54   write "\begin{document}" to "mptextmp.mp";
55   write "etex" to "mptextmp.mp";
56   write "btex "&s&" etex" to "mptextmp.mp";
57   write EOF to "mptextmp.mp";
58   scantokens "input mptextmp"
59 enddef;

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.