Xah Talk Show 2025-06-28 Ep671 Wolfram Language 3D Graphics Lighting

• https://youtu.be/f4x8eT5rpQ4

• Wolfram Language Tutorial
• Wolfram: Download Wolfram Engine
• Emacs: Xah Wolfram Mode 📦
• Wolfram: Lighting
• Emacs: Xah Fly Keys 📦

xobjects =
{Sphere[{0,0,0},1],
Torus[{-2,0,0},{1,2}],
Cylinder[{{2,0,0}, {2,0,3}},1]
}

Graphics3D[
xobjects,
Axes -> True,
SphericalRegion -> True,
Lighting -> DirectionalLight[Red, ImageScaled[{1, 1, 1}] ]
]

Graphics3D[
xobjects,
Axes -> True,
SphericalRegion -> True,
Lighting -> AmbientLight[Red]
]

Graphics3D[
xobjects,
Axes -> True,
SphericalRegion -> True,
Lighting -> PointLight[White, {0, 0, 3}]
]

Graphics3D[
xobjects,
Axes -> True,
SphericalRegion -> True,
Lighting -> SpotLight[Green, {0, 0, 3}, 60 Degree]
]