初めまして。
とても初心者的な質問かとは思いますが、どうにも分からないので、教えて頂ければ幸いです。

ましまろ様の分割統合版を基本に、街移動を組み込みました。
街ごとに出現アイテムを変え、尚且つ全てに探索回数指定ができるようにしたいのですが、やり方がよくわからず、無理矢理やったはいいのですが、表示が非常に鬱陶しいのです。

下記のようになっているのですが…。
これを、「今いる場所の探索指定のみ表示させる」
もしくは、今いる場所によって、中のdatファイル指定のみ変える
といったような方法はないでしょうか。

お忙しい中申し訳ありませんが、ご助力頂ければ幸いです。

＞＞＞＞＞＞


&input('radio','mode','find_item',' checked',"新校舎探索　　探索回数：");
if (($tw eq 1) || ($tw eq 2) || ($tw eq 3) && $hp > 1){
print qq|<select name=t_max>\n|; $hpcheck = 2;
print qq|<option value="1" SELECTED>1回\n|;
while ($hpcheck < $hp) {print qq|<option value="$hpcheck">$hpcheck\回\n|; last if $t_max == $hpcheck; $hpcheck++;}
print qq|</select><BR>|;
}
else{print qq| 0回<BR>|;}

&input('radio','mode','find_item2','',"旧校舎上階探索　　探索回数：");
if (($tw eq 4) || ($tw eq 5) && $hp > 1){
print qq|<select name=t_max>\n|; $hpcheck = 2;
print qq|<option value="1" SELECTED>1回\n|;
while ($hpcheck < $hp) {print qq|<option value="$hpcheck">$hpcheck\回\n|; last if $t_max == $hpcheck; $hpcheck++;}
print qq|</select><BR>|;
}
else{print qq| 0回<BR>|;}

　　　　　　　　&input('radio','mode','find_item3','',"旧校舎探索　　探索回数：");
if (($tw eq 6) || ($tw eq 7) && $hp > 1){
print qq|<select name=t_max>\n|; $hpcheck = 2;
print qq|<option value="1" SELECTED>1回\n|;
while ($hpcheck < $hp) {print qq|<option value="$hpcheck">$hpcheck\回\n|; last if $t_max == $hpcheck; $hpcheck++;}
print qq|</select><BR>|;
}
else{print qq| 0回<BR>|;}
　　　　　　　　
&input('radio','mode','find_item4','',"深層部探索　　探索回数：");
if ($tw eq 8 && $hp > 1){
print qq|<select name=t_max>\n|; $hpcheck = 2;
print qq|<option value="1" SELECTED>1回\n|;
while ($hpcheck < $hp) {print qq|<option value="$hpcheck">$hpcheck\回\n|; last if $t_max == $hpcheck; $hpcheck++;}
print qq|</select><BR>|;
}
else{print qq| 0回<BR>|;}

&input('radio','mode','find_item5','',"最深部探索　　探索回数：");
if (($tw eq 9) || ($tw eq 10) && $hp > 1){
print qq|<select name=t_max>\n|; $hpcheck = 2;
print qq|<option value="1" SELECTED>1回\n|;
while ($hpcheck < $hp) {print qq|<option value="$hpcheck">$hpcheck\回\n|; last if $t_max == $hpcheck; $hpcheck++;}
print qq|</select><BR>|;
}
else{print qq| 0回<BR>|;}

▼関連発言
│
└◆824:街ごとにアイテム変化（探索回数指定付） [織江] 10/15 14:17
　└◆825:Re:街ごとにアイテム変化（探索回数指定付） [moon] 10/15 19:51
　　└◆826:有難うございます！！ [織江] 10/15 23:07
　　　└◆833:コンタクト後の探索エラー [織江] 10/17 23:47
　　　　├◆834:つけたし。 [織江] 10/18 00:07
　　　　│└◆836:Re:つけたし。 [moon] 10/18 00:24
　　　　│　└◆837:Re[2]:つけたし。 [moon] 10/18 00:31
　　　　│　　└◆838:さらに追記 [moon] 10/18 00:35
　　　　└◆835:Re:コンタクト後の探索エラー [moon] 10/18 00:16
　　　　　└◆842:Re[2]:コンタクト後の探索エラー [織江] 10/18 20:49
　　　　　　└◆843:Re[3]:コンタクト後の探索エラー [moon] 10/18 23:30
　　　　　　　└◆844:今度こそ。 [織江] 10/19 01:11<-last