deepbeige 0.2.0

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,22 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC
+DeepBeige

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 David Bochenski
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,17 @@
+= deepbeige
+
+Description goes here.
+
+== Note on Patches/Pull Requests
+ 
+* Fork the project.
+* Make your feature addition or bug fix.
+* Add tests for it. This is important so I don't break it in a
+  future version unintentionally.
+* Commit, do not mess with rakefile, version, or history.
+  (if you want to have your own version, that is fine but bump version in a commit by itself I can ignore when I pull)
+* Send me a pull request. Bonus points for topic branches.
+
+== Copyright
+
+Copyright (c) 2010 David Bochenski. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,53 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "deepbeige"
+    gem.summary = "An AI learning program that plays board games"
+    gem.description = "An AI learning program that plays board games"
+    gem.email = "david@bochenski.co.uk"
+    gem.homepage = "http://github.com/bochenski/deepbeige"
+    gem.authors = ["David Bochenski"]
+    gem.add_development_dependency "thoughtbot-shoulda", ">= 0"
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: gem install jeweler"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/test_*.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/test_*.rb'
+    test.verbose = true
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+task :test => :check_dependencies
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  version = File.exist?('VERSION') ? File.read('VERSION') : ""
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "deepbeige #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.2.0

data/arena.rb

@@ -0,0 +1,6 @@
+#an arena is where tournaments are held
+#Arenas can define and start tour
+class Arena
+  def initialize
+  end
+end

data/deep_beige.rb

