\usemodule[graph]
\usetypescriptfile[type-auto1]
\usetypescript[auto1]
\setupbodyfont[auto1,ss,12pt]
\startMPinitializations
input sarith;
\stopMPinitializations
\starttext
\startMPcode
draw begingraph(12cm,6cm);
glabel.lft(btex Eje Y etex, OUT);
glabel.bot(btex Eje X etex, OUT);
path p;
gdata("data.d",
m,
augment.p (0,m1);
augment.p (m2,m1);
augment p (m2,m1 Sadd .5);
augment p (0,m1 Sadd .5);
gfill p--cycle withcolor .8white;
glabel.rt(m2, m2, m1 Sadd .25);
glabel.lft(m3, 0, m1 Sadd .25);
);
autogrid(grid.bot,) withcolor .85white;
gfill p--cycle withcolor .95green;
frame withcolor white;
endgraph;
\stopMPcode
What the font!
\stoptext