Qurak

Use cones in 3D graphics

Example 1 step, run in order in one session. Every step was executed against the engine and the output below is what it produced.

Step 1
Graphics3D[{Opacity[.5], Blue, Translate[{Cone[], White, Opacity[.9], Polygon[{{-1, -.25, -1}, {1, -.25, -1}, {1, .25, 1}, {-1, .25, 1}}]}, {0, 0, 0}], Translate[{Cone[], Yellow, Opacity[.9], Polygon[{{1, 1, -1}, {1, 1, 1}, {-.5, -1.5, 1}, {-.5, -1.5, -1}}]}, {3.5, -2, 0}], Translate[{Cone[], Yellow, Opacity[.9], Polygon[{{1, 1, .5}, {-1, 1, .5}, {-1, -1, .5}, {1, -1, .5}}]}, {7, -4, 0}]}, Boxed -> False, ViewAngle -> .24, ViewPoint -> {1.3, -2.4, 2}]
Output
-Graphics3D-

Functions used

Related recipes

All recipes · Function reference · Use this from an MCP client