@@ -0,0 +1,213 @@
+require 'neural_net'
+
+class DeepBeige
+  
+  def initialize
+    @neural_net = NeuralNet.new
+    @population =[]
+  end
+  
+  def id
+    @neural_net.id
+  end
+  
+  def start_game game_name
+    @game_name = game_name
+    case game_name
+    when "NoughtsAndCrosses"
+      @neural_net.generate 9, 1, 3
+      @neural_net.load_from_file "DeepBeige/NoughtsAndCrosses/best.txt"
+    when "PickANumber"
+      @neural_net.generate 3,1,2
+      @neural_net.load_from_file "DeepBeige/PickANumber/best.txt"
+    end
+  end
+  
+  def get_move position, moves
+    game = game_from_name @game_name
+    game.quiet = true
+    game.reload_position moves
+    
+    best_move = ""
+    best_score = -2
+    game.legal_moves.each do |move|
+      game2 = game_from_name @game_name
+      game2.quiet = true
+      game2.reload_position moves
+      game2.play_move game.next_player, move
+      input = game2.current_position.values
+      
+      if game.next_player == 1
+        input = []
+        game2.current_position.values.each do |value|
+          input << -value
+        end
+      end
+      
+      @neural_net.input = input
+      @neural_net.evaluate
+      score = @neural_net.output_value
+      #p "move #{move} evaluated as #{score}"
+      if score > best_score
+        best_score = score
+        best_move = move
+      end
+    end
+    best_move
+  end
+
+  def learn game
+    generate_population 30, game.name
+  end
+
+  def train generations, game 
+    @game_name = game.name   
+    @population = load_population game.name
+    
+    #reset scores
+    scores = {}
+    @population.each do |neuralnet|
+      scores[neuralnet.id] = 0
+    end
+    
+    generation_number = 1
+    generations.times do
+      puts "Evolving Generation #{generation_number}"
+      player_number = 0
+      @population.each do |neuralnet|
+        player1 = DeepBeige.new 
+        player1.neural_net = neuralnet
+        player1.game_name = @game_name
+        
+        5.times do
+          game = game.class.new
+          game.quiet = true
+          opponent_number = rand(@population.count)
+          #puts "#{player_number} versus opponent #{opponent_number}"
+          opponent_net = @population[opponent_number]
+          player2 = DeepBeige.new
+          player2.neural_net = opponent_net
+          player2.game_name = @game_name
+          
+          players = [player1,player2]
+          table = Table.new game, players
+          table.quiet = true
+          table.play_game
+          if game.drawn?
+            players.each do |player|
+              scores[player.id] +=1
+            end
+
+          elsif game.won?
+            winner = players[game.winner]
+            players.each do |player|
+              if player.id == winner.id
+                scores[player.id] +=2
+              else
+                scores[player.id] -=2
+              end
+            end
+          end
+
+        end
+        player_number += 1
+      end 
+      leaderboard =  scores.sort_by {|id, count| count}
+      position = 1
+      5.times do 
+        leader = leaderboard[leaderboard.count - position]
+        puts "#{position}. pts: #{leader[1]}, #{leader[0]}"
+        position +=1
+      end
+      @population.each do |neural_net|
+        if neural_net.id == leaderboard.last[0]
+          neural_net.save_to_file "DeepBeige/#{@game_name}/best.txt"
+        end
+      end
+      i = 0
+      while i < 15 do
+        @population.delete_if {|neural_net| neural_net.id == leaderboard[i][0]}
+        i +=1
+      end
+
+      new_nets = []
+      @population.each do |neural_net|
+        new_net = neural_net.clone
+        new_net.mutate
+        new_nets << new_net
+      end
+      @population.concat new_nets
+
+      scores = {}
+      @population.each do |neural_net|
+        scores[neural_net.id] = 0 
+      end
+
+      generation_number +=1
+    end
+
+    save_population game.name
+  end
+
+protected
+  def neural_net= value
+    @neural_net = value
+  end
+  def game_name= value
+    @game_name = value
+  end
+  
+private   
+  def game_from_name name
+    game = nil
+    case name
+    when "NoughtsAndCrosses"
+      game  = NoughtsAndCrosses.new
+    when "PickANumber"
+      game = PickANumber.new
+    end
+    game
+  end
+  
+  def load_population name
+    @population = []
+    Dir["deepbeige/#{name}/*[0-9].txt"].each do |filename|
+     candidate = NeuralNet.new
+     candidate.load_from_file filename
+     @population << candidate
+    end
+    @population
+  end
+  
+  def save_population name
+    #and at the end of that, we ought to save our population
+    i = 0
+    @population.each do |neural_net|
+      neural_net.save_to_file "DeepBeige/#{name}/#{i}.txt"
+      i += 1
+    end
+  end
+  
+  def generate_population size, name
+    #Generate Population
+    dir_name = "DeepBeige/#{name}"
+    unless FileTest::directory?(dir_name)
+      Dir::mkdir(dir_name)
+    end
+    @population = []
+    scores = {}
+    size.times do 
+      neural_net = NeuralNet.new
+      case name
+      when "NoughtsAndCrosses"
+        neural_net.generate 9,1,3
+      when "PickANumber"
+        neural_net.generate 3,1,2
+      end
+      @population << neural_net
+    end
+    save_population name
+  end
+end
+
+

data/deepbeige.gemspec

