- 追加された行はこのように表示されます。
- 削除された行は
このように表示されます。
!Parts1
<BR>
<B><FONT color="#0000FF"><A href="download/judge_cgi.txt">judge.cgi</A> << Download してご利用下さい。</FONT></B><BR>
<B><FONT color="#0000FF"><A href="../download/judge_cgi.txt">judge.cgi</A> << Download してご利用下さい。</FONT></B><BR>
<B><FONT color="#FF00FF">パーミッションは（644｜604）です。</FONT></B><br>
<B><FONT color="#666666">１行目のファイル名 / ２行目の消費体力設定は任意に変更して下さい。</FONT></B>
!Parts2
<BR>
<B><FONT color="#0000FF">sos2.cgi Line31</FONT></B> <BR>
<b>$bitdat = './bit.dat'; # bit.datのパス 666(606) </b><br>
<TEXTAREA name="textarea2" cols="100" rows="4" wrap="OFF">
$bitdat = './bit.dat'; # bit.datのパス 666(606)
#-ADD-
$judgecgi = './judge.cgi'; # judge.cgiのパス 666(606)
#-END of ADD- SAIL0015v3.00-2-1/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">sos2.cgi # Main Program # Line239-240</FONT></B> <BR>
<b>if ($Fm{'mode'} eq 'judge_before') { &action_form } <BR>
if ($Fm{'mode'} eq 'judge_after') { &play_form } </b><br>
<TEXTAREA name="textfield" cols="100" rows="5" wrap="OFF">
#-EDIT-if ($Fm{'mode'} eq 'judge_before') { &action_form }
#if ($Fm{'mode'} eq 'judge_after') { &play_form }
elsif ($Fm{'mode'} =~ /judge_before/) { &action_form }
elsif ($Fm{'mode'} =~ /judge/) { &play_form }
#-END of EDIT- SAIL0015v3.00-2-2/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">sos2.cgi # Sub Play Form # Line309</FONT></B><BR>
<B>&judge_after if $Fm{'mode'} eq 'judge_after'; </b><br>
<TEXTAREA name="textarea4" cols="100" rows="3" wrap="OFF">
#-EDIT- &judge_after if $Fm{'mode'} eq 'judge_after';
if ($Fm{'mode'} =~ /judge/) { require $judgecgi; &judge_before; }
#-END of EDIT- SAIL0015v3.00-2-3/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">sos2.cgi # Sub Action Form # Line358</FONT></B> <BR>
<B>&judge_before if $Fm{'mode'} eq 'judge_before'; </b><Br>
<TEXTAREA name="textarea6" cols="100" rows="3" wrap="OFF">
#-EDIT- &judge_before if $Fm{'mode'} eq 'judge_before';
if ($Fm{'mode'} =~ /judge/) { require $judgecgi; &judge_before; }
#-END of EDIT- SAIL0015v3.00-2-4/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">sos2.cgi # Sub Normal Action # Line662</FONT></B> <BR>
<B>&input('radio','mode','judge_before','',"アイテム鑑定<br>\n") if $mysp =~ /Eo/; </b><br>
<TEXTAREA name="textarea7" cols="100" rows="3" wrap="OFF">
#-EDIT- &input('radio','mode','judge_before','',"アイテム鑑定<br>\n") if $mysp =~ /Eo/;
&input('radio','mode','judge_before','',"アイテム鑑定<BR>\n") if $mysp =~ /(Eo|J[0a-z][0-9])/;
#-END of EDIT- SAIL0015v3.00-2-5/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">sos2.cgi # Sub Judge Before # / # Sub Judge After
# Line1256-1294</FONT></B><BR>
<b>削除して下さい。 </B>
!Parts3
<BR>
<B><FONT color="#0000FF"><A href="download/judge_cgi.txt">judge.cgi</A> << Download してご利用下さい。</FONT></B><BR>
<B><FONT color="#0000FF"><A href="../download/judge_cgi.txt">judge.cgi</A> << Download してご利用下さい。</FONT></B><BR>
<B><FONT color="#FF00FF">パーミッションは（644｜604）です。</FONT></B>
<B><FONT color="#666666">１行目のファイル名 / ２行目の消費体力設定は任意に変更して下さい。</FONT></B>
!Parts4
<BR>
<B><FONT color="#0000FF">judge.cgi 《 Sub Judge Before 》 Line46</FONT></B> <BR>
<b>@rcdlines = &get_user("$Fm{'id'}"); </b><br>
<TEXTAREA name="textarea3" cols="100" rows="2" wrap="OFF">
@rcdlines = &get_user("$Fm{'id'}");
require $otherpl;
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">judge.cgi 《 Sub Judge Before 》 Line72</FONT></B> <BR>
<b>if ($Fm{'mode'} =~ /partner/) { </b><br>
<TEXTAREA name="textarea8" cols="100" rows="2" wrap="OFF">
require $optionpl;
if ($Fm{'mode'} =~ /partner/) {
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">ini/perl.cgi 任意の場所</FONT></B>
<TEXTAREA name="textarea9" cols="100" rows="3" wrap="OFF">
#-ADD-
$judgecgi = 'perl/judge.cgi'; # judge.cgiのパス 666(606)
#-END of ADD- SAIL0015v3.00-2-1/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">sos2.cgi # Main Program # Line46-47</FONT></B><BR>
<B>elsif ($Fm{'mode'} eq 'judge_before') { require $formpl; &action_form }<BR>
elsif ($Fm{'mode'} eq 'judge_after') { require $formpl; &play_form }</B><br>
<TEXTAREA name="textarea10" cols="100" rows="5" wrap="OFF">
#-EDIT-elsif ($Fm{'mode'} eq 'judge_before') { require $formpl; &action_form }
#elsif ($Fm{'mode'} eq 'judge_after') { require $formpl; &play_form }
elsif ($Fm{'mode'} =~ /judge_before/) { require $formpl; &action_form }
elsif ($Fm{'mode'} =~ /judge/) { require $formpl; &play_form }
#-END of EDIT- SAIL0015v3.00-2-2/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">perl/form.cgi # Sub Play Form # Line35</FONT></B> <BR>
<b>elsif ( $Fm{'mode'} eq 'judge_after' ) { require $motionpl; &judge_after }<BR>
<TEXTAREA name="textarea12" cols="100" rows="3" wrap="OFF">
#-EDIT- elsif ( $Fm{'mode'} eq 'judge_after' ) { require $motionpl; &judge_after }
elsif ($Fm{'mode'} =~ /judge/) { require $judgecgi; &judge_before; }
#-END of EDIT- SAIL0015v3.00-2-3/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">perl/form.cgi # Sub Action Form # Line96</FONT></B> <BR>
<B>elsif ( $Fm{'mode'} eq 'judge_before' ) { require $motionpl; &judge_before } </b><br>
<TEXTAREA name="textarea11" cols="100" rows="3" wrap="OFF">
#-EDIT- elsif ( $Fm{'mode'} eq 'judge_before' ) { require $motionpl; &judge_before }
elsif ($Fm{'mode'} =~ /judge/) { require $judgecgi; &judge_before; }
#-END of EDIT- SAIL0015v3.00-2-4/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">perl/action.cgi # Sub Normal Action # Line50</FONT></B> <BR>
<B>&input('radio','mode','judge_before','',"アイテム鑑定<br>\n") if $mysp =~ /Eo/; </b><br>
<TEXTAREA name="textarea" cols="100" rows="3" wrap="OFF">
#-EDIT- &input('radio','mode','judge_before','',"アイテム鑑定<br>\n") if $mysp =~ /Eo/;
&input('radio','mode','judge_before','',"アイテム鑑定<BR>\n") if $mysp =~ /(Eo|J[0a-z][0-9])/;
#-END of EDIT- SAIL0015v3.00-2-5/5
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">perl/motion.cgi # Sub Judge Before # / # Sub Judge After # Line86-125</FONT></B> <BR>
<b>削除して下さい。</B>
!Parts5
<BR>
<B><FONT color="#0000FF">judgeitem.cgi を作成します。(改造ポイント１で変更したファイル名にしてください）</FONT></B><BR>
<B><FONT color="#FF00FF">パーミッションは（666｜606）です。</FONT></B><BR>
データの形式は、１行に１アイテムです。<BR>
行頭に <> をつける事でコメントと出来ますが、処理は確実に重くなるのでコメント行は避けて下さい。<BR>
<FONT color="#FF0000"><B>鑑定フラグ<>鑑定後アイテムデータ</B></FONT> という形式で作ってください。<BR>
<FONT color="#FF0000">鑑定フラグとは</FONT>、【Jxn000】という形式の６桁の文字列になります。 <BR>
１桁目：[ Ｊ ] は固定で Ｊ (英大文字）<BR>
２桁目：[ x ] は、０か、または英小文字 [a-z] です。<BR>
[a-z]の場合、対応する上位鑑定スキル[ Jxn ] をもつ人しか鑑定出来ません。 <BR>
[ 0 ]の場合、上位鑑定スキル[ Jxn ] をもつ人なら誰でも鑑定出来ます。<BR>
３桁目：[ n ] は、鑑定レベル[0-9] です。 <BR>
0 の場合、対応する上位鑑定スキル[ Jxn ]の ｎ が０〜９の人、即ち２桁目が一致すれば誰でも鑑定できます。 <BR>
3 の場合、対応する上位鑑定スキル[ Jxn ]の ｎ が３〜９の人でないと、鑑定できません。 <BR>
<FONT color="#FF0000">※この鑑定レベルは、自動でレベルアップする事はありません。<BR>
例えば武器屋には [Ja0] のスキルを、武器商人には [Ja3] のスキルを与える、と言う様に使用して下さい。</FONT><BR>
４〜６桁目：[000] は、区別用の数値です。000-999 自由に設定できます。 <BR>
英文字等でも設定は可能ですが、他のアイテム用フラグと同じ文字列を使用した場合に誤動作を招きます。 <BR>
数値で設定するようにして下さい。 <BR>
<FONT color="#FF0000">鑑定後アイテムデータとは</FONT>、鑑定後に変化するアイテムのデータです。 <BR>
通常は、 アイテム名<>８桁のアイテムデータ＋アイテム用フラグ<> という形になります。 <br>
※他のアイテムに関する改造によって、<FONT color="#FF0000">アイテムのデータにフラグ足しをしている場合、</FONT>その形式で記載して下さい。
<A href="download/judgeitem_cgi.txt">−設定サンプル− download してお使い下さい。</A><BR>
<A href="../download/judgeitem_cgi.txt">−設定サンプル− download してお使い下さい。</A><BR>
○例：アイテムに Ja5012 と設定した場合、そのアイテムを鑑定すると Ja5012 に対応する鑑定後アイテムに変化します。<BR>
Ja5012 と、Jc3012 は、同じ [012] がついてはいますが別扱いで、【６桁全てが一致する】場合にのみ変化します。
!Parts6
<BR>
<FONT color="#0000FF">通常のアイテムと同様に、配置して下さい。</FONT> <BR>
アイテムのフラグに、<FONT color="#FF0000">鑑定フラグ</FONT>を追加すれば、鑑定を行う事によって【改造ポイント３】で設定したアイテムに置き換わります。 <br>
一つのアイテムに鑑定フラグを複数セットする事も可能です。 この場合、前から順番に判定され、鑑定が可能な鑑定フラグが存在したところで、その鑑定フラグに対応する鑑定後アイテムに置き換わります。 <BR>
<FONT color="#FF0000">※Ja5000Ja0000 とした場合、[ Ja5 ]のスキルを持つ人は、Ja5000 の鑑定が可能ですので、そのアイテムは Ja5000 として扱われます。</FONT><FONT color="#FF0000"><BR>
しかし[ Ja3 ]のスキルしか持たない人は、Ja5000 では鑑定できず、Ja0000 で鑑定が可能なので、Ja0000 として扱われます。 </FONT>