・サルに失礼が無いように、「コピペが出来る」「HTMLが多少出来る」「劇ぱわが設置出来た」人を基準にしています。
・改造前にプログラムのバックアップとサイトのバックアップを取りましょう。
・＜＞をわざと全角にしている部分があります。コピペに注意しましょう。
・改造したものをすぐにUPLOADせずに、PERLCHECKやローカルテストをしましょう。

・当サイトは「劇ぱわ」の原作者である「にーやん」様から公開の許認可は得ています。


★規定打数・規定投球回数を日程数・試合数・経過日程に連動させる(手動式)

※プロ野球の規定打席数の掛数は3ではなく3.1ですが、中途参戦チームへのハンデも込めて「3」にしています。
※原本の「投手２人」だとすぐに「新・規定投球回数」は達成されてしまいます。
　ちょろちょろっと投げた投手に最優秀防御率を取られたくなければ「1」を「9/投手人数」にすれば良いでしょう。
　そうすると今度はすごいノルマですが、劇ぱわの投手は「先発完投型」なので、さほど苦でも...
　登録チームが少なくて試合消化が辛いなら、「8/投手人数」や「7/投手人数」にして見ましょう。

・新数値を算出する。小数点以下は有っても無くても良い。ご自由に^^;
　　新・規定打席数　 = 試合数/日程数*3　(原本だと160/20*3=24)
　　新・規定投球回数 = 試合数/日程数*1　(原本だと160/20*1=8)

・geki_else.cgiの下記の25を出た数値に変える。
(変更前)
　print "− 野　手 −＜BR>【規定打席数：$kitei_hit(日程 * 25)】
＜table border=1 width=\"$ysize\" cellspacing=0>\n";
　　〜　略　〜
　print "− 投　手 −＜BR>【規定投球回数：$kitei_pit(日程 * 25)】
＜table border=1 width=\"$ysize\" cellspacing=0>\n";
(変更後)
　print "− 野　手 −＜BR>【規定打席数：$kitei_hit(日程 * 24)】
＜table border=1 width=\"$ysize\" cellspacing=0>\n";
　　〜　略　〜
　print "− 投　手 −＜BR>【規定投球回数：$kitei_pit(日程 * 8)】
＜table border=1 width=\"$ysize\" cellspacing=0>\n";

・geki_else.cgiの下記の25を出た数値に変える。
(変更前)
　$kitei_hit = $league_day * 25;
　$kitei_pit = $league_day * 25;
(変更後)
　$kitei_hit = $league_day * 24;
　$kitei_pit = $league_day * 8;

・gekipawa.cgiの下記の25を出た数値に変える。
(変更前)
　$kitei_hit = $league_day * 25;
　$kitei_pit = $league_day * 25;
(変更後)
　$kitei_hit = $league_day * 24;
　$kitei_pit = $league_day * 8;


★規定打数・規定投球回数を日程数・試合数・経過日程に連動させる(自動式)

※新規立ち上げのため参加者の動向を見ながら日程数・試合数をしょっちゅう変えているサイトにお勧めです＾＾；
※プロ野球の規定打席数の掛数は「3」ではなく「3.1」です。ここでは中途参戦チームへのハンデの意味も込めて...
※原本の「投手２人」だとすぐに「新・規定投球回数」は達成されてしまいます。
　ちょろちょろっと投げた投手に最優秀防御率を取られたくなければ「1」を「9/投手人数」にすれば良いでしょう。
　そうすると今度はすごいノルマですが、劇ぱわの投手は「先発完投型」なので、さほど苦でも...
　登録チームが少なくて試合消化が辛いなら、「8/投手人数」や「7/投手人数」にして見ましょう。
※ここはサルでもできる改造サイトです。
　「日程 * 25.1」など小数点以下も表示したいなら「手動式」かPERLやHTMLを勉強しましょう。
　「日程 * 25.0」など０も表示させたいなら「手動式」かPERLやHTMLを勉強しましょう。

・gekipawa.cgiの「$geki_news　= '1';　# 劇ぱわニュース（ON:1, OFF:0）」の下に下記を追加する。

　$kitei_hitd = int( $league_game / $league_limit * 3 ) ;
　$kitei_pitd = int( $league_game / $league_limit * 1 ) ;

