############## レベルアップ時に2以上STが上がるようにする改造 ##########################
〇レベルアップで1度に上がるステータスを1〜3にする改造です。
職業を導入している場合にも対応しています。
##############################################################################
@sub4の422行目の
sub BONUS{" $_[0]がわずかにアップ。
";}
------------を↓これ↓に置き換えてください----------------------------------------------------
sub BONUS{" $_[0]アップ。
";}
#####################################################################
Asub4の427行目の
$BoAt=$BoSp=$BoDe=$BoAg=5;
if ($PL_VALUES[4] == 1){$BoAt=20;}
elsif ($PL_VALUES[4] == 2){$BoDe=20;}
elsif ($PL_VALUES[4] == 3){$BoSp=20;}
elsif ($PL_VALUES[4] == 4){$BoAg=20;}
elsif ($PL_VALUES[4] == 0){$BoAt=$BoSp=$BoDe=$BoAg=9;}
if (rand(22) < $BoAt && $PL_VALUES[19] < $StatusMax){print &BONUS('攻撃力');$PL_VALUES[19]++;}
if (rand(22) < $BoDe && $PL_VALUES[20] < $StatusMax){print &BONUS('防御力');$PL_VALUES[20]++;}
if (rand(22) < $BoSp && $PL_VALUES[21] < $StatusMax){print &BONUS('スピード');$PL_VALUES[21]++;}
if (rand(22) < $BoAg && $PL_VALUES[22] < $StatusMax){print &BONUS('命中力');$PL_VALUES[22]++;}
--------------を↓これ↓に置き換えてください。------------------------------------------------------------------
$BoAt=$BoSp=$BoDe=$BoMt=$BoIn=$BoMd=5;
if ($PL_VALUES[4] == 1){$BoAt=10;}
elsif ($PL_VALUES[4] == 2){$BoDe=10;}
elsif ($PL_VALUES[4] == 3){$BoSp=10;}
elsif ($PL_VALUES[4] == 4){$BoMt=10;}
elsif ($PL_VALUES[4] == 0){$BoAt=$BoSp=$BoDe=$BoMt=3;}
if($BoAt + rand(20) >= 30 && $PL_VALUES[19]+2 < $StatusMax){print &BONUS('攻撃力が3');$PL_VALUES[19]+=3;}
elsif($BoAt + rand(20) >= 18 && $PL_VALUES[19]+1 < $StatusMax){print &BONUS('攻撃力が2');$PL_VALUES[19]+=2;}
elsif($BoAt + rand(20) >= 12 && $PL_VALUES[19] < $StatusMax){print &BONUS('攻撃力が1');$PL_VALUES[19]++;}
if($BoDe + rand(20) >= 30 && $PL_VALUES[20]+2 < $StatusMax){print &BONUS('防御力が3');$PL_VALUES[20]+=3;}
elsif($BoDe + rand(20) >= 18 && $PL_VALUES[20]+1< $StatusMax){print &BONUS('防御力が2');$PL_VALUES[20]+=2;}
elsif($BoDe + rand(20) >= 12 && $PL_VALUES[20] < $StatusMax){print &BONUS('防御力が1');$PL_VALUES[20]++;}
if($BoSp + rand(20) >= 30 && $PL_VALUES[21]+2 < $StatusMax){print &BONUS('スピードが3');$PL_VALUES[21]+=3;}
elsif($BoSp + rand(20) >= 18 && $PL_VALUES[21]+1< $StatusMax){print &BONUS('スピードが2');$PL_VALUES[21]+=2;}
elsif($BoSp + rand(20) >= 12 && $PL_VALUES[21] < $StatusMax){print &BONUS('スピードが1');$PL_VALUES[21]++;}
if($BoMt + rand(20) >= 30 && $PL_VALUES[22]+2 < $StatusMax){print &BONUS('命中力が3');$PL_VALUES[22]+=3;}
elsif($BoMt + rand(20) >= 18 && $PL_VALUES[22]+1< $StatusMax){print &BONUS('命中力が2');$PL_VALUES[22]+=2;}
elsif($BoMt + rand(20) >= 12 && $PL_VALUES[22] < $StatusMax){print &BONUS('命中力が1');$PL_VALUES[22]++;}
############################################################################################################
B職業によって上がり方を変える場合は、Aの改造に職業による補正を加えます。
elsif ($PL_VALUES[4] == 0){$BoAt=$BoSp=$BoDe=$BoMt=3;}
-------------------------↓ここ↓------------------------------------------------------------------
例)
if ($PL_VALUES[40]==1){$BoAt += 6;}
elsif($PL_VALUES[40]==2){$BoDe += 6;}
elsif($PL_VALUES[40]==3){$BoMt += 6;}
elsif($PL_VALUES[40]==4){$BoSp += 6;}
elsif($PL_VALUES[40]==5){$BoMt += 3;$BoSp += 3;}
elsif($PL_VALUES[40]==6){$BoAt += 3;$BoDe += 3;}
・
・
・
・
-------------------------↑ここ↑-------------------------------------------------------------------
if($BoAt + rand(20) >= 30 && $PL_VALUES[19]+2 < $StatusMax){print &BONUS('攻撃力が3');$PL_VALUES[19]+=3;}
#############################################################################################################
上記のものはあくまで例です。バランスのほうは色々試してみて上がり方など調整するようにしてください。