罪罰改造板２/372

sub spell_sp {
	$log2 .="<select name=cmd size=1>\n<option value=1>攻撃</option>\n";
	for($i=0,$j=2;$i<int($lv/25) && $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=11;$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=15>$di_data[$di_a] [1]\[$di_cnt]</option>\n";
	}
	$log2 .="</select>";
}