・geki_else.cgiの下記の25を「$kitei_hitd」「$kitei_pitd」に変える。
(変更前)
　print "− 野　手 −＜BR>【規定打席数：$kitei_hit(日程 * 25)】
＜table border=1 width=\"$ysize\" cellspacing=0>\n";
　　〜　略　〜
　print "− 投　手 −＜BR>【規定投球回数：$kitei_pit(日程 * 25)】
＜table border=1 width=\"$ysize\" cellspacing=0>\n";
(変更後)
　print "− 野　手 −＜BR>【規定打席数：$kitei_hit(日程 * $kitei_hitd)】
＜table border=1 width=\"$ysize\" cellspacing=0>\n";
　　〜　略　〜
　print "− 投　手 −＜BR>【規定投球回数：$kitei_pit(日程 * $kitei_pitd)】
＜table border=1 width=\"$ysize\" cellspacing=0>\n";

・geki_else.cgiの下記の25を「$kitei_hitd」「$kitei_pitd」に変える。
(変更前)
　$kitei_hit = $league_day * 25;
　$kitei_pit = $league_day * 25;
(変更後)
　$kitei_hit = $league_day * $kitei_hitd;
　$kitei_pit = $league_day * $kitei_pitd;

・gekipawa.cgiの下記の25を「$kitei_hitd」「$kitei_pitd」に変える。
(変更前)
　$kitei_hit = $league_day * 25;
　$kitei_pit = $league_day * 25;
(変更後)
　$kitei_hit = $league_day * $kitei_hitd;
　$kitei_pit = $league_day * $kitei_pitd;


★「猛打賞」「スーパー猛打賞」を劇ぱわニュースに表示する

※新規立ち上げのためニュースがあまり流れないサイトにお勧めです＾＾；
※猛打賞とは「１人で１試合に３本以上のヒットを打つこと」です。
※スーパー猛打賞とは「１人で１試合に３本以上のホームランを打つこと」です。
※「5安打0打点の猛打賞!!!」だとブ格好なので「１打点以上」にしています。
※「打高投低サイト」では連発してログ(ニュース)が流れすぎるので猛打賞の「3」を「4」や「5」にすれば良いでしょう。

