You can change the specular colors by poking the values into the light structure directly using an external memory function. I suppose it would make sense for the specular colors to be set to the diffuse colors, or better yet, add a function to alow the specular component to be changed independently, since it is independent.
Perhaps it does not even need another function, how about an optional argument on the existing lightcolor one?
LightColor (light, red#,green#,blue# [, component])
Component = 1, change ambient
Component = 2, change diffuse (default)
Component = 3, change specular
Perhaps it does not even need another function, how about an optional argument on the existing lightcolor one?
LightColor (light, red#,green#,blue# [, component])
Component = 1, change ambient
Component = 2, change diffuse (default)
Component = 3, change specular