大家会哪几种代码？

876加几

我会Ruby、VB和VB.NET。
代码演示：

RUBY 代码复制

array = [1,2,3,4]
array.clear
p array #=>[]
p array[0] #=> nil
class Array
  def self.plus(ary1, ary2)
    return ary1 + ary2
  end
end
p Array.plus([1],[2]) #=>[1,2]

array = [1,2,3,4]


array.clear


p array #=>[]


p array[0] #=> nil


class Array


  def self.plus(ary1, ary2)


    return ary1 + ary2


  end


end


p Array.plus([1],[2]) #=>[1,2]

VB 代码复制

Dim i As Integer
For i = 0 To 10
  MsgBox(i.ToString) '=>0~10
End For
'其实是VB.NET

Dim i As Integer


For i = 0 To 10


  MsgBox(i.ToString) '=>0~10


End For


'其实是VB.NET

好了，请大家尽快投票吧。

余烬之中

你没发现ruby有两项吗

我还会伪代码（这是只有笨蛋才能看到的神奇文字

RUBY 代码复制

eval "Dim i As Integer
For i = 0 To 10
  MsgBox(i.ToString) '=>0~10
Next".each_line.map{|line|
  case line
  when /^\s*Dim/
    line.sub!(/^Dim/){}
    line.gsub!(/\s+(.+)\s+As\s+(.+)($|,)/){ "#$1 = #{ {"Integer" => "0"}[$2] }" }
  when /^\s*For/
    line.sub!(/^For\s+(.+)\s+=\s+(\d+)\s+To\s+(\d+)/){ "#$2.upto(#$3){|#$1|" }
  when /^\s*Next/
    line.sub!(/^\s*Next.*/){ "}" }
  else
    line.gsub!(/MsgBox\((.*)\)/){ "puts #$1"}
    line.gsub!(/'/){ "#" }
    line.gsub!(/([^.]+)\.([^.]+?)(\s+.+|$)/){ "#$1.#{ {"ToString" => "to_s"}[$2] }#$3" }
  end
  line
}.join

eval "Dim i As Integer


For i = 0 To 10


  MsgBox(i.ToString) '=>0~10


Next".each_line.map{|line|


  case line


  when /^\s*Dim/


    line.sub!(/^Dim/){}


    line.gsub!(/\s+(.+)\s+As\s+(.+)($|,)/){ "#$1 = #{ {"Integer" => "0"}[$2] }" }


  when /^\s*For/


    line.sub!(/^For\s+(.+)\s+=\s+(\d+)\s+To\s+(\d+)/){ "#$2.upto(#$3){|#$1|" }


  when /^\s*Next/


    line.sub!(/^\s*Next.*/){ "}" }


  else


    line.gsub!(/MsgBox\((.*)\)/){ "puts #$1"}


    line.gsub!(/'/){ "#" }


    line.gsub!(/([^.]+)\.([^.]+?)(\s+.+|$)/){ "#$1.#{ {"ToString" => "to_s"}[$2] }#$3" }


  end


  line


}.join

shy

就会一点从师兄那学到的C

你最珍贵

半种　　

taroxd

你没发现你 Ruby 的代码是错误的吗？别跟我说你这一段是在 Array.instance_eval 里面的

VB我也记得是 Next i 而不是 End For 吧？

你觉得怎样才算【会】呢？

看得懂语法：Lisp、C、C++、Python、VB、Ruby
写得出简单程序：C、C++、Ruby（VB仅限高中会考等级所以不算）
写得出程序卖萌：Ruby

代码演示：
https://rpg.blue/thread-368425-1-1.html
https://rpg.blue/thread-368980-1-1.html

H·H·Y

我都会！…………加减乘除……

taroxd

余烬之中 发表于 2014-7-30 14:04
你没发现ruby有两项吗

我还会伪代码（这是只有笨蛋才能看到的神奇文字

RUBY 代码复制

def int(_) end
def main(&b)
  Object.send(:define_method, :main, &b)
  main
end
std = Module.new do
  def self.cout; STDOUT; end
  def self.endl; "\n"; end
end
 
 
#include <iostream>
int main() {
  std::cout << "Hello world!" << std::endl;
  return 0;
}

def int(_) end


def main(&b)


  Object.send(:define_method, :main, &b)


  main


end


std = Module.new do


  def self.cout; STDOUT; end


  def self.endl; "\n"; end


end


 


 


#include <iostream>


int main() {


  std::cout << "Hello world!" << std::endl;


  return 0;


}

taroxd

@余烬之中  

Ruby 2.0 环境

RUBY 代码复制

Array.instance_eval do
  class Array
    $array = self
  end
end
 
p $array.new # []

Array.instance_eval do


  class Array


    $array = self


  end


end


 


p $array.new # []

余烬之中

taroxd 发表于 2014-7-30 14:38
@余烬之中  

Ruby 2.0 环境

1.9.3


已证实

无脑之人

看见LS几个触手秀Tentacles什么的我就不想多说了【
果然LZ对代码的认识就是顶楼那几种？