罪罰道具装備の変更点

追加された行はこの色です。
削除された行はこの色です。
罪罰道具装備へ行く。

[[罪罰改造]] / [[罪罰武器装備]]

*武具装備を更に進化して、道具を拡張 [#u06a9a46]
-細かいことは、[[罪罰武器装備]]を参照のこと
-２回目だからちょっとだけ、わかりやすく出来たかも

**パラメータ追加 ./inc/ore_sub-system.cgi [#w58118d3]
sub hash_dataに追加
 $di_a[1]        = $DAT{'di_a1'};
 $di_a[2]        = $DAT{'di_a2'};
 $di_a[3]        = $DAT{'di_a3'};
sub dat_writeに追加
 $dat[0].="di_a1;$di_a[1],di_a2;$di_a[2],di_a3;$di_a[3],";
sub decodeの最後に追加
 $eq_di          = $in{'eq_di'}; # 装備する道具

**情報画面 ./inc/ore_sub-infomation_pc.cgi [#ydef7e35]
道具の持ち替え 
 if($eq_di){
   my $tmp_di_a = $di_a;
   my $tmp_di_cnt = $di_cnt;
   if($eq_di>0){
     $di_a = $di_a[$eq_di];
     $di_cnt = $di_cnt[$eq_di];
     $di_a[$eq_di] = $tmp_di_a;
     $di_cnt[$eq_di] = $tmp_di_cnt;
   }
 }

持っている道具
 my $table_di=qq|<select name="eq_di" >|;
 $table_di.=qq|<option value="0" >$di_data[$di_a][1]</option>\n|;
 for($i=1;$i<4;$i++){
 $table_di.=qq|<option value="$i" >|;
 $table_di.=qq|$di_data[$di_a[$i]][1]</option>\n|;
 }
 $table_di.=qq|</select>|;


 道具の変更：
 $table_di　に持ち替える<br><br>\n
 <input type=text name="com" class="button2" style="width:360px">
 <input type=submit value="ポチッ/更新" class="button2" style="width:100px">
 <input type=reset value="クリア"  class="button2" style="width:40px">
 <br>

**道具購入時の持ち替え [#j41c8975]
 # 道具を持ち替える
 for($i=3;$i>0;$i--){
   if($di_a[$i]>0){
     $di_a[$i+1]=$di_a[$i];
     $di_cnt[$i+1]=$di_cnt[$i];
     $di_a[$i]=0;
     $di_cnt[$i]=0;
   }
 }
 if($di_a[1]==0){
   $di_a[1]=$di_a[4];
   $di_cnt[1]=$di_cnt[4];
 }
 if($di_a>0){
   $di_a[1]=$di_a;
   $di_cnt[1]=$di_cnt;
 }

*参照 [#w428b073]
[[罪罰ステータス表示]]

罪罰道具装備 の変更点