▼スレッド
│
└◇1561:掲示板の表示 [rien] 12/21 17:09
└◇1562:Re:掲示板の表示 [moon] 12/21 23:38
└◇1564:Re[2]:掲示板の表示 [rien] 12/23 00:43
└◇1566:Re[3]:掲示板の表示 [moon] 12/23 00:53
└◇1567:Re[4]:掲示板の表示 [rien] 12/23 02:20
└◇1568:Re[5]:掲示板の表示 [moon] 12/23 11:08
└◇1569:Re[6]:掲示板の表示 [rien] 12/23 11:44<-last
いつもお世話になります。スレッド一覧
マシマロさんのとこの街の掲示板を
トップの右側に表示したいのですが・・
どうしてもうまくいきません・・・。
最近の出来事の改造と同じように表示させればいいのかと・・
試してはみたのですが・・
どうもうまくいかなく・・・
どうしたらよいのでしょうか・・・
いつも初歩的な質問ばかりで申し訳ありません・・・。
> いつもお世話になります。スレッド一覧
> マシマロさんのとこの街の掲示板を
> トップの右側に表示したいのですが・・
> どうしてもうまくいきません・・・。
> 最近の出来事の改造と同じように表示させればいいのかと・・
> 試してはみたのですが・・
> どうもうまくいかなく・・・
> どうしたらよいのでしょうか・・・
>
> いつも初歩的な質問ばかりで申し訳ありません・・・。
sub sagaを以下のようにすれば良いのではないかと思います。
1. &opensosdat;と&list_order;の間に以下を追加。
my @bbslines = &opendat('bbs.dat');
2. $totalplayer = @odrlines;の上に以下を追加。（sub bbs後半の2行です。）
print qq|<center><b>[街の掲示板]</b></center><hr>\n|;
foreach $line (@bbslines) { print qq|$line<br><hr>\n| }
なお、表示だけなら&bbs;とするだけで良いと思うのですが、sub sagaでは最初のほうでアンロックされているために単純に&bbs;とするだけでは不適切であるためsub bbsの内容を分解して上記のようにしました。
いつも早急なお返事ありがとうございます。スレッド一覧
この通りに追加してみたら無事にできました。
ありがとうございます。
分解して記述・・
とても勉強になります。
それと、先日こちらでコロシアムとカジノをDLさせていただきました。
こちらをがんばって追加してみます＾＾
うまくいかない事が多くて質問の追加になってしまうのですが・・・
それも２つあります・・すみません・・。
１つは体力アイテムなどを摂取する際に
過剰に摂取できなくするにはどうしたらよいのでしょうか・・・
もう１つは
保存状態の確認という以前深海星さんが配布していた改造なのですが・・こちらをマシマロさんの分割に追加すると
うまくいかないのですが（リンク場所をクリックすると500のサーバーエラーになります）
以前本家さまのSOS2では正常に動きました。
requireを追加したりしても何も変わりません・・。
他にも変更する箇所があるのでしょうか？？
文法のチェックをしてみましたが・・・問題はないようなのです。
一度書き込みして・・
街の掲示板について
最近の出来事のように件数を指定して表示する方法を
試行錯誤してました・・・
どうも反映されません・・。
他のサイトさまの改造を参考に記述してみましたが・・
うまくできませんでした・・
ヒントでもよいので教えていただければ助かります・・
聞いてばかりで大変申し訳ありませんが
よろしくお願いします。
> うまくいかない事が多くて質問の追加になってしまうのですが・・・スレッド一覧
> それも２つあります・・すみません・・。
> １つは体力アイテムなどを摂取する際に
> 過剰に摂取できなくするにはどうしたらよいのでしょうか・・・
こちらは次のようにすれば良いと思います。
1. sub foodを以下のように変更。
} else { &umsg('摂'); $hp = &hpcheck($hp,$xp,$iak); $gn = 1 }
↓上記の「上」に以下を追加。
}
elsif($hp >= $xp){
&umsg('満');
2. sub umsgを以下のように変更。
'摂',"$itemを摂取しました",
↓上記の「下」に追加。
'満',"満腹のため${item}を摂取できませんでした",
> もう１つは
> 保存状態の確認という以前深海星さんが配布していた改造なのですが・・こちらをマシマロさんの分割に追加すると
> うまくいかないのですが（リンク場所をクリックすると500のサーバーエラーになります）
>
> 以前本家さまのSOS2では正常に動きました。
> requireを追加したりしても何も変わりません・・。
> 他にも変更する箇所があるのでしょうか？？
> 文法のチェックをしてみましたが・・・問題はないようなのです。
改造方法の通りに行うとsub enter_formを呼び出す必要があるのに、マシマロさんの分割版にはsub enter_form自体が存在しないのが問題なのだろうと思います。
sub enter_formで行っていることをやれば良いので以下のようにすれば大丈夫かもしれません。
if ($Fm{'mode'} eq 'check_game') { require $checkstspl; &enter_form; }
↓
if ($Fm{'mode'} eq 'check_game') { require $checkstspl; &header; &table_top; &check_form; &table_bottom; }
> 一度書き込みして・・
> 街の掲示板について
> 最近の出来事のように件数を指定して表示する方法を
> 試行錯誤してました・・・
> どうも反映されません・・。
> 他のサイトさまの改造を参考に記述してみましたが・・
> うまくできませんでした・・
> ヒントでもよいので教えていただければ助かります・・
1. ループの外に以下を用意。
my $count = 0;
2. ループ内の最後の処理として以下を行う。
$count++; last if($count >= 10); # 10件の場合。サンプルなので10と直書きしてあります。
すみませんっ！スレッド一覧
こんなに早くお返事いただきまして
ありがとうございます！
食料の摂取と保存状態は問題なく動いています。
あんなに時間をかけてもぜんぜんわからなかったのに・・
目から鱗状態です。
それと掲示板の表示の件なのですが・・
ループ外とループ内に記載ということで
foreachがループのことなんですよね？？
勉強不足ですみません・・・。
可能性がありそうなところは
記載したり戻したりしたのですが・・
うまく動いていません・・。
もしかしたら追加箇所が違っているのでしょうか・・。
> それと掲示板の表示の件なのですが・・スレッド一覧
> ループ外とループ内に記載ということで
> foreachがループのことなんですよね？？
> 勉強不足ですみません・・・。
>
> 可能性がありそうなところは
> 記載したり戻したりしたのですが・・
> うまく動いていません・・。
>
> もしかしたら追加箇所が違っているのでしょうか・・。
foreach $line (@bbslines) { print qq|$line<br><hr>\n| }
上記を追加したと思いますが、これを以下のように変更するという意味でした。
my $count = 0;
foreach $line (@bbslines) { print qq|$line<br><hr>\n|; $count++; last if($count >= 10); }
> > それと掲示板の表示の件なのですが・・スレッド一覧
> > ループ外とループ内に記載ということで
> > foreachがループのことなんですよね？？
> > 勉強不足ですみません・・・。
> >
> > 可能性がありそうなところは
> > 記載したり戻したりしたのですが・・
> > うまく動いていません・・。
> >
> > もしかしたら追加箇所が違っているのでしょうか・・。
>
> foreach $line (@bbslines) { print qq|$line<br><hr>\n| }
> 上記を追加したと思いますが、これを以下のように変更するという意味でした。
> my $count = 0;
> foreach $line (@bbslines) { print qq|$line<br><hr>\n|; $count++; last if($count >= 10); }
>
いつもお返事ありがとうございます。
な・・なるほど・・
；付け忘れていたり・・間違っておりました。
詳しく記載していただいてありがとうございます。
またお世話になると思いますがよろしくお願いします。