碧葉橄欖翡翠杯

酒，還是自然的好。荷，清秀之色。

淨心酒。純虛擬，不能飲用。但可以修煉虛擬廚藝。

用料  

碧葉橄欖翡翠杯的做法  

1. 打開電腦

2. 啟動Mathematica

3. 製作橄欖。輸入
   makeolive =
   Graphics3D[{{FaceForm[Green, Orange],
      Scale[Sphere[{0, 0, -1}], {1, 1, 1.5}, {10, 0, 0}]}, {Orange,
      Cylinder[{{0, 0, -1}, {-10, -10, 1}}, 0.1]}}, Boxed -> False]
   
   然後 shift + enter

4. 製作荷葉。輸入並 shift + enter
   
   lotus = RevolutionPlot3D[1/10 Cos[t] - 10, {t, 0, 2.8 Pi},
    PlotStyle -> FaceForm[Green, LightGreen], Mesh -> None,
    Boxed -> False, Axes -> None, BoxRatios -> {10, 10, 0.2}]

5. 製作酒杯，並放入以上原料。輸入
   
   Show[{RevolutionPlot3D[{1 t  Sin[t] + 7, 1.7  t Cos[t], -4 t}, {t, 0,
      5.7 }, PlotStyle -> {RGBColor[0, 1, 0, .5]}, Mesh -> None],
    makeolive, lotus}, ViewAngle -> Pi/40, ViewPoint -> {10, 10, 4},
   ImageSize -> {360, 400}, Boxed -> False, Axes -> False,
   SphericalRegion -> True]
   
   然後 shift + enter.

6. 調酒。禁止酒後駕車，因此請回家再倒酒來喝。

小貼士

此物不能飲。