罪罰/階級技の追加

       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]);
                       $k2 = ($k > 13) ? $k+100: $k; # この行を追加
                       $log2 .="<option value=$k2>$kspell[$i]($v)</option>\n";
                       # ↑ value=$kを value=$k2に変更
               }
       }

       }elsif($v == 11 && $camp > 0){
               $v = int(($ua+$ud)*4)-$tud;
               $v = 1 if($v<1);
               $thp -= $v;
               $log .="$kspell[3]!$tnm に $v の傷を与えた!<br>\n";
               $mp -= $ksp_mp[3];
       }elsif($v == 112 && $camp > 0){  # コマンド番号112からはじめる
              $v = 1;
              $v = 1 if($v<1);
              $thp -= $v;
              $log .="$kspell[4]!$tnm に $v の傷を与えた!<br>\n";
              $mp -= $ksp_mp[4];
       }