studio_game_SE 1.0.0

data/LICENSE

@@ -0,0 +1,6 @@
+This program is copyright (c) Per Gärdén 2012 and distributed under the terms
+of the GNU General Public License.      This program is distributed in the hope
+that it will be useful, but WITHOUT ANY WARRANTY; without even the implied
+warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+General Public License available at http://www.gnu.org/licenses/gpl.html for
+more details.

data/README

@@ -0,0 +1 @@
+Game exercise as part of Pragmatic Studio Ruby programming course.

data/bin/players.csv

@@ -0,0 +1,3 @@
+Alvin,100
+Simon,60
+Theo,125

data/bin/studio_game

@@ -0,0 +1,27 @@
+#!/usr/bin/env ruby
+
+# require_relative 'player'
+require_relative '../lib/studio_game/clumsy_player'
+require_relative '../lib/studio_game/berserk_player'
+require_relative '../lib/studio_game/game'
+
+knuckleheads = StudioGame::Game.new('knuckleheads')
+default_player_file = File.join(File.dirname(__FILE__), 'players.csv')
+knuckleheads.load_players(ARGV.shift || default_player_file)
+knuckleheads.add_player(StudioGame::ClumsyPlayer.new('klutz', 105))
+knuckleheads.add_player(StudioGame::BerserkPlayer.new('berserker', 50))
+
+loop do
+  puts "\nHow many game rounds? ('quit' to exit)"
+  answer = gets.chomp.downcase
+  case answer
+    when /\d+/
+      knuckleheads.play(answer.to_i)
+    when 'quit', 'exit'
+      knuckleheads.print_stats
+      knuckleheads.save_high_scores
+      break
+    else
+      puts "\nPlease enter a number or 'quit'"
+  end
+end

data/lib/studio_game/auditable.rb

@@ -0,0 +1,9 @@
+module StudioGame
+  module Auditable
+
+    def audit
+      puts "Rolled a #{self.number} (#{self.class})"
+    end
+
+  end
+end

data/lib/studio_game/berserk_player.rb

@@ -0,0 +1,32 @@
+require_relative 'player'
+
+module StudioGame
+  class BerserkPlayer < Player
+  
+    def initialize(name, health = 100)
+      super(name, health)
+      @w00t_count = 0
+    end
+  
+    def berserk?
+      5 < @w00t_count
+    end
+  
+    def w00t
+      super
+      @w00t_count += 1
+      puts "#{@name.capitalize} is berserk!" if berserk?
+    end
+  
+    def blam
+      berserk? ? w00t : super
+    end
+  
+    if __FILE__ == $0
+      berserker = BerserkPlayer.new("berserker", 50)
+      6.times { berserker.w00t }
+      2.times { berserker.blam }
+      puts berserker.health
+    end
+  end
+end

data/lib/studio_game/clumsy_player.rb

@@ -0,0 +1,29 @@
+require_relative 'player'
+require_relative 'treasure_trove'
+
+module StudioGame
+  class ClumsyPlayer < Player
+  
+    def found_treasure(treasure)
+      super(Treasure.new(treasure.name, treasure.points / 2))
+    end
+  
+  end
+  
+  if __FILE__ == $0
+    clumsy = ClumsyPlayer.new("klutz")  
+    
+    hammer = Treasure.new(:hammer, 50)
+    clumsy.found_treasure(hammer)
+    clumsy.found_treasure(hammer)
+    clumsy.found_treasure(hammer)
+    
+    crowbar = Treasure.new(:crowbar, 400)
+    clumsy.found_treasure(crowbar)
+    
+    clumsy.each_found_treasure do |treasure|
+      puts "#{treasure.points} total #{treasure.name} points"
+    end
+    puts "#{clumsy.points} grand total points"
+  end
+end

data/lib/studio_game/die.rb

@@ -0,0 +1,19 @@
+require_relative 'auditable'
+
+module StudioGame
+  class Die
+    include Auditable
+  
+    attr_reader :number
+  
+    def initialize
+      roll
+    end
+  
+    def roll
+  	  @number = rand(1..6)
+      audit
+      @number
+    end
+  end
+end

data/lib/studio_game/game.rb

