rholdem 0.0.1

data/spec/hand_spec.rb

@@ -0,0 +1,350 @@
+require File.dirname(__FILE__) + "/../lib/hand"
+include Holdem
+
+describe Hand do
+  it "should be creatable from a string of cards" do
+    h = Hand.new('2c 3c 4c 5c 6c')
+    h.cards.should_not be_nil
+  end
+  
+  it "should be creatable from a set of cards" do
+    h = Hand.new(
+      Card.new('4c'),
+      Card.new('5c'),
+      Card.new('6c'),
+      Card.new('7c'),
+      Card.new('8c')
+    )
+    h.cards.should_not be_nil
+  end
+  
+  it "should be creatable from an array of cards" do
+    h = Hand.new([
+      Card.new('4c'),
+      Card.new('5c'),
+      Card.new('6c'),
+      Card.new('7c'),
+      Card.new('8c')
+    ])
+    h.cards.should_not be_nil
+  end
+  
+  it "should be creatable from two cards" do
+    h = Hand.new('2c 2d')
+    h.cards.should_not be_nil
+  end
+  
+  it "should be creatable from seven cards" do
+    h = Hand.new('8d 2d 3d 4d 5d 6d 7d')
+    h.cards.should_not be_nil
+  end
+  
+  it "should require at least two cards" do
+    lambda { Hand.new('2d') }.should raise_error
+  end
+  
+  it "should require no more than seven cards" do
+    lambda { Hand.new('2c 3c 4c 5c 6c 7c 8c 9c') }.should raise_error
+  end
+  
+  it "should require only Card objects in arrays" do
+    lambda { Hand.new(Object.new, Object.new) }.should raise_error
+  end
+  
+  it "should receive an error with invalid Card constructors" do
+    lambda { Hand.new('2as 3cck') }.should raise_error
+  end
+end
+
+describe Hand, "finding the highest card" do
+  it "should find the highest card by rank" do
+    h = Hand.new('3c 4c 6s 7h 5d')
+    h.high_card.to_s.should == '7h'
+  end
+end
+
+describe Hand, "straight flush" do
+  it "should recognize a straight flush" do
+    h = Hand.new('Tc 9c 8c 7c 6c 2d')
+    h.ranking.should == :straight_flush
+  end
+  
+  it "should need at least five cards" do
+    h = Hand.new('9c 8c 7c 6c')
+    h.ranking.should_not == :straight_flush
+  end
+  
+  it "should recognize ace as the lowest in low straight" do
+    h = Hand.new('As 2s 3s 4s 5s')
+    h.high_card.to_s.should == '5s'
+  end
+  
+  it "should recognize ace as the highest card otherwise" do
+    h = Hand.new('As Ks Qs Js Ts')
+    h.high_card.to_s.should == 'As'
+  end
+  
+  it "should sort the best five cards" do
+    h = Hand.new('8s 7s 2s 3s 4s 5s 6s')
+    h.sorted_cards.join(' ').should == '4s 5s 6s 7s 8s'
+  end
+end
+
+describe Hand, "four of a kind" do
+  it "should recognize four of a kind in five cards" do
+    h = Hand.new('As Ad Ac Ah 2c')
+    h.ranking.should == :four_of_a_kind
+  end
+
+  it "should recognize four of a kind in four cards" do
+    h = Hand.new('As Ad Ac Ah')
+    h.ranking.should == :four_of_a_kind
+  end
+  
+  it "should require at least four cards" do
+    h = Hand.new('As Ad Ac')
+    h.ranking.should_not == :four_of_a_kind
+  end
+  
+  it "should sort the best five cards" do
+    h = Hand.new('3c 3s 3d 3h Kh Ad Ts')
+    s = h.sorted_cards.join(' ')
+    s.should include('3s')
+    s.should include('3c')
+    s.should include('3d')
+    s.should include('3h')
+    s.should include('Ad')
+  end
+  
+  it "should move the kicker to the lowest card" do
+    h = Hand.new('3c 3s 3d 3h Kh Ad Ts')
+    h.sorted_cards[0].to_s.should == 'Ad'
+  end
+end
+
+describe Hand, "full house" do
+  it "should recognize a full house" do
+    h = Hand.new('3c 3d 3s 4c 4s 5c')
+    h.ranking.should == :full_house
+  end
+    
+  it "should require at least five cards" do
+    h = Hand.new('4c 4d 3c 3s')
+    h.ranking.should_not == :full_house
+  end
+  
+  it "should set the high card as 'over'" do
+    h = Hand.new('3c 3d 3s 5c 5d')
+    h.high_card.rank.should == Card.new('3c').rank
+  end
+  
+  it "should find the highest full house in seven cards" do
+    h = Hand.new('3c 3d 3c 4h 4s 8s 8d')
+    h.high_card.rank.should == Card.new('3d').rank
+    h.sorted_cards[0].rank.should == Card.new('8h').rank
+    h.sorted_cards[1].rank.should == Card.new('8h').rank
+  end
+end
+
+describe Hand, "flush" do
+  it "should recognize a flush" do
+    h = Hand.new('3s 5s 7s Ks 2s Ac Qd')
+    h.ranking.should == :flush
+  end
+
+  it "should require at least five cards" do
+    h = Hand.new('3s 4s 7s 9s')
+    h.ranking.should_not == :flush
+  end
+end
+
+describe Hand, "straight" do
+  it "should recognize a straight" do
+    h = Hand.new('3c 4d 7c Ks 3d 5c 6h')
+    h.ranking.should == :straight
+  end
+  
+  it "should recognize ace as the lowest in low straight" do
+    h = Hand.new('2c 5s 4d 8c Ts 3h Ad')
+    h.ranking.should == :straight
+    h.high_card.to_s.should == '5s'
+  end
+  
+  it "should recognize ace as the highest card otherwise" do
+    h = Hand.new('Ac Td Kh 5d Qs 2s Jd')
+    h.ranking.should == :straight
+    h.high_card.to_s.should == 'Ac'
+  end
+  
+  it "should require at least five cards" do
+    h = Hand.new('2c 4d 5s 3h')
+    h.ranking.should_not == :straight
+  end
+end
+
+describe Hand, "three of a kind" do
+  it "should recognize three of a kind" do
+    h = Hand.new('3s 3d 3h 4c 5s Td')
+    h.ranking.should == :three_of_a_kind
+  end
+  
+  it "should set the trips to high card" do
+    h = Hand.new('3s 3d 3h 4c 5s Td')
+    h.high_card.rank.should == Card.new('3c').rank
+  end
+  
+  it "should sort the kickers after the pair" do
+    h = Hand.new('3s 3d 3h 4c 5s Ac Td')
+    h.sorted_cards[0].to_s.should == 'Td'
+    h.sorted_cards[1].to_s.should == 'Ac'
+  end
+  
+  it "should require at least three cards" do
+    h = Hand.new('3s 3d')
+    h.ranking.should_not == :three_of_a_kind
+  end
+end
+
+describe Hand, "two pair" do
+  it "should be recognized" do
+    h = Hand.new('3c 3s 8c 8h Ad Kh Ts')
+    h.ranking.should == :two_pair
+  end
+  
+  it "should set the high pair to high card" do
+    h = Hand.new('3c 8c 3s 8h Ad Kh Ts')
+    h.high_card.rank.should == Card.new('8c').rank
+  end
+  
+  it "should move the kicker to the lowest card" do
+    h = Hand.new('3c 3s 8c 8h Kh Ad Ts')
+    h.sorted_cards[0].to_s.should == 'Ad'
+  end
+end
+
+describe Hand, "pair" do
+  it "should be recognized" do
+    h = Hand.new('Ac Ad Kc Qd 3c 5h')
+    h.ranking.should == :pair
+  end
+  
+  it "should set the high card to the pair" do
+    h = Hand.new('3c 3d Kc Qd 4c 5h')
+    h.high_card.rank.should == Card.new('3c').rank
+  end
+  
+  it "should sort the kickers after the pair" do
+    h = Hand.new('3c 3d Kc Qd 4c 5h')
+    h.sorted_cards[0].to_s.should == '5h'
+    h.sorted_cards[1].to_s.should == 'Qd'
+    h.sorted_cards[2].to_s.should == 'Kc'
+  end
+end
+
+describe Hand, "high card" do
+  it "should be recognized" do
+    h = Hand.new('2c 5c Ad Kh Qs 9d 8h')
+    h.ranking.should == :high_card
+  end
+  
+  it "should be sorted" do
+    h = Hand.new('2c 5c Ad Kh Qs 9d 8h')
+    h.sorted_cards.join(' ').should == '8h 9d Qs Kh Ad'
+  end
+end
+
+describe Hand, "comparing to other hands" do
+  it "should find the highest hand by ranking" do
+    h1 = Hand.new('3c 4c 5c 6c 7c 2d 4h')
+    h2 = Hand.new('3c 4c 5c 6d 7c 2d 4h')
+    (h1 <=> h2).should == 1
+    (h1 > h2).should be_true
+    (h1 < h2).should be_false
+  end
+  
+  it "should find highest hand by high card when ranking same" do
+    h1 = Hand.new('2d 8d 7d 4d Ad')
+    h2 = Hand.new('2d 8d 7d 4d Qd')
+    (h1 <=> h2).should == 1
+    (h1 > h2).should be_true
+    (h1 < h2).should be_false
+  end
+  
+  it "should look at highest card first not lowest when ranking same" do
+    h1 = Hand.new('2c 3c 4d 8s 9s')
+    h2 = Hand.new('3c 4c 5d 7s 9s')
+    (h1 <=> h2).should == 1
+    (h1 > h2).should be_true
+    (h1 < h2).should be_false
+  end
+    
+  it "should equate hands with same cards" do
+    h1 = Hand.new('2c 3c 4c 5c 6c 7c 8c')
+    h2 = Hand.new('2c 3c 4c 5c 6c 7c 8c')
+    (h1 <=> h2).should == 0
+    h1.should == h2
+  end
+  
+  it "should equate hands with same hand rankings and card ranks" do
+    h1 = Hand.new('2c 3d 4d 5d 6s')
+    h2 = Hand.new('2c 3h 4d 5h 6s')
+    (h1 <=> h2).should == 0
+    h1.should == h2
+  end
+  
+  it "should not equate hands with different rankings" do
+    h1 = Hand.new('2c 3d 8d 9h Qs')
+    h2 = Hand.new('2c 3d Ah Ac Qs')
+    h1.should_not == h2
+  end
+  
+  it "should not equate hands with same rankings but different card ranks" do
+    h1 = Hand.new('2c 3d 2h 4d 2s')
+    h2 = Hand.new('2c 3d 3h 4d 3s')
+    h1.should_not == h2
+  end
+  
+  it "should not be affected in sorting when ace shifted down to front of sorted cards" do
+    h1 = Hand.new('3c 4c 5s 6h 7d')
+    h2 = Hand.new('2c 3c 4c 5s Ah')
+    (h1 > h2).should be_true
+    (h1 < h2).should be_false
+  end
+  
+  it "should compare a full house by card with three of a kind" do
+    h1 = Hand.new('7c 7d 7h 8c 8h')
+    h2 = Hand.new('3c 3d 3h 9c 9h')
+    (h1 > h2).should be_true
+    (h1 < h2).should be_false
+  end
+  
+  it "should compare a full house by card with two of a kind of three of a kind same" do
+    h2 = Hand.new('Kc Kd Kh As Ah')
+    h1 = Hand.new('Kc Kd Kh 9s 9h')
+    (h2 > h1).should be_true
+    (h2 < h1).should be_false
+  end
+  
+  it "should raise an error when comparing short/mismatch hands" do
+    h1 = Hand.new('Kc Kd Ks')
+    h2 = Hand.new('Ac As')
+    lambda { h1 > h2 }.should raise_error
+    lambda { h1 < h2 }.should raise_error
+    lambda { h1 == h2 }.should raise_error
+    lambda { h1 <=> h2 }.should raise_error
+  end
+  
+  it "should compare greater than correctly" do
+    h1 = Hand.new('Ac Ad')
+    h2 = Hand.new('Ac Kd')
+    (h1 > h2).should be_true
+    (h2 > h1).should be_false
+  end
+  
+  it "should compare less than correctly" do
+    h1 = Hand.new('Ac Ad')
+    h2 = Hand.new('Ac Kd')
+    (h1 < h2).should be_false
+    (h2 < h1).should be_true
+  end
+end

