改造後のlord-f.cgiの33-48行目を見てみると
改造後のlord-s.cgiにサブルーチン[comment][commentd]が存在しても良さそうなのですがそれが無いようです。

当方は商人物語を知っている（現物ソースを持っている）わけではないのでなんとも言えませんが、
デフォルトのlord-s.cgiにサブルーチン[comment][commentd]があればそれを持ってくれば解決するのではないかと思われます。

参考までに。

XKY-Groupさん、的確なアドバイスありがとうございます。
仰るとおりlord-s.cgiに[comment][commentd]を追加しましたら
表示されるようになりました。

ただデフォルトにも存在しなかったので
改造配布サイト「キママメーカー」様の領主告知スクリプトの
lord-s.cgiの[comment][commentd]部分をコピー貼り付けでクリアしました。

本当にありがとうございました。

XKY-Group様、対応ありがとうございます。
領主告知はもともと追加ルーチンなので配布時に外すつもりでしたが、中途半端な状態になっていました。

といっても、キママメーカーさんの配布方法もファイルごとですから、競合するというか、難しいですね。差分だといいのですが。
とりあえずデフォルトで入っているという感じにしたいと思います。

いろいろありがとうございました。

ひとつ質問とお願いなのですが・・・
領主邸に寄付できるようにする方法がありましたら
教えていただきたいのです。
勝手なお願いばかり申し訳ありません。
よろしくお願いします。

資金援助スクリプトは、online!(飛来)というサイトで配布されていたのですが、サイトが閉鎖されているようですね。
いいのかわかりませんが、一応ファイルをアップしましたので、
ここからダウンロードしてみてください。
ttp://gameland2.sakura.ne.jp/soft/money_support.lzh

ただ、これを導入すると資金の余っているプレイヤーがどんどん寄付をして、街資金が膨大になる可能性があります。

確認していませんが、おそらく以下のような感じにすればよいと思います。

foreach(reverse(@DT))
{
if ($_->{money} < $money_li) {

何度もご面倒なことをお願いして、申し訳ありませんでした。
これで様子を見てみることにいたします。
本当にありがとうございました。

foreach(reverse(@DT))
{
if ((time() - $_->{time}) < $money_li) {

$money = int(($money_de - (time() - $_->{time}))/3600)*3600;
・・・

ifから始まる文を上のように変えればできるはずです。
数値は、$money_liと$money_deを設定してください。
あとは使わないのでそのままでも、消してしまっても構いません。

早速ご回答いただきまして、ありがとうございます♪^^
あと少しテストをした上でオープンする予定ですので・・・
また改めてご報告させていただきます。

お礼が遅くなって申し訳ありません。
ご指導いただいた通りに設定して上手くいきました。
ありがとうございました。（^-^）

何か設定の変更はされているでしょうか。
設定によってはマイナスになるかもしれませんし、バグかもしれません。設定変更をされている場合は、ソースの設定部分を貼り付けていただけると、原因がわかるかもしれません。
よろしくお願いします。

@@EVENT
start 200%
code gettime
info 時間援助
startfunc _local_

$EXPIRE_TIME2 = 3600*24*4; # 最終ログインから何日まで、援助を続けるか。初期は「4」
$NOW_TIME=time();

$money_li = 60*60*36; # 時間がいくら以下で援助するか。初期は「60*60*24」
$day_li = 14; # 開店何日まで時間援助をするか。
$money_max = 60*60*20; # １回の最大援助時間。
$money_de = 60*60*18; # １回の援助時間。


foreach(reverse(@DT))
{
if (((time() - $_->{time}) < $money_li)&&(($_->{lastlogin}+$EXPIRE_TIME2) > $NOW_TIME)&&(int(($NOW_TIME-$_->{foundation})/3600/24) < ($day_li + 1))) {

$money = int(($money_de - (time() - $_->{time}))/3600)*3600;

$money = $money_max if ($money > $money_max);

$_->{time}-=$money;

return (0,$_->{shopname}.'へ'.int($money / 3600).'時間の時間援助がなされました');
}

}
return 0;
_local_

上記のように設定しています。
なにかお分かりになられましたら　教えてください。
それではよろしくお願いしますm(_ _)m

説明不足でしたが、$money_deは$money_liよりも大きな値でないと、援助額がマイナスになる場合があるようです。この場合は、money_deは60*60*36よりも大きな値を指定してください。
よろしくお願いします。

こちらに載せていただいたとおりに設定を変えてみました。
　
　GEN様　わかりやすい説明ありがとうございました。

バージョンが表示されていなくて申し訳ありませんが、１２月２６日〜１月２日までアップロードしていたファイルには不具合があります。古いファイルの場合は、最新版をダウンロードし、voting_s.cgiを上書きしていただけないでしょうか。

現在使ってるファイルは、

最新のファイルでvoting_s.cgiは１月４日になっています。

結果が反映されている点と、商人物語のエラー画面ではなく、インターネットエラー５００が出ると言う点が、どうも私も原因が思いつきません。voting-s.cgiの、「CoUnLock();」や「CoUnLock();」は、必要がない可能性があり、環境によってはエラーとなるかもしれないので、この２つを消してためしていただけないでしょうか。

「CoUnLock();」や「UnLock();」をコメントアウトすると、
アクセスが混雑しております。
という、エラーレポートが出る時があります。
No.330の記事によると、
旧バージョンのLord.cgiでは、ロックを解除する「UnLock();」
が入っていませんでした。
とありますが、
現在配布されているファイルのLord.cgiにはこれらの記述がありませんが、これはこれでいいのでしょうか？

ちなみに、現在テスト中でAさんが領主でBさんが立候補している状況です。（どちらも私ですが）
さきほど、投票の結果によりAさんが領主になったばかりですが、
領主が居ない時も今も同じ症状のようです。

同じものを２つ並べてしまいました。「CoUnLock();」と「CoDataCA();」を消してください。「UnLock();」は消すと混雑の表示が出ます。また、Lord.cgiは、ファイルをロックすること自体が必要なかったので、その辺の処理を削除し、問題のない状態になっています。

「CoUnLock();」と「CoDataCA();」を消しましたが、
サーバーエラーが出ますね。

こちらでも同様の現象が確認できれば対処できるのですが、そういったエラーは確認していないので難しいです。商人物語のエラーではなく、インターネットエラー５００ということで、単純な文法ミスはないと思います。ですが、もしかするとソース内に全角スペースが入っているなどの理由も考えられますので、一度ファイルを新しくして試し、それでもエラーが出る場合は、投票制を導入しないことをお勧めします。対処できず申し訳ありません。

いろいろとありがとうございます。

# ロック解除
UnLock();
OutSkin();

# 終了
1;
としたら、エラーなくなりました。

解決してよかったです。
原因は「OutSkin();」ですか。
ご連絡ありがとうございました。