@@ -0,0 +1,88 @@
+require_relative 'player'
+require_relative 'game_turn'
+require_relative 'treasure_trove'
+
+module StudioGame
+  class Game
+    attr_reader :title
+  
+    def initialize(title)
+      @title = title
+      @players = []
+    end
+  
+    def load_players(from_file)
+      File.readlines(from_file).each do |line|
+        add_player(Player.from_csv(line))
+      end
+    end
+  
+    def add_player(player)
+      @players.push(player)
+    end
+  
+    def play(rounds)
+      puts "There are #{@players.size} players in #{@title.capitalize}:"
+      puts @players
+      treasures = TreasureTrove::TREASURES
+      puts "\nThere are #{treasures.size} treasures to be found:"
+      treasures.each do |treasure|
+        puts "A #{treasure.name} is worth #{treasure.points} points"
+      end
+  
+      1.upto(rounds) do |round|
+        puts "\nRound #{round}:"
+        @players.each do |player|
+          GameTurn.take_turn(player)
+          puts player
+        end
+      end
+    end
+  
+    def high_score_entry(player)
+      "#{player.name.ljust(20,'.')} #{player.score}"
+    end
+  
+    def print_stats
+      puts "\n#{title.capitalize} Statistics:"
+      strongs, wimps = @players.partition {|p| p.strong?}
+      puts "\n#{strongs.size} strong players:"
+      strongs.each do |p|
+        print_name_and_health(p)
+      end
+      puts "\n#{wimps.size} wimpy players:"
+      wimps.each do |p|
+  			print_name_and_health(p)
+      end
+  
+      puts "\n#{title.capitalize} High Scores:"
+      print_high_scores
+  
+      @players.each do |p|
+        puts "\n#{p.name.capitalize}'s point totals:"
+        p.each_found_treasure do |treasure|
+          puts "#{treasure.points} total #{treasure.name} points"
+        end
+        puts "#{p.points} grand total points"
+      end
+    end
+  
+    def print_name_and_health(player)
+  		puts "#{player.name} (#{player.health})"
+    end
+  
+    # To standard output if no 'file'
+    def print_high_scores(file = $stdout)
+      @players.sort.each do |p|
+        file.puts high_score_entry(p)
+      end
+    end
+  
+    def save_high_scores(to_file = 'high_scores.txt')
+      File.open(to_file, "w") do |file|
+        file.puts "#{@title.capitalize} High Scores:\n "
+        print_high_scores(file)
+      end
+    end
+  end
+end

data/lib/studio_game/game_turn.rb

@@ -0,0 +1,21 @@
+require_relative 'player'
+require_relative 'die'
+# require_relative 'loaded_die'
+require_relative 'treasure_trove'
+
+module StudioGame
+  module GameTurn
+    def self.take_turn(player)
+      case Die.new().roll
+        when 1..2
+          player.blam
+        when 3..4
+        else
+          player.w00t
+      end
+      treasure = TreasureTrove.random
+      puts "#{player.name.capitalize} found a #{treasure.name} worth #{treasure.points} points."
+      player.found_treasure(treasure)
+    end
+  end
+end

data/lib/studio_game/iterators.rb

@@ -0,0 +1,13 @@
+module StudioGame
+  def n_times(i)
+    1.upto(i) do |n|
+      yield n
+    end
+  end
+  
+  n_times(3) do |n|
+    puts "#{n} situps"
+    puts "#{n} pushups"
+    puts "#{n} chinups"
+  end
+end

data/lib/studio_game/loaded_die.rb

@@ -0,0 +1,16 @@
+require_relative 'auditable'
+
+module StudioGame
+  class LoadedDie
+    include Auditable
+  
+    attr_reader :number
+    
+    def roll
+      numbers = [1, 1, 2, 5, 6, 6]
+      @number = numbers.sample
+      audit
+      @number
+    end  
+  end
+end

data/lib/studio_game/playable.rb

@@ -0,0 +1,19 @@
+module StudioGame
+  module Playable
+  
+    def blam
+      self.health -= 10
+      puts "#{name.capitalize} got blammed!"
+    end
+  
+    def w00t
+      self.health += 15
+      puts "#{name.capitalize} got w00ted!"
+    end
+  
+    def strong?
+      100 < health
+    end 
+  
+  end
+end

data/lib/studio_game/player.rb