@@ -0,0 +1,73 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{deepbeige}
+  s.version = "0.2.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["David Bochenski"]
+  s.date = %q{2010-09-04}
+  s.description = %q{An AI learning program that plays board games}
+  s.email = %q{david@bochenski.co.uk}
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION",
+     "arena.rb",
+     "deep_beige.rb",
+     "deepbeige.gemspec",
+     "game.rb",
+     "human.rb",
+     "lib/deepbeige.rb",
+     "main.rb",
+     "match.rb",
+     "neural_net.rb",
+     "node.rb",
+     "noughts_and_crosses.rb",
+     "pick_a_number.rb",
+     "player.rb",
+     "population/best.txt",
+     "table.rb",
+     "test/helper.rb",
+     "test/test_deepbeige.rb",
+     "tournament.rb",
+     "ui/Rakefile",
+     "ui/config/build.yml",
+     "ui/lib/application.rb",
+     "ui/lib/menu.rb",
+     "ui/resources/DeepBeige.icns"
+  ]
+  s.homepage = %q{http://github.com/bochenski/deepbeige}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.7}
+  s.summary = %q{An AI learning program that plays board games}
+  s.test_files = [
+    "test/helper.rb",
+     "test/test_deepbeige.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+    else
+      s.add_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+  end
+end
+

data/game.rb

@@ -0,0 +1,18 @@
+class Game
+  
+  def initialize
+  end
+  
+  def display message
+    unless @quiet
+      p message
+    end
+  end
+  
+  def reload_position moves
+    moves.each do |player, move|
+      self.play_move player, move
+    end
+  end
+  
+end

data/human.rb

@@ -0,0 +1,14 @@
+require 'player'
+
+class Human < Player
+  def initialize game
+    @game = game
+  end
+    
+  def get_move position, moves
+    game = @game.class.new
+    game.reload_position moves
+    print game.show_board
+    move = gets.chop
+  end
+end

data/main.rb

@@ -0,0 +1,114 @@
+#!/usr/bin/env ruby
+require 'rubygems'
+require 'game'
+require 'pick_a_number'
+require 'noughts_and_crosses'
+require 'human'
+require 'deep_beige'
+require 'table'
+
+def play_game game, p1, p2, options
+  players = [p1,p2]
+  table = Table.new game, players
+  
+  options.each do |option|
+    if option == "verbose"
+      game.verbose = true
+    elsif option == "quiet"
+      game.quiet = true
+      table.quiet = true
+    end
+  end
+  
+  table.play_game
+end
+
+def player_vs_deepbeige db, game
+  #ok so now I'm interested in playing my best creation
+  db.start_game game.name
+  me = Human.new game
+  play_game game, me, db, []
+end
+
+def player_vs_player game
+  p1 = Human.new game
+  p2 = Human.new game
+  play_game game, p1,p2, []
+end
+
+def options
+  puts
+  puts "What would you like to do?"
+  puts "  1. Player vs DeepBeige"
+  puts "  2. Train DeepBeige"
+  puts "  3. Reset DeepBeige"
+  puts "  4. Player vs Player"
+  puts "  5. Exit Application"
+end
+
+def game_choice
+  puts
+  puts "Which Game?"
+  puts "  1. Noughts and Crosses"
+  puts "  2. Pick A Number"
+  game = nil
+  case gets.chop
+  when "1"
+    game = NoughtsAndCrosses.new
+  when "2"
+    game = PickANumber.new  
+  else 
+    puts "Sorry, didn't understand you there."
+  end
+  game
+end
+
+#This is the main execution loop of our program
+def main
+
+  db = DeepBeige.new
+  
+  version = "0.1.1"
+  puts
+  puts "Welcome to DeepBeige v#{version}"
+  
+  exit = false
+  until exit do
+    options
+    case input = gets.chop
+    when "1"
+      game =  game_choice
+      player_vs_deepbeige db, game
+    when "2"
+      game = game_choice
+      puts "How Many Generations?"
+      generations = gets.chop.to_i
+      db.train generations, game
+    when "3"
+      game = game_choice
+      db.learn game
+      puts "DeepBeige Reset sucessfully"
+    when "4"
+      game = game_choice
+      player_vs_player game
+    when "5"
+      puts "Bye Bye"
+      exit = true
+    else 
+      puts "Sorry I didn't understand you"
+    end
+  end
+end
+
+main unless $Cocoa
+
+
+
+
+
+
+
+
+
+
+

data/match.rb

@@ -0,0 +1,43 @@
+#A match is a series of games between players
+require 'rubygems'
+require 'uuid'
+require 'table'
+
+class Match
+  def initialize players, first_to, game
+    @game = game
+    @players = players
+    @first_to = first_to
+    @player_wins = {}
+    players.each do |player|
+      @player_wins[player.id] = 0
+    end
+  end
+  
+  def play
+   while leading_player[1] < @first_to 
+    game = @game.class.new
+    table = Table.new game, @players
+    table.play_game
+    if game.winner
+      @player_wins[@players[game.winner].id] += 2
+      p "#{game.winner} won that game and has #{ @player_wins[@players[game.winner].id] } wins"
+      p "leading player is #{leading_player[0]} with #{leading_player[1]} wins"
+    elsif game.drawn?
+      @players.each do |player|
+        @player_wins[player.id] += 1
+      end
+    end
+    gets
+   end
+  end
+  
+  def result
+  end
+  
+private 
+  def leading_player
+    leaderboard =  @player_wins.sort_by {|id, count| count}
+    leaderboard.last
+  end
+end