<% season = Request.QueryString("season") If season = "" Then %> <% Response.End End If season = CInt(season) %> <%If season = 1 Then%> <%ElseIf season = 5 Then%> <%ElseIf season = 2 or season = 3 or season = 4 or season = 9 or season = 10 or season = 11 or season = 12 or season = 13 or season = 14 or season = 15 or season = 16 or season = 17 or season = 18 or season = 19 or season = 20 or season = 21 or season = 22 Then%> <%ElseIf season = 6 or season = 7 Then%> <%ElseIf season = 8 Then%> <%End If%> <%ElseIf season = 3 Then%> <%ElseIf season = 6 or season = 7 Then%> <%ElseIf season = 8 Then%> <%ElseIf season = 9 or season = 11 or season = 12 or season = 13 or season = 14 or season = 15 or season = 16 or season = 17 or season = 18 or season = 19 or season = 20 or season = 21 or season = 22 or season = 23 or season = 24 or season = 25 or season = 26 Then%> <%Else%> <%End If%>

<%If season = 1 Then%> <%ElseIf season = 2 Then%>

"BALLS OUT, EVERY INNING" Oktoberfest tournament results The Jackalopes Result: 5th place finish (12 teams) <%ElseIf season = 5 Then%>

"BALLS OUT, EVERY INNING"

<< back to homepage 2018 summer 2018 spring 2017 spring 2016 summer 2016 spring 2015 summer 2015 spring 2014 summer 2014 spring 2013 summer 2013 spring 2012 summer 2012 spring 2011 summer 2011 spring 2010 summer 2010 spring 2009 summer 2009 spring 2008 summer 2008 spring 2007 summer 2007 nut brunch 2007 spring 2006 summer 2006 spring Lifetime Stats <%If season = 1 Then%> Schedule <%ElseIf season = 2 Then%> Schedule <%ElseIf season = 3 Then%> Schedule <%ElseIf season = 4 Then%> Schedule <%Elseif season = 5 Then%> Schedule <%Elseif season = 6 Then%> Schedule <%Elseif season = 7 Then%> Schedule <%Elseif season = 8 Then%> Schedule <%Elseif season = 9 Then%> Schedule <%Elseif season = 10 Then%> Schedule <%Elseif season = 11 Then%> Schedule <%Elseif season = 12 Then%> Schedule <%Elseif season = 13 Then%> Schedule <%Elseif season = 14 Then%> Schedule <%Else%> Schedule & Standings <%End If%> E-League Championship Photos

<%If season = 6 Then%>

NEWS 8/4/08: Summer season begins this Sunday, August 10th. Game Time announced on Friday. PAYMENT IS $85 AND IS DUE THIS SUNDAY. 7/28/08: Barry McGough (ejected in the 7th inning on 7/27) to face possible suspension and/or $10,000 fine from Liberty Park. Further details in forthcoming press conference.

<%ElseIf season = 7 Then%>
<%ElseIf season = 5 Then%>

NEWS 8/13/07: Eric "Tico" Torres out for season with surgically-repaired broken thumb.

<%ElseIf season = 8 Then%>
<%ElseIf season = 9 Then%>
<%ElseIf season = 10 Then%>

NEWS 5/12/10: Eric "Tico" Torres out for season with fractured patella

<%ElseIf season = 12 Then%>

NEWS 7/12/11: Brad Abitheira's trade request to Kentucky Minor League affiliate DENIED by GM Frank Marinara

<%ElseIf season = 15 Then%>

NEWS 9/11/12: In the 4th inning Sunday night, Brad Abitheira singled to mark the Sac Lunch franchise's 3000th base hit!

<%ElseIf season = 19 Then%>

NEWS 10/19/14: In the 3rd inning Sunday night, Brad Abitheira singled to mark the Sac Lunch franchise's 4000th base hit!

