sub SetColor(c)
Sets the current draw color