
# $flds = 20.times.map{20.times.map{0}} ????????????????????????

def dir2num(str)
  case str
  when 'N' then [0, 1]
  when 'E' then [1, 0]
  when 'S' then [0, -1]
  when 'W' then [-1, 0]
  end
end

def move_robot(arr)
  $r.each do |arr|
    arr[1].to_i.times do
      $moved_pos << $pos = $pos.zip(dir2num(arr[0])).map{ |a| a.inject(:+) }
    end
  end
end

while line = gets
  break if line.strip == '0'
  h_num = line.to_i
  $pos = [10, 10]
  $h_pos = []
  $moved_pos = []
  h_num.times do
    $h_pos << gets.split.map(&:to_i)
  end
  r_num = gets.to_i
  $r = []
  r_num.times do
    $r << gets.split
  end

  move_robot($r)
  puts ($h_pos - $moved_pos).none? ? "YES" : "NO"
end