genie_bottle {
fractal:
  title="genie_bottle" width=320 height=426 resolution=75
  author="Giuseppe Zito" created="june 17, 1999" numlayers=1
layer:
  caption="New Layer 2" opacity=100 visible=yes alpha=no mergemode=overlay
mapping:
  center=-0.0972915485401809609/0.0410804811266461736
  magn=0.527292424043048527 angle=44.1196658507921122
formula:
  filename="zg.frm" entry="smart_matter" maxiter=128 percheck=normal
inside:
  filename="dmj.ucl" entry="dmj-Trap" transfer=linear offset=200 repeat=yes
  p_trapshape="mirrored waves" p_trapcolor="distance"
  p_traptype="funky average 2" p_traporder=8 p_trapfreq=2
  p_trapcenter=-0.5/1 p_trapdrift=0.05/0 p_traporbit=0/0 p_movetrap=no
  p_aspect=3 p_threshold=1 p_diameter=1.5 p_angle=30 p_anglestep=2 p_skew=0
  p_skewstep=0 p_trapstart=0 p_trapiter=10000 p_trapskip=0 p_gauss=0
  p_gaussr=0 p_gausss=0 p_gausscenter=0.4375/0.8
  p_radialmode="kaleidoscope"
outside:
  filename="dmj.ucl" entry="dmj-Trap" transfer=linear offset=200 repeat=yes
  p_trapshape="mirrored waves" p_trapcolor="distance"
  p_traptype="funky average 3" p_traporder=8 p_trapfreq=2
  p_trapcenter=-0.5/1 p_trapdrift=0.05/0 p_traporbit=0/0 p_movetrap=no
  p_aspect=3 p_threshold=1 p_diameter=1.5 p_angle=30 p_anglestep=2 p_skew=0
  p_skewstep=0 p_trapstart=0 p_trapiter=10000 p_trapskip=0 p_gauss=0
  p_gaussr=0 p_gausss=0 p_gausscenter=0.4375/0.8
  p_radialmode="kaleidoscope"
gradient:
  smooth=yes numnodes=3 index=15 color=11205631 index=166 color=852010
  index=285 color=14348448
}

zg.frm:smart_matter {; Giuseppe Zito
 z = pixel ,

c0 = 0.880427

c1 = 0.99612999

c5 = 0.116933

c6 = 0.89767998

c7 = -0.95634902

c9 = -0.017626

d10 = -0.100467

  : 
 x = real(z), y = imag(z)

s0 =c0

s0 = s0 /c1

s1 = y

s1 = s1 +y

s0 = s0 *s1

s0 = s0 *c5

s0 = s0 /c6

s0 = s0 *c7

s0 = s0 -x

s0 = s0 *c9

s0 = s0 *x

s0 = s0 *x

s0 = s0 -y

newx = s0 

s0 = y

s0 = s0 -y

s0 = s0 +x

s0 = s0 -x

s0 = s0 *d10

s0 = s0 *y

s0 = s0 -x

newy = s0 

z = newx + flip(newy)
 newx < 4 && newx > -4 && newy < 4 && newy > -4 
}