data/spec/player_spec.rb

@@ -0,0 +1,103 @@
+require File.dirname(__FILE__) + "/../lib/player"
+require File.dirname(__FILE__) + "/../lib/game"
+include Holdem
+
+describe Player do
+  before(:each) do
+    @p = Player.new
+    @p.deal(Card.new('4c'))
+    @p.deal(Card.new('3c'))
+  end
+  
+  it "should be creatable" do
+    @p.should_not be_nil
+    
+    @p.hole_cards.length.should == 2
+    @p.actions.length.should == 0
+    @p.in_pot.should == 0.0
+    @p.in_round.should == 0.0
+    @p.folded.should == false
+  end
+  
+  it "should set the player's in pot amount to zero when created" do
+    @p.in_pot.should == 0.0
+  end
+  
+  it "should accept two cards for hole cards" do
+    @p.hole_cards.length.should == 2
+    @p.hole_cards.join(' ').should == '4c 3c'
+  end
+  
+  it "should not accept more than two hole cards" do
+    lambda { @p.deal(Card.new('5c')) }.should raise_error
+  end
+  
+  it "should be able to tell the best hand from hole cards and board" do
+    board = [
+      Card.new('2c'),
+      Card.new('5c'),
+      Card.new('Ks'),
+      Card.new('Ac'),
+      Card.new('Qs')
+    ]
+    @p.find_hand(board)
+    @p.hand.ranking.should == :straight_flush
+  end
+  
+  it "should increase amount in pot when paying" do
+    @p.pay(100.0)
+    @p.in_pot.should == 100.0
+  end
+  
+  it "should increase amount in round when paying" do
+    @p.pay(34.0)
+    @p.in_round.should == 34.0
+  end
+  
+  it "should decrease delta when paying" do
+    @p.pay(350.75)
+    @p.delta.should == -350.75
+  end
+  
+  it "should increase delta when awarding" do
+    @p.award(50.0)
+    @p.delta.should == 50.0
+  end
+  
+  it "should reset amount in round when moving to next round" do
+    @p.pay(56.0)
+    @p.next_round
+    @p.in_round.should == 0.0
+  end
+  
+  it "should set folded to true when folding" do
+    @p.fold
+    @p.folded.should be_true
+  end
+  
+  it "should not reset folded on move to next round" do
+    @p.pay(456.0)
+    @p.fold
+    @p.next_round
+    @p.folded.should be_true
+  end
+  
+  it "should be able to decide on an action ('neutral' default)" do
+    g = Game.new(1.0)
+    @p.act(g).should == :neutral
+  end
+  
+  it "should record player actions" do
+    @p.record_action(:neutral)
+    @p.record_action(:aggressive)
+    @p.record_action(:weak)
+    @p.actions.should == [:neutral, :aggressive, :weak]
+  end
+  
+  it "should only track my last 300 actions" do
+    307.times do
+      @p.record_action(:weak)
+    end
+    @p.actions.length.should == 300
+  end
+end

