▼スレッド
│
└◇1664:Re[11]:オークションについて [moon] 02/08 00:41

　└◇1665:Re[12]:オークションについて [moon] 02/08 00:46
　　└◇1666:Re[13]:オークションについて [rien] 02/08 01:24<-last

> 上記のようにした場合、出現確率が1以下（小数点
> で可能になるという意味なのでしょうか？？

はい、そうです。

> この場合でそれぞれの街の探索場所の名称を変更するなどということはできるのでしょうか？？

sub normal_action内の探索場所名部分を$twで判断して変更すれば良いです。
例えば、以下のようにします。
　　&input('radio','mode','find_item',' checked',"草原探索　　探索回数：");
　　　　↓
　　# find_itemに対応する探索場所名
　　my %location1 = (
　　　　1 => '探索場所A', # 街1用
　　　　2 => '探索場所B', # 街2用
　　　　3 => '探索場所C', # 街3用
　　);
　　　　〜
　　# find_item4に対応する探索場所名
　　my %location4 = (
　　　　1 => '探索場所X', # 街1用
　　　　2 => '探索場所Y', # 街2用
　　　　3 => '探索場所Z', # 街3用
　　);
　　&input('radio','mode','find_item',' checked',$location1{int($tw)} . "　　探索回数：");
　　# find_item2〜find_item4に対応する部分も同様に変更

> > 上記のようにした場合、出現確率が1以下（小数点
> > で可能になるという意味なのでしょうか？？
>
> はい、そうです。

すみません、1つ修正が抜けていました。
　　if ($sp =~ /Ft/) { $rnd -= 2; $rnd = 1 if $rnd < 1 }
　　　　↓
　　if ($sp =~ /Ft/) { $rnd -= 2; }

> > > 上記のようにした場合、出現確率が1以下（小数点
> > > で可能になるという意味なのでしょうか？？
> >
> > はい、そうです。
>
> すみません、1つ修正が抜けていました。
> 　　if ($sp =~ /Ft/) { $rnd -= 2; $rnd = 1 if $rnd < 1 }
> 　　　　↓
> 　　if ($sp =~ /Ft/) { $rnd -= 2; }

いつもありがとうございます。
追記してみます。