Board logo

标题: UF分形的画板实现(第2集) [打印本页]

作者: 柳烟    时间: 2010-6-26 11:47     标题: UF分形的画板实现(第2集)

Swanson {
;A generic Swanson file.
;Can change the power settings.
init
z= pixel;
loop
z= z^@power + #pixel
z= z(cos(z)^2)+#pixel

bailout
z  4
default
param Power
default= (2,0)
endparam
switch
type= Mandric
power= @power
seed= #pixel
}
画板效果:
未命名.JPG
放大左边某小片的效果
未命名2.JPG
Swanson.gsp (39.16 KB)

图片附件: 未命名.JPG (2010-6-26 11:47, 26.67 KB) / 下载次数 1884
http://forums.netpad.net.cn/attachment.php?aid=5594&k=b053f7c71eceec18f3c3e986b848be24&t=1765213699&sid=Ll9cjL



图片附件: 未命名2.JPG (2010-6-26 11:47, 49.17 KB) / 下载次数 1919
http://forums.netpad.net.cn/attachment.php?aid=5595&k=de86ab9dcc278f76b3db8d529bdb9e16&t=1765213699&sid=Ll9cjL



附件: Swanson.gsp (2010-6-26 11:47, 39.16 KB) / 下载次数 3745
http://forums.netpad.net.cn/attachment.php?aid=5596&k=72983180f6919b7a6b817bbe1206fd41&t=1765213699&sid=Ll9cjL
作者: 柳烟    时间: 2010-6-26 15:05

上楼的文件中,参数K为正整数,取不同的值得不同的M集,将上楼的文件的K改为复数,更一般化了。制成后,我与UF面板中的图进行比较,当为虚数时,GSP扫出的图片与UF有少许不同,大体吻合。我用的是坛上现成的工具z^W,不知此工具是否有问题还是怎么的,那位高中教师帮忙制制这个工具,我想你们对复数要熟悉得多,咱丢得有点远了。
这是K=4的情形
未命名.JPG
这是K=2+i的情形
未命名1.JPG
而K=2+i时,UF中效果却是

Swanson1.gsp (40.02 KB)

图片附件: 未命名.JPG (2010-6-26 15:05, 32.61 KB) / 下载次数 1952
http://forums.netpad.net.cn/attachment.php?aid=5600&k=3fe438d4bb65945e28b9107a46e58d27&t=1765213699&sid=Ll9cjL



附件: Swanson1.gsp (2010-6-26 15:05, 40.02 KB) / 下载次数 3544
http://forums.netpad.net.cn/attachment.php?aid=5601&k=0e8670be249ab76d419f814053660024&t=1765213699&sid=Ll9cjL

图片附件: 未命名1.JPG (2010-6-26 15:18, 25.57 KB) / 下载次数 1893
http://forums.netpad.net.cn/attachment.php?aid=5603&k=bfc920fc6960296392234bcdc6796900&t=1765213699&sid=Ll9cjL



图片附件: Fractal2.png (2010-6-26 15:21, 25.25 KB) / 下载次数 1694
http://forums.netpad.net.cn/attachment.php?aid=5604&k=1f79b4ec0ba80043b2c57f7d0216d516&t=1765213699&sid=Ll9cjL


作者: 榕坚    时间: 2010-6-26 17:02

已验证没问题,这是@power=3:

图片附件: 捕获369.JPG (2010-6-26 17:02, 28.62 KB) / 下载次数 1504
http://forums.netpad.net.cn/attachment.php?aid=5608&k=d3def3059d2c1a6ef014e32a74de5ed7&t=1765213699&sid=Ll9cjL


作者: 柳烟    时间: 2010-6-27 00:44

