罪罰改造掲示板/172

if($di_a == 1){#賢者の石
 my $ss=int($lv/2);
 my ($v,$vv);
 if(int($hp+$ss) < $max_hp){
  $hp += $ss;
 }else{
  $v=$max_hp-$hp;
  $hp += $v;
 }
 if(int($mp+$ss) < $max_mp){
  $mp += $ss;
 }else{
  $vv=$max_mp-$mp;
  $mp += $vv;
 }
 $log .="$di_data[$di_a][1] の作用により$nm は体力と精神が $ss 回復した!<br>\n";
 $di_cnt--;
 if($di_cnt<=0){
  $log .="$di_data[$di_a][1] が砕け散った！<br>\n";
  $di_a=0;
 }
}