劇ぱわ 改造方法

チームランキングの色表示

要旨

『チームランキング』を色分けして表示し、見易くします。
ここでは、「勝率」を色分けします。
.501以上なら青文字」「.499以下なら赤文字」「.500なら黒文字(標準色)」で表示します。
この改造を参考にすれば、他の項目の色分けも出来ると思います。

チームランキングの色表示する改造

geki_else.cgi」ファイルをエディタで開きます。
下記の部分を探して下さい。(無編集なら89行目〜)

$ii++;
if($ii <= 20){
  if($boxsum){ $daritu  = sprintf("%03d", ($hitsum / $boxsum) * 1000); }
  else{ $daritu = "000"; }
  if($daritu eq 1000){ $daritu = "1.000"; }
  else{ $daritu = ".$daritu"; }
  if($kaio){ $tenritu = sprintf("%.1f", ($get / $kaio) * 27); }
  else{ $tenritu = "0.0"; }
  if($kaid){ $bouritu = sprintf("%.2f", ($jiseki/$kaid) * 27); }
  else{ $bouritu = "0.00"; }
  if($game){ $winritu = sprintf("%03d", ($win / $game) * 1000); }
  else{ $winritu = "000"; }
  if($winritu eq 1000){ $winritu = "1.000"; }
  else{ $winritu = ".$winritu"; }

下記赤文字の様に編集します。

$ii++;
if($ii <= 20){
  if($boxsum){ $daritu  = sprintf("%03d", ($hitsum / $boxsum) * 1000); }
  else{ $daritu = "000"; }
  if($daritu eq 1000){ $daritu = "1.000"; }
  else{ $daritu = ".$daritu"; }
  if($kaio){ $tenritu = sprintf("%.1f", ($get / $kaio) * 27); }
  else{ $tenritu = "0.0"; }
  if($kaid){ $bouritu = sprintf("%.2f", ($jiseki/$kaid) * 27); }
  else{ $bouritu = "0.00"; }
  if($game){ $winritu = sprintf("%03d", ($win / $game) * 1000);# }
  if($winritu eq 1000){ $winritu = 
   "<span style=\"color: #0000FF;font-weight:bold;\">1.000</span>";
  }
  elsif( $winritu > 500 ){
   $winritu = "<span style=\"color: #0000FF;\">.$winritu</span>"; }
  elsif( $winritu < 500 ){
   $winritu = "<span style=\"color: #FF0000;\">.$winritu</span>"; }
  else{ $winritu = ".$winritu"; }
  }
  else{ $winritu = "<span style=\"color: #FF0000;\">.000</span>"; }
#  else{ $winritu = ".$winritu"; }

注意事項として
if($game){ $winritu = sprintf("%03d", ($win / $game) * 1000);# } の「#」を忘れないで下さい。

上記記述では、分かり難いかもしれないので下記の様にしても良いです。

$ii++;
if($ii <= 20){
     if($boxsum){ $daritu  = sprintf("%03d", ($hitsum / $boxsum) * 1000); }
     else{ $daritu = "000"; }
     if($daritu eq 1000){ $daritu = "1.000"; }
     else{ $daritu = ".$daritu"; }
     if($kaio){ $tenritu = sprintf("%.1f", ($get / $kaio) * 27); }
     else{ $tenritu = "0.0"; }
     if($kaid){ $bouritu = sprintf("%.2f", ($jiseki/$kaid) * 27); }
     else{ $bouritu = "0.00"; }
#     if($game){ $winritu = sprintf("%03d", ($win / $game) * 1000); }
#     else{ $winritu = "000"; }
#     if($winritu eq 1000){ $winritu = "1.000"; }
#     else{ $winritu = ".$winritu"; }
     if($game){
          $winritu = sprintf("%03d", ($win / $game) * 1000);
          if($winritu eq 1000){
               $winritu = "<span style=\"color: #0000FF;font-weight:bold;\">1.000</span>";
          }elsif( $winritu > 500 ){
               $winritu = "<span style=\"color: #0000FF;\">.$winritu</span>";
          }elsif( $winritu < 500 ){
               $winritu = "<span style=\"color: #FF0000;\">.$winritu</span>";
          }else{ $winritu = ".$winritu"; }
     }else{
          $winritu = "<span style=\"color: #FF0000;\">.000</span>";
     }

改造内容の説明

もしも試合があったら、勝率を計算し、以下の条件を比較します。
計算結果が「1000」ならば、青文字太字で「1.000」を表示します。
計算結果が「500」よりも大きかったら、青文字で「.$winritu」を表示します。
計算結果が「500」よりも小さかったら、赤文字で「.$winritu」を表示します。
試合が無かったら、赤文字で「.000」を表示します

当サイトへのリンクを貼って下さい

「劇ぱわ」の下部著作権部分へのリンクを貼る方法

##### 著作権表示
sub chosaku{
  print <<"_CHOSAKU_";
  </center>
  <hr size="1">
  <div align="right">
    <a href="http://homepage2.nifty.com/osktaka/" target="_blank" title="気ままなまま">
      <font size="2">劇空間ぱわふるリーグ2 ver 3.00b (Free)</font>
    </a>
  </div>
  <div align="right">
    <a href="http://ryoquest.sakura.ne.jp/" target="_blank" title="改造:「野良猫のCGI講座」Take it easy !">
      <font size="2">改造:「野良猫のCGI講座」Take it easy !</font>
    </a>
  </div>
  <!--広告バナー挿入位置、ページ下部-->
  </body>
  </html>
  _CHOSAKU_
}#end chosaku

前後の内容

CGI/perl劇ぱわ俺ペナ
不具合対策改造方法
監督コメント欄の文字色変更チームランキングの色表示2位チームのアイコン表示

【劇ぱわ改造設置支援サイト】Take it easy ! RYOQUEST presents

『野良猫のCGI講座』は、
【劇ぱわ改造設置支援サイト】Take it easy ! RYOQUEST presents のコンテンツとして、虎猫が公開しています。

「劇空間ぱわふるリーグ2 ver 3.00b(劇ぱわ)」は、
きままなまま』で管理人にーやん様が作成・無料配布されているCGI/Perlによる野球ゲームです。

参考にされた方は、当サイトへリンクを貼って下さい♪
サイト名:Take it easy ! RYOQUEST presents
(サイト名:Take it easy !
URL:http://ryoquest.sakura.ne.jp/
バナーURL:http://ryoquest.sakura.ne.jp/image/tie_8831an.gif
Take it easy !

『旧:野良猫のCGI講座』

以前の『野良猫のCGI講座』をご覧になりたい方は、『旧:野良猫のCGI講座』からアクセスして下さい。
但し、更新は一切していません。

ページのトップへ戻る