カスタム有無の表示

ランキング・中古ＭＳ売場・格納庫にて機体カスタムの有無を表示します。
応用すれば成功回数なども表示も可能ですが、オークションでの面白味が半減するかと思います。

以下のファイルを修正します。

info.cgi
└sub info

job.cgi
└sub jobitiran

tyuko.cgi
└sub jobhiroba

赤文字が追加部分です。

ＨＴＭＬ部分は適宜変更して下さい。

info.cgi

ルーチン名 sub info
行数 93行目近辺
変更前 if($klv >= $max_lv) { $next_ex = "−"; $kex = "−";} else { $next_ex = $klv * $lv_up; }

#非削除キャラ判定
$notdel=0;
変更後 if($klv >= $max_lv) { $next_ex = "−"; $kex = "−";} else { $next_ex = $klv * $lv_up; }

#カスタムしてるか？
if( $klp == 0 ){$cstm_msg = "ノーマル";}
else{$cstm_msg = "カスタマイズ";}

#非削除キャラ判定
$notdel=0;
行数 200行目近辺
変更前

<td colspan="2" rowspan="8" align="center">
EOM
if($in{'id'} || !$topgazo_on){ $page_dsp .= "<img src=\"$img_path/$kunit_gif\"><br>"; }

$page_dsp .= <<"EOM";
変更後

<td colspan="2" rowspan="8" align="center">
EOM
if($in{'id'} || !$topgazo_on){ $page_dsp .= "<img src=\"$img_path/$kunit_gif\"><br>$cstm_msg<br>"; }

$page_dsp .= <<"EOM";
行数 390行目近辺
変更前

<th>装備重量</th>
EOM

foreach (@stock)
{
#機体引出し
($ksyoku,$kunitname,$klp,$ktai,$kmaxtai,$ksou,$kun,$ksaku,$ken,$kmaxen,$kweight,$kunit_lv,$kunit_gif ) = split(/<>/,$_);

$page_dsp .= <<"EOM";
変更後

<th>装備重量</th>
<th>カスタム</th>
EOM

foreach (@stock)
{
#機体引出し
($ksyoku,$kunitname,$klp,$ktai,$kmaxtai,$ksou,$kun,$ksaku,$ken,$kmaxen,$kweight,$kunit_lv,$kunit_gif ) = split(/<>/,$_);

#カスタムしてるか？
if( $klp == 0 ){$cstm_msg = "ノーマル";}
else{$cstm_msg = "カスタマイズ";}

$page_dsp .= <<"EOM";
行数 410行目近辺
変更前

<td>$kweight</td>
< /tr>
EOM
変更後

<td>$kweight</td>
< td>$cstm_msg</td>
< /tr>
EOM

job.cgi

ルーチン名 sub jobitiran
行数 165行目近辺
変更前 #コスト計算
$kcost=int($kai_ind+$kunit_lv+$klp/4);

$page_dsp .= <<"EOM";
<tr>
<td align="center" valign=bottom >
<img src="$img_path/$kunit_gif">
<br>$nowunit$kunitname
</td>
変更後 #コスト計算
$kcost=int($kai_ind+$kunit_lv+$klp/4);

#カスタムしてるか？
if( $klp == 0 ){$cstm_msg = "ノーマル";}
else{$cstm_msg = "カスタマイズ";}

$page_dsp .= <<"EOM";
<tr>
<td align="center" valign=bottom >
<img src="$img_path/$kunit_gif">
<br>$nowunit$kunitname<br><small>＜$cstm_msg＞</small>

tyuko.cgi

ルーチン名 sub jobhiroba
行数 366行目近辺
変更前 $passid = &encrypt2("$cid");

# グラフの設定
@clc_len = &glf_calc
変更後 $passid = &encrypt2("$cid");

#カスタムしてるか？
if( $clp == 0 ){$cstm_msg = "ノーマル";}
else{$cstm_msg = "カスタマイズ";}

# グラフの設定
@clc_len = &glf_calc
行数 460行目近辺
変更前 <td colspan="4">
<font color=#00FFFF>$cunitname</font><br>
変更後 <td colspan="4">
<font color=#00FFFF>$cunitname</font>＜$cstm_msg＞<br>
＜＜BACK