太字部分は、改造箇所を示します。 ファイル名：　ルーチン名：　行番号　を示します。
 下線部分は、「改造前の状態」を示します。

!!!探索消費体力 Ver 1.00 ★★☆☆☆☆☆☆ 
一回の探索で消費する体力を設定します。
任意の体力を消費するタイプと、最大ＨＰによって消費体力が変動するタイプを用意しました。
消費体力が変動するタイプでは、消費量が増えるに従って、アイテムの発見率が向上する改造例もおまけでつけています。
※この 改造を取り入れる際には、併せて 【 改造者表示 】 の改造を取り入れて頂けると嬉しいです。（非強制） 
 履歴
 2003/08/19　Version 1.00　公開 
 2007/02/16　Wikiにて公開
!!共通改造ポイント 
!◆改造ポイント０１ 探索ルーチンを修正します。 
　　
'''sos2.cgi # Sub Find Item # Line:751'''
'''perl/find.cgi # Sub Find Item # Line:4'''
__@rcdlines = &get_user("$Fm{'id'}"); __
◆ＴＹＰＥ１　消費量固定タイプ：常時一定量体力消費
{{memo}}
　※$exh に設定した数値が消費体力量です。
　
◆ＴＹＰＥ２　消費量最大体力比例タイプ：最大体力が上がると消費体力が上がる
{{memo}}
　※消費体力量は($xp / 15) を調整して下さい。
　
'''sos2.cgi # Sub Find Item # Line:764'''
'''perl/find.cgi # Sub Find Item # Line:17'''
__$rnd = int(rand(100)) + 1; __
　
◆ＴＹＰＥ２　消費量最大体力比例タイプ：最大体力が上がると消費体力が上がる
　※消費体力が上がる分、より良いアイテムを発見しやすくなる。TYPE１では不用。
{{memo}}
　※$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 } __
{{memo}}
　
'''sos2.cgi # Sub Find Item # Line:777'''
'''perl/find.cgi # Sub Find Item # Line:30'''
__$hp--; __
{{memo}}
　
複数回探索を導入していない場合は、以上で改造終了。
複数回探索を導入している場合は、FQFD氏版改造ポイント／doll版改造ポイント／SION版改造ポイントへ進む 

!!doll版複数回探索改造ポイント 
!◆改造ポイント０２ 探索回数決定部を修正します。 
　
'''perl/action.cgi # Sub Normal Action # Line:34'''
__if($myhp > 2){ __
　◆ＴＹＰＥ１　消費量固定タイプ：常時一定量体力消費
{{memo}}
　※$exh に設定した数値が消費体力量です。改造ポイント０１にあわせて下さい。
　
　◆ＴＹＰＥ２　消費量最大体力比例タイプ：最大体力が上がると消費体力が上がる
{{memo}}
　※消費体力量は($xp / 15) を調整して下さい。改造ポイント０１にあわせて下さい。 
　
'''perl/action.cgi # Sub Normal Action # Line:36'''
__foreach(1 .. ($myhp - 1)) { print qq|<OPTION value="$_">$_\n| } __

!!FQFD氏複数探索改造ポイント 
!◆改造ポイント０２ 探索回数決定部を修正します。 
　
'''# Sub Normal Action #'''
__if($mysp !~ /Nf/ && $myhp > 1) __
　
　◆ＴＹＰＥ１　消費量固定タイプ：常時一定量体力消費
{{memo}}
　※$exh に設定した数値が消費体力量です。改造ポイント０１にあわせて下さい。
　
　※ＴＹＰＥ２　消費量最大体力比例タイプ：最大体力が上がると消費体力が上がる
{{memo}}
　※消費体力量は($xp / 15) を調整して下さい。改造ポイント０１にあわせて下さい。 
　
'''# Sub Normal Action #'''
__$t_max = $myhp-1 if $t_max > $myhp-1; __
{{memo}}

!!SION版複数回探索改造ポイント 
!◆改造ポイント０２ 探索回数決定部を修正します。 
　
'''# Sub Normal Action #'''
__if ($mysp !~ /Nf/ && $myhp > 1) {__
__$maxturn = 20; __
　◆ＴＹＰＥ１　消費量固定タイプ：常時一定量体力消費
{{memo}}
　※$exh に設定した数値が消費体力量です。改造ポイント０１にあわせて下さい。
　
　◆ＴＹＰＥ２　消費量最大体力比例タイプ：最大体力が上がると消費体力が上がる
{{memo}}
　※消費体力量は($xp / 15) を調整して下さい。改造ポイント０１にあわせて下さい。 
　
'''# Sub Normal Action #'''
__$maxturn = $myhp - 1 if ($maxturn > $myhp - 1); __
{{memo}}