Do not change the lighting. Change the surface properties instead. The key is Glow.
PlotStyle -> Directive[Black, Glow[Red]] 
We set the colour to black so no light is reflected (and the lighting has no effect on the rendered colour). Now whatever colour you put in Glow[...] will be used for rendering the entire object.
This is not only a simpler solution, it also allows mixing shaded and flat objects in the same scene.
Do not change the lighting. Change the surface properties instead. The key is Glow.
PlotStyle -> Directive[Black, Glow[Red]]
We set the colour to black so no light is reflected (and the lighting has no effect on the rendered colour). Now whatever colour you put in Glow[...] will be used for rendering the entire object.
Do not change the lighting. Change the surface properties instead. The key is Glow.
PlotStyle -> Directive[Black, Glow[Red]]
We set the colour to black so no light is reflected (and the lighting has no effect on the rendered colour). Now whatever colour you put in Glow[...] will be used for rendering the entire object.
This is not only a simpler solution, it also allows mixing shaded and flat objects in the same scene.
Do not change the lighting. Change the surface properties instead. The key is Glow.
PlotStyle -> Directive[Black, Glow[Red]]
We set the colour to black so no light is reflected (and the lighting has no effect on the rendered colour). Now whatever colour you put in Glow[...] will be used for rendering the entire object.