summaryrefslogtreecommitdiff
path: root/tex/context/sample/demo-mps.tex
blob: 57bb690c0a0bdb66cc0908dd92b05bedec4e15a7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
% interface=en

\starttext

\setupcolors
  [state=start]

\startMPpage
  path p ; color c[] ;
  p := fullsquare scaled 4cm ;
  c[0] := transparent(1,.5,red) ;
  c[1] := transparent(1,.5,green) ;
  c[2] := transparent(1,.5,blue) ;
  for i = 0 upto 2 :
    fill p rotated (i*30) withcolor white ;
  endfor ;
  for i = 0 upto 2 :
    fill p rotated (i*30) withcolor c[i] ;
  endfor ;
  addbackground withcolor transparent(1,.5,cmyk(0,0,1,0)) ;
\stopMPpage

\stoptext