Subversion Repositories VORC

Rev

Rev 121 | Rev 143 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 121 Rev 142
Line 93... Line 93...
93 
		print "<div class='pagebreak'><hr></div>\n";
 93 
		print "<div class='pagebreak'><hr></div>\n";
94 
		$gcount = 1;
 94 
		$gcount = 1;
95 
		$tcount = $g->{track};
 95 
		$tcount = $g->{track};
96 
	}
 96 
	}
Line 97... Line 97...
97
97
Line 98... Line 98...
98 
	$g->{gtype} = join '', map { ucfirst lc } split /(\s+)/, $g->{gtype}; # Capitalize the game time to look nicer
 98 
	$g->{gtype} = join '', map { ucfirst lc } split /(\s+)/, $g->{gtype}; # Capitalize the game type to look nicer
99 
 
 99 
 
100 
	my %crew;
 100 
	my %crew;
101 
	$crewhan->execute($date, $g->{track}, $g->{time});
 101 
	$crewhan->execute($date, $g->{track}, $g->{time});
Line 146... Line 146...
146 
		$A = "ALT:";
 146 
		$A = "ALT:";
147 
	} else {
 147 
	} else {
148 
		$crew{'ALT'} = '';
 148 
		$crew{'ALT'} = '';
149 
	}
 149 
	}
Line -... Line 150...
- 
 
 150
- 
 
 151 
	if ($g->{track} eq "BT") {
- 
 
 152 
	  print<<BTgame;
- 
 
 153 
<table>
- 
 
 154 
	<tr><td>Date:</td><td>$day ($date)</td><td>&nbsp;</td><td>Track:</td><td>$g->{track}</td></tr>
- 
 
 155 
	<tr><td>Time:</td><td>$g->{time}</td><td>&nbsp;</td><td>Class:</td><td>$class{$g->{restrictions}} $g->{level} $g->{gtype}</td></tr>
- 
 
 156 
	<tr><td>Game:</td><td colspan=4>$g->{teams}</td></tr>
- 
 
 157 
	<tr><td colspan=5>&nbsp;</td></tr>
- 
 
 158 
	<tr><td>HR:</td><td>$crew{'HR'}</td><td>&nbsp;</td><td>GE:</td><td>$crew{'GE'}</td></tr>
- 
 
 159 
	<tr><td>PR:</td><td>$crew{'PR-1'}</td><td>&nbsp;</td><td>PT:</td><td>$crew{'PT'}</td></tr>
- 
 
 160 
	<tr><td>PR:</td><td>$crew{'PR-2'}</td><td>&nbsp;</td><td>PTA:</td><td>$crew{'PTA'}</td></tr>
- 
 
 161 
	<tr><td>JR:</td><td>$crew{'JR-1'}</td><td>&nbsp;</td><td>PB:</td><td>$crew{'PB-1'}</td></tr>
- 
 
 162 
	<tr><td>JR:</td><td>$crew{'JR-2'}</td><td>&nbsp;</td><td>PB:</td><td>$crew{'PB-2'}</td></tr>
- 
 
 163 
	<tr><td>OPR:</td><td>$crew{$OPR1}</td><td>&nbsp;</td><td>EYE:</td><td>$crew{'EYE-1'}</td></tr>
- 
 
 164 
	<tr><td>OPR:</td><td>$crew{'OPR-2'}</td><td>&nbsp;</td><td>EYE:</td><td>$crew{'EYE-2'}</td></tr>
- 
 
 165 
	<tr><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>WB:</td><td>$crew{'WB'}</td></tr>
- 
 
 166 
	<tr><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>SBO:</td><td>$crew{'SBO'}</td></tr>
- 
 
 167 
</table><br><br><br><br><br><br><br><br><br><br><br><br>
- 
 
 168 
BTgame
- 
 
 169
150
170 
	} else {
151 
	print<<game;
 171 
	  print<<game;
152 
<table>
 172 
<table>
153 
	<tr><td>Date:</td><td>$day ($date)</td><td>&nbsp;</td><td>Track:</td><td>$g->{track}</td></tr>
 173 
	<tr><td>Date:</td><td>$day ($date)</td><td>&nbsp;</td><td>Track:</td><td>$g->{track}</td></tr>
154 
	<tr><td>Time:</td><td>$g->{time}</td><td>&nbsp;</td><td>Class:</td><td>$class{$g->{restrictions}} $g->{level} $g->{gtype}</td></tr>
 174 
	<tr><td>Time:</td><td>$g->{time}</td><td>&nbsp;</td><td>Class:</td><td>$class{$g->{restrictions}} $g->{level} $g->{gtype}</td></tr>
155 
	<tr><td>Game:</td><td colspan=4>$g->{teams}</td></tr>
 175 
	<tr><td>Game:</td><td colspan=4>$g->{teams}</td></tr>
Line 160... Line 180...
160 
	<tr><td>JR:</td><td>$crew{'JR-2'}</td><td>&nbsp;</td><td>SK:</td><td>$crew{'SK-2'}</td></tr>
 180 
	<tr><td>JR:</td><td>$crew{'JR-2'}</td><td>&nbsp;</td><td>SK:</td><td>$crew{'SK-2'}</td></tr>
161 
	<tr><td>OPR:</td><td>$crew{$OPR1}</td><td>&nbsp;</td><td>PBM:</td><td>$crew{'PBM'}</td></tr>
 181 
	<tr><td>OPR:</td><td>$crew{$OPR1}</td><td>&nbsp;</td><td>PBM:</td><td>$crew{'PBM'}</td></tr>
162 
	<tr><td>OPR:</td><td>$crew{'OPR-2'}</td><td>&nbsp;</td><td>PBT:</td><td>$crew{'PBT-1'}</td></tr>
 182 
	<tr><td>OPR:</td><td>$crew{'OPR-2'}</td><td>&nbsp;</td><td>PBT:</td><td>$crew{'PBT-1'}</td></tr>
163 
	<tr><td>OPR:</td><td>$crew{'OPR-3'}</td><td>&nbsp;</td><td>PBT:</td><td>$crew{'PBT-2'}</td></tr>
 183 
	<tr><td>OPR:</td><td>$crew{'OPR-3'}</td><td>&nbsp;</td><td>PBT:</td><td>$crew{'PBT-2'}</td></tr>
164 
	<tr><td>$A</td><td>$crew{'ALT'}</td><td>&nbsp;</td><td>JT:</td><td>$crew{'JT'}</td></tr>
 184 
	<tr><td>$A</td><td>$crew{'ALT'}</td><td>&nbsp;</td><td>JT:</td><td>$crew{'JT'}</td></tr>
165 
	<tr><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>SO:</td><td>$crew{'SO'}</td></tr>
 185 
	<tr><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>SBO:</td><td>$crew{'SBO'}</td></tr>
166 
</table><br><br><br><br><br><br><br><br><br><br><br><br>
 186 
</table><br><br><br><br><br><br><br><br><br><br><br><br>
167 
game
 187 
game
- 
 
 188 
  }
168 
 
 189
169 
	$gcount++ % 2 == 0 ? print "<div class='pagebreak'><hr></div>\n" : { };
 190 
	$gcount++ % 2 == 0 ? print "<div class='pagebreak'><hr></div>\n" : { };
170 
}
 191 
}