オブジェクト指向

def createCardsArray()
  card=Array.new		# 空の配列を作る
  0.upto(51) do |x|		# ジョーカー不要なので51まで
    card << x
  end
  card				# 最後に card配列 を呼び主に返す
end

def shuffle(a)
  srand
  0.upto(a.length-1) do |i|
    j = rand(a.length)    # 交換相手をランダムに選ぶ
    w = a[i]
    a[i] = a[j]
    a[j] = w
  end
  a
end

def dispCard(card)
  printf("%s の %s\n", card["suit"], card["n"])
end


def point(arr)
  ace = 0		# "A"の枚数
  sum = 0		# 合計点
  for card in arr	# arr配列全ての要素に対して繰り返す
    n = card["n"]	# card["n"]で数を表すvalueが得られる
    case n		# nの値によって場合分け
    when "A"		# "A"ならば…
      ace += 1		# 枚数カウンタを1増やしておく
      sum += 11		# まずは11点として加算
    when "10", "J", "Q", "K"
      sum += 10		# 絵札と10は10点
    else		# それ以外(つまり2…9)はそのものを整数にして足す
      sum += n.to_i
    end # when終わり
  end # for終わり
  while sum > 21 && ace > 0 # 21より大きく、かつ、aceが1以上なら
    sum -= 10		# 10を引く
    ace -= 1		# aceを1つ使ったので減らす
  end
  sum
end

com << cards[cardNo+=1]

player << cards[cardNo+=1]

#
# 「カード」を表現するCardクラスを定義する
#
class Card			# クラス名は必ず大文字で始める
  # クラス定義におけるinitializeという名前のメソッドは、
  # そのクラスの値(インスタンス)がnewされるときに自動的に
  # 呼ばれるメソッド。
  # 通常initializeメソッドは必ず定義する。
  def initialize()
    # @で始まる変数はインスタンス変数といい、クラスの中で
    # しか利用できないつまりクラス定義の外からは一切いじる
    # ことも見ることもできないので後で変えるかもしれない
    # データ構造はインスタンス変数に閉じ込めるのがポイント
    @card = Array.new		# 全てのカードを保存する配列
    @now  = -1			# 今何枚目かをしまう変数
    for suit in ["ハート", "スペード", "ダイヤ", "クラブ"]
      @card << {"suit" => suit, "n" => "A"}
      # ここで代入しているのがハッシュ
      2.upto(10) do |n|
	@card << {"suit" => suit, "n" => n.to_s}
      end
      for n in ["J", "Q", "K"]
	@card << {"suit" => suit, "n" => n}
      end
    end
    shuffle
  end

  def shuffle()			# @cardをいじるので引数は要らない
    srand
    0.upto(@card.length-1) do |i|
      j = rand(@card.length)	# 交換相手をランダムに選ぶ
      w = @card[i]
      @card[i] = @card[j]
      @card[j] = w
    end
    @now = -1			# カードの順番-1にしておく。
  end

  def next()			# つぎの1枚を引く、メソッド
    if @now >= @card.length
      shuffle()
    end
    @card[@now += 1]
  end

  # クラスメソッドの定義
  # クラスメソッドはそのクラスのインスタンス全体に共通のメソッド
  # クラスメソッドは  クラス名.メソッド名 で定義する
  def Card.suit(card)		# スートを得るメソッド
    card["suit"]
  end
  def Card.n(card)		# 数を得るメソッド
    card["n"]
  end

end

#!/usr/koeki/bin/ruby
# coding: utf-8
# ブラックジャック進行部

# Cardクラス定義ファイルを読み込む
require 'card.rb' 	# これでCardクラスが使えるようになる

# ブラックジャックに必要なメソッドの定義
# カードのスートや数を調べるときは、Cardクラスのメソッド
# Card.suit() と Card.n() を利用している。
def dispCard(card)
  # Cardクラスのクラスメソッドを使ってスートと数を得る
  printf("%s の %s\n", Card.suit(card), Card.n(card))
