#----------------------------------------------------------- # 設定 $max_items = 10; # 最大出品数 #----------------------------------------------------------- # 出品 # sub syupin1{ if($#auc_ary>=$max_items){ $log .= qq|申\し訳ありません。出品は$max_items個までです。<br>入札中の品物が少なくなってから出品をお願いします<br>\n|; $tm=$cmd=0; &auc_menu; }else{ $log .= qq|オークションに出品するアイテムを選択してください<br><br>|; &eq_view; # 装備品選択 } } |