|
| 予告先発の表示 |
gekipawa.cgiで「チャンピオン」で検索します。すると１ヶ所しかないはずです。
($lastjun, $win, $wincon, $winmax, $lose) = split(/<>/, $teamdata);
↑のすぐ下に↓を付け加えます。
($dmy, $dmy, $dmy, $dmy, $dmy, $dmy, $dmy, $dmy, $senpatu) = split(/<c>/, $winners[0]);
($dmy, $dmy, $dmy, $name, $tyoushi, $dmy, $dmy, $dmy, $dmy, $pwin, $plose, $shita, $ue, $dmy, $dmy, $dmy) = split(/<>/, $senpatu);
if($shita){
$seiseki = sprintf("%.2f", ($ue/$shita) * 27);
}else{
$seiseki = "初先発";
}
if($tyoushi < 2){ $condition = "<font color=#4B0082>最悪</font>"; }
elsif($tyoushi < 4){ $condition = "<font color=blue>悪い</font>"; }
elsif($tyoushi < 6){ $condition = "<font color=#FFD700>普通</font>"; }
elsif($tyoushi < 8){ $condition = "<font color=red>好調</font>"; }
else{ $condition = "<font color=#FF00FF>絶好</font>"; }
少し下にいくと↓があります。
$champ_pri[4] = "<br><br></td></tr></table>\n";
↑を↓に書きかえます。
$champ_pri[4] = "<br><br>【 \予\告\先\発 ： $name 】$pwin勝$plose敗 防御率：$seiseki$condition<br></td></tr></table>\n";
|
|
|
|