F(x)=z^L-J的牛集(广义)
UF
Fractal2.JPG
GSP
未命名1.JPG
未命名3.JPG
上图片用了向老师的平滑着色法。
Newton(F(x)=z^L-J的牛集(广义).gsp (46.28 KB)

图片附件: Fractal2.JPG (2010-6-27 09:26, 66.99 KB) / 下载次数 2108
http://forums.netpad.net.cn/attachment.php?aid=5625&k=47542944d861a0a047f1ffc09a1c831e&t=1765213699&sid=Ll9cjL



图片附件: 未命名1.JPG (2010-6-27 00:44, 55.22 KB) / 下载次数 2137
http://forums.netpad.net.cn/attachment.php?aid=5626&k=593d2dc0aa23d5f5ce2fca68491c3bc8&t=1765213699&sid=Ll9cjL



图片附件: 未命名3.JPG (2010-6-27 00:44, 35.92 KB) / 下载次数 1939
http://forums.netpad.net.cn/attachment.php?aid=5627&k=17034b56178e0bc3372b923c7ebcf4ac&t=1765213699&sid=Ll9cjL



附件: Newton(F(x)=z^L-J的牛集(广义).gsp (2010-6-27 00:44, 46.28 KB) / 下载次数 3617
http://forums.netpad.net.cn/attachment.php?aid=5628&k=ade79f5c66ef7707801948457dd4ce0e&t=1765213699&sid=Ll9cjL
作者: mjj_ljh    时间: 2010-6-27 16:37

4# 柳烟
这两幅的结构和着色都不错,赞一个!
作者: xiaongxp    时间: 2010-6-27 19:00

这个牛集真“牛”。
平滑着色法不是我的发明,我最早见于雪飞扬的gsp文件,只是我常用而已。
作者: 柳烟    时间: 2010-6-27 20:19

楼上二位老师好。“革命”尚未成功,大家齐心协力。
平滑着色法实践结果,不错。榕老师说工具没问题,今天我继续用的结果,确实没问题。谢谢工具的制作者们。提供者们。
Hyperbon {
;As with Mandric, incorporates trigonomic
;functions. Allows user to choose Bailout and
;power.
;
init:
z= 0;
complex pix= #pixel

loop:
z= sin(cos(z)^@power) + pix
z= (z / 2+ z^2) + #pixel
bailout:
|z| < @bailout
default:
param Power
default= (2,0)
endparam

param Bailout
default= 6
endparam
}
这个分形本来简单,可今天我干了四五次,最后一次与UF对照,发现不对,又检查,发现对的,只是逃逸参数那个地方稍微修改了一下,结果对头了,累!
未命名3.JPG
未命名44.JPG
改变复参数power,或改变阈值,这个M集有得玩。
Hyperbon.gsp (40.8 KB)

图片附件: 未命名3.JPG (2010-6-27 20:19, 31.89 KB) / 下载次数 1886
http://forums.netpad.net.cn/attachment.php?aid=5660&k=53de86d54c31de03113153bb48925dcc&t=1765213699&sid=Ll9cjL



图片附件: 未命名44.JPG (2010-6-27 20:19, 42.01 KB) / 下载次数 1939
http://forums.netpad.net.cn/attachment.php?aid=5661&k=a6ec18d87188263ad4e4457537972230&t=1765213699&sid=Ll9cjL



附件: Hyperbon.gsp (2010-6-27 20:19, 40.8 KB) / 下载次数 3670
http://forums.netpad.net.cn/attachment.php?aid=5662&k=03faa9740f47cf7bd24948b7ea9c5766&t=1765213699&sid=Ll9cjL
作者: 柳烟    时间: 2010-6-28 22:17

lambdafn {
init:
  z = pixel
loop:
  z = @lambda * fn1(z)
bailout:
  |z| < @bailout
default:
  title = "Lambda c * fn(z)"
  maxiter = 149
  magn = 0.5
  param lambda
    caption = "Parameter"
    default = (1, 0.4)
  endparam
  param bailout
    caption = "Bailout value"
    default = 64.0
    min = 1
  endparam
  func fn1
    caption = "First Function"
    default = sin()
  endfunc
switch:
  type = "mandelfn"  
  bailout = bailout
  fn1 = fn1
}
本来想弄出UF是的fn为sin时的效果,可是后半部分代码复杂,不很懂,所以弄不出:
Fractal2.JPG
结果弄出这个冬冬,也美得可以:
未命名.JPG
未命名.JPG
Lambda c乘fn(z)的变种.gsp (30.6 KB)

图片附件: Fractal2.JPG (2010-6-29 21:37, 56.02 KB) / 下载次数 2091
http://forums.netpad.net.cn/attachment.php?aid=5678&k=98694c8ddcabd08f6e9b35205a1ba107&t=1765213699&sid=Ll9cjL



图片附件: 未命名.JPG (2010-6-28 22:17, 52.64 KB) / 下载次数 2194
http://forums.netpad.net.cn/attachment.php?aid=5679&k=0af4dba0ce87756a215aa9c2e00fa94a&t=1765213699&sid=Ll9cjL



附件: Lambda c乘fn(z)的变种.gsp (2010-6-29 07:22, 30.6 KB) / 下载次数 3799
http://forums.netpad.net.cn/attachment.php?aid=5683&k=6b466142cfe0eb040566de2b03df301e&t=1765213699&sid=Ll9cjL

图片附件: 未命名.JPG (2010-6-29 07:24, 77.98 KB) / 下载次数 2089
http://forums.netpad.net.cn/attachment.php?aid=5684&k=3467e11727a6447b52e93d6a3c15f999&t=1765213699&sid=Ll9cjL


作者: 柳烟    时间: 2010-6-29 07:52

再扫一图
未命名1.JPG

图片附件: 未命名1.JPG (2010-6-29 07:52, 65.55 KB) / 下载次数 2112
http://forums.netpad.net.cn/attachment.php?aid=5685&k=5cafd58cef8009a45f73014f0ecc13c1&t=1765213699&sid=Ll9cjL


作者: 柳烟    时间: 2010-6-29 13:43

fn*z+z {
init:
  z = pixel
loop:
  z = (@first * fn1(z) + @second) * z
bailout:
  (@test == 0 && |z| <= @bailout) ||                                         \
  (@test == 1 && sqr(real(z)) <= @bailout) ||                                \
  (@test == 2 && sqr(imag(z)) <= @bailout) ||                                \
  (@test == 3 && (sqr(real(z)) <= @bailout && sqr(imag(z)) < @bailout)) ||   \
  (@test == 4 && (sqr(real(z)) <= @bailout || sqr(imag(z)) < @bailout)) ||   \
  (@test == 5 && (sqr(abs(real(z)) + abs(imag(z))) <= @bailout)) ||          \
  (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout))
default:
  title = "fn * z + z"
  magn = 0.5
  maxiter = 149
  param first
    caption = "First Coefficient"
    default = (1,0)
  endparam
  param second
    caption = "Second Coefficient"
    default = (1,0)
  endparam
  param test
    caption = "Bailout Test"
    default = 0
    enum = "mod" "real" "imag" "or" "and" "manh" "manr"
  endparam
  param bailout
    caption = "Bailout value"
    default = 64.0
    min = 1.0
  endparam
GSP图----fn(z)=sinz
6291.JPG
GSP图----fn(z)=cosz
6292.JPG
GSP图----fn(z)=sinhz
6293.JPG
GSP图----fn(z)=coshz
6294.JPG
fn (z) + z.gsp (27.98 KB)

图片附件: 6291.JPG (2010-6-29 13:43, 25.26 KB) / 下载次数 1939
http://forums.netpad.net.cn/attachment.php?aid=5691&k=1c98d08a1697d0267b609a4b19748588&t=1765213699&sid=Ll9cjL



图片附件: 6292.JPG (2010-6-29 13:52, 28.01 KB) / 下载次数 1956
http://forums.netpad.net.cn/attachment.php?aid=5692&k=332d597d695a7645f2380bc02bb305a0&t=1765213699&sid=Ll9cjL



图片附件: 6293.JPG (2010-6-29 14:01, 18.69 KB) / 下载次数 1936
http://forums.netpad.net.cn/attachment.php?aid=5693&k=e8b094dcb312b4e3d2bd212316e05963&t=1765213699&sid=Ll9cjL



图片附件: 6294.JPG (2010-6-29 14:11, 23.73 KB) / 下载次数 1895
http://forums.netpad.net.cn/attachment.php?aid=5694&k=f8ab4fa5da703d42c22924799f0afa16&t=1765213699&sid=Ll9cjL



附件: fn (z) + z.gsp (2010-6-29 14:15, 27.98 KB) / 下载次数 3716
http://forums.netpad.net.cn/attachment.php?aid=5695&k=e34568f02a0ce2dbe025b84792bbbdb7&t=1765213699&sid=Ll9cjL
作者: 柳烟    时间: 2010-6-30 14:38

8楼改变一下逃逸参数中的阈值,结果与UF中的正牌效果一致。
未命名.JPG
未命名.JPG
Lambda_cfn(z).gsp (30.61 KB)

图片附件: 未命名.JPG (2010-6-30 14:38, 54.97 KB) / 下载次数 1363
http://forums.netpad.net.cn/attachment.php?aid=5723&k=4e18221916ce6c845ad57deeed6e6449&t=1765213699&sid=Ll9cjL



图片附件: 未命名.JPG (2010-6-30 14:59, 71.95 KB) / 下载次数 1377
http://forums.netpad.net.cn/attachment.php?aid=5724&k=185df9c6d131c68398d5fcb03d33cc99&t=1765213699&sid=Ll9cjL



附件: Lambda_cfn(z).gsp (2010-6-30 14:59, 30.61 KB) / 下载次数 2454
http://forums.netpad.net.cn/attachment.php?aid=5725&k=cfd6449a1b959b1a4c51a95c277a54dc&t=1765213699&sid=Ll9cjL
作者: 柳烟    时间: 2010-7-1 22:10

mandelfn {
init:
  z = @start + #pixel
loop:
  z = #pixel * fn1(z)
bailout:
  |z| < @bailout
default:
  title = "Mandelbrot c * fn(z)"
  maxiter = 149
  magn = 0.25
  param start
    caption = "Perturbation"
    default = (0,0)
  endparam
  param bailout
    caption = "Bailout value"
    default = 64.0
    min = 1
  endparam
  func fn1
    caption = "First Function"
    default = sin()
  endfunc
switch:
  type = "lambdafn"
  lambda = pixel
  bailout = bailout
  fn1 = fn1
}
我这文件源于UF,又高于UF,我选用了四个函数,搞了些开关,这些单个函数及其任意几个的和均可扫出M集,有27个左右,我公布几张我扫出的几张图片,板友们有兴趣,自已去扫。
未命名1.JPG
未命名2.JPG
未命名4.JPG
未命名6.JPG
Mandelbrot cfn(z).gsp (25.49 KB)

图片附件: 未命名1.JPG (2010-7-1 22:10, 21.24 KB) / 下载次数 1135
http://forums.netpad.net.cn/attachment.php?aid=5781&k=352d09d9d37ab4297673096ba6cd5e49&t=1765213699&sid=Ll9cjL



图片附件: 未命名2.JPG (2010-7-1 22:10, 20.63 KB) / 下载次数 1139
http://forums.netpad.net.cn/attachment.php?aid=5782&k=0666652ade546e68309f399eaf1eccfd&t=1765213699&sid=Ll9cjL



图片附件: 未命名4.JPG (2010-7-1 22:10, 18.9 KB) / 下载次数 1127
http://forums.netpad.net.cn/attachment.php?aid=5783&k=2f9bc7adeb47861faee0f6ee29848607&t=1765213699&sid=Ll9cjL



图片附件: 未命名6.JPG (2010-7-1 23:22, 33.77 KB) / 下载次数 1171
http://forums.netpad.net.cn/attachment.php?aid=5794&k=113fedb90e19abef716d7218ec6aa73e&t=1765213699&sid=Ll9cjL



附件: Mandelbrot cfn(z).gsp (2010-7-1 23:33, 25.49 KB) / 下载次数 2276
http://forums.netpad.net.cn/attachment.php?aid=5795&k=c77faa1bd520c704748a8b98ea217635&t=1765213699&sid=Ll9cjL
作者: 柳烟    时间: 2010-7-2 21:04

sqr[1/fn] {
; Written by Luke Plant
; Modified by Frederik Slijkerman
init:
  complex z = pixel

loop:
  z = sqr(1/fn1(z))

bailout:
  (@test == 0 && |z| <= @bailout) ||                                        \
  (@test == 1 && sqr(real(z)) <= @bailout) ||                               \
  (@test == 2 && sqr(imag(z)) <= @bailout) ||                               \
  (@test == 3 && (sqr(real(z)) <= @bailout && sqr(imag(z)) < @bailout)) ||  \
  (@test == 4 && (sqr(real(z)) <= @bailout || sqr(imag(z)) < @bailout)) ||  \
  (@test == 5 && (sqr(abs(real(z)) + abs(imag(z))) <= @bailout)) ||         \
  (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout))
  
default:
  title = "Sqr(1/fn(z))"
  center = (0,0)
  magn = 0.5
  maxiter = 149
  param test
    caption = "Bailout Test"
    default = 0
    enum = "mod" "real" "imag" "or" "and" "manh" "manr"
  endparam
  param bailout
    caption = "Bailout value"
    default = 64.0
    min = 1
  endparam
  func fn1
    caption = "First Function"
    default = sin ()
  endfunc
}
造的GSP文件中,开关多,参数多,复分形多,改变函数,或改变参数K,或将函数任意组合都成,同一函数,同一参数K,改变mode\real\imag……,又可得到不同的分形,今晚我都没法扫完我这文件中的所有分形图片呀。分形产生的图片结构实在美不胜收,试扫几张。
GSP图片
未命名1.JPG
未命名2.JPG
未命名3.JPG
未命名44.JPG
Sqr(1除fn(z))1.gsp (34.19 KB)

图片附件: 未命名1.JPG (2010-7-2 21:04, 25.75 KB) / 下载次数 1143
http://forums.netpad.net.cn/attachment.php?aid=5810&k=609185fa595905c8da51cbe56da0d373&t=1765213699&sid=Ll9cjL



图片附件: 未命名2.JPG (2010-7-2 23:30, 29.22 KB) / 下载次数 1121
http://forums.netpad.net.cn/attachment.php?aid=5811&k=7df263318cb52daf3856affe6ea35ed3&t=1765213699&sid=Ll9cjL



图片附件: 未命名3.JPG (2010-7-3 00:22, 24.51 KB) / 下载次数 1125
http://forums.netpad.net.cn/attachment.php?aid=5812&k=2cf4e41fcc10dbe7d3f122528ec7ad13&t=1765213699&sid=Ll9cjL



图片附件: 未命名44.JPG (2010-7-3 00:52, 49.45 KB) / 下载次数 1142
http://forums.netpad.net.cn/attachment.php?aid=5813&k=65128ea1ff54a0d251d376b19aecbf51&t=1765213699&sid=Ll9cjL



图片附件: 未命名5.JPG (2010-7-3 09:37, 18.74 KB) / 下载次数 1018
http://forums.netpad.net.cn/attachment.php?aid=5817&k=666fc8d7f010ac86d26fea682cf26563&t=1765213699&sid=Ll9cjL



附件: Sqr(1除fn(z))1.gsp (2010-7-3 09:50, 34.19 KB) / 下载次数 2354
http://forums.netpad.net.cn/attachment.php?aid=5820&k=37d37b11087a1a4bce8917a2b4c36887&t=1765213699&sid=Ll9cjL
作者: 柳烟    时间: 2010-7-3 12:01

接着扫。
未命名6.JPG
未命名7.JPG

图片附件: 未命名6.JPG (2010-7-3 12:01, 23.47 KB) / 下载次数 1035
http://forums.netpad.net.cn/attachment.php?aid=5827&k=eff8692489ef3f9d3096ea183a073541&t=1765213699&sid=Ll9cjL



图片附件: 未命名7.JPG (2010-7-3 13:22, 23.81 KB) / 下载次数 1067
http://forums.netpad.net.cn/attachment.php?aid=5831&k=df322af6fc4666e847cdc76a7176ac5a&t=1765213699&sid=Ll9cjL


作者: xyj200909    时间: 2010-7-3 15:28

14# 柳烟
非常喜欢这几张,有被塑料薄膜蒙住的效果
作者: 柳烟    时间: 2010-7-3 17:03

popcornjul {
; Written by Luke Plant
; Modified by Frederik Slijkerman
init:
  float x = real(pixel)
  float y = imag(pixel)
  float h = @step
  float temp = 0
  
loop:
  temp=x
  x=x-h*sin(y+tan(3*y))
  y=y-h*sin(temp+tan(3*temp))
  z = x+flip(y)
  
bailout:
  |z| <= @bailout
  
default:
  title = "Popcorn Julia"
  maxiter = 149
  magn = 0.66666666666666
  param step
    caption = "Step size"
    default = 0.05
  endparam
  param bailout
    caption = "Bailout value"
    default = 4.0
    min = 1
  endparam
}
本想整出UF中的效果:
100612133705a3c76de279666d.png
结果弄出这个怪物,还没找到原因.
GSP
未命名.JPG
Popcorn Julia变种.gsp (15.2 KB)

图片附件: 100612133705a3c76de279666d.png (2010-7-3 17:03, 162.19 KB) / 下载次数 1184
http://forums.netpad.net.cn/attachment.php?aid=5836&k=e49e0c000ae7021a9b4bf269fb189343&t=1765213699&sid=Ll9cjL



图片附件: 未命名.JPG (2010-7-3 17:24, 38.95 KB) / 下载次数 1074
http://forums.netpad.net.cn/attachment.php?aid=5837&k=6cf7827eb818379e81e0c933680b510d&t=1765213699&sid=Ll9cjL



附件: Popcorn Julia变种.gsp (2010-7-3 17:24, 15.2 KB) / 下载次数 2460
http://forums.netpad.net.cn/attachment.php?aid=5838&k=9a4554695ecf03f62a24540e45c2b1a9&t=1765213699&sid=Ll9cjL
作者: 柳烟    时间: 2010-7-6 00:12

扫一图片
未命名.JPG

图片附件: 未命名.JPG (2010-7-6 00:12, 47.14 KB) / 下载次数 1068
http://forums.netpad.net.cn/attachment.php?aid=5898&k=9279cb14db9486b642a291f929964a9d&t=1765213699&sid=Ll9cjL


作者: inRm    时间: 2010-7-6 08:57

16# 柳烟
质感强烈。有意思
作者: 柳烟    时间: 2010-7-6 19:26

phoenixcplx {
init:
  complex z = pixel  
  complex y = 0
  complex oldz = 0
loop:
  oldz = z
  if @degree >= 2
    z = z^@degree + p1 * z^(@degree - 1) + p2 * y
  elseif @degree <= -3
    z = z^(-@degree) + p1 * z^(-@degree - 2) + p2 * y
  else
    z = z^2 + p1 + p2 * y
  endif
  y = oldz
bailout:
  (@test == 0 && |z| <= @bailout) ||                                         \
  (@test == 1 && sqr(real(z)) <= @bailout) ||                                \
  (@test == 2 && sqr(imag(z)) <= @bailout) ||                                \
  (@test == 3 && (sqr(real(z)) <= @bailout && sqr(imag(z)) < @bailout)) ||   \
  (@test == 4 && (sqr(real(z)) <= @bailout || sqr(imag(z)) < @bailout)) ||   \
  (@test == 5 && (sqr(abs(real(z)) + abs(imag(z))) <= @bailout)) ||          \
  (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout))
default:
  title = "Phoenix (complex)"
  maxiter = 149
  param p1
    caption = "Parameter 1"
    default = (0.2, 0)
  endparam
  param p2
    caption = "Parameter 2"
    default = (0.3, 0)
  endparam
  param degree
    caption = "Degree"
    default = 0
  endparam
  param test
    caption = "Bailout Test"
    default = 0
    enum = "mod" "real" "imag" "or" "and" "manh" "manr"
  endparam
  param bailout
    caption = "Bailout value"
    default = 4.0
    min = 1.0
  endparam
switch:
  type = "mandphoenixclx"
  degree = degree
  test = test
  bailout = bailout
}
GSP造好后,图片色彩实在太具诱惑力,让人难以抵挡,试扫几张。
1.JPG
2.JPG
3.JPG

