4D Julia

Needs["OpenCLLink`"]
frames = Table[
   p = {{8.0, 1.0, 1.0}, {0.3, -0.5, u3, 0.2}, {15.0, 10.0, 5.0}};
   OpenCLFractalRender3D[Method -> "Quaternion", "Type" -> "Julia",
    "SingleFrame" -> True, "SingleFrameParameters" -> p,
    "Multisampling" -> 20, "MaxIterations" -> 256,
    "Color" -> {0, 1, 0.8}, ImageSize -> 512],
   {u3, -2, 2, 0.1}];
Export["mandel.gif", frames, "DisplayDurations" -> 0.1]