返回列表 回复 发帖
N1.jpg
新建图片.jpg
静极光通达,寂照含虚空,
附上画板文件及UF程序
Mandelnewton Julia 混合集20200515.gsp (18.41 KB)
init:
  z = #pixel
  float b = 1/@bailout
  float b2 = b*b
  complex zz = z
loop:
  complex oz = z
  complex zd = 1
  int i = 1
  WHILE (i < @numi)
    i = i + 1
    zd = 2*zd*z + 1
    z = sqr(z) + oz
    IF (|zd| > @bailout)
      i = @numi
    ENDIF
  ENDWHILE
  ; z is now m(oz) and zd is m'(oz), with m(x) = (x^2+x)^2+x...
  z = oz - (z/zd) ; Apply Newton's method once
  IF (@zeroinside)
    IF (|z| < b2)
      z = zz ; Trap z
    ENDIF
  ENDIF
bailout:
  |z - oz| > b
default:
  title = "Mandelnewton Julia sets"
新建图片.jpg
WHILE (i < @numi)
    i = i + 1
    zd = 2*zd*z + oz
    z = sqr(z) + oz
    IF (|zd| > @bailout)
      i = @numi
    ENDIF
新建图片.jpg
WHILE (i < @numi)
    i = i + 1
    zd =zd*(2*z-1) + oz
    z = sqr(z)-z + oz
    IF (|zd| > @bailout)
      i = @numi
    ENDIF
www.jpg
猴头一串
猴头.gsp (18.7 KB)
新建图片1.jpg
画板颜色确实不好调,画板玩分形,靠扫,成图慢,不好撑控,这是画板玩分形的大弊端
重新调色后的猴头要好些了 新建图片.jpg
新建图片.jpg
MJ集混搭.gsp (17.33 KB)
返回列表