图片附件: 1.JPG (2010-7-6 19:26, 27.99 KB) / 下载次数 1080
http://forums.netpad.net.cn/attachment.php?aid=5910&k=3c37af9ac748bf97c460e79f1fa09531&t=1765213699&sid=Ll9cjL



图片附件: 2.JPG (2010-7-6 19:43, 23.46 KB) / 下载次数 1054
http://forums.netpad.net.cn/attachment.php?aid=5911&k=2553a43a42f1b477ebb4ed67cdf3573a&t=1765213699&sid=Ll9cjL



图片附件: 3.JPG (2010-7-6 20:11, 20.82 KB) / 下载次数 1056
http://forums.netpad.net.cn/attachment.php?aid=5912&k=7f625d2f4f396ec2ca634410f7d9e633&t=1765213699&sid=Ll9cjL


作者: 柳烟    时间: 2010-7-6 23:01

UF中的图片与我的图片有些许差别,不知何故。
Fractal2.png
在UF中改变P1、P2后,出现的分形,我这带开关的J集与其不尽一致,也不知何故,而代码中不见丝毫信息。我将源文件发于此,大家研究,并批评。
Phoenix (complex)1.gsp (38.31 KB)

图片附件: Fractal2.png (2010-7-6 23:01, 30.93 KB) / 下载次数 1081
http://forums.netpad.net.cn/attachment.php?aid=5913&k=8933e0a779f0ff20a544003f2f331e75&t=1765213699&sid=Ll9cjL



