Radial Gradient?

Blitz3D Forums/Blitz3D Programming/Radial Gradient?

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Function Ovals (Shades)

Local Col,Pos#,Wid,A

For A = 0 To 255
	Col	= 255-A
	Pos	= A*0.5
	Wid	= 255-A
	Color Col,Col,Col
	Oval Pos,Pos,Wid,Wid,True
Next

End Function

How could I adjust this function to use the shades parameter? I want the darkest shade to always be black, and the lightest to always be white. I need the function to work out the shades in between...