Colored Lights

This demonstrates some of the lighting capabilities in Mathematica 6. Each of the three colored dots at the top of the back wall is a cone light and a point light. Move a slider to make a cone light sweep across the room. The point lights reflect on the top, side, and back walls. Rotate the graphic to see the changes depending on the viewing angle.