<%End If%> <% 'strConn = "PROVIDER=MSDASQL; Driver={SQL Server}; Server=192.168.0.105; Database=CP; UID=jais; PWD=jais;" 'strConn = "PROVIDER=MSDASQL; Driver={SQL Server}; Server=(local); Database=v2000v_com;UID=v2000v; PWD=v2000v_pass;" strConn = "PROVIDER=MSDASQL; Driver={SQL Server}; Server=coreyfields.db.12094096.hostedresource.com; Database=coreyfields;UID=coreyfields; PWD=Alvenu12!!!;" dim RsGame, Rs, RsSum, RsGameStats, RsGameStatsSum, RsStatsToDate, RsRecap Set Rs = Server.CreateObject("ADODB.Recordset") Set RsRecap = Server.CreateObject("ADODB.Recordset") dim gamedate 'dim rsUsage 'If Request.ServerVariables("REMOTE_ADDR") <> "71.144.90.252" Then ' Set rsUsage = Server.CreateObject("ADODB.Recordset") ' sql = "Insert Into usage (ip) VALUES ('" & Request.ServerVariables("REMOTE_ADDR") & "')" ' rsUsage.Open Sql, strConn, 3, 3 ' Set rsUsage = Nothing 'End If sql = "getStats @season=" & season Rs.Open Sql, strConn, 3, 3 sql = "getLastRecap @season=" & season RsRecap.Open Sql, strConn, 3, 3 If Not RsRecap.EOF Then recap = RsRecap("recap") gamedate = RsRecap("gamedate") If Right(gamedate, 1) = "-" Then gamedate = Left(gamedate, 6) ElseIf Right(gamedate, 1) = " " Then gamedate = Left(gamedate, 7) End If End If %> <%If recap > "" Then%>
<%=gamedate%> Game recap<%=recap%> <%If season = 4 Then%>

By all accounts it was a tumultuous season. 3 heartbreaking losses proved to be the fucking nails in the coffin. While they came up short of the championship, Manager Corey Fields was quick to point out that the team has steadily improved by sporting a better record each season. In light of this, USSSA Analysts have placed Sac Lunch as the overwhelming favorite to win the goddamn division in '08. Manager Fields has demanded the team abstain from drinking and smoking during the entire offseason, and each player must report to training camp in March in the best goddamn shape of their lives.

<%ElseIf season = 6 Then%>

Some highlights from the season:

Standout infielder Tom McGough selflessly agreeing to play 2B after returning from knee surgery, forming the greatest SS-2B combo in all of Men's E with the power-hitting Boof.

Aaron Melton's record breaking year at the plate. Nearly every record was smashed, including Corey Fields' single season batting average record of .703 (Nut Brunch). Aaron started strong and never let up.

Eric "Tico" Torres' return from an injury-plagued year in 2007, standing out again at 3B and performing flawlessly as a backup Pitcher.

The resurgence of Joe Q at the plate, giving the end of the lineup a new look.

Barry McGough's ejection vs. Amp'd Up, possibly the most infamous incident in Sac Lunch history.

Corey Fields' successful battle against his demons, allowing him to focus on his new Zen-style philosophy of pitching.

Ending the season with 6 regulars with at least a .600 batting average

Although Manager Corey Fields was disappointed at his team giving up 108 runs, they did manage to score a team record 191.

2008 was truly a year of destiny. Sac Lunch solidified their reputation as the most feared and hated team in Men's E - a true black eye on the face of Liberty. Yes, this team is truly a force of good and evil, chaos and order... and now they take their own unique brand of softball to the next level. Following a press conference meltdown, Manager Corey Fields offered the following chilling statement: "Men's D will never know what hit them. Those fuckers are going down. All of them."

<%ElseIf season = 7 Then%>

All things considered, Sac Lunch's first season in D-League was called "acceptable" by Manager/Pitcher Corey Fields. At times they struggled against stronger pitching - leading to some of the highest strikeout numbers in Sac Lunch history. They also struggled with errors in the field, sometimes unable to handle the harder-hit balls. These things are expected to improve in the upcoming 2009 campaign with a rigorous offseason training program, which Mr. Fields claims is mandatory for all players.

Let us not forget the E-League championship run, in which all things seemed to go Sac Lunch's way for the entire season. That season alone was one of the most dominating performances by an E-League team, ever. As the sun sets on 2008, the team will face possible challenges. The rumor mill surrounding LCF Aaron Melton's continued negotiations with Biondo's Market will not let up, despite denials from both sides. And longtime RF Joe Q has been threatening retirement for weeks now - his final decision reportedly to come in February.

<%ElseIf season = 8 Then%>

