blob: 864a7b58676e972c0814b7b357156909aa615283 (
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
|
\documentclass[pstricks]{standalone}
\usepackage{pst-marble}
\begin{document}
\begin{pspicture}(-6,-6)(6,6)
\psMarble[
background={
[0.1 0 0.1]
},
colors={
(e7cc9b)
(c28847)
(80410b)
},
viscosity=1000,
actions={
%% coffee mug rim and stirred foam
0 0 150 [ .8 .8 .7 ] drop
0 0 150 [ .8 .9 .8 ] drop
0 0 150 [ .9 .9 .8 ] drop
0 0 500 colors 2 get drop
0 0 283 0 1 colors 1 get 30 30 Gaussian-drops
0 0 -50e3 100 vortex
%% tulip
0 -250 55 colors 0 get drop
0 -200 35 colors 2 get drop
0 -150 55 colors 0 get drop
0 -100 35 colors 2 get drop
0 -50 55 colors 0 get drop
0 75 0 -450 20 30 stylus
%% wreath
0 10 390 90 95 0 colors 1 get 14 25 coil-drops
0 0 400 90 100 0 colors 0 get 14 40 coil-drops
0 0 [ -400 ] 1 20 31 stir
%% short vine
-100 250 75 [ 6 80 0 tines ] colors 1 get 20 line-drops
-100 250 75 [ 6 80 0 tines ] colors 0 get 30 line-drops
-300 200 300 350 20 30 stylus
}
](12,12)
\end{pspicture}
\end{document}
|