トップ 差分 一覧 ソース 検索 ヘルプ PDF RSS ログイン

探索消費体力

  • 青色は、改造箇所を示します。ファイル名: ルーチン名: 行番号 を示します。
  • 黒色文字は、「改造前の状態」を示します。
  • テキストボックスの中のプログラムを、該当の場所に上書きして下さい。

探索消費体力 Ver 1.00 ★★☆☆☆☆☆☆

一回の探索で消費する体力を設定します。
任意の体力を消費するタイプと、最大HPによって消費体力が変動するタイプを用意しました。
消費体力が変動するタイプでは、消費量が増えるに従って、アイテムの発見率が向上する改造例もおまけでつけています。
※この 改造を取り入れる際には、併せて 【 改造者表示 】 の改造を取り入れて頂けると嬉しいです。(非強制)

履歴
2007/02/16 Wikiにて公開
2003/08/19 Version 1.00 公開 

共通改造ポイント

◆改造ポイント01 探索ルーチンを修正します。


sos2.cgi # Sub Find Item # Line:751
perl/find.cgi # Sub Find Item # Line:4
@rcdlines = &get_user("$Fm{'id'}");
※TYPE1 消費量固定タイプ:常時一定量体力消費

※ $exh に設定した数値が消費体力量です。

※TYPE2 消費量最大体力比例タイプ:最大体力が上がると消費体力が上がる

※ 消費体力量は($xp / 15) を調整して下さい。


sos2.cgi # Sub Find Item # Line:764
perl/find.cgi # Sub Find Item # Line:17
$rnd = int(rand(100)) + 1;
※TYPE2 消費量最大体力比例タイプ
消費体力が上がる分、より良いアイテムを発見しやすくなる。TYPE1では不用。

※ $rnd を1〜10000に変更している場合、($exh - 1) の部分を ($exh - 1) * 5 等にして調整して下さい。


sos2.cgi # Sub Find Item # Line:753
perl/find.cgi # Sub Find Item # Line:6
if ($hp <= 1) { push (@msg,'ヒットポイントが足りません');return }



sos2.cgi # Sub Find Item # Line:777
perl/find.cgi # Sub Find Item # Line:30
$hp--;

 
複数回探索を導入していない場合は、以上で改造終了。
複数回探索を導入している場合は、FQFD氏版改造ポイント/doll版改造ポイント/SION版改造ポイントへ進む

doll版複数回探索改造ポイント

◆改造ポイント02 探索回数決定部を修正します。


perl/action.cgi # Sub Normal Action # Line:34
if($myhp > 2){
※TYPE1 消費量固定タイプ:常時一定量体力消費

※ $exh に設定した数値が消費体力量です。改造ポイント01にあわせて下さい。

※TYPE2 消費量最大体力比例タイプ:最大体力が上がると消費体力が上がる

※ 消費体力量は($xp / 15) を調整して下さい。改造ポイント01にあわせて下さい。


perl/action.cgi # Sub Normal Action # Line:36
foreach(1 .. ($myhp - 1)) { print qq|<OPTION value="$_">$_\n| }

FQFD氏複数探索改造ポイント

◆改造ポイント02 探索回数決定部を修正します。


# Sub Normal Action #
if($mysp !~ /Nf/ && $myhp > 1)
※TYPE1 消費量固定タイプ:常時一定量体力消費

※ $exh に設定した数値が消費体力量です。改造ポイント01にあわせて下さい。

※TYPE2 消費量最大体力比例タイプ:最大体力が上がると消費体力が上がる

※ 消費体力量は($xp / 15) を調整して下さい。改造ポイント01にあわせて下さい。


# Sub Normal Action #
$t_max = $myhp-1 if $t_max > $myhp-1;

SION版複数回探索改造ポイント

◆改造ポイント02 探索回数決定部を修正します。


# Sub Normal Action #
if ($mysp !~ /Nf/ && $myhp > 1) {
$maxturn = 20;

※TYPE1 消費量固定タイプ:常時一定量体力消費

※ $exh に設定した数値が消費体力量です。改造ポイント01にあわせて下さい。

※TYPE2 消費量最大体力比例タイプ:最大体力が上がると消費体力が上がる

※ 消費体力量は($xp / 15) を調整して下さい。改造ポイント01にあわせて下さい。


# Sub Normal Action #
$maxturn = $myhp - 1 if ($maxturn > $myhp - 1);