Rotation problem

I need a formula to get the X and Y position of an image, giving another X and Y position as a center, and a rotation factor, and I have had no luck with my trigonometric skill. Any help would be much apreciated.

Somethig Like:

Function GetNewXY(..
      OriginX:Float, OriginY:float, ..
      CenterX:Float, CenterY:Float, ..
      Angle:Float, ..
      Var ReturnX:Float, Var ReturnY:Float..
)
DOSTUFFHERE
End Function

Any help would be very apreciated.