罪罰改造板２/377

       if(($time-$evrg)>3600){  # 1時間(3600)に1回判定する
               if(rand(10)==0){ # 1/10の確立
                       #
                       # ここにアイテム取得処理
                       #
               }
               $evrg=$time;
       }