附件: Phoenix (complex)1.gsp (2010-7-6 23:01, 38.31 KB) / 下载次数 2327
http://forums.netpad.net.cn/attachment.php?aid=5914&k=a433483136df9143f0774c648f63f249&t=1765213699&sid=Ll9cjL
作者: xiaongxp    时间: 2010-7-7 11:41

16# 柳烟
此图花纹像汉鼎上的卷云纹,加上柳老师的作色更显古朴,非常欣赏。一个小小的建议,不必模仿原UF图,增大阈值去掉逃逸圈,使画面满是卷云纹,视觉效果可能会更好。
作者: xuefeiyang    时间: 2010-7-7 12:10

这三幅图分别对应着分形的外部刻画的三种方式,第一种是直线型的,第二种是矩形的,第三种是圆形的。在画板中实现这些效果不必如此麻烦。只需要改变P值的计算就可以了。
作者: 柳烟    时间: 2010-7-7 17:28

照二位老师的建议,将p中的阈值加大成十万,得满屏卷纹,效果不错
5555.JPG

图片附件: 5555.JPG (2010-7-7 17:28, 52.49 KB) / 下载次数 1981
http://forums.netpad.net.cn/attachment.php?aid=5932&k=fbb06c36b60da16e61c38a6503bbc710&t=1765213699&sid=Ll9cjL


