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...