############# 特殊効果・魔剣 ##############################
〇攻撃するたびに、消費ENに等しいだけのHPが減るというマイナス型の特殊効果です。
##############################################################
@sub4の491行目あたりに以下のものを追加してください。
●の部分にあいている特殊能力番号を割り当てます。
if ($Vs_W[7] =~ m/2/ && rand(255) > 240){print "$PL_VALUES[3]は戦闘不能
\n";$VS_VALUES[25]=1;}
-----------------↓ここ↓---------------------------------------------------------
if ($Pl_W[7] =~ m/●/ && $ResultBattle==0){
print"$Pl_W[0]が$PL_VALUES[3]の魂を喰らってゆく……。
\n";
$PL_VALUES[15]-=$Pl_W[4];
}
if ($Pl_W[7] =~ m/●/ && $ResultBattle==1){
print"$Vs_W[0]が$VS_VALUES[3]の魂を喰らってゆく……。
\n";
$VS_VALUES[15]-=$Vs_W[4];
}
------------------↑ここ↑---------------------------------------------------------
$WLDUMMYpl=$PL_WLV;$PL_WLV+=$PL_In[0] if $PL_WLV < $MAX_WEAPONLV*100;
##########################################################
A武器性能表示を導入している場合はsub3に以下のものを追加します。
if ($WN_sA[7]=~ m/●/){print "魔剣 " ;}