Projection in Apophysis

[cyseal]

Is there a way to write MB3D and Mathematica fractal formula as 2D projection in Apophysis ?

On http://bugman123.com/Hypercomplex/ there is Mathematica
code for fractal lambdabulb and 4D quaternion Julia set

Code:

Normalize[x_] := x/Sqrt[x.x];
ListDensityPlot[Table[x = (j - 1) dx - 1.5; y = (i - 1) dx - 1.5; z =
image[[i, j]];
normal = Normalize[{(image[[i, j + 1]] - image[[i, j - 1]])z,
(image[[i + 1, j]] - image[[i - 1, j]]) z, 2dx}];
L = {1, 1, 0} - {x, y, z}; reflect = Normalize[2(normal.L)normal - L];
-(normal.Normalize[L] + reflect[[3]]), {i, 2, n}, {j, 2, n}],Mesh ->
False, Frame -> False]

I would like to translate this Mathematica fractal codes and some MB3D formulas
as 2D projections in Apophysis.
Somehow I would like to wrap up z-axis into  IFS.
Could you tell me how to write a plugin  for this in Apohysis ?