返回列表 回复 发帖
New.jpg
UF效果
捕获uf4.PNG
Mathcad效果
捕获400002.PNG
UF做的中间的那个心怎么就不见了?请老师帮助!
UF代码,由于才开始学习UF,照猫画虎做的,代码不够简练,而且着色很不得法啊!
heart {
init:
  int iter = 0
  float num = @n
  float Xabs = 0
  float Yabs = 0
  float Dsgd0 = 0
  float Circle = 0
  float ZtoPsqd = 0
  float Rc = @r
  int n1 = @n
  float RcSqd = Rc^2
  bool Trapped = false
loop:
  iter = iter + 1
  if iter>skip && !Trapped
    Xabs = real(#z)
    Yabs = imag(#z)
    Dsgd0 = (Xabs^2+Yabs^2-1/64)-Xabs^(2/3)*Yabs

    if Dsgd0 < 0
      Trapped = true
      ZtoPsqd= abs(Dsgd0)
        Circle = iter

   endif
endif

final:
  if !trapped
    #solid = true
  else
    Circle = ((Circle + @off) % num)
    float Ratio = sqrt(ZtoPsqd/Rcsqd)
    float ColorIndex = 50 * Ratio + Circle * 50
    #index = (ColorIndex + 1) % 256 /256
  endif
default:
  title = "heart"
  param r
    caption = "Circle radius"
    default = 0.4
  endparam
  param n
    caption = "num"
    default = 4
    min = 1
    max = 19
  endparam
  param skip
    caption = "Iters to skip"
    default = 0
    hint = "Iterations to skip."
  endparam
  param off
    caption = "Hue cycle"
    default = 1
    min = 0
    max = 7
    hint = "This rotates the coloring order of the balls."
  endparam
}
130# 柳烟
柳老师,月城对联通结的做法您看看这个,相信您能理解的。
http://tieba.baidu.com/p/3199652383
1.jpg 2.jpg
3.jpg 4.jpg 5.jpg 6.jpg 7.jpg 8.jpg 9.jpg a.jpg b.jpg c.jpg d.jpg
返回列表