SION0021
Parts1
<BR>
<B><FONT color="#0000FF">ufs2.cgi # Sub Class Change # Line:220 <BR>
perl/change.cgi # Sub Class Change # Line:10<BR></FONT></B>
<B> ($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi) = split(/<>/,$cjblines[$_]);</b><BR>
<TEXTAREA name="textarea2" cols="100" rows="4" wrap="OFF">
#-EDIT- ($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi) = split(/<>/,$cjblines[$_]);
chomp $cjblines[$_]; ($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi,$uitem) = split(/<>/,$cjblines[$_]);
#-END of EDIT- SION0021v1.00-1-1/6
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">ufs2.cgi # Sub Class Change # Line:233<BR>
perl/change.cgi # Sub Class Change # Line:23<BR></FONT></B>
<B>if ($ukl) { if ($kl < $ukl) { &error("クラスチェンジするには殺害数が$ukl以上必要です。") <br>
} } </b><BR>
<TEXTAREA name="textarea" cols="100" rows="5" wrap="OFF">
if ($ukl) { if ($kl < $ukl) { &error("クラスチェンジするには殺害数が$ukl以上必要です。") } }
#-ADD-
if ($uitem) {
@items = split(/,/,$bg);
$exist = -1;
foreach (0 .. $#items) {
($item , $others) = split(/△/,$items[$_],2);
if ($others =~ /$uitem/ && $others !~ /Rn/) {
$exist = $_; last;
} }
if ($exist == -1) { &error("クラスチェンジするにはあるアイテムが必要です。"); }
print qq|<center>$item を使用します。</center>\n|;
splice (@items,$exist,1);
$bg = join(',',@items);
}
#-END of ADD- SION0021v1.00-1-2/6
</TEXTAREA>
Parts2
<BR>
<B><FONT color="#0000FF">ufs2.cgi # Sub Edit Upper Class # Line:380<BR>
perl/class.cgi # Sub Edit Upper Class # Line:53 <BR></FONT></B>
<b>($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi) = split(/<>/,$cjblines[$_]); </b><BR>
<TEXTAREA name="textarea3" cols="100" rows="4" wrap="OFF">
#-EDIT- ($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi) = split(/<>/,$cjblines[$_]);
chomp $cjblines[$_]; ($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi,$uitem) = split(/<>/,$cjblines[$_]);
#-END of EDIT- SION0021v1.00-2-3/6
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">ufs2.cgi # Sub Edit Upper Class # Line:391<BR>
perl/class.cgi # Sub Edit Upper Class # Line:64<BR></FONT></B>
<B>print qq|追加所持上限：<INPUT type=text value="$uxi" size=3 name=uxi$_>\n|; </b><BR>
<TEXTAREA name="textarea3" cols="100" rows="4" wrap="OFF">
print qq|追加所持上限：<input type=text value="$uxi" size=3 name=uxi$_>\n|;
#-ADD-
print qq|消費アイテム：<input type=text value="$uitem" size=3 name=uitem$_>\n|;
#-END of ADD- SION0021v1.00-2-4/6
</TEXTAREA>
Parts3
<BR>
<B><FONT color="#0000FF">ufs2.cgi # Sub Re Upper Class # Line:402<BR>
perl/class.cgi # Sub Re Upper Class # Line:74 <BR></FONT></B>
<b> ($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi) = split(/<>/,$cjblines[$_]);</b><BR>
<TEXTAREA name="textarea4" cols="100" rows="4" wrap="OFF">
#-EDIT- ($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi) = split(/<>/,$cjblines[$_]);
chomp $cjblines[$_]; ($ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi,$uitem) = split(/<>/,$cjblines[$_]);
#-END of EDIT- SION0021v1.00-3-5/6
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">ufs2.cgi # Sub Re Upper Class # Line:415<BR>
perl/class.cgi # Sub Re Upper Class # Line:88 <BR>
</FONT></B> push (@newlines,join('<>',$ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi,"\n"));<BR>
<TEXTAREA name="textarea4" cols="100" rows="4" wrap="OFF">
#-EDIT- push (@newlines,join('<>',$ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi,"\n"));
if ($Fm{"uitem$_"} ne $uitem) { $uitem= $Fm{"uitem$_"} }
push (@newlines,join('<>',$ujb,$usp,$uig,$uoj,$uct,$urt,$ukl,$uak,$udd,$uhp,$uxi,$uitem,"\n"));
#-END of EDIT- SION0021v1.00-3-6/6
</TEXTAREA>
Parts4
<BR>
<FONT face="ＭＳ ゴシック, Osaka−等幅" class="text" color="#0000FF"><B>cjb.dat
を編集します。</B></FONT><BR>
<FONT face="ＭＳ ゴシック, Osaka−等幅" class="text">直接ファイルを編集する場合、項目の最後に 【<FONT color="#0000FF"> 消費アイテム<> </FONT>】を追加します。<BR>
または、ufs2.cgi を起動し、管理者モードで編集しても構いません。「消費アイテム」という項目が追加されている筈です。 </FONT><BR>
<FONT face="ＭＳ ゴシック, Osaka−等幅" class="text">設定の仕方は、アイテムフラグを１つ追加して下さい。（例：Vz）<BR>
そのアイテムフラグが設定されたアイテムが存在する場合に限って、その職業に転職する事が可能になります。</FONT><BR>
<FONT face="ＭＳ ゴシック, Osaka−等幅" class="text">なお、この時設定するアイテムフラグは、既存の物（例えばFdとか）でもＯＫですが、推奨としてVa-Vzの「紹介状フラグ」のうち、余っている物を流用するか、新たに他のフラグと被らない様に注意してフラグを追加すると良いでしょう。</FONT><BR>