Honey tree script

#==============================================================================
# ● Honey tree script made by Help-14
#==============================================================================

  #----------------------------------------------------------------------------
  #   Configuration
  #----------------------------------------------------------------------------
    $HONEY_TIME = 5
    
  #----------------------------------------------------------------------------
  #   Script
  #----------------------------------------------------------------------------
    def add_honey(event_id)
      mapid=$game_map.map_id
      #event=$game_map.events[event_id]
      $GlobalHoneyTime={} if !$GlobalHoneyTime
      $GlobalHoneyTime[mapid]={} if !$GlobalHoneyTime[mapid]
      $GlobalHoneyTime[mapid][event_id]=0
    end
      
    def check_honey(event_id)
      mapid=$game_map.map_id
      if $GlobalHoneyTime[mapid][event_id]>$HONEY_TIME*Graphics.frame_rate
        return true
      else
        return false
      end
    end
    
    def random_honey_tree_pokemon(event_id,list)
      length=list.length
      num=rand(length-1)
      pbWildBattle(list[num][0],list[num][1])
      mapid=$game_map.map_id
      $GlobalHoneyTime[mapid][event_id]=0
    end
    
  #----------------------------------------------------------------------------
  #   Game_System
  #----------------------------------------------------------------------------
    class Game_System
      alias up update
      
      def update
        add_honey_time
        up
      end
      
      def add_honey_time
        mapid=$game_map.map_id
        for event in $game_map.events.values
          key = [mapid, event.id, "A"]
          if event.name=="HONEYTREE" and $game_self_switches[key]==true
            $GlobalHoneyTime[mapid][event.id]+=1
          end
        end
      end
      
    end