・geki_game.cgiを下記のように変更する。
(変更前)
	if($g_win[$i] && $g_ten[$i][$k] > 6){
		if($g_hr[$i][$k] > 2){
			$news_kekka = "$team[$i]の$yasyu[$i][$k]が$g_hr[$i][$k]本塁打$g_ten[$i][$k]打点の大爆発！";
		}elsif($g_hit[$i][$k] > 3){
			$news_kekka = "$team[$i]の$yasyu[$i][$k]が$g_hit[$i][$k]安打$g_ten[$i][$k]打点で大活躍！";
(変更後)
	if($g_win[$i]){
		if( ($g_hr[$i][$k]>=3) && ($g_ten[$i][$k]) ){
$news_kekka = "$team[$i]の$yasyu[$i][$k]が$g_hr[$i][$k]ホーマー$g_ten[$i][$k]打点のスーパー猛打賞!!!";
		}elsif( ($g_hit[$i][$k]>=3) && ($g_ten[$i][$k]) ){
$news_kekka = "$team[$i]の$yasyu[$i][$k]が$g_hit[$i][$k]安打$g_ten[$i][$k]打点の猛打賞!!!";


★「完封勝利」「２ケタ奪三振勝利」を劇ぱわニュースに表示する

※新規立ち上げのためニュースがあまり流れないサイトにお勧めです＾＾；
※完封とは「敵チームを０点に抑えること」です。
※下記に変更すると、「１ケタ被安打完封勝利」だと「!!!」で賞賛、「２ケタ被安打完封勝利」だと「!?!?」で微妙な評価が...
※「奪三振」も「10以上(２ケタ)」に変更しました。
※「猛打賞・スーパー猛打賞」と組み合わせると、ログが投打ともに流れて活気が出てきます。(流れすぎに注意^^;)

・geki_game.cgiを下記のように変更する。
(変更前)
#	}elsif(!$tokuten[1-$i] && $total_hit[1-$i] < 4){
#		$news_kekka = "$team[$i]の$yasyu[$i][$k]が$total_hit[1-$i]安打完封！";
	}elsif(!$total_san[1-$i] > 14){
		$news_kekka = "$team[$i]の$yasyu[$i][$k]が$total_san[1-$i]奪三振で勝利！";
(変更後)
	}elsif( !$tokuten[1-$i] && $total_hit[1-$i]>=10 ){
		$news_kekka = "$team[$i]の$yasyu[$i][$k]が$total_hit[1-$i]安打完封!?!?";
	}elsif( !$tokuten[1-$i] && $total_hit[1-$i]<=9 ){
		$news_kekka = "$team[$i]の$yasyu[$i][$k]が$total_hit[1-$i]安打完封!!!";
	}elsif( $total_san[1-$i]>=10 ){
		$news_kekka = "$team[$i]の$yasyu[$i][$k]が$total_san[1-$i]奪三振で勝利!!!";


★経過日数によって試合間隔を変更する

※シーズン前半で終了する人がいて試合間隔を長くしたいが、そうすると途中参戦者が苦労する...と悩める管理人にお勧めです＾＾；
※「初日」「最終日」「一般日」によって試合間隔を変更出来ます。
※１日制だと「１日目は最終日扱い」です。２日制だと「１日目は初日扱い」「２日目は最終日扱い」です。
※ここでは「初日10分・一般日5分・最終日1分」の変更方法を掲載します。

・gekipawa.iniを下記のように変更する。
(変更前)
	$between		= '30';			# 試合の間隔（分）
(変更後)
	$between		= '5';			# 試合の間隔（分） ###一般日

・gekipawa.cgiを下記のように変更する。
(変更前)
sub rule{

	&header;
(変更後)
sub rule{
if($league_day==1){$between=10;} ###初日
if($league_day==$league_limit){$between=1;} ###最終日
	&header;

・geki_game.cgiを下記のように変更する。
(変更前)
	if(($times < $date[0] + $between * 60) && ($win[0] + $lose[0] > 0)){ &error('連続で試合はできないよ。'); }
(変更後)
if($league_day==1){$between=10;} ###初日
if($league_day==$league_limit){$between=1;} ###最終日
	if(($times < $date[0] + $between * 60) && ($win[0] + $lose[0] > 0)){ &error('連続で試合はできないよ。'); }

・geki_login.cgiを下記のように変更する。
(変更前)
	if($form{'kanri_mode'}){
		print "管理モード画面です。\n";
(変更後)
if($league_day==1){$between=10;} ###初日
if($league_day==$league_limit){$between=1;} ###最終日
	if($form{'kanri_mode'}){
		print "管理モード画面です。\n";

(変更前)
	if(($times < $date + $between * 60) && ($win + $lose > 0)){ &error('連続で試合はできないよ。'); }
(変更後)
if($league_day==1){$between=10;} ###初日
if($league_day==$league_limit){$between=1;} ###最終日
	if(($times < $date + $between * 60) && ($win + $lose > 0)){ &error('連続で試合はできないよ。'); }


★ポイントランキングのミスを修正する

※加算ポイントの表示が違うだけなので、修正しなくても全然影響はありませんが＾＾；

・geki_else.cgiを下記のように変更する。
(変更前)
優勝：20p、２位：15p、３位：10p、４位：5p、５位〜１０位：1p、各タイトル：5p＜br＞
(変更後)
優勝：20p、２位：15p、３位：10p、４位：5p、５位：3p、６位〜１０位：1p、各タイトル：5p＜br＞


★過去の試合ログにフッタを付ける

※「最近5試合の結果」を見た後は「戻る」でTOPに戻りますが、それを他の画面と同じくフッタを利用して戻れるようにします。

・gekipawa.cgiを下記のように変更する。(試合の経過表示の部分)
(変更前)
	print "$log_pri＜br>＜br>\n";

	&chosaku;
(変更後)
	print "$log_pri＜br>＜br>\n";

	&footer;
	&chosaku;


★特別付録・投手４人制のヒント

※gekipawa.cgi、geki_login.cgi、geki_game.cgiを修正する。
・$*<10を$*<12に変更する。(選手が10人→12人)
・td rowspan=3をtd rowspan=5に変更する。(投手枠の罫線)
・その他微修正。変更しすぎに注意しましょう。
・PERLがそれなりに解る人は「俺ペナ」を参考にしたほうが早いです。
注：人数を増やしても元のデータで続行できます。
　　ただし3人目以降の投手は永遠に投手十傑に反映されません。
　　シリアル番号を1度入れるだけでカ・イ・ケ・ツしますが・・・