This season was yet another step in the direction of C-Minor Baseball Pants League. Despite a sputtering offense, Sac Lunch earned an 8-6 record, their first winning record in D-League. In fact, if a few close games had gone their way, Sac Lunch could have been crowned D-League champs. Not surprisingly, the team has decided to switch back to the classic yellow jerseys for summer season.

And of course, this season recap would not be complete without paying tribute to one of the most controversial and excitable players to ever don a Sac Lunch uniform. Joe Q brought a swagger and attitude often missing from this group of even-keel players. Rumors on the street were that GM Frank Marinara had him forced into retirement, most likely due to lingering issues over the infamous 2007 barfight at the Dugout Bar&Grille. Not to mention Liberty Park officials had been pressuring Marinara to "solve" the Joe Q problem. However, his legacy will never be forgotten. The memories are everwhere: disemboweling the trashcan in nearly every dugout, challenging the opposing team to a fight on many occasions, challenging Aaron to a fight in 2007, challenging Corey to a fight every other game, psychotic screams coming from right field...

Joe Q, you are an officer and a gentleman.



<%ElseIf season = 9 Then%>

Nonetheless, congratulations are in order as the season concluded with yet another winning record in D-League. As the Sacs have continued to slowly improve, 2010 becomes a crucial year; nothing short of a championship ring will be tolerated by team executives.

<%ElseIf season = 11 Then%>

For two years - since the ascension to D-League - Sac Lunch has been stuck in mediocrity, playing .500 ball season after season. What will it take to reach the next level? This is the difficult question Manager Corey Fields will struggle with during the offseason. Signs of improvement are clear: the infield, outfield, and pitching rotation continue to rank in the Top 10 of most major statistical categories at Liberty Park. However, the bats remain lethargic. Can defense really win championships?

The greatest accomplishment was the addition of the feared and hideous "Strikeout Blouse". This sinister rag, usually billowing on the dugout fence, was only forced on a few regular players. Consider this astounding statistic: Strikeouts went from .929/game to .455/game, a 51% reduction.


<%Else%>

<%End If%> <%End If%> <%If season = 1 Then%> Final Record: 2-12 (.167) <%ElseIf season = 2 Then%> Final Record: 3-8 (.273) <%ElseIf season = 3 Then%> Final Record: 10-4 (.714)     3rd Place Finish

Runs Scored: 155, Runs Against: 118 <%ElseIf season = 4 Then%> Final Record: 8-3 (.727)     3rd Place (3-way tie)
Runs Scored: 146, Runs Against: 82 <%ElseIf season = 5 Then%> Final Record: 6-5 (.545)     5th Place
Runs Scored: 140, Runs Against: 149 <%ElseIf season = 6 Then%> Final Record: 12-2 (.857)     1st Place Finish
Runs Scored: 191, Runs Against: 108 <%ElseIf season = 8 Then%> Final Record: 8-6 (.571)
Runs Scored: 133, Runs Against: 127 <%ElseIf season = 9 Then%> Final Record: 6-5 (.545)     4th Place Finish (3-way tie)
Runs Scored: 121, Runs Against: 88 <%ElseIf season = 10 Then%> Final Record: 6-8 (.429)     6th Place Finish
Runs Scored: 106, Runs Against: 144 <%ElseIf season = 11 Then%> Record: 5-6 (.455)
Runs Scored: 100, Runs Against: 133 <%ElseIf season = 12 Then%> Final Record: 3-11 (.214)
Runs Scored: 119, Runs Against: 207 <%ElseIf season = 13 Then%> Final Record: 4-7 (.364)
Runs Scored: 121, Runs Against: 142 <%ElseIf season = 14 Then%> Final Record: 10-4 (.714)     2nd Place Finish
Runs Scored: 207, Runs Against: 165 <%ElseIf season = 15 Then%> Final Record: 7-4 (.636)     2nd Place Finish
Runs Scored: 128, Runs Against: 92 <%ElseIf season = 16 Then%> Final Record: 12-1-1 (.893)     1st Place Finish
Runs Scored: 185, Runs Against: 132 <%ElseIf season = 17 Then%> Final Record: 3-6-1 (.350)     6th Place Finish
Runs Scored: 131, Runs Against: 119 <%ElseIf season = 18 Then%> Final Record: 5-8-1 (.393)     6th Place Finish
Runs Scored: 149, Runs Against: 149 <%ElseIf season = 19 Then%> Final Record: 6-5 (.545)
Runs Scored: 127, Runs Against: 107 <%ElseIf season = 20 Then%> Final Record: 12-2 (.857)     1st Place Finish
Runs Scored: 192, Runs Against: 108 <%ElseIf season = 21 Then%> Record: 4-7 (.364)
Runs Scored: 143, Runs Against: 135 <%ElseIf season = 22 Then%> Record: 11-3 (.786)     1st Place Finish
Runs Scored: 204, Runs Against: 135 <%ElseIf season = 23 Then%> Record: 4-7 (.364)
Runs Scored: 139, Runs Against: 162 <%ElseIf season = 24 Then%> Record: 4-8 (.333)
Runs Scored: 117, Runs Against: 171 <%ElseIf season = 25 Then%> Record: 5-7 (.417)
Runs Scored: 112, Runs Against: 187 <%ElseIf season = 26 Then%> Record: 0-8 (.000)
Runs Scored: 43, Runs Against: 119 <%Else%>
Record: 5-6 (.455)

