Breakfast

ps = Table[
   3 {Sin[\[Theta]], Cos[\[Theta]]} + 0.5 RandomReal[{-1, 1}, {2}]
   , {\[Theta], 0, 2 Pi, 0.14}
   ];
ps = MovingAverage[ps, 4];
ps = Join[ps, {First[ps]}];
Graphics[{{Orange, Disk[{-1, -1}, 1]},
  FaceForm[],
  EdgeForm[Black],
  BezierCurve[
   ps]}
 ]