Bowling Scores (#181)

Apologies for not having the Long Division quiz summary done yet. It
will come sometime today or tomorrow. Meanwhile, I have the next quiz
ready…

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

The three rules of Ruby Q. 2:

  1. Please do not post any solutions or spoiler discussion for this
    quiz until 48 hours have passed from the time on this message.

  2. Support Ruby Q. 2 by submitting ideas as often as you can! (A
    permanent, new website is in the works for Ruby Q. 2. Until then,
    please visit the temporary website at

http://splatbang.com/rubyquiz/.

  1. Enjoy!

Suggestion: A [QUIZ] in the subject of emails about the problem
helps everyone on Ruby T. follow the discussion. Please reply to
the original quiz message, if you can.

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

Bowling Scores (#181)

Whether it is real or on the Wii, bowling is a fun game. (Okay, for
the sake of the quiz, let’s assume it’s a fun game.) But I’ve known
folks who just don’t understand how to score properly. They can
count pins knocked down, and know that getting all ten pins in one
roll is good, but they still can’t keep score.

Your task this week is to tally scores for these people. The input
will be the player’s name and the number of pins felled from each
roll. For example:

 ruby bowling_scores.rb John 6 2 7 1 10 9 0 8 2 10 10 3 5 7 2 5 5 8

Your should tally the per-frame scores and generate output in table
form, such as:

 John's final score: 140

 Frame     Roll  Roll    Score
    1        6     2        8
    2        7     1       16
    3        X             35
    4        9     -       44
    5        8     /       64
    6        X             87
    7        X            105
    8        3     5      113
    9        7     2      122
   10        5     /      140
    *        8

Note that you should make use of typical bowling symbols: X for a
strike, / for a spare, and - for zero. Also, if extra balls were
thrown at the end (to supplement a strike or spare in the final
frame), list those as frame * like the above, but without a score.

Extra credit: Generate ascii or graphical output that looks more like
the traditional bowling score form, which can be seen on this page.

Matthew M. ha scritto:

Bowling Scores (#181)

Hi all,

here’s my solution:

Regards,
Andrea

fre, 24 10 2008 kl. 23:25 +0900, skrev Matthew M.:

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

Bowling Scores (#181)

a simple no-frills tail-recursive implementation

class Bowling
def initialize
playBowling(ARGV[0], ARGV[1…ARGV.length].collect { |n| n.to_i })
end
def playBowling(player, pins)
printf("\nFrame Roll Roll Score\n")
printf("\n%s’s final score: %d\n\n", player, doFrame(pins))
end
def doFrame(pins, frame = 1, subtotal = 0)
dSubtotal = 0
if pins.length > 0
if frame > 10
printFrame("*", pins[0], pins[1], “”)
pins = []
elsif pins[0] == 10
dSubtotal = + pins[0] + pins[1] + pins[2]
printFrame(frame, “X”, " “, subtotal + dSubtotal)
pins = pins[1…pins.length]
elsif pins[0] + pins[1] == 10
dSubtotal = pins[0] + pins[1] + pins[2]
printFrame(frame, pins[0], “/”, subtotal + dSubtotal)
pins = pins[2…pins.length]
else
dSubtotal = pins[0] + pins[1]
printFrame(frame, pins[0], pins[1], subtotal + dSubtotal)
pins = pins[2…pins.length]
end
doFrame(pins, frame + 1, subtotal + dSubtotal)
else
subtotal
end
end
def printFrame(frameNr, ball0, ball1, subtotal)
printf(” %2s %s %s %3s\n", frameNr, ball0, ball1,
subtotal)
end
end

Bowling.new() if $0 == FILE

Here there’s my attempt:

=== CODE START ===

class Array
def sum; self.inject{|a,b| a+b}; end
end

def get_points (shot,next_shots)
return shot.sum + (
# strike
if shot.first == 10
next_shots.flatten[0…1].sum
# spare
elsif shot.sum == 10
next_shots.first.first
# normal
else
0
end
)
end

def symbols(score,sep)
return “X#{sep}” if score.first == 10
return “#{score[0]}#{sep}/” if score.sum == 10
return “#{score[0]}#{sep}#{score[1]}”
end

name, score, points = ARGV.first, ARGV[1…-1].join(" "), []
raise “Usage: ‘ruby 181_bowling_score.rb [name] [scores]’” if name.nil?
or
score.to_a.empty?

score = score.scan(/10|\d+\s*\d*/).collect{|e| e.split(" ").map!{|e|
e.to_i}}
score.each_with_index { |s,i| points[i] = get_points(s,score[i+1…-1]) }

puts “#{name}'s final score: #{points[0…9].sum}”;
puts “Frame\tRoll\tRoll\tScore\t”
score.each_with_index do |s,i|
puts “#{i+1}\t#{symbols(s,”\t")}\t#{(i<10) ? points[0…i].sum : ‘’}"
end

=== CODE END ===

Sorry, I forgot to translate zeros into -, here’s the fixxed version:

=== CODE START (FIX) ===

=begin

Bowling Scores (#181)

Whether it is real or on the Wii, bowling is a fun game. (Okay, for the
sake
of the quiz, let’s assume it’s a fun game.) But I’ve known folks who
just
don’t understand how to score properly. They can count pins knocked
down, and know that getting all ten pins in one roll is good, but they
still
can’t keep score.

Your task this week is to tally scores for these people. The input will
be
the player’s name and the number of pins felled from each roll. For
example:

ruby bowling_scores.rb John 6 2 7 1 10 9 0 8 2 10 10 3 5 7 2 5 5 8

Your should tally the per-frame scores and generate output in table
form,
such as:

John’s final score: 140

Frame Roll Roll Score
1 6 2 8
2 7 1 16
3 X 35
4 9 - 44
5 8 / 64
6 X 87
7 X 105
8 3 5 113
9 7 2 122
10 5 / 140
* 8

Note that you should make use of typical bowling symbols: X for a
strike,
/ for a spare, and - for zero. Also, if extra balls were thrown at
the
end (to supplement a strike or spare in the final frame), list those as
frame * like the above, but without a score.

Extra credit: Generate ascii or graphical output that looks more like
the
traditional bowling score form, which can be seen on this page.

=end

class Array
def sum; self.inject{|a,b| a+b}; end
end

def get_points (shot,next_shots)
return shot.sum + (
# strike
if shot.first == 10
next_shots.flatten[0…1].sum
# spare
elsif shot.sum == 10
next_shots.first.first
# normal
else
0
end
)
end

def symbols(score,sep)
return “X#{sep}” if score.first == 10
return (score.sum == 10 ? “#{score[0]}#{sep}/” :
“#{score[0]}#{sep}#{score1}”).gsub(“0”,“-”)
end

name, score, points = ARGV.first, ARGV[1…-1].join(" "), []
raise “Usage: ‘ruby 181_bowling_score.rb [name] [scores]’” if name.nil?
or
score.to_a.empty?

score = score.scan(/10|\d+\s*\d*/).collect{|e| e.split(" ").map!{|e|
e.to_i}}
score.each_with_index { |s,i| points[i] = get_points(s,score[i+1…-1]) }

puts “#{name}'s final score: #{points[0…9].sum}”;
puts “Frame\tRoll\tRoll\tScore\t”
score.each_with_index do |s,i|
puts “#{i+1}\t#{symbols(s,”\t")}\t#{(i<10) ? points[0…i].sum : ‘’}"
end

=== CODE END (FIX) ===

On Sun, Oct 26, 2008 at 11:25 PM, Sandro P. <

On Fri, 24 Oct 2008 09:25:45 -0500, Matthew M. wrote:

original quiz message, if you can.
good, but they still can’t keep score.
John’s final score: 140
9 7 2 122
the traditional bowling score form, which can be seen on this page.

#!/usr/bin/env ruby
#Requires Ruby 1.8.7

class Fixnum
def to_bowl
return ‘-’ if self==0
return ‘X’ if self==10
return self.to_s
end
end

class Array
def strike?
self[0]==10
end
def spare?
self[0]+self1==10
end
end

module Enumerable
#each cons is almost what I want, but it won’t generate partial cons
at the end
def mycons n
result=[]
each_with_index do |f,i|
result << self[i,n]
end
result
end
end

ARGV.map!(&:to_i)
fail if ARGV.any?{|x| x>10}
frames=ARGV.mycons(3)
frames.delete_at(-1)

frames.each_with_index do |f,i|
frames[i+1]=nil if f and not f.strike?
end
frames.compact!
totals=frames.inject([]) do |h,frame|
last = h[-1] || 0
frame.delete_at(2) unless frame.spare? or frame.strike?
h+[last+frame.inject(&:+)]
end
printf “%8s%8s%8s%8s\n”, “Frame”, “Roll”, “Roll”, “Score”
frames.each_with_index do |f,i|
spare=‘/’ if f[0]+f1==10
printf “%8s%8s%8s%8s\n”, i+1, f[0].to_bowl, (spare or f1.to_bowl
unless f.strike?), totals[i]
if i==9 and f.spare?
printf “%8s%8s\n”, ‘', f[2].to_bowl
elsif i==9 and f.strike?
printf “%8s%8s%8s\n”, '
’, f1.to_bowl, f[2].to_bowl
end
end

  8        3     5      113
  9        7     2      122
 10        5     /      140
  *        8

Quick and dirty solution. Should really be able to factor this into a
single
loop but parts of it might end up getting messy.

My try up here:

http://www.pastie.org/301342

-Doug Seifert

Sorry, behind schedule again, summary coming tomorrow.

Quick and dirty

name = ARGV.shift
ARGV.map! { |e| Integer(e) }
table, score = “”, 0
CHARS="-123456789X"
(1…10).each do |frame|
line = [CHARS[r1 = ARGV.shift,1]]
if r1 == 10
score += r1 + ARGV[0] + ARGV[1]
else
line << CHARS[r2 = ARGV.shift,1]
score += (sum = r1 + r2)
if sum == 10
score += ARGV[0]
line[1] = “/”
end
end
table << sprintf(" %2s %s %1s %3d\n",
frame, line[0], line[1], score)
end
while r = ARGV.shift
table << sprintf(" %2s %s\n", “*”, CHARS[r,1])
end
puts <<EOF
#{name}'s final score: #{score}

Frame Roll Roll Score
#{table}
EOF