@@ -0,0 +1,64 @@
+require_relative 'playable'
+
+module StudioGame
+  class Player
+    include Playable
+  
+    attr_accessor :health
+    attr_accessor :name
+  
+    def initialize(name, health = 100)
+      @name = name.capitalize
+      @health = health
+      @found_treasures = Hash.new(0)
+    end
+  
+    def to_s
+      "I'm #{@name.capitalize} with health = #{@health}, points = #{points}, and score = #{score}."
+    end
+  
+    def self.from_csv(string)
+      name, health = string.split(',')
+      new(name, Integer(health))
+    end
+  
+    def found_treasure(treasure)
+      @found_treasures[treasure.name] += treasure.points
+      puts "#{@name} found a #{treasure.name} worth #{treasure.points} points."
+      puts "#{@name}'s treasures: #{@found_treasures}"
+    end
+  
+    def each_found_treasure
+      @found_treasures.each do |name, points|
+        yield Treasure.new(name, points)
+      end
+    end
+  
+    def points
+      @found_treasures.values.reduce(0, :+)
+    end
+  
+    def score
+      @health + points
+    end
+  
+    def <=>(object)
+      # Shall be in same hierarchy - either one super
+  		# if (object.kind_of?(self.class) || self.kind_of?(object.class))
+        object.score <=> score
+      # else
+      #   -1
+      # end
+    end
+  end
+  
+  if __FILE__ == $0
+    player = Player.new("moe")
+    puts player.name
+    puts player.health
+    player.w00t
+    puts player.health
+    player.blam
+    puts player.health
+  end
+end

data/lib/studio_game/treasure_trove.rb

@@ -0,0 +1,18 @@
+module StudioGame
+  Treasure = Struct.new(:name, :points)
+  
+  module TreasureTrove
+    def self.random
+      TREASURES.sample
+    end
+  
+    TREASURES = [
+      Treasure.new(:pie, 5),
+      Treasure.new(:bottle, 25),
+      Treasure.new(:hammer, 50),
+      Treasure.new(:skillet, 100),
+      Treasure.new(:broomstick, 200),
+      Treasure.new(:crowbar, 400),
+    ]
+  end
+end

data/spec/studio_game/berserk_player_spec.rb

@@ -0,0 +1,35 @@
+require 'studio_game/berserk_player'
+
+module StudioGame
+  describe BerserkPlayer do
+    
+    before do
+      @initial_health = 50 
+      @player = BerserkPlayer.new("berserker", @initial_health)
+    end
+    
+    it "does not go berserk when w00ted up to 5 times" do
+      silence_stream(STDOUT) do
+        1.upto(5) { @player.w00t }
+      end  
+      @player.berserk?.should be_false
+    end
+    
+    it "goes berserk when w00ted more than 5 times" do
+      silence_stream(STDOUT) do
+        1.upto(6) { @player.w00t }
+      end 
+      @player.berserk?.should be_true
+    end
+    
+    it "gets w00ted instead of blammed when it's gone berserk" do  
+      silence_stream(STDOUT) do
+        1.upto(6) { @player.w00t }
+        1.upto(2) { @player.blam }
+      end
+      
+      @player.health.should == @initial_health + (8 * 15)
+    end
+  
+  end
+end

data/spec/studio_game/clumsy_player_spec.rb

@@ -0,0 +1,35 @@
+require 'studio_game/clumsy_player'
+
+module StudioGame
+  describe ClumsyPlayer do
+    before do
+      @player = ClumsyPlayer.new("klutz")
+    end
+    
+    it "only gets half the point value for each treasure" do
+      yielded = []
+      silence_stream(STDOUT) do
+        @player.points.should == 0
+    
+        hammer = Treasure.new(:hammer, 50)
+        @player.found_treasure(hammer)
+        @player.found_treasure(hammer)
+        @player.found_treasure(hammer)
+    
+        @player.points.should == 75
+    
+        crowbar = Treasure.new(:crowbar, 400)
+        @player.found_treasure(crowbar)
+        
+        @player.points.should == 275    
+        
+        @player.each_found_treasure do |treasure|
+          yielded << treasure
+        end
+      end
+    
+      yielded.should == [Treasure.new(:hammer, 75), Treasure.new(:crowbar, 200)]    
+    end
+  
+  end
+end

data/spec/studio_game/game_spec.rb

