▼スレッド
│
└◇1267:Re:$priceを付けられるアイテムの数を規制 [moon] 06/20 21:07

　└◇1268:Re[2]:$priceを付けられるアイテムの数を規制 [しえん] 06/20 23:16<-last

> 現在の使用では、無制限にアイテムに値段($price)を付け 売りに出せますが
> 値段($price)を付けられるアイテムの数を規制したいのです。
>
> $tanaの数より多くはアイテムに値段($price)を付けれないようにしたいのですが
> どんな風に書き加えれば良いのでしょうか？
> 簡単な書き加えでできるようでしたら、よろしければ教えていただけないでしょうか？お願いいたします。

オリジナルのsos2.cgi Ver.1.10で説明します。
以下はすべてsub goods_afterの中です。

　　・1054行目の「foreach $x (0 .. $#items) {」の上くらいに以下を追加。
　　　　my $count = 0;
　　・1069行目の「splice(@items,$x,1,"$item△$sts$price");」の上に以下を追加。
　　　　if($price ne ''){
　　　　　　if($count >= $tana){
　　　　　　　　$price = '';
　　　　　　　　push(@msg, "棚に陳列できるのは${tana}個までです。") if($count == $tana);
　　　　　　}
　　　　　　$count++;
　　　　}

動作確認をしていないので間違いがあるかもしれませんが、これでどうでしょうか。

こんばんは。
お返事ありがとうございます。

動作確認をいたしました。きちんと動作いたしました！
お忙しいところ教えていただけて嬉しいです。
いつもありがとうございます。ぺこり♪