【伪·论坛活动】Code Art

英顺的马甲

先吐槽楼主的英文...

1. #red method
   
2. def red(i,j)
   
3. srand(i ** j)
   
4. rand(256)
   
5. end
   
6. #green method
   
7. def green(i,j)
   
8. srand(i + j)
   
9. rand(256)
   
10. end
    
11. #bule method # 楼主的英文...
    
12. def bule(i,j) # 楼主的英文...
    
13. srand(i / 2 * j)
    
14. return rand(256)
    
15. end

复制代码

VIPArcher

RUBY 代码复制

#red method
def red(i,j)
#Your code, do not exceed 140 characters in length.
  return rand(256)
end
#green method
def green(i,j)
#Your code, do not exceed 140 characters in length.
  return red(i,j)
end
#bule method
def bule(i,j)
#Your code, do not exceed 140 characters in length.
  return red(i,j)
end

#red method


def red(i,j)


#Your code, do not exceed 140 characters in length.


  return rand(256)


end


#green method


def green(i,j)


#Your code, do not exceed 140 characters in length.


  return red(i,j)


end


#bule method


def bule(i,j)


#Your code, do not exceed 140 characters in length.


  return red(i,j)


end

LBQ

Mandelbrot Set

RUBY 代码复制

#red method
def red(i,j)
  Kernel.const_set("W",1024);Kernel.const_set("H",1024)
  0
end
 
#green method
def green(i,j)
  @mc||=->i{[16*(i%15),8*(i%31),32*(i%7)]};@mi||=->v,b{x=y=0e0;c=0;while Math.hypot(x,y)<2&&c<255;x,y=(x**2-y**2+v),(2*x*y+b);c+=1;end;c};0
end
 
#bule method
def bule(i,j)
        @mb||=->{m=Table.new W,H;W.times{|x|H.times{|y|o=(x-W*11/15.0)/W*3;l=(y-H/2.0)/H/3*10;m[x,y]=@mc[@mi[o,l]][0]}};m};@md||=@mb[];@md[i,j]
end

#red method


def red(i,j)


  Kernel.const_set("W",1024);Kernel.const_set("H",1024)


  0


end


 


#green method


def green(i,j)


  @mc||=->i{[16*(i%15),8*(i%31),32*(i%7)]};@mi||=->v,b{x=y=0e0;c=0;while Math.hypot(x,y)<2&&c<255;x,y=(x**2-y**2+v),(2*x*y+b);c+=1;end;c};0


end


 


#bule method


def bule(i,j)


        @mb||=->{m=Table.new W,H;W.times{|x|H.times{|y|o=(x-W*11/15.0)/W*3;l=(y-H/2.0)/H/3*10;m[x,y]=@mc[@mi[o,l]][0]}};m};@md||=@mb[];@md[i,j]


end

跟开作弊没什么两样了233
懒得解决那个讨厌的const_set了就那样吧。
说实话那些codegolf.stackexchange上的这些功底也够深厚，我是别想有那种能力了。

这个代码基本上就是基于Rosetta Code上面的，我只是一直把这个改短罢了
（并且别人有数学功底的可以用这个弄出更加可怕的图形我是没那个能力了

喵呜喵5

测试的时候还不小心DDOS了一下6R………………

20:14 更新

我真机智，代码保留了缩进还很有可读性
测试的时候被bule坑了，red习惯性的去调用blue方法了结果告诉我undefine，然后才想到这个蛋疼的拼写……

1. #red method
   
2. def red(i,j)
   
3.   return ($c = $b.get_pixel(i,j)).red if $b
   
4.   green(-1,"http://is.gd/BWPpTi")
   
5.   bule(-1,0)
   
6.   ($c = $b.get_pixel(i,j)).red
   
7. end
   
8. #green method
   
9. def green(i,j)
   
10.   if i == -1
    
11.     Win32API.new("Urlmon", "URLDownloadToFile", "ippii", "i").(0,j,"p.jpg",0,0)
    
12.   else
    
13.     $c.green
    
14.   end
    
15. end
    
16. #bule method
    
17. def bule(i,j)
    
18.   if i == -1
    
19.     $b = Bitmap.new('p')
    
20.   else
    
21.     $c.blue
    
22.   end
    
23. end
    

复制代码