・サルに失礼が無いように、「コピペが出来る」「HTMLが多少出来る」「劇ぱわが設置出来た」人を基準にしています。
・改造前にプログラムのバックアップとサイトのバックアップを取りましょう。
・<>をわざと＜>(全角+半角)にしている部分があります。コピペに注意しましょう。
・改造したものをすぐにUPLOADせずに、PERLCHECKやローカルテストをしましょう。
※当サイトは「劇ぱわ」の原作者である「にーやん」様から改造ソース公開の許認可を得ています。
★規定打席数・規定投球回数を日程数・試合数・経過日程に連動させる(手動式)
※プロ野球の規定打席数の掛数は「3」ではなく「3.1」ですが、中途参戦チームへのハンデも込めて「3」にしています。
※プロ野球の規定投球回数の掛数は「1」です。なので「投手２人」だとすぐに「新・規定投球回数」は達成されてしまいます。
ちょろちょろっと投げた投手に最優秀防御率を取られたくなければ「1」を「9/投手人数」にすれば良いでしょう。
そうすると今度はすごいノルマですが、劇ぱわは「先発完投型」「無限延長」なので、さほど苦でも・・・
しかし登録チームが少なくて試合消化が辛いなら「2」にして様子を見ましょう。
当サイトの劇ぱわは「投手４人」に改造しているので、本来ならば「2.25」ですが「2」にしています。
・新数値を算出する。小数点以下は有っても無くても良い。ご自由に^^;
新・規定打席数 = 試合数/日程数*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」ですが、中途参戦チームへのハンデも込めて「3」にしています。
※プロ野球の規定投球回数の掛数は「1」です。なので「投手２人」だとすぐに「新・規定投球回数」は達成されてしまいます。
ちょろちょろっと投げた投手に最優秀防御率を取られたくなければ「1」を「9/投手人数」にすれば良いでしょう。
そうすると今度はすごいノルマですが、劇ぱわは「先発完投型」「無限延長」なので、さほど苦でも・・・
しかし登録チームが少なくて試合消化が辛いなら「2」にして様子を見ましょう。
当サイトの劇ぱわは「投手４人」に改造しているので、本来ならば「2.25」ですが「2」にしています。
※ここはサルでもできる改造サイトです。
「日程 * 25.1」など小数点以下も表示したいなら「手動式」かPERLやHTMLを勉強しましょう。
「日程 * 25.0」など０も表示させたいなら「手動式」かPERLやHTMLを勉強しましょう。
・gekipawa.iniの「$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打点の猛打賞!!!」だとブ格好なので「１打点以上」にしています。
※「打高投低サイト」「老舗サイト」では連発してニュースが流れすぎるので$g_ten[$i][$k]の「1」を「2」や「3」にすれば良いでしょう。
※勝利チームの選手にしか適用されません。悪しからず・・・
・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]>=1) ){
$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]>=1) ){
$news_kekka = "$team[$i]の$yasyu[$i][$k]が$g_hit[$i][$k]安打$g_ten[$i][$k]打点の猛打賞!!!";
}elsif( ($g_hit[$i][$k]>=2) && ($g_ten[$i][$k]>=1) ){
$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度入れるだけでカ・イ・ケ・ツしますが・・・
 
 |
●ゲキパワどっとこむ
・選手12人にパラを振り、ネット対戦する野球ゲームです。「俺ペナ」も置いています。
|
 |
●二律背反・罪と罰++
・５つの国のどこかに属し、仲間と共に大陸統一をめざすネットゲームです。他のオンラインゲームも置いています。
|
【免責事項】
|
当サイトの紹介案件で発生した、いかなる損害も関知しません。
すべての案件には自己責任で応募・登録・クリックしてください。
| |
