summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/generic/pstricks/voss/bsp318.tex
blob: cba4ed50db604a9883aeccc8808abcf44a48cc87 (plain)
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
29
30
31
32
33
34
35
36
37
38
39
40
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% bsp318.tex ---
%% Autor           : Herbert Voss <voss@perce.de>
%% Datum           : 2005-11-02 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\documentclass[a4paper]{article}
\usepackage{pstricks,pst-vue3d}
\definecolor{marron}{rgb}{1,0.55,0}

\def\Sol{%
    \psset{normaleLongitude=90,normaleLatitude=90}
    \FrameThreeD[fillcolor=lightgray,fillstyle=solid](0,0,-2)(2,-2)(-2,2)
    \QuadrillageThreeD[grille=.5,linecolor=red](0,0,-2)(-2,-2)(2,2)%
    \QuadrillageThreeD[grille=0.75,linecolor=cyan](0,0,-2)(-2,-2)(2,2)%
}
\def\chaise{%
  \FrameThreeD[normaleLatitude=0,normaleLongitude=0,%
     fillcolor=marron,fillstyle=solid](-0.8,1,2)(0.2,0)(1.8,1)
  \CubeThreeD[A=.1,B=0.1,C=0.9](0.9,-0.9,-1.1)
  \CubeThreeD[A=.1,B=0.1,C=0.9](0.9,0.9,-1.1)
  \CubeThreeD[A=.1,B=0.1,C=2](-0.9,0.9,0)
  \CubeThreeD[A=.1,B=0.1,C=2](-0.9,-0.9,0)
  \CubeThreeD[A=0.9,B=1,C=0.1](0.1,0,-0.1)
}

\pagestyle{empty}

\begin{document}

\begin{pspicture}(-4,-5.5)(3.5,3.5)
  \psset{THETA=30,PHI=20,Dobs=10,Decran=15}
  \Sol\chaise
  \pNodeThreeD(-0.5,-0.3,0){littleChair}
  \rput[lC](littleChair){%
    \psset{THETA=30,PHI=20,Dobs=100,Decran=20}
    \Sol\chaise%
  }
\end{pspicture}

\end{document}