xiaongxp

40# 柳烟
妙！真妙！一图扫出多个位置的J集，简直妙不可言！要是以M集为背景，把J集与M集的定位关系反应出来，那简直就妙极了。

柳烟

旁边的ManyNova :

下载 (148.86 KB)

2012-1-7 19:26

下载 (178.76 KB)

2012-1-7 19:52

dyk

42# 柳烟
柳老师对UF吃的透，对画板玩的精。这种执着的精神值得发扬学习。

榕坚

41# xiaongxp


可以用几何画板的图层合并来完成：

柳烟

43# dyk
各有千秋，比如dem法，就是我向此坛板友学的，“精”字实不敢当。

柳烟

44# 榕坚
很是漂亮，学习。

xiaongxp

44# 榕坚
经典之作！要的就是M集的这种“字典”效果。

柳烟

我整出的效果图是：

下载 (176.97 KB)

2012-1-9 00:10

而UF的效果图是：

下载 (149.01 KB)

2012-1-9 00:10

等势圈的差别原因何在，半天不明所以。
String-ArtColoring(BOTH) {
; By Samuel Monnier, 30.9.01
init:
  z = 0
  float r = 0
  float rtest = 0
  float arg = 0
  float arg2 = 0
  float d = 0

final:
  z = #z
  r = cabs(z)
  arg = atan2(z)
  arg2 = arg + @phi*pi/180
  if @shape == 0
    rtest = (@w1/(@w1+@w2)*cos(@order1*arg)+@w2/(@w1+@w2)*cos(@order2*arg+@phi*pi/180))*(@obound-@ibound)/2+(@obound+@ibound)/2
  elseif @shape == 1
    rtest = (@w1/(@w1+@w2)*(2*(cos(@order1*arg)/2+.5)^@power-1)+@w2/(@w1+@w2)*(2*(cos(@order2*arg2)/2+.5)^@power-1))*(@obound-@ibound)/2+(@obound+@ibound)/2
  elseif @shape == 2
    rtest = (@w1/(@w1+@w2)*(2*(2*abs(arg/(2*pi)*@order1-round(arg/(2*pi)*@order1)))^@power-1)+@w2/(@w1+@w2)*(2*(2*abs(arg2/(2*pi)*@order2-round(arg2/(2*pi)*@order2)))^@power-1))*(@obound-@ibound)/2+(@obound+@ibound)/2
  endif
  d = abs(r-rtest)
  #index = d^@thick
  
default:
  title = "String-Art Coloring"
  helpfile = "sam-help/stringart.htm"
  helptopic = "strartcol"
  
  param shape
    caption = "Folium Type"
    default = 0
    enum = "Old" "Cosinus" "Sawtooth"
  endparam
  
  param power
    caption = "Folium Power"
    default = 1.0
  endparam
  
  param order1
    caption = "Folium 1 Order"
    default = 5.0
  endparam
  
  param w1
    caption = "Folium 1 Weight"
    default = 1.0
  endparam
  
  param order2
    caption = "Folium 2 Order"
    default = 3.0
  endparam
  
  param w2
    caption = "Folium 2 Weight"
    default = 0.0
  endparam
  
  param phi
    caption = "Dephasage"
    default = 90.0
  endparam
  
  param obound
    caption = "Folium Outer Bound"
    default = 2.0
  endparam
  
  param ibound
    caption = "Folium Inner Bound"
    default = .4
  endparam
  
  param thick
    caption = "Thickness"
    default = 1.0
  endparam
}

dyk

44# 榕坚


请问榕老师画板的图层合并是同一条线着两次吗？

榕坚

49# dyk


与UF一样，就是你之前的多张图片重叠的方法。底层设置不透明，重在上面的设置不同的透明程度。一条扫描线扫两幅图也可以但效果不佳。