@@ -0,0 +1,46 @@
+require 'facets'
+
+require 'studio_game/game'
+require 'studio_game/die'
+
+module StudioGame
+  describe Game do
+  
+    before do
+      @game = Game.new("Knuckleheads")
+  
+      @initial_health = 100
+      @player = Player.new("moe", @initial_health)
+      
+      @game.add_player(@player)
+    end
+  
+    it "w00ts the player if a high number is rolled"  do
+      Die.any_instance.stub(:roll).and_return(5)
+  
+      silence_stream(STDOUT) do
+        @game.play(2)
+      end
+      @player.health.should == @initial_health + (15 * 2)
+    end
+    
+    it "skips the player if a medium number is rolled"  do
+      Die.any_instance.stub(:roll).and_return(3)
+  
+      silence_stream(STDOUT) do
+        @game.play(2)
+      end
+      @player.health.should == @initial_health
+    end
+    
+    it "blams the player if a low number is rolled"  do
+      Die.any_instance.stub(:roll).and_return(1)
+  
+      silence_stream(STDOUT) do
+        @game.play(2)
+      end
+      @player.health.should == @initial_health - (10 * 2)
+    end
+    
+  end
+end

data/spec/studio_game/player_spec.rb

@@ -0,0 +1,141 @@
+require 'facets'
+require 'studio_game/game'
+require 'studio_game/player'
+require 'studio_game/treasure_trove'
+
+module StudioGame
+  describe Player do
+    before do
+      @initial_health = 150
+      @player = Player.new("larry", @initial_health)
+    end
+  
+    it "reads players from csv" do
+      silence_stream(STDOUT) do
+        player = Player.from_csv('Alvin,100')
+        player.name.should == 'Alvin'
+        player.health.should == 100
+      end
+    end
+  
+    it "has a capitalized name" do
+      @player.name.should == "Larry"
+    end  
+  
+    it "has an initial health" do
+      @player.health.should == 150
+    end
+  
+    it "has a string representation" do
+      silence_stream(STDOUT) do
+        @player.found_treasure(Treasure.new(:hammer, 50))
+        @player.found_treasure(Treasure.new(:hammer, 50))
+        @player.to_s.should == "I'm Larry with health = 150, points = 100, and score = 250."
+      end
+    end
+  
+    it "computes a score as the sum of its health and points" do
+      silence_stream(STDOUT) do
+        @player.found_treasure(Treasure.new(:hammer, 50))
+        @player.found_treasure(Treasure.new(:hammer, 50))
+        @player.score.should == 250
+      end
+    end
+  
+    it "increases health by 15 when w00ted" do
+      silence_stream(STDOUT) do
+        @player.w00t
+      end
+      @player.health.should == @initial_health + 15
+    end
+  
+    it "decreases health by 10 when blammed" do
+      silence_stream(STDOUT) do
+        @player.blam
+      end
+      @player.health.should == @initial_health - 10
+    end
+  
+    it "computes points as the sum of all treasure points" do
+      silence_stream(STDOUT) do
+        @player.points.should == 0
+        @player.found_treasure(Treasure.new(:hammer, 50))
+        @player.points.should == 50
+        @player.found_treasure(Treasure.new(:crowbar, 400))
+        @player.points.should == 450
+        @player.found_treasure(Treasure.new(:hammer, 50))
+        @player.points.should == 500
+      end
+    end
+  
+    it "assigns a treasure for points during a player's turn" do     
+      silence_stream(STDOUT) do
+        game = Game.new("Knuckleheads")
+        player = Player.new("moe")
+        game.add_player(player)
+        game.play(1)
+        player.points.should_not be_zero
+      end
+    end
+  
+    it "yields each found treasure and its total points" do
+      silence_stream(STDOUT) do
+        @player.found_treasure(Treasure.new(:skillet, 100))
+        @player.found_treasure(Treasure.new(:skillet, 100))
+        @player.found_treasure(Treasure.new(:hammer, 50))
+        @player.found_treasure(Treasure.new(:bottle, 5))
+        @player.found_treasure(Treasure.new(:bottle, 5))
+        @player.found_treasure(Treasure.new(:bottle, 5))
+        @player.found_treasure(Treasure.new(:bottle, 5))
+        @player.found_treasure(Treasure.new(:bottle, 5))
+        
+        yielded = []
+        @player.each_found_treasure do |treasure|
+          yielded << treasure
+        end
+        
+        yielded.should == [
+          Treasure.new(:skillet, 200), 
+          Treasure.new(:hammer, 50), 
+          Treasure.new(:bottle, 25)
+       ]
+     end
+    end
+  
+    context "with a health greater than 100" do
+      before do
+        @initial_health = 150
+        @player = Player.new("larry", @initial_health)
+      end
+  
+      it "is strong" do
+        @player.should be_strong
+      end
+    end
+  
+    context "with a health of 100" do
+      before do
+        @initial_health = 100
+        @player = Player.new("larry", @initial_health)
+      end
+  
+      it "is wimpy" do
+        @player.strong?.should == false
+      end
+    end
+  
+    context "in a collection of players" do
+      before do
+        @player1 = Player.new("moe", 100)
+        @player2 = Player.new("larry", 200)
+        @player3 = Player.new("curly", 300)
+    
+        @players = [@player1, @player2, @player3]
+      end
+      
+      it "is sorted by decreasing score" do
+        @players.sort.should == [@player3, @player2, @player1]
+      end
+    end
+  end
+end

