George,
If you set your contents of the Graphic to gr:
gr = {Red, Disk[{-0.625, -1.208}, 0.106],
Disk[{0.625, -1.208}, 0.106], White, Disk[{0, 0}, 1],
Polygon[{{0.208, -0.916}, {0.1458, -2.21}, {-0.1458, -2.21}, \
{-0.208, -0.916}, {0.208, -0.916}}], Disk[{0, -2.15}, 0.1458],
Rectangle[{-.625, -1.833}, {0.625, -1.667}],
Rectangle[{-0.75, -3.458}, {-0.5, -1.208}],
Rectangle[{0.5, -3.458}, {0.75, -1.208}]};
and create the original object:
obj = Graphics[gr, Background -> Black, PlotRange -> {{-2, 2}, {-5, 3}}]
You can do the scaling and rotating:
Graphics[Rotate[gr, 10 Degree], Background -> Black,
PlotRange -> {{-2, 2}, {-5, 3}}, ImageSize -> 140]
or change things:
Graphics[Rotate[gr /. Red -> Green, 10 Degree], Background -> Black,
PlotRange -> {{-2, 2}, {-5, 3}}, ImageSize -> 140]
to get
Is this what you are looking for?
Regards
Neil