How to impose golden color on 3D object?

I would like to have a 3D object with a golden color as in the attached image, how can I create such color and edges in Mathematica?

enter image description here

Here is my try

    Graphics3D[{Specularity[Gray, 1], EdgeForm[None], Orange,    Lighting -> "Neutral", Opacity[0.95],    Cuboid[{0, 0, 0}, {6, 1.2, 1.3}]}, Boxed -> False,   ViewPoint -> {2, 0.2, 1}, PlotRange -> {{-2, 6}, {-2, 2}, {-2, 2}}] 

enter image description here