!Parts1
<br>
<TABLE width="96%" border="3" cellspacing="0" cellpadding="10" align="center" bordercolor="#CCCCFF">
<TR bordercolor="#0000FF"> 
<TD> 
<P class="text"> <FONT color="#0000FF"><B>青色は、改造箇所を示します。　ファイル名：　ルーチン名：　行番号　を示します。</B></FONT><BR>
<B>黒色文字は、「改造前の状態」を示します。</B><BR>
<B>テキストボックスの中のプログラムを、該当の場所に<FONT color="#FF0000">上書き</FONT>して下さい。</B></P>
</TD>
</TR>
</TABLE>

!Parts2
<BR>
<B><FONT color="#0000FF">sos2.cgi # Sub Save Game # Line1780 (本家original)</FONT></B><BR>
<b>push (@msg,"ゲームを保存しました。お疲れ様でした"); </b><Br>
<TEXTAREA name="textfield" cols="100" rows="5" wrap="OFF">	
push (@msg,&quot;ゲームを保存しました。お疲れ様でした&quot;);
#-ADD-
	if ($hp &lt; $xp) {
		push (@editor,&quot;体力回復予\告 Ver 1.02 &lt;A href='http://www.salion2.halfmoon.jp/soswiki/wiki.cgi' target='_blank'&gt;by SION & SOSWiki&lt;/A&gt;&quot;);
		$ENV{'TZ'} = &quot;JST-9&quot;;	
		if ($av ne 'dead') {
			if    ($fg =~ /SS/) { $tc = $def_hs; }
			elsif ($fg =~ /NS/) { $tc = $def_hn; }
			elsif ($fg =~ /HS/) { $tc = $def_hh; }
			if ($sp =~ /Hl/)     { $tc -= $def_hm; }
			if ($av =~ /poison/) { $tc += $def_pz; }
			if ($tc &lt;= 0)        { $tc = 0; }
			$tc = ($tc * ($xp - $hp) * 60);
			if ($tc) {
				($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime($tc + time);
				$date = sprintf(&quot;%02d:%02d&quot;,$hour,$min);
				push (@msg,&quot;$date 頃に体力が全快となる予\定です&quot;);
			}
		} else {
			$tc = (($def_ha - $bp) * 60 * 60);
			($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime($tc + time);
			$date = sprintf(&quot;%02d:%02d&quot;,$hour,$min);
			push (@msg,&quot;$date 頃に蘇生する予\定です&quot;);
	}	}
#-END of ADD- SOSWiki0003v1.02-1-1/1
</TEXTAREA><BR>
<FONT color="#FF0000">※ 死亡時計算式 蘇生後、１時間に１づつＨＰ回復。$bpは時間単位<BR>
蘇生後一旦アクセスし、保存しなおす方が回復が早いので、蘇生時間を表示。</FONT> <br>

!Parts3
<BR>
<B><FONT color="#0000FF">perl/any.cgi # Sub Save Game # Line47 (dollEx)</FONT></B><BR>
<b>push (@msg,"ゲームを保存しました。お疲れ様でした"); </b><br>
<TEXTAREA name="textarea" cols="100" rows="5" wrap="OFF">	
push (@msg,&quot;ゲームを保存しました。お疲れ様でした&quot;);
#-ADD-
	if ($hp &lt; $xp) {
		push (@editor,&quot;体力回復予\告 Ver 1.02 &lt;A href='http://www.salion2.halfmoon.jp/soswiki/wiki.cgi' target='_blank'&gt;by SION&lt;/A&gt;&quot;);
		if ($av ne 'dead') {
			if    ($fg =~ /SS/) { $tc = $def_hs; }
			elsif ($fg =~ /HS/) { $tc = $def_hh; }
			elsif ($fg =~ /NS/) { $tc = $def_hn; }
			if ($sp =~ /Hl/)     { $tc -= $def_hm; }
			if ($av =~ /poison/) { $tc += $def_pz; }
			if ($tc &lt;= 0)        { $tc = 0; }
			$tc = ($tc * ($xp - $hp) * 60);
		} else { $tc = ($def_hh * ($xp - 1) + $def_ha * 60 - $bp) * 60; }
		if ($tc) {
			$ENV{'TZ'} = &quot;JST-9&quot;;
			($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime($tc + time);
			$date = sprintf(&quot;%02d:%02d&quot;,$hour,$min);
			push (@msg,&quot;$date 頃に体力が全快となる予\定です&quot;);
	}	}
#-END of ADD- SOSWiki0003v1.02-1-1/1
</TEXTAREA><BR>
<FONT color="#FF0000">※ 死亡時計算式 蘇生後、保存方法に関わらず通常保存と同じ速度でＨＰ回復。$bpは分単位<BR>
体力全快時刻を表示。</FONT>