add other game scoring scripts

murder-haggle/score.rb

@@ -0,0 +1,124 @@
+#!/usr/bin/env ruby
+
+	
+
+class MurderHaggleHand
+	def initialize(player, bullets, fingerprints, tips, suspects, witnesses, first_entry=false, girl_entered=false)
+		# build a hand
+		@player = player
+		@original_hand = {
+			'bullets' => bullets,
+			'fingerprints' => fingerprints,
+			'tips' => tips,
+			'suspects' => suspects,
+			'witnesses' => witnesses,
+		}
+		@first_entry = first_entry
+		@girl_entered = girl_entered
+	end
+
+	def score
+
+		# seed the same so we always get the same results!
+		srand(32472)
+
+		# track the total score
+		hand_total = 0
+		card_multipliers = { "bullets" => [], "fingerprints" => [], "tips" => [], "suspects" => [], "witnesses" => [] }
+
+		puts "======================================================"
+		puts "#{@player} turned in #{@original_hand.inspect}."
+
+		# copy the hand so we can mess with it
+		hand = @original_hand.dup
+
+		# no more than 13 cards allowed
+		hand_size = hand.values.inject(0) { |sum,n| sum+n }
+		discarded = 0
+		(hand_size-13).times do
+			hand_array = hand.collect { |k,v| [k]*v }.flatten
+			i = rand(hand_array.size)
+			puts "Hand too big... discarding 1 #{hand_array[i]}."
+			hand[hand_array[i]] = hand[hand_array[i]] - 1;
+			discarded += 1
+		end
+		puts "New hand is #{hand.inspect}." if discarded > 0
+
+		# base scores
+		base_scores = { "bullets" => 1, "fingerprints" => 2, "tips" => 3, "suspects" => 4, "witnesses" => 5 }
+
+		# not allowed more suspects than witnesses
+		if hand["suspects"] > hand["witnesses"]
+			diff = hand["suspects"] - hand["witnesses"]
+			puts "Discarding #{diff} suspects."
+			hand["suspects"] = hand["witnesses"]
+		end
+
+		# +10 points for first envelope turned in
+		if @first_entry
+			puts "+10 points for being the first entry."
+			hand_total += 10
+		end
+
+		# +10 points for envelope turned in by girls
+		if @girl_entered
+			puts "+10 points for being turned in by a girl."
+			hand_total += 10
+		end
+
+		# 8 or more tips is 25 points
+		if hand["tips"] >= 8
+			puts "+25 points for having 8 or more tips."
+			hand_total += 25
+		end
+
+		# each set of 4 suspects and 1 witness score 10 points
+		x = [ hand["suspects"]/4, hand["witnesses"] ].min
+		if x > 0
+			puts "+#{x*10} points for #{x} set(s) of 4 suspects/1 witness"
+			hand_total += x*10
+		end
+
+		# each set of 3 fingerprints doubles one tip
+		(hand["fingerprints"]/3).times do
+			card_multipliers["tips"] << 2
+			puts "Detected a set of 3 fingerprints, 1 tip will be doubled."
+		end
+
+		# each set of 2 suspects quadruples the value of one bullet casing
+		(hand["suspects"]/2).times do
+			card_multipliers["bullets"] << 4
+			puts "Detected a set of 2 suspects, 1 bullet will be quadrupled."
+		end
+
+		# now sum up score
+		hand.each do |k,v|
+			v.times do
+				multiplier = card_multipliers[k].shift || 1
+				base = base_scores[k]
+				points = base * multiplier
+				mult_string = multiplier > 1 ? " multiplied by #{multiplier}." : "."
+				puts "+#{points} points for 1 #{k} card#{mult_string}"
+				hand_total += points
+			end
+		end
+
+		# pyramid
+		sorted_counts = hand.values.sort.select { |x| x > 0 }
+		if sorted_counts == [1,2,3,4]
+			hand_total *= 2
+			puts "You have a pyramid, hand value will double."
+		end
+		
+		# input total
+		puts "Total for #{@player}: #{hand_total}"
+		puts "======================================================"
+		print ""
+	end
+end
+
+
+MurderHaggleHand.new("Steve",5,5,5,5,5).score
+MurderHaggleHand.new("Steve",0,3,2,1,4,true,true).score
+
+