summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/generic/pst-marble/examples/Blobs.tex
blob: 065139970b187141b7f73e7290b181f4f4690666 (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
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
\documentclass[pstricks]{standalone}
\usepackage{pst-marble}
\begin{document}
\begin{pspicture}(-5,-5)(5,5)
\psMarble[
          viscosity=1000,
%% Background color goes here:
          background=0.9 0.9 0.9,
colors={
  [0.176 0.353 0.129]
  [0.635 0.008 0.094]
  [0.078 0.165 0.518]
  [0.824 0.592 0.031]
  [0.059 0.522 0.392]
  [0.816 0.333 0.475]
},
actions={
      0    0 600 colors 4 get drop
   -200  -90 100 colors 5 get drop
   -200 -200 200 colors 0 get drop
   -200  200 200 colors 1 get drop
    200 -200 200 colors 2 get drop
    200  200 200 colors 3 get drop
% Commenting vortex gives a fine result ...
  0 0 -32e3 750 vortex
  250 0 [ 120 80 ] 20 -100 20 stir
   0 -500 850 -30 15 colors 2 get 5 50 arc-drops
   0 -500 840 -30 16 colors 1 get 5 50 arc-drops
   0 -500 850 -30 15 colors 5 get 5 50 arc-drops
   0    0 150   0 15 10 [105 160 99] 35 20 spiral-drops
}]
\psMarble[
          viscosity=1000,drawcontours,linewidth=0.2,linecolor=black,bckg=false,
%% Background color goes here:
          background=0.9 0.9 0.9,
colors={
  [0 0 0]
  [0 0 0]
  [0 0 0]
  [0 0 0]
  [0 0 0]
  [0 0 0]
},
actions={
      0    0 600 colors 4 get drop
   -200  -90 100 colors 5 get drop
   -200 -200 200 colors 0 get drop
   -200  200 200 colors 1 get drop
    200 -200 200 colors 2 get drop
    200  200 200 colors 3 get drop
  0 0 -32e3 750 vortex
  250 0 [ 120 80 ] 20 -100 20 stir
   0 -500 850 -30 15 colors 2 get 5 50 arc-drops
   0 -500 840 -30 16 colors 1 get 5 50 arc-drops
   0 -500 850 -30 15 colors 5 get 5 50 arc-drops
   0    0 150   0 15 10 colors 5 get 35 20 spiral-drops
}]
\end{pspicture}
\end{document}