Sub SetColor(c)
Sets the current draw color