罪罰改造板２/397

		# 道具呼び出し
		&dogu_k if($di_a > 1 && $cmd==100);
		# 宝玉
			if($cmd==30){
					$v = int(($ua)*2)-$tud;
					$thp -= $v;
					$mp -=1;
					$log .="剣必殺技！ $tnm に $v のダメージを与えた！<br>\n";}

	$log2 .="<select name=cmd size=1>\n<option value=1>攻撃</option>\n";
	for($i=0,$j=2;$i<int($lv/5) && $i<=$#spell;$i++,$j++){
		next if($mp<$sp_mp[$i]);
		$v = int($mp/$sp_mp[$i]);
		$log2 .="<option value=$j>$spell[$i]\[$v\]</option>\n";
	}#;
	for($i=0,$j=8,$k=10;$i<=$#kspell;$i++,$j=$j+2,$k++){
		if($rank >= $j && $mp >= $ksp_mp[$i] && $camp >0){
			 $v = int($mp/$ksp_mp[$i]);
			$log2 .="<option value=$k>$kspell[$i]\[$v\]</option>\n";
		}
	}
	if($di_a>0){
		$log2 .="<option value=100>$di_data[$di_a][1]\[1\]</option>\n";
	}

	if($mp >= 1 && $dg_a == 11 && $dglv >= 10){
		$v = int($mp/1);
		$log2 .="<option value=30>秘奥義[$v\]</option>\n";

        }