File: 4-10-8.inl

package info (click to toggle)
tetex-src 3.0.dfsg.2-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 122,292 kB
  • ctags: 2,709
  • sloc: makefile: 2,323; perl: 1,820; sh: 1,378; lisp: 448; python: 335; xml: 175; sed: 138; ansic: 138; yacc: 52
file content (28 lines) | stat: -rw-r--r-- 1,108 bytes parent folder | download | duplicates (12)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
\psset{unit=.825cm}
\begin{pspicture}(10,8)
  \psset{fillstyle=solid,linestyle=none,linewidth=0}
  \psframe[fillcolor=lightblue](10,8)
  \pscircle[fillcolor=yellow](2,6){.8} % Sun
  {% Rays
   \psset{linecolor=yellow,linestyle=solid,linewidth=.3}
   \degrees[8]
   \multido{\i=1+1}{8}{\rput{\i}(2,6){\psline(1,0)(1.5,0)}}
  }%

  \pspolygon[fillcolor=green](6,0)(10,2)(10,0)% Grass
  \psdiamond[fillcolor=red,gangle=-45](8,6)(1.5,2.5)% Kite
  \rput{45}(8,6){\pnode(-2.5,0){Kitetail}}
  \rput{-10}(.8,1.5){\psdiamond[fillcolor=yellow](.6,.1)(.6,.3)}
  \rput{-80}(.8,1.5){\psdiamond[fillcolor=yellow](.6,.1)(.6,.3)}
  \pnode(.8,1.5){Tailend}
  \nccurve[fillstyle=none,angleA=270,angleB=125,ncurvB=.9,ncurvA=1.4,
           linestyle=dotted,dotstyle=square,linewidth=.25]{Kitetail}{Tailend}
  \newcommand{\bunting}{\pstriangle(.35,.35)}
  \psset{fillcolor=red,labelsep=.01}
  \naput[nrot=115,npos=.15]{\bunting}
  \nbput[nrot=25,npos=.15]{\bunting}
  \naput[nrot=75,npos=.4]{\bunting}
  \nbput[nrot=115,npos=.4]{\bunting}
  \naput[nrot=115,npos=.7]{\bunting}
  \nbput[nrot=25,npos=.7]{\bunting}
\end{pspicture}