end

def point(arr)
  ace = 0		# "A"の枚数
  sum = 0		# 合計点
  for card in arr	# arr配列全ての要素に対して繰り返す
    n = Card.n(card)	# クラスメソッド経由で数を得る
    case n		# nの値によって場合分け
    when "A"		# "A"ならば…
      ace += 1		# 枚数カウンタを1増やしておく
      sum += 11		# まずは11点として加算
    when "10", "J", "Q", "K"
      sum += 10		# 絵札と10は10点
    else		# それ以外(つまり2…9)はそのものを整数にして足す
      sum += n.to_i
    end # when終わり
  end # for終わり
  while sum > 21 && ace > 0 # 21より大きく、かつ、aceが1以上なら
    sum -= 10		# 10を引く
    ace -= 1		# aceを1つ使ったので減らす
  end
  sum
end

# Cardクラスのインスタンスを生成(既にシャッフルされている)
cards=Card.new

# コンピュータの持ちカードを格納する配列
com=[]
com << cards.next # cardsに属するnextメソッドで次の1枚を引くようにする
com << cards.next

# プレイヤーの持ちカードを格納する配列
player=[]
player << cards.next
player << cards.next

# 最初の手持ちを表示する
puts "わたしの手:"
# コンピュータの1枚目を表示
puts "  [ ??? ]"
# コンピュータの2枚目を表示
dispCard(com[1])	# 2枚目は com[1] に入っている
# プレイヤー側
puts "あなたの手:"
dispCard(player[0])
dispCard(player[1])

# プレイヤーが満足するまで引かせる
while true
  STDERR.print "もう一枚引きますか?(yかnで) "
  answer = gets
  if /^y/i =~ answer
    player << cards.next
    puts "もう一枚引きます。引いたカードはこれです。"
    dispCard(player[-1])
  else
    break		# while true を抜ける
  end
end

# コンピュータが16以下なら引き続ける
while point(com) <= 16
  puts "わたしはもう一枚引きます"
  com << cards.next
end

# いよいよ勝負
puts "勝負!"
puts "わたしの手:"
for c in com		# コンピュータの手持ちカード全て繰り返す
  dispCard(c)
end
puts "あなたの手:"
player.each do |c|	# プレイヤーの手持ちカード全て繰り返す
  dispCard(c)
end

# 得点を比べる
cp, pp = point(com), point(player)
printf("わたし %d : %d あなた\n", cp, pp)

if cp >= 22		# 22以上なら0点ということにしてしまう
  cp = 0		# (コンピュータ)
end

if pp >= 22		# 22以上なら0点ということにしてしまう
  pp = 0		# (プレイヤー)
end

if pp > cp		# コンピュータより点が高ければ
  puts "あなたの勝ちです。参りました!"
else			# そうでなければ(引き分け含む)
  puts "わたしの勝ちです。べろべろばあ…"
end

#
# 「カード」を表現するCardクラスを定義する
#  通し番号方式バージョン
#
class Card
  def initialize()
    @card = Array.new		# 全てのカードを保存する配列
    @now  = -1			# 今何枚目かをしまう変数
    0.upto(51) do |x|		# ジョーカー不要なので51まで
      @card << x
    end
    shuffle
  end

  def shuffle()
    srand
    0.upto(@card.length-1) do |i|
      j = rand(@card.length)    # 交換相手をランダムに選ぶ
      w = @card[i]
      @card[i] = @card[j]
      @card[j] = w
    end
    @now = -1			# カードの順番
  end

  def Card.suit(card)
    s = card / 13
    ["ハート", "スペード", "ダイヤ", "クラブ"][s]
  end
  def Card.n(card)
    n = card%13 + 1
    case n
    when 1
      "A"
    when 11
      "J"
    when 12
      "Q"
    when 13
      "K"
    else
      n.to_s
    end
  end

  def next()
    if @now >= @card.length
      shuffle()
    end
    @card[@now += 1]
  end
end