我想要畫一個水池，其中水池的透明度是可以隨距離變化的
Plot3D[0.5 Sin[x] Sin[y] + 9, {x, 0, 50}, {y, 0, 30},
PlotPoints -> 70, ImageSize -> Large, Mesh -> None,
BoxRatios -> {5, 3, 1}, Filling -> Bottom,
ColorFunction -> (Directive[Opacity[#], Blue] &),
FillingStyle -> Directive[Opacity[0.3], Blue], Ticks -> None,
PlotRange -> {Automatic, Automatic, {3, 10.2}}]
我目前是這樣寫讓它可以隨距離變化透明度，
如果我想讓它隨水池底下的視角變化透明度，從透明變到不透明，請問可以怎麼寫呢?
如果要突然變成不透明又可以怎麼寫?