▼スレッド
│
└◇871:Re:カジノシステム [moon] 12/24 19:22

> カジノを導入しました。ありがとうございます。
> 早速質問なんですが、景品交換で、所持数以上のものを持つことができるのですが、どうすればいいのでしょう？

URLを御願いします。

最大所持数を超えるのは問題無いという判断なので何も特別なことをしていないのですが気になるようなら、print "<b>景品交換</b><br><br>\n";の下に、
　　&splititem('i');
　　my $flag = @items < $xi;
を追加し、print qq|</td><td>$itemrate</td></tr>\n|;の下の、
　　if($Fm{"$_"}){
を、
　　if($flag && $Fm{"$_"}){
にすれば最大所持数を超えての景品交換が出来なくなると思います。