data/spec/rholdem_spec.rb

@@ -0,0 +1,24 @@
+require File.dirname(__FILE__) + "/../lib/rholdem"
+include Holdem
+
+describe "Loading the rholdem library" do
+  it "should be able to create a new Card" do
+    lambda {Card.new('As')}.should_not raise_error
+  end
+  
+  it "should be able to create a new Deck" do
+    lambda {Deck.new}.should_not raise_error
+  end
+  
+  it "should be able to create a new Hand" do
+    lambda {Hand.new('3c 4c 5c 6c 7c 8c')}.should_not raise_error
+  end
+  
+  it "should be able to create a new Player" do
+    lambda {Player.new}.should_not raise_error
+  end
+  
+  it "should be able to create a new Game" do
+    lambda {Game.new(10.0)}.should_not raise_error
+  end
+end

metadata

@@ -0,0 +1,72 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.4
+specification_version: 1
+name: rholdem
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+date: 2007-09-30 00:00:00 -07:00
+summary: Ruby Texas Hold'em Simulations Library
+require_paths: 
+- lib
+email: russell.authur@gmail.com
+homepage: "    by Russell Authur"
+rubyforge_project: rholdem
+description: "== FEATURES/PROBLEMS:  - Simulate limit games of 2 to 11 players - Provide custom AI players to test out ideas - Track totals for each player to use with AI fitness evaluation  == SYNOPSIS:  # run a sample game, 5/10 limit, 10 players require 'rubygems' require 'rholdem'"
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+post_install_message: 
+authors: 
+- Russell Authur
+files: 
+- History.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- lib/rholdem.rb
+- lib/card.rb
+- lib/deck.rb
+- lib/game.rb
+- lib/hand.rb
+- lib/player.rb
+- spec/rholdem_spec.rb
+- spec/card_spec.rb
+- spec/deck_spec.rb
+- spec/game_spec.rb
+- spec/hand_spec.rb
+- spec/player_spec.rb
+test_files: []
+
+rdoc_options: 
+- --main
+- README.txt
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.txt
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.3.0
+    version: