until (n = gets.to_i).zero?
  x, y = Array.new, Array.new
  n.times do
    xy = gets.split
    x << xy[0].to_i
    y << xy[1].to_i
  end
  m = gets.to_i
  a = 0
  nx, ny = 10, 10
  m.times do
    dl = gets.split
    d = dl[0].to_s
    l = dl[1].to_i
    l.times do
      case d
      when 'N'
        ny += 1
      when 'E'
        nx += 1
      when 'W'
        nx -= 1
      when 'S'
        ny -= 1
      end
      (0 .. n-1).each do |i|
        if x[i] == nx and y[i] == ny then
          a += 1
        end
      end
    end
  end
  if n == a then
    puts 'Yes'
  else
    puts 'No'
  end
end