▼スレッド
│
└◇1667:回復表示 [rien] 02/10 20:58
└◇1668:Re:回復表示 [moon] 02/11 00:18
└◇1669:Re[2]:回復表示 [moon] 02/11 00:22
└◇1670:Re[3]:回復表示 [rien] 02/11 09:03
└◇1671:Re[4]:回復表示 [moon] 02/11 16:37
└◇1672:Re[5]:回復表示 [rien] 02/11 17:11<-last
いつもお世話になります。スレッド一覧
行動値を導入した際に体力回復予告と同じように
行動値の回復時間を表示させるためにはどうしたらよいでしょうか？
体力回復予告はsionさんのクッキーを使用していないものを導入してます。
それと以前にsionさんの体力回復表示のクッキーを使うものを導入した時にエラーメッセージの
クッキーを食べ残したため、回復時間を予想できません
と表示されてしまい・・。
新規登録のキャラでもこのメッセージが出たのですが
これは一体何が原因なのでしょうか？？
sosはマシマロさんの分割版を利用しています。
本家さんのsosではうまく動作していたのですが・・。
よろしくお願いします。
> いつもお世話になります。スレッド一覧
> 行動値を導入した際に体力回復予告と同じように
> 行動値の回復時間を表示させるためにはどうしたらよいでしょうか？
>
> 体力回復予告はsionさんのクッキーを使用していないものを導入してます。
以下のようなかんじでできると思います。
if($dap < $MaxAp){
# 回復時間の設定値を求める
my $tc = $fg eq 'NS' ? $Ap_ns : $fg eq 'HS' ? $Ap_hs : $fg eq 'SS' ? $Ap_ss : 0;
if($tc > 0){
# 全回復するまでに必要な時間を求める
$tc *= 60 * ($MaxAp - $dap);
# 表示する
$ENV{'TZ'} = "JST-9";
my ($sec, $min, $hour, $day, $mon, $year, $wday, $yday, $isdst) = localtime(time + $tc);
push(@msg, sprintf("%02d:%02d", $hour, $min) . ' 頃に蘇生する予\定です');
}
}
> それと以前にsionさんの体力回復表示のクッキーを使うものを導入した時にエラーメッセージの
> クッキーを食べ残したため、回復時間を予想できません
> と表示されてしまい・・。
> 新規登録のキャラでもこのメッセージが出たのですが
> これは一体何が原因なのでしょうか？？
> sosはマシマロさんの分割版を利用しています。
> 本家さんのsosではうまく動作していたのですが・・。
クッキーが存在しなかったりでID（$c_id）が取得できなかった場合に発生するメッセージのようですので、sub list_orderへの&cookie_get;の追加が行われていなかった可能性があります。
その他には、ブラウザでクッキーを許可していない場合や名前かパスワードにクッキーに含めるとまずいものが含まれている場合にも起こりえると思います。
> push(@msg, sprintf("%02d:%02d", $hour, $min) . ' 頃に蘇生する予\定です');スレッド一覧
蘇生ではないですね。
メッセージは修正してください。
> 以下のようなかんじでできると思います。スレッド一覧
> if($dap < $MaxAp){
> # 回復時間の設定値を求める
> my $tc = $fg eq 'NS' ? $Ap_ns : $fg eq 'HS' ? $Ap_hs : $fg eq 'SS' ? $Ap_ss : 0;
> if($tc > 0){
> # 全回復するまでに必要な時間を求める
> $tc *= 60 * ($MaxAp - $dap);
> # 表示する
> $ENV{'TZ'} = "JST-9";
> my ($sec, $min, $hour, $day, $mon, $year, $wday, $yday, $isdst) = localtime(time + $tc);
> push(@msg, sprintf("%02d:%02d", $hour, $min) . ' 頃に蘇生する予\定です');
> }
> }
>
お返事ありがとうございます。
うまく表示できました。
クッキーを使用したものを導入したかったのですが、
sub list_orderでの追加は書いてある通りに追加してあったみたいで・・（&cookie_get;
自分では原因が特定できないので
上記の方法にします。
ありがとうございました。
もう1つ質問なのですが
1つのスキルを職業ごとに表示を変えることは可能なのでしょうか？
深海星さんの改造で宝石に魔力を籠めるというもので
アクセを一時使用アイテムに変化させるものなのですが
これを例えば
魔法使いと召喚士で一時使用のアイテムを変化させたいのですが・・（名称を変えるといった意味です
mjewel.datを変えて職の指定をすればいいのかなと思ったのですが、なかなかうまくいかず・・
それとも同じスキルではなくて別にしたほうがよいのでしょうか？？
いつもで申し訳ないのですが
よろしくお願いします。
> もう1つ質問なのですがスレッド一覧
> 1つのスキルを職業ごとに表示を変えることは可能なのでしょうか？
> 深海星さんの改造で宝石に魔力を籠めるというもので
> アクセを一時使用アイテムに変化させるものなのですが
> これを例えば
> 魔法使いと召喚士で一時使用のアイテムを変化させたいのですが・・（名称を変えるといった意味です
>
> mjewel.datを変えて職の指定をすればいいのかなと思ったのですが、なかなかうまくいかず・・
> それとも同じスキルではなくて別にしたほうがよいのでしょうか？？
データファイルやスキルを変更するのではなく、職業ごとのデータファイルを作成したほうが簡単だと思います。
例えば以下のようにすれば良いと思います。
【ファイル名】
魔法使い用： mjewel_wizard.dat
召喚士用： mjewel_summoner.dat
その他の職業用： mjewel.dat
【ソースコード】
@mjlines = &opendat($mjeweldat);
↓
# 職業とファイル名の対応を定義する
my %file = (
'魔法使い' => 'mjewel_wizard.dat',
'召喚士' => 'mjewel_summoner.dat',
);
# 使用するファイル名を求める
my $mjeweldat = exists $file{$jb} ? $file{$jb} : 'mjewel.dat';
# データを読み込む
@mjlines = &opendat($mjeweldat);
> データファイルやスキルを変更するのではなく、職業ごとのデータファイルを作成したほうが簡単だと思います。スレッド一覧
> 例えば以下のようにすれば良いと思います。
> 【ファイル名】
> 魔法使い用： mjewel_wizard.dat
> 召喚士用： mjewel_summoner.dat
> その他の職業用： mjewel.dat
> 【ソースコード】
> @mjlines = &opendat($mjeweldat);
> ↓
> # 職業とファイル名の対応を定義する
> my %file = (
> '魔法使い' => 'mjewel_wizard.dat',
> '召喚士' => 'mjewel_summoner.dat',
> );
> # 使用するファイル名を求める
> my $mjeweldat = exists $file{$jb} ? $file{$jb} : 'mjewel.dat';
> # データを読み込む
> @mjlines = &opendat($mjeweldat);
お返事ありがとうございます。
なるほど・・これなら私にもできそうです＾＾
このようにしてやってみます。
ありがとうございました。