dieroll 0.0.0

data/bin/dieroll

@@ -0,0 +1,39 @@
+#!/usr/bin/env ruby
+
+# Dice rolling program
+# by Brian Towle -- March 2012
+
+$:.unshift File.join(File.dirname(__FILE__), '..', 'lib')
+require 'dieroll'
+require 'optparse'
+
+usage_string = "Usage: roll [-r] <roll-string>"
+
+options = {}
+OptionParser.new do |opts|
+  opts.banner = usage_string
+  
+  options[:results] = false
+  opts.on('-r','--results','Show full roll results' ) do
+    options[:results] = true
+  end
+
+  opts.on('-h','--help','Display this screen') do
+    puts opts
+    exit
+  end
+
+end.parse!
+
+if(!!ARGV.first)
+  dice = Dieroll::Roller.new(ARGV.first)
+else
+  abort(usage_string)
+end
+
+dice.roll!
+if options[:results]
+  puts dice.report
+else
+  puts dice.total
+end

data/lib/dieroll/diceset.rb

@@ -0,0 +1,51 @@
+module Dieroll
+  class DiceSet
+
+    def initialize(number_of_dice, sides, sign='+', drop_string)
+      @number_of_dice, @sides, @sign = number_of_dice, sides, sign
+      @drop_string = drop_string
+      @drops = @drop_string.scan(/[l|h]/)  if !!@drop_string
+      @dice = []
+      
+      @number_of_dice.times do
+        @dice << Dieroll::Die.new(@sides)
+      end
+
+      @last_result = []
+      @last_total = nil
+    end
+
+    def roll!
+      @last_result = []
+      @dice.each do |die|
+        @last_result << die.roll!
+      end
+      
+      @last_result.sort!
+      @last_non_dropped = @last_result.dup
+      if !!@drops
+        @drops.each do |drop|
+          @last_non_dropped.shift  if drop == 'l'
+          @last_non_dropped.pop  if drop == 'h'
+        end
+      end
+
+      @last_total = @last_non_dropped.inject(0){|sum, element| sum + element}
+      @last_total *= -1  if @sign == '-'
+
+      @last_total
+    end
+
+    def to_s
+      output = "#{@sign}#{@number_of_dice}d#{@sides}"
+      output += "/#{@drop_string}"  if !!@drop_string
+      output += ": "
+      @dice.each do |die|
+        output += die.to_s + " "
+      end
+
+      output
+    end
+
+  end
+end

data/lib/dieroll/die.rb

@@ -0,0 +1,19 @@
+module Dieroll
+  class Die
+
+    def initialize(sides)
+      @sides = sides
+      @last_result = nil
+    end
+
+    def roll!
+      @last_result = rand(1..@sides)
+
+      @last_result
+    end
+
+    def to_s
+      "#{@last_result}"
+    end
+  end
+end

data/lib/dieroll/result.rb

@@ -0,0 +1,18 @@
+module Dieroll
+  class Result
+    attr_reader :total, :dice, :sides, :string
+    
+    # Create result object
+    def initialize(sides, dice)
+      @sides, @dice = sides, dice
+      @total = dice.inject(0) { |sum, x| sum + x }
+      @string = "#{@dice.count}d#{@sides}"
+    end
+    
+    # Return result as string
+    def to_s
+      "#{@total}:#{@string}:#{@dice.join(",")}"
+    end
+
+  end
+end

data/lib/dieroll/roller.rb

@@ -0,0 +1,124 @@
+module::Dieroll
+  class Roller
+
+    attr_reader :total
+
+    # Roll 1dX
+    def self.d(sides)
+      rand(1..sides)
+    end
+
+    # Roll arbitrary 'XdY+Z' string
+    def self.from_string(string)
+      rolls = [0]
+      sets = s_to_set(string)
+      sets.each do |set|
+        if(set.respond_to?(:count) && set.count == 4)
+          rolls << roll(set[0], set[1])
+          rolls[0] += rolls.last.total  if set[2] == '+'
+          rolls[0] -= rolls.last.total  if set[2] == '-'
+        elsif
+          rolls[0] += set
+        end
+      end
+
+      rolls
+    end
+    
+    # Create roller object
+    def initialize(string)
+      @string = string
+      @sets = Roller.s_to_set(string)
+      
+      @dice_sets = []
+      @mods = []
+      @total = 0
+
+      @sets.each do |set|
+        if(set.respond_to?(:count))
+          @dice_sets << Dieroll::DiceSet.new(set[0], set[1],
+                                              set[2], set[3])
+        else
+          @mods << set
+        end
+      end
+    end
+
+    # Determine results of roll
+    def roll!
+      @total = 0
+      @dice_sets.each do |set|
+        @total += set.roll!
+      end
+      @mods.each do |mod|
+        @total += mod
+      end
+
+      @total
+    end
+
+    # Return roll result as string
+    def report
+      output = "#{@total}\n"
+      output += "#{@string}:\n"
+      @dice_sets.each do |set|
+        output += "#{set.to_s}\n"
+      end
+      @mods.each do |mod|
+        output += "+"  if mod >= 0
+        output += "#{mod}\n"
+      end
+      
+      output
+    end
+    
+    def to_s
+      "#{@total}"
+    end
+
+    def string=(string)
+      @string = string
+      initialize(@string)
+    end
+
+    private
+
+    def self.roll(num, sides)
+      total = 0
+      dice = []
+      num.times do
+        dice << d(sides)
+      end
+      Dieroll::Result.new(sides, dice)
+    end
+    
+    def self.s_to_set(str)
+      sets = []
+      set_strings = str.scan(/^[^+|-]+|[+|-][^+|-]+/)
+      
+      set_strings.each do |set_string|
+        set_string =~ /^([^\/]+)\/?([^\/]*)$/
+        set_string, drop_string = $1, $2
+        drop_string = nil  if drop_string.empty?
+
+        set_string =~ /^([+|-]?)(\d+)(d\d+)?/
+        sign, num, sides = $1, $2, $3
+        sign = '+'  if sign.empty?
+
+        set = []
+        if(!!sides)
+          sides.delete! "d"
+          set = [num.to_i, sides.to_i, sign, drop_string]
+        else
+          set = num.to_i
+          set *= -1  if sign == '-'
+        end
+
+        sets << set
+      end
+      
+      sets
+    end
+
+  end
+end

data/lib/dieroll.rb

@@ -0,0 +1,4 @@
+require 'dieroll/roller'
+require 'dieroll/result'
+require 'dieroll/die'
+require 'dieroll/diceset'

metadata

@@ -0,0 +1,52 @@
+--- !ruby/object:Gem::Specification
+name: dieroll
+version: !ruby/object:Gem::Version
+  version: 0.0.0
+  prerelease: 
+platform: ruby
+authors:
+- Brian Towle
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-03-17 00:00:00.000000000 Z
+dependencies: []
+description: Dieroll allows for rolling dice described by 'XdY+Z' strings
+email: 
+executables:
+- dieroll
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/dieroll/roller.rb
+- lib/dieroll/result.rb
+- lib/dieroll/diceset.rb
+- lib/dieroll/die.rb
+- lib/dieroll.rb
+- !binary |-
+  YmluL2RpZXJvbGw=
+homepage: https://github.com/btowle/dieroll
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.17
+signing_key: 
+specification_version: 3
+summary: Simple dice rolling script
+test_files: []