作者: xiaongxp    时间: 2010-7-8 20:38

也作一个爆米花儿分形
Popcorn.jpg

图片附件: Popcorn.jpg (2010-7-8 20:38, 132.99 KB) / 下载次数 2027
http://forums.netpad.net.cn/attachment.php?aid=5959&k=85be59d384622e23663bf724e851b1ff&t=1765213699&sid=Ll9cjL



附件: Popcorn.gsp (2010-7-8 20:38, 15.27 KB) / 下载次数 2328
http://forums.netpad.net.cn/attachment.php?aid=5960&k=f7aed9299581a3b84459930c39a52e5e&t=1765213699&sid=Ll9cjL
作者: 柳烟    时间: 2010-7-8 21:22

[localimg=180,132]1[/localimg][
未命名1.JPG
未命名3.JPG
按UF中的开关项制作这广义的M集,胡乱扫两张,发于此.尔等有兴趣,自已打开我的文件,再扫其余的,并放大耍耍.

附件: z^w+c的广义M集.gsp (2010-7-8 21:22, 20.24 KB) / 下载次数 2621
http://forums.netpad.net.cn/attachment.php?aid=5961&k=3a646e43699eab5d54a1230869bc026c&t=1765213699&sid=Ll9cjL

图片附件: 未命名1.JPG (2010-7-8 21:22, 34.43 KB) / 下载次数 1780
http://forums.netpad.net.cn/attachment.php?aid=5962&k=febe7e52215ce14f1d24ed3486b44986&t=1765213699&sid=Ll9cjL



图片附件: 未命名3.JPG (2010-7-8 21:39, 38.84 KB) / 下载次数 1767
http://forums.netpad.net.cn/attachment.php?aid=5963&k=f99d8d0b2f41173076e1011c4785e8cc&t=1765213699&sid=Ll9cjL






欢迎光临 inRm3D: 画板论坛 (http://forums.netpad.net.cn/) Powered by Discuz! 7.0.0