data/spec/studio_game/treasure_trove_spec.rb

@@ -0,0 +1,55 @@
+require 'studio_game/treasure_trove'
+   
+module StudioGame
+  describe Treasure do
+    
+    before do
+      @treasure = Treasure.new(:hammer, 50)
+    end
+    
+    it "has a name attribute" do
+      @treasure.name.should == :hammer
+    end
+    
+    it "has a points attribute" do
+      @treasure.points.should == 50
+    end
+    
+  end
+  
+  describe TreasureTrove do
+    
+    it "has six treasures" do
+      TreasureTrove::TREASURES.size.should == 6
+    end
+    
+    it "has a pie worth 5 points" do
+      TreasureTrove::TREASURES[0].should == Treasure.new(:pie, 5)
+    end
+    
+    it "has a bottle worth 25 points" do
+      TreasureTrove::TREASURES[1].should == Treasure.new(:bottle, 25)
+    end
+    
+    it "has a hammer worth 50 points" do
+      TreasureTrove::TREASURES[2].should == Treasure.new(:hammer, 50)
+    end
+    
+    it "has a skillet worth 100 points" do
+      TreasureTrove::TREASURES[3].should == Treasure.new(:skillet, 100)
+    end
+  
+    it "has a broomstick worth 200 points" do
+      TreasureTrove::TREASURES[4].should == Treasure.new(:broomstick, 200)
+    end
+    
+    it "has a crowbar worth 400 points" do
+      TreasureTrove::TREASURES[5].should == Treasure.new(:crowbar, 400)
+    end
+  
+    it "returns a random treasure" do
+      treasure = TreasureTrove.random
+      TreasureTrove::TREASURES.should include(treasure)
+    end
+  end
+end

metadata

@@ -0,0 +1,83 @@
+--- !ruby/object:Gem::Specification
+name: studio_game_SE
+version: !ruby/object:Gem::Version
+  version: 1.0.0
+  prerelease: 
+platform: ruby
+authors:
+- Per Gärdén
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-08-13 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: &86327710 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *86327710
+description: ! 'Game exercise as part of Pragmatic Studio Ruby programming course.
+
+'
+email: per.garden@lexiconitkonsult.se
+executables:
+- studio_game
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/studio_game
+- bin/players.csv
+- lib/studio_game/clumsy_player.rb
+- lib/studio_game/die.rb
+- lib/studio_game/berserk_player.rb
+- lib/studio_game/auditable.rb
+- lib/studio_game/playable.rb
+- lib/studio_game/loaded_die.rb
+- lib/studio_game/game.rb
+- lib/studio_game/treasure_trove.rb
+- lib/studio_game/game_turn.rb
+- lib/studio_game/iterators.rb
+- lib/studio_game/player.rb
+- spec/studio_game/clumsy_player_spec.rb
+- spec/studio_game/berserk_player_spec.rb
+- spec/studio_game/game_spec.rb
+- spec/studio_game/player_spec.rb
+- spec/studio_game/treasure_trove_spec.rb
+- LICENSE
+- README
+homepage: http://hem.fyristorg.com/sbb16520
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '1.9'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.12
+signing_key: 
+specification_version: 3
+summary: Game exercise as part of Pragmatic Studio Ruby programming course.
+test_files:
+- spec/studio_game/clumsy_player_spec.rb
+- spec/studio_game/berserk_player_spec.rb
+- spec/studio_game/game_spec.rb
+- spec/studio_game/player_spec.rb
+- spec/studio_game/treasure_trove_spec.rb