Runs Scored: 107, Runs Against: 129 <%End If%> <%If season = 1 Then%>

(some game stats unavailable due to arson) <%End If%>

Season Stats      Click each column to sort (ascending or descending)
<% 'iCount = 0 Do Until rs.EOF 'If iCount mod 2 = 0 Then ' bgcolor="#eeeeee" 'Else ' bgcolor="#ffffff" 'End If %> <% 'iCount = iCount + 1 rs.MoveNext Loop Set RsSum = Server.CreateObject("ADODB.Recordset") sql = "getStatsSum @season=" & season RsSum.Open Sql, strConn, 3, 3 %>

Info

Player

G

AB

R

RBI

SO

BB

1B

2B

3B

HR

H

TB

Batting Avg.

Slugging %

On-Base %

OPS

<%If rs("bio") = "1" Then%>" width="20">', 600, 625, null);">Bio<%Else%>Bio<%End If%>

<%=rs("name")%>

<%=rs("G")%>

<%=rs("AB")%>

<%=rs("R")%>

<%=rs("RBI")%>

<%=rs("SO")%>

<%=rs("BB")%>

<%=rs("1B")%>

<%=rs("2B")%>

<%=rs("3B")%>

<%=rs("HR")%>

<%=rs("H")%>

<%=rs("TB")%>

<%=FormatNumber(rs("BA"), 3)%>

<%=FormatNumber(rs("SLG"), 3)%>

<%=FormatNumber(rs("OBP"), 3)%>

<%=FormatNumber(rs("OPS"), 3)%>

G=Games, AB=At Bats, R=Runs, RBI=Runs Batted In, SO=Strikeouts, BB=Walks, 1B=Singles, 2B=Doubles, 3B=Triples, HR=Home Runs, H=Hits, TB=Tagged Bases, BA=Batting Avg., SLG=Slugging %, OBP=On-Base Percentage, OPS=SLG+OBP

Team Stats as of <%=FormatDateTime(Now(), 2)%>

AB

R

RBI

SO

BB

1B

2B

3B

HR

H

TB

Batting Avg.

Slugging %

On-Base %

OPS

<%=RsSum("AB")%>

<%=RsSum("R")%>

<%=RsSum("RBI")%>

<%=RsSum("SO")%>

<%=RsSum("BB")%>

<%=RsSum("1B")%>

<%=RsSum("2B")%>

<%=RsSum("3B")%>

<%=RsSum("HR")%>

<%=RsSum("H")%>

<%=RsSum("TB")%>

<%=FormatNumber(RsSum("BA"), 3)%>

<%=FormatNumber(RsSum("SLG"), 3)%>

<%=FormatNumber(RsSum("OBP"), 3)%>

<%=FormatNumber(RsSum("OPS"), 3)%>

<% Set RsGame = Server.CreateObject("ADODB.Recordset") Set RsGameStats = Server.CreateObject("ADODB.Recordset") Set RsGameStatsSum = Server.CreateObject("ADODB.Recordset") Set RsStatsToDate = Server.CreateObject("ADODB.Recordset") Set RsBa = Server.CreateObject("ADODB.Recordset") sql = "Select Distinct GameId From gamestat Where season = " & season & " Order By GameId DESC" RsGame.Open sql, strConn, 3, 3 Do Until rsGame.EOF sql = "getGameStats @GameId = " & rsGame("GameId") & ", @season = " & season 'response.write(sql) 'response.end If rsGameStats.State = 1 Then rsGameStats.Close RsGameStats.Open Sql, strConn, 3, 3 %>

