baseball_scorecard 0.0.1

data/.gitignore

@@ -0,0 +1,4 @@
+*.gem
+.bundle
+Gemfile.lock
+pkg/*

data/Gemfile

@@ -0,0 +1,4 @@
+source "http://rubygems.org"
+
+# Specify your gem's dependencies in baseball_scorecard.gemspec
+gemspec

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/baseball_scorecard.gemspec

@@ -0,0 +1,30 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "baseball_scorecard/version"
+
+Gem::Specification.new do |s|
+  s.name        = "baseball_scorecard"
+  s.version     = BaseballScorecard::VERSION
+  s.authors     = ["j. kaiden"]
+  s.email       = ["jakekaiden@gmail.com"]
+  s.homepage    = ""
+  s.summary     = %q{Baseball scorecard generator}
+  s.description = %q{Baseball scorecard generator}
+
+  # s.rubyforge_project = "baseball_scorecard"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  # s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.executables << 'scorecard'
+  s.require_paths = ["lib"]
+
+  # specify any dependencies here; for example:
+  # s.add_development_dependency "rspec"
+  # s.add_runtime_dependency "rest-client"
+  s.add_dependency "markaby"
+  s.add_dependency "hpricot"
+  s.add_dependency "green_shoes"
+  s.add_dependency "gameday_api"
+  s.add_dependency "launchy"
+end

data/bin/scorecard

@@ -0,0 +1,3 @@
+#! /usr/bin/env ruby
+
+load "baseball_scorecard.rb"

data/gameday_copyright.txt

@@ -0,0 +1,6 @@
+
+All documents fetched by the gameday API clearly state: Copyright 2012 MLB Advanced Media, L.P. Use of any content on this page acknowledges agreement to the terms posted here gdx.mlb.com/components/copyright.txt
+
+Which furthermore states: The accounts, descriptions, data and presentation in the referring page (the “Materials”) are proprietary content of MLB Advanced Media, L.P (“MLBAM”).<br />Only individual, non-commercial, non-bulk use of the Materials is permitted and any other use of the Materials is prohibited without prior written authorization from MLBAM.<br />Authorized users of the Materials are prohibited from using the Materials in any commercial manner other than as expressly authorized by MLBAM.
+
+Naturally, these terms are passed on to any who use this application. It is your responsibility to abide by them.

data/lib/baseball_scorecard.rb

@@ -0,0 +1,114 @@
+require 'markaby'
+require 'green_shoes'
+require 'gameday'
+require 'team'
+require 'batter'
+require 'launchy'
+require File.join(File.dirname(__FILE__), "baseball_scorecard", "card_generator")
+
+module BaseballScorecard
+
+  Shoes.app width: 300, height: 225, title: "Scorecard Generator" do
+	
+		Shoes::App.class_eval{include CardGenerator}
+	
+		background(image "#{File.join(File.dirname(__FILE__), "baseball_scorecard", "images", "baseball.png")}")
+	
+		teams = Team.teams
+		team_list = ["Select Team"]
+		teams.each{|t|
+			team_list << t[1][0..1].join(' ')
+		}
+		
+		team_lbox = list_box(width: 250, items: team_list){|list| @team = list.text}
+		team_lbox.choose("Select Team")
+		team_lbox.move(25, 25)
+		
+		yesterday = (Time.now - 86400).strftime("%B %d %Y").split
+		
+		month_lbox = list_box(width: 120, items: %w[January February March April May June July August September October November December]){|list|
+			@month = list.text
+		}
+		month_lbox.choose(yesterday[0])
+		month_lbox.move(25, 65)
+	
+		day_lbox = list_box(width: 50, items: (1..31).to_a){|list|
+			@day = list.text
+		}
+		day_lbox.choose(yesterday[1].to_i)
+		day_lbox.move(149, 65)
+		
+		year_lbox = list_box(width: 72, items: (1926..(yesterday[2].to_i)).to_a){|list|
+			@year = list.text
+		}
+		year_lbox.choose(yesterday[2].to_i)
+		
+		year_lbox.move(275 - year_lbox.width, 65)
+		
+		find_btn = button("find games"){
+			unless @team == "Select Team"
+				@status_line.text = "searching for games..."
+				p "fetching game..."###
+				@games = nil
+				
+				Thread.new do
+					teams.each{|t|
+						@team.split.each{|w|
+							if t[1].include?(w); selected = true; else selected = false; end
+							@team_abrev = t[0] if selected
+						}
+					}
+					
+					GamedayUtil.set_fetcher('remote')
+					team = Team.new(@team_abrev)
+					
+					sel_date = "#{@year} #{@month} #{@day}"
+					date = Time.parse(sel_date).strftime("%Y %m %d").split
+					
+					begin
+						@games = team.games_for_date(date[0], date[1], date[2])
+					rescue ArgumentError
+						@status_line.text = "no games found for team and date"
+						p "no games found"
+					rescue Exception => e
+						@status_line.text = "error finding games"; p e
+					end
+					
+					if @games
+						times = []
+						@games.each{|g|
+							time = Time.parse(g.time).strftime("%I:%M %p")
+							time.slice!(0) if time[0] == "0"
+							times << time
+						}
+			
+						games_lbox = list_box(width: 250, items: times){|list| @game = @games[times.index(list.text)]}
+						games_lbox.choose(times[0])
+						games_lbox.move(25, 105)
+						
+						b_btn = button("build scorecards"){init_cards(@game)}
+						b_btn.style(width: 120)
+						b_btn.move(155, 145)
+						@status_line.text = "games(s) found"
+					else
+						p "now what do i do?"
+					end		#if
+				end		#Thread
+			else
+				@status_line.text = "Select a Team"
+			end		#unless
+		}		#find_btn
+		find_btn.style(width: 120)
+		find_btn.move(25, 145)
+		
+		flow width: 300 do
+			nofill
+			@status_box = flow{
+				fill white
+				rect(25, 190, 250, 20, curve: 5)
+				@status_line = inscription "Select Team and Date", top: 191, align: "center"
+			}
+		end
+	
+	end		#Shoes.app
+end		#module

data/lib/baseball_scorecard/card_generator.rb

@@ -0,0 +1,368 @@
+class Array		#makes green_shoes play nice with gameday_api ;)
+  def clear; _clear end
+end
+
+module CardGenerator
+	attr_accessor :home_team, :visiting_team, :home_batters, :visiting_batters,
+	:home_pitchers, :visiting_pitchers, :visiting_abrev, :home_abrev,
+	:visiting_score, :home_score, :date, :elements, :fldg, :imagedir
+	
+	def init_cards(game)
+		@@parent = self
+		#@imagedir = "images"
+		@imagedir = File.join(File.dirname(__FILE__), "images")
+		Thread.new{init_batting_arrays(game)}
+	end
+	
+	def init_batting_arrays(game)
+		@game = game
+		@gid = @game.gid
+		@status_line.text = "getting lineups..."
+		p "fetching lineups..."###
+		begin
+			@home = @game.get_batters("home")
+			@visitors = @game.get_batters("away")
+			@home_pitchers = @game.get_pitchers("home")
+			@visiting_pitchers = @game.get_pitchers("away")
+		rescue Exception => e
+			@status_line.text = "Error getting lineups"; p e
+		end
+		@status_line.text = "getting innings..."
+		p "fetching innings..."###
+		begin
+			innings = @game.get_innings
+		rescue Exception => e
+			@status_line.text = "Error getting innings"; p e
+		end
+		@status_line.text = "getting atbats..."
+		p "fetching atbats..."
+		begin
+			@atbats = @game.get_atbats
+		rescue Exception => e
+			@status_line.text = "Error getting atbats"; p e
+		end
+		@status_line.text = "getting team info..."
+		p "getting team info..."###
+		begin
+			teams = Team.get_teams_for_gid(@gid)
+			@visiting_team = "#{teams[0].city} #{teams[0].name}"
+			@visiting_abrev = teams[0].abrev.upcase
+			@home_team = "#{teams[1].city} #{teams[1].name}"
+			@home_abrev = teams[1].abrev.upcase
+		rescue Exception => e
+			@status_line.text = "Error getting team info"; p e
+		end
+
+		@date = "#{Date::MONTHNAMES[@game.month.to_i]} #{@game.day}, #{@game.year}"
+		box = @game.boxscore
+		line = box.linescore
+		@visiting_score = line.away_team_runs
+		@home_score = line.home_team_runs
+		
+		@visiting_batters = []
+		@home_batters = []
+		
+		@status_line.text = "building cards..."
+		p "building arrays..."##
+		
+		Struct.new("Batter", :name, :number, :position, :id, :batting_order, :innings, :stats)
+		@total = (@home.length + @visitors.length).to_f
+		@processed = 0.0
+		
+		def build_array(home_or_away)
+			case home_or_away
+				when 'home'; batters = @home; batting_array = @home_batters
+				when 'away'; batters = @visitors; batting_array = @visiting_batters
+			end
+			
+			batters.each{|ba|
+				@processed += 1.0
+				@status_line.text = "#{((@processed/ @total) * 100).round.to_s}%"##
+				
+				b = Batter.new; b.load_from_id(@gid, ba.pid)
+				xd = b.instance_variable_get("@xml_data")
+
+				xd.split("<").each{|entry|
+					if entry.include?("season")
+						@season_stats = entry.delete('/>').delete('"').gsub('season', 'SEASON:').gsub('=', ': ')
+					elsif entry.include?("career")
+						@career_stats = entry.delete('/>').delete('"').gsub('career', 'CAREER:').gsub('=', ': ')
+					end
+				}
+				stats = "#{@season_stats}\n#{@career_stats}"
+
+				number = b.jersey_number
+				inning_arrays = []
+				@game.innings.length.times{
+					inning_arrays << []
+				}
+				batter = Struct::Batter.new(ba.batter_name, number, ba.pos, ba.pid, (ba.bo.to_i / 100).round, inning_arrays, stats)
+				batting_array << batter
+			}		#batters.each
+		end		#build_array
+		
+		begin
+			build_array('home')
+			build_array('away')
+		rescue Exception => e
+			@status_line.text = "Error building arrays"; p e
+		end
+		
+		def set_inning(home_or_away, ab)
+			case home_or_away
+				when 'home'; batting_array = @home_batters
+				when 'away'; batting_array = @visiting_batters
+			end
+			
+			inning = ab.inning.to_i
+			player_id = ab.batter_id
+			
+			batting_array.each{|batter|
+				if batter.id == player_id
+					batter.innings[inning - 1] << ab
+				end
+			}
+		end		#set_inning
+		
+		begin
+			innings.each{|i|
+				i.top_atbats.each{|ab| set_inning('away', ab)}
+				i.bottom_atbats.each{|ab| set_inning('home', ab)}
+			}
+		rescue Exception => e
+			@status_line.text = "Error setting innings"; p e
+		end
+	
+		@status_line.text = "arrays built"
+		p "arrays built"##
+		init_html('home')
+		init_html('away')
+		
+	end		#init_batting_arrays
+	
+	def get_elements(home_or_away, batter_index, inning_index)
+		@elements = []
+		@fldg = nil
+		
+		if home_or_away == 'home'
+			batting_array = @home_batters
+		else
+			batting_array = @visiting_batters
+		end
+		atbat = batting_array[batter_index].innings[inning_index][-1]
+		next_atbat = @atbats[atbat.num.to_i]
+		last_atbat = @atbats[atbat.num.to_i - 2]
+		
+		bases = []
+		if next_atbat
+			bases << next_atbat.pitches[0].on_1b << next_atbat.pitches[0].on_2b << next_atbat.pitches[0].on_3b
+		else
+			bases << atbat.pitches[0].on_1b << atbat.pitches[0].on_2b << atbat.pitches[0].on_3b
+		end
+		bases_file = File.join(@imagedir, "bases")
+		bases.each_with_index{|b, i|
+			if b
+				bases_file << "-#{(i+1).to_s}"
+			end
+		}
+		bases_file += ".png"
+		@elements << bases_file	#[0]
+		
+		case atbat.event
+			when "Single"
+				event_image = File.join(@imagedir, "hit_1B.png")
+				get_fldg(atbat.des)
+			when "Double"
+				event_image = File.join(@imagedir,  "hit_2B.png")
+				get_fldg(atbat.des)
+			when "Triple"
+				event_image = File.join(@imagedir,  "hit_3B.png")
+				get_fldg(atbat.des)
+			when "Home Run"
+				event_image = File.join(@imagedir,  "hit_HR.png")
+				get_fldg(atbat.des)
+			when "Walk"
+				event_image = File.join(@imagedir,  "hit_BB.png")
+			when "Intent Walk"
+				event_image = File.join(@imagedir, "hit_IBB.png")
+			when "Hit By Pitch"
+				event_image = File.join(@imagedir,  "hit_HBP.png")
+			when "Strikeout"
+				if atbat.des.include?("called")
+					event_image = File.join(@imagedir,  "out_called.png")
+				else
+					event_image = File.join(@imagedir,  "out_strikes.png")
+				end
+			when "Flyout"
+				event_image = File.join(@imagedir,  "out_fly.png")
+				get_fldg(atbat.des)
+			when "Groundout"
+				event_image = File.join(@imagedir,  "out_ground.png")
+				get_fldg(atbat.des)
+			when "Pop Out"
+				event_image = File.join(@imagedir,  "out_pop.png")
+				get_fldg(atbat.des)
+			when "Lineout"
+				event_image = File.join(@imagedir,  "out_line.png")
+				get_fldg(atbat.des)
+			when "Forceout"
+				event_image = File.join(@imagedir,  "out_force.png")
+				get_fldg(atbat.des)
+			when "Field Error"
+				event_image = File.join(@imagedir, "error.png")
+				get_fldg(atbat.des)
+		end		#case
+		if atbat.event.include?("DP")
+			event_image = File.join(@imagedir,  "out_double-play.png")
+			get_fldg(atbat.des)
+		end
+		if atbat.event.include?("TP")
+			event_image = File.join(@imagedir,  "out_triple-play.png")
+			get_fldg(atbat.des)
+		end
+		
+		@elements << event_image #[1]
+		
+		outs_image = nil
+		unless atbat.o == "0" || atbat.o == last_atbat.o
+			outsfile = "outs_#{atbat.o}.png"
+			outs_image = File.join(@imagedir, outsfile)
+		end
+		@elements << outs_image #[2]
+		
+		@elements.insert(3, @fldg) if @fldg  #[3]
+		
+		rbi = atbat.des.scan(/scores/).length
+		@elements.insert(4, rbi) unless rbi == 0  #[4]
+		
+	end		#get_elements
+	
+	def get_fldg(des)
+		fldg = []
+		fldg.insert(des.index("pitcher"), "1") if des.include?("pitcher")
+		fldg.insert(des.index("catcher"), "2") if des.include?("catcher")
+		fldg.insert(des.index("first baseman"), "3") if des.include?("first baseman")
+		fldg.insert(des.index("second baseman"), "4") if des.include?("second baseman")
+		fldg.insert(des.index("third baseman"), "5") if des.include?("third baseman")
+		fldg.insert(des.index("shortstop"), "6") if des.include?("shortstop")
+		fldg.insert(des.index("left field"), "7") if des.include?("left field")
+		fldg.insert(des.index("center field"), "8") if des.include?("center field")
+		fldg.insert(des.index("right field"), "9") if des.include?("right field")
+		@fldg = fldg.compact.join("-")
+	end
+	
+	def init_html(home_or_away)
+		@status_line.text = "building html"
+		p "building html"###
+		
+		html_builder = Markaby::Builder.new
+		html_builder.html do
+			imagedir = @@parent.imagedir
+			case home_or_away
+				when 'home'
+				batters = @@parent.home_batters; pitchers = @@parent.home_pitchers; team_abrev = @@parent.home_abrev
+				when 'away'
+				batters = @@parent.visiting_batters; pitchers = @@parent.visiting_pitchers; team_abrev = @@parent.visiting_abrev
+			end
+			
+			head {title "#{team_abrev} Scorecard"}
+			body :style => "background-image: url(#{File.join(imagedir, 'grass.jpg')})" do
+				
+				h1 :style => "padding-top: 5"
+				pre "#{@@parent.visiting_team} #{@@parent.visiting_score} - #{@@parent.home_team} #{@@parent.home_score}", :style => "color: white; font-family: arial; text-align: center"
+				h2 
+				pre @@parent.date, :style => "color: white; font-family: arial; text-align: center"
+				img :src => File.join(imagedir, "team_images", "#{team_abrev.downcase}.png"),
+				:style => "position: absolute; left: 20; top: 85"
+				
+				table do 
+					
+					tr
+					td; inning_num = 1
+					9.times{
+						td inning_num, :style => "color: white; font-family: arial; font-size: 125%; text-align: center"
+						inning_num += 1
+					}
+					
+					batters.each_with_index{|batter, batter_index|
+						unless batter.batting_order == 0
+							tr
+							td :width => 150, :title => batter.stats
+							pre "#{batter.batting_order}\n#{batter.name}\n##{batter.number} #{batter.position}",
+							:style => "color: white; font-family: arial; font-size: 125%; text-align: right; padding-right: 20"
+							
+							batter.innings.each_with_index{|inning, inning_index|
+								if inning.empty?
+									td 
+									img :src => File.join(imagedir, "bases_no_ba.png"), :style => "position: relative; top: 0; left: 0"
+								else
+									atbat = batter.innings[inning_index][-1]
+									@@parent.get_elements(home_or_away, batter_index, inning_index)
+									description = ""#
+									if batter.innings[inning_index].length > 1#
+										batter.innings[inning_index].each_with_index{|ab, ab_index|#
+											description << "At Bat #{ab_index + 1}: #{ab.des}\n"#
+										}#
+									else
+										description = atbat.des
+									end
+									td :style => "position: relative; top: 0; left: 0", :title => description
+									img :src => File.join(imagedir, "bases_bg.png"), :style => "position: absolute; top: 0; left: 0"
+									img :src => @@parent.elements[1], :style => "position: absolute; top: 0; left: 0" if @@parent.elements[1]
+									img :src => @@parent.elements[0], :style => "position: absolute; top: 0; left: 0"
+									img :src => @@parent.elements[2], :style => "position: absolute; top: 69; left: 69" if @@parent.elements[2]
+									pre "#{atbat.b}-#{atbat.s}",
+									:style => "position: absolute; top: -7; left: 7; font-family: arial; font-size: small"
+									pre @@parent.fldg,
+									:style => "position: absolute; top: 60; left: 7; font-family: arial; font-size: small" if @@parent.fldg
+									pre "#{@@parent.elements[4]}",
+									:style => "position: absolute; top: -7; left: 65; font-family: arial; font-size: small" if @@parent.elements[4]
+									pre "RBI",
+									:style => "position: absolute; top: -1; left: 72; font-family: arial; font-size: x-small" if @@parent.elements[4]
+									if batter.innings[inning_index].length > 1
+										pre "+AB", :style => "position: absolute; top: 43; left: 33; font-family: arial; font-weight: bold; font-size: small"
+									end
+									if atbat.des.include?('steals')
+										pre "SB", :style => "position: absolute; top: 6; left: 37; font-family: arial; font-weight: bold"
+									end
+								end		#if inning.empty?
+							}		#batter.innings.each_with_index
+						end		#unless
+					}		#batters.each_with_index
+				end		#table
+				
+				hr :style => "padding-top: 10"##
+				h2 "Pitching", :style => "color: white; font-family: arial; text-align: center"
+				table do
+					tr
+					td; %w[W-L ERA IP AB K BB H R ER].each{|entry|
+						td entry, :width => 150, :style => "color: white; font-family: arial; font-size: 125%; text-align: center"
+					}
+					pitchers.each{|pitcher|
+						tr :style => "color: white; font-family: arial"
+						td pitcher.pitcher_name, :style => "font-size: 125%; text-align: right; padding-right: 20"
+						td "#{pitcher.w}-#{pitcher.l}", :width => 150, :style => "text-align: center"
+						td pitcher.era, :width => 150, :style => "text-align: center"
+						td pitcher.inn, :width => 150, :style => "text-align: center"
+						td pitcher.bf, :width => 150, :style => "text-align: center"
+						td pitcher.so, :width => 150, :style => "text-align: center"
+						td pitcher.bb, :width => 150, :style => "text-align: center"
+						td pitcher.h, :width => 150, :style => "text-align: center"
+						td pitcher.r, :width => 150, :style => "text-align: center"
+						td pitcher.er, :width => 150, :style => "text-align: center"
+					}		#pitchers.each
+				end		#table
+				
+			end		#body	
+		end		#html_builder
+		
+		File.open("scorecard_#{home_or_away}.html", "w"){|f|
+			f.puts(html_builder.to_s)
+		}
+		
+		@status_line.text = "html built"
+		p "html built"##
+		Launchy.open("scorecard_#{home_or_away}.html")
+	end		#init_html
+	
+end		#module CardGenerator