# CONTACT?
  # Script de Zou le 4/12/10
  # Permet de tester si un event est en contact avec un event précisé
  # ou en contact avec un event non précisé.
  # Application :
  # Condition > Script :
  # contact?(A,B) == X
  # A = c'est l'ID de l'event qui doit être en contact; 0 pour le héros; @event_id pour cet evenement
  # B = c'est l'ID de de l'event qui est testé; 0 pour le héros;
  # -1 pour tester tous les events de la map
  # X = si on teste un event particulier (B>-1) renvoie true ou false
  # X = si on teste pour tous les events (B=-1) revoie l'ID de events en contact ou -1
 
 
class Game_Interpreter
 
  def contact?(event_id,event_id2)
      event = (event_id == 0) ? $game_player : $game_map.events[event_id]
      if event_id2 != -1
      event2 = (event_id2 == 0) ? $game_player : $game_map.events[event_id2]
      boucle= false
    elsif event_id2 == -1
      boucle = true
      end
      case event.direction
      when 2 ; sx, sy = 0, 1
      when 4 ; sx, sy = -1, 0
      when 6 ; sx, sy = 1, 0
      when 8 ; sx, sy = 0, -1
      end
      sx += event.x
      sy += event.y
      if boucle == false
        return true if sx == event2.x and sy == event2.y
      else
        for i in 0 .. $game_map.events.size
          event2 = (i == 0) ? $game_player : $game_map.events[i]
          if event2 != nil and event_id != i
          return i if sx == event2.x and sy == event2.y
          end
        end
        return -1
      end
      return false
  end
   
end