▼スレッド
│
└◇75:Re[11]:Casino System Ver. 2.1について [moon] 09/26 08:40

　└◇76:ここだけは変更が必要 [moon] 09/26 08:53
　　└◇77:Re:ここだけは変更が必要 [初心者] 09/26 17:22
　　　└◇78:景品としてのお金 [moon] 09/26 19:02<-last

> 動いたようです♪♪
> しかし、もう一つ普通な質問ですけど、
> 探索にてコインを発見する設定はどうやったらいいんでしょうか？
> アイテムのスキル等がよくわかりません。
> まったく初心者なのでよろしくお願いします。
>

ふと思ったのですが、もしかして、sos2.cgiにcasino.plをコピペして追加したのではないですか？（これならmyが働いていないのも納得できるのですが）
一応、casino.plはsos2.cgiからrequire 'casino.pl';で呼び出して使用するように出来ているので。
（動いたのなら現状でも大丈夫かもしれませんが・・・）

コインを探索時に出す場合は、例えばお金の判定を利用して以下のように変更。（アイテムスキルを使用しない方法）
if ($idt !~ /Gl/) { push(@items,"$inm△$idt"); &joinitem('i') }
else { $mn += substr($idt,0,4) }
を、
if ($idt !~ /Gl/) { push(@items,"$inm△$idt"); &joinitem('i') }
elsif(rand(1000)<1){$inm = int(substr($idt,0,4)).'コイン'; $cs += $inm;} # お金の確率の1/1000でコインが手に入る。
else { $mn += substr($idt,0,4) }

探索は回数が出来るので、確率が高いとコインが大量に手に入ってしまい好ましくないです。

my $casino_item = './itm.dat';
の、./item.datを自分で用意した景品ファイルに変更してください。

その景品のことですが、
アイテム名<>ステータス<>コインの枚数<>ですよね？
10G<>00100000Gl<>1<>
のように設定をしたらなぜか、
10Gはお金ではなく、アイテムとして交換してしまったのです・・・。
どうなんでしょうか？

> その景品のことですが、
> アイテム名<>ステータス<>コインの枚数<>ですよね？
> 10G<>00100000Gl<>1<>
> のように設定をしたらなぜか、
> 10Gはお金ではなく、アイテムとして交換してしまったのです・・・。
> どうなんでしょうか？

ええと、デフォルトではお金は設定できません。
お金に交換したい場合は、sos2のsub find_itemのお金の処理を参考にしてください。（たぶん、数行追加するだけ）