【獲得経験値を編集する】
battle1.plをテキストとして編集する。
メモ帳なら[up]と検索すれば出てくる行蘭。
$up_exp = 0;
if($deth){
$up_exp = $b_lv2 * (int(rand($b_luc) + 1));
}elsif($dmg1 && !$deth2){
$up_exp = $b_lv2 * (int(rand(10) + 1)) + (int(rand($b_luc) + 1));
}elsif($dmg1 && $deth2){
$up_exp = $b_lv2 * $kiso_exp + (int(rand($b_luc) + 1));
if(int(rand($item_ritu)) == 0){
if(int(rand(2)) == 0){ $temp = 1;}else{ $temp = 2;};
$r_no = @item_lines;$r_no = int(rand($r_no));
($m_id) = split(/<>/,$item_lines[$r_no]);
foreach(@item_lines){
($i_id,$i_name,$i_ch) = split(/<>/);
if($m_id eq "$i_id" && $temp eq "$i_ch"){$hit=1;last;}
}
if($hit && $temp == 1){ $new_item = $i_id;
$bat_com .="なんと!<font color=yellow>$i_name</font>を手に入れた!";
}elsif($hit && $temp == 2){ $new_def = $i_id;
$bat_com .="なんと!<font color=yellow>$i_name</font>を手に入れた!";};
};
};
#レベルアップ
という箇所があるので、
$up_exp = $b_lv2 *の後に続く数字を編集するが、
どうやら+ (int(rand($b_luc) + 1));の1にあたる箇所を
弄れば獲得経験値が増えるみたい。
なお当管理人はずぼらなので
$up_exp = 0;
if($deth){
$up_exp = $b_lv2 * (int(rand($b_luc) + 10000));
}elsif($dmg1 && !$deth2){
$up_exp = $b_lv2 * (int(rand(10) + 10000)) + (int(rand($b_luc) + 1000000000));
}elsif($dmg1 && $deth2){
$up_exp = $b_lv2 * $kiso_exp + (int(rand($b_luc) + 10000));
if(int(rand($item_ritu)) == 10000){
if(int(rand(2)) == 10000){ $temp = 1;}else{ $temp = 2;};
$r_no = @item_lines;$r_no = int(rand($r_no));
($m_id) = split(/<>/,$item_lines[$r_no]);
foreach(@item_lines){
($i_id,$i_name,$i_ch) = split(/<>/);
if($m_id eq "$i_id" && $temp eq "$i_ch"){$hit=1;last;}
}
if($hit && $temp == 1){ $new_item = $i_id;
$bat_com .="なんと!<font color=yellow>$i_name</font>を手に入れた!";
}elsif($hit && $temp == 2){ $new_def = $i_id;
$bat_com .="なんと!<font color=yellow>$i_name</font>を手に入れた!";};
};
};
と記述しています。
- 神谷:別西卜
- 2018/10/07 (Sun) 09:37:13
|