for構文にて自力解決できました。
ありがとうございました。

わかりました〜。解決されてよかったです。
開発元や商人物語のサイトも放置されていたり閉鎖されている所が多いですね。

perlのバージョンアップに合わせてdefineでエラーを吐くようになったまま放置されていたりと、ちょっと寂しいものがありますね。

今後もご迷惑でなければ改造相談させていただければと思います。

またご相談させていただきます。
inc-funcにて個人データの変数を追加し、
inc-turnでターン毎の売り上げ計算に合わせてステータスが変わるようにする変更を加えたところ、最初は問題なく動いておりましたが、何らかのトリガー（イベント発動判定の処理？）で知らないうちにエラーが出ておりました。

「../program/inc-turn.cgi」の 356行目付近に原因があるようです。
Undefined subroutine &event::stock_le called at ../program/inc-turn.cgi line 356.

特段イベント関連はいじっておらず、原因に心あたりがありません…
もし同じようなご経験があればアドバイスいただけるとありがたいです。

返信が遅くなってすいません。
既に解決しているかもしれませんが、私の改造ではinc-funcやinc-turnはあまり改造していないので、原因がよくわかりません。

そのサブルーチンが他のファイルで定義されているのなら、上のほうで
RequireFile('xxx.cgi');
みたいにしたほうがいいかもしれません。
また、ログに書き込む処理は
Lock();
RenewLog();
DataWrite();
DataCommitOrAbort();
UnLock();
みたいにした気がします。

代替案としては、決算毎にアイテムの総売り上げを合計して、ステータスを変更することは
できます。inc-item-data.cgiの改造で済みます。


sub UpdateResetBefore #決算直前の処理(関数名固定)　

#ユーザー変数に、本日(決算期ごと)の売り上げ×価格を足す処理はたぶん以下

foreach my $DT (@DT){

$DT->{user}->{param} = $DT->{user}->{param} + $DT->{itemtoday}{アイテム番号} * $ITEM[アイテム番号]->{price}
}

よろしくお願いします。

と思ったら、グーグルの履歴に掲示板の書き込みがすべて残っていたので、近日中に復旧したいと思います。

ふう。復旧完了です。
日付までは直してないけど、だいたいいいはず。

みおたす

書き込みありがとうございます。

私も昨日の朝より同様の問題が発生しています
アトラス-海鳴り
げんちゃん街-キング
ゲームメーカー-ゲーム制作企画
で登録しています
よろしくお願いします

ご連絡をありがとうございます！確認が遅れてすいません。

重複登録の解除を行いました。

少しエラーも出ていたのですが、原因は不明です。まだ解決しないようでしたら、ご連絡いただきたいです。

よろしくお願いします。

原因はまだよくわかりませんが、一時的に重複許可にしました。
先ほど確認したところ、重複判定は出ていませんでした。原因はこれから調査しますが、以前重複判定を強化したのが原因かもしれません。

無事にログインできました、ありがとうございます。

少し考えてみましたが、やはり心当たりがないですね・・・
ゲーム内でも先週先々週特別な行動をした覚えはないですし・・・
今までのゲーム内の行動の積み重ねで重複判定の基準にかかったんでしょうか・・・