File: demo-mps.tex

package info (click to toggle)
tetex-base 3.0.dfsg.3-5etch1
  • links: PTS
  • area: main
  • in suites: etch
  • size: 239,592 kB
  • ctags: 10,610
  • sloc: xml: 103,461; perl: 9,398; ruby: 2,850; python: 1,551; php: 1,067; sh: 981; lisp: 494; makefile: 371; awk: 88
file content (23 lines) | stat: -rw-r--r-- 463 bytes parent folder | download | duplicates (13) 
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