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

体力グラフ表示

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

体力グラフ表示 Ver 1.00 ★☆☆☆☆☆☆☆

　体力値をグラフ表示します。体力値や状態で色が変化します。

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

　

sos2.cgi # Sub Player's Data # Line:566
perl/players.cgi # Sub Player's Data # Line:24
print qq|体力：$hp/MAX$xp<br>\n|;

print qq|体力：$hp/MAX$xp<br>\n|; #-ADD- if ($hp > 0) { $hpg = int($hp / $xp * 100); } if ($hpg < 3) { $hpg = 3; } $hpg2 = 100 - $hpg; if ($av =~ /dead/) { $hpc = 'red'; } elsif ($hp > $xp) { $hpc = '#9900FF'; } elsif ($av !~ /alive/) { $hpc = '#CC00CC'; } elsif ($hp * 5 < $xp) { $hpc = 'pink'; } elsif ($hp * 2 < $xp) { $hpc = 'yellow'; } else { $hpc = 'green'; } print qq|<TABLE width=90% bgcolor="#CCFFCC" border=1 cellspacing=0 cellpadding=0><TR height=4>|; print qq|<TD width="$hpg%" bgcolor="$hpc"></TD><TD width="$hpg2%"></TD></TR></TABLE>|; #-END of ADD- SION0033v1.00-1-1/1

体力グラフ表示