[ruby-list:7544] Re: クラスの変更

永井＠知能．九工大です．

>>>>> "O" == Mitsuru Ogino <[e-mail]> writes:
O> 荻野といいます。すみませんが、ご指導ください。プログラミング初心者です。

多分，やりたいことというのは，
こんな感じのことではないかと思うのですが？

-----------ここから-------------
class Dog
  def bark0 (name)
    print "#{name}:きゅんきゅん\n"
  end

  def bark1 (name)
    print "#{name}:きゃんきゃん\n"
  end

  def bark2 (name)
    print "#{name}:わんわん\n"
  end

  def bark3 (name)
    print "#{name}:わうわう\n"
  end

  def bark4 (name)
    print "#{name}:ばうばう\n"
  end

  def bark5 (name)
    print "#{name}:ばふばふ\n"
  end

  def bark6 (name)
    print "#{name}:ぶゎふぶゎふ\n"
  end

  private :bark0, :bark1, :bark2, :bark3, :bark4, :bark5, :bark6

  def get_bark_list
    [
      proc{|arg| bark0 arg}, # 0 歳
      proc{|arg| bark1 arg}, # 1 歳
      proc{|arg| bark2 arg}, # 2 歳
      proc{|arg| bark2 arg}, # 3 歳
      proc{|arg| bark2 arg}, # 4 歳
      proc{|arg| bark3 arg}, # 5 歳
      proc{|arg| bark4 arg}, # 6 歳
      proc{|arg| bark5 arg}, # 7 歳
      proc{|arg| bark6 arg}, # 8 歳
      nil                    # 9 歳 〜 
    ]
  end

  private :get_bark_list

  def initialize (name)
    @years = 0
    @name = name
    @bark_list = get_bark_list
    @bark = @bark_list.shift
  end

  def alive?
    @bark ? true : false
  end

  def name
    @name
  end

  def name= (name)
    @name = name
  end

  def years
    @years
  end

  def bark
    begin
      @bark.call(@name)
    rescue
      print "#@name:...........\n"
    end
  end

  def grow
    @years += 1
    if @bark == nil
      print "#{name} was dead.\n"
    else
      if ! @bark = @bark_list.shift
	print "#{name} is dead.\n"
      end
    end
  end
end

john = Dog.new("John")
print "< " + john.name + " が生まれた >"
print "\n< " + john.name + " は #{john.years} 歳 >\n"
john.bark

for i in 1..3
  print "\n< " + john.name + " は #{john.years+1} 歳になる >\n"
  john.grow
  john.bark
end

print "\n< " + john.name + " は名前を "
john.name = "Pochi"
print john.name + " に変えた >\n"

for i in 4..10
  print "\n< " + john.name + " は #{john.years+1} 歳になる >\n"
  john.grow
  john.bark
end
-----------ここまで-------------

-- 
                                         永井 秀利 （九工大 知能情報）
                                             [e-mail]