macro to change font color of a cell

I want 3 macros called R, and G, and B.

I select a cell, then I hit R and the font color goes to RED. Done
G goes to green.
and B goes to blue.

any help???

thanks very much