Game <%=rsGame("GameId")%> - <%=rsGameStats("vs")%>
<%If Not IsNull(rsGameStats("recap")) Then%>Recap<%=rsGameStats("recap")%> <%End If%> <% Do Until RsGameStats.EOF sql = "getBA @GameId = " & rsGame("GameId") & ", @pid = " & rsGameStats("pid") & ", @season = " & season If RsBA.State = 1 Then RsBA.Close RsBA.Open Sql, strConn, 3, 3 %> <% RsGameStats.MoveNext Loop sql = "getGameStatsSum @GameId=" & rsGame("GameId") & ", @season=" & season If RsGameStatsSum.State = 1 Then RsGameStatsSum.Close RsGameStatsSum.Open Sql, strConn, 3, 3 %>

Player

AB

R

RBI

SO

BB

1B

2B

3B

HR

H

TB

Batting Avg.

Slugging %

On-Base %

OPS

New Batting Avg.

New Slugging %

New On-Base %

New OPS

<%If RsGameStats("bio") = "1" Then%>&pid=<%=RsGameStats("pid")%>"><%=RsGameStats("name")%><%Else%><%=RsGameStats("name")%><%End If%>

<%=RsGameStats("AB")%>

<%=RsGameStats("R")%>

<%=RsGameStats("RBI")%>

<%=RsGameStats("SO")%>

<%=RsGameStats("BB")%>

<%=RsGameStats("1B")%>

<%=RsGameStats("2B")%>

<%=RsGameStats("3B")%>

<%=RsGameStats("HR")%>

<%=RsGameStats("H")%>

<%=RsGameStats("TB")%>

<%=FormatNumber(RsGameStats("BA"), 3)%>

<%=FormatNumber(RsGameStats("SLG"), 3)%>

<%=FormatNumber(RsGameStats("OBP"), 3)%>

<%=FormatNumber(RsGameStats("OPS"), 3)%>

<%=FormatNumber(RsBA("BA"), 3)%>

<%=FormatNumber(RsBA("SLG"), 3)%>

<%=FormatNumber(RsBA("OBP"), 3)%>

<%=FormatNumber(RsBA("OPS"), 3)%>

<% sql = "getStatsToDate @GameId = " & rsGame("GameId") & ", @season = " & season If rsStatsToDate.State = 1 Then rsStatsToDate.Close rsStatsToDate.Open Sql, strConn, 3, 3 %>

Team

AB

R

RBI

SO

BB

1B

2B

3B

HR

H

TB

Batting Avg.

Slugging %

On-Base %

OPS

<%=RsGameStatsSum("AB")%>

<%=RsGameStatsSum("R")%>

<%=RsGameStatsSum("RBI")%>

<%=RsGameStatsSum("SO")%>

<%=RsGameStatsSum("BB")%>

<%=RsGameStatsSum("1B")%>

<%=RsGameStatsSum("2B")%>

<%=RsGameStatsSum("3B")%>

<%=RsGameStatsSum("HR")%>

<%=RsGameStatsSum("H")%>

<%=RsGameStatsSum("TB")%>

<%=FormatNumber(RsGameStatsSum("BA"), 3)%>

<%=FormatNumber(RsGameStatsSum("SLG"), 3)%>

<%=FormatNumber(RsGameStatsSum("OBP"), 3)%>

<%=FormatNumber(RsGameStatsSum("OPS"), 3)%>

Team Batting Avg. Through Game <%=rsGame("GameId")%>

<%=FormatNumber(rsStatsToDate("BA"), 3)%>

Team Slugging % Through Game <%=rsGame("GameId")%>

<%=FormatNumber(rsStatsToDate("SLG"), 3)%>

Team On-Base % Through Game <%=rsGame("GameId")%>

<%=FormatNumber(rsStatsToDate("OBP"), 3)%>

<% rsGame.MoveNext Loop %> <% Set rs = Nothing Set rsGame = Nothing Set rsGameStats = Nothing Set RsBa = Nothing Set RsSum = Nothing Set RsGameStatsSum = Nothing Set RsStatsToDate = Nothing %>