#![allow(unused_imports)]
#![allow(non_snake_case, unused)]

// ---------- begin input macro ----------
// https://qiita.com/tanakh/items/0ba42c7ca36cd29d0ac8 より
macro_rules! input {
    (source = $s:expr, $($r:tt)*) => {
        let mut iter = $s.split_whitespace();
        let mut next = || { iter.next().unwrap() };
        input_inner!{next, $($r)*}
    };
    ($($r:tt)*) => {
        let stdin = std::io::stdin();
        let mut bytes = std::io::Read::bytes(std::io::BufReader::new(stdin.lock()));
        let mut next = move || -> String{
            bytes
                .by_ref()
                .map(|r|r.unwrap() as char)
                .skip_while(|c|c.is_whitespace())
                .take_while(|c|!c.is_whitespace())
                .collect()
        };
        input_inner!{next, $($r)*}
    };
}

macro_rules! input_inner {
    ($next:expr) => {};
    ($next:expr, ) => {};

    ($next:expr, $var:ident : $t:tt $($r:tt)*) => {
        let $var = read_value!($next, $t);
        input_inner!{$next $($r)*}
    };
}

macro_rules! read_value {
    ($next:expr, ( $($t:tt),* )) => {
        ( $(read_value!($next, $t)),* )
    };

    ($next:expr, [ $t:tt ; $len:expr ]) => {
        (0..$len).map(|_| read_value!($next, $t)).collect::<Vec<_>>()
    };

    ($next:expr, chars) => {
        read_value!($next, String).chars().collect::<Vec<char>>()
    };

    ($next:expr, usize1) => {
        read_value!($next, usize) - 1
    };

    ($next:expr, $t:ty) => {
        $next().parse::<$t>().expect("Parse error")
    };
}
// ---------- end input macro ----------


use std::cmp::*;
use std::collections::*;
use std::ops::*;
use std::marker::*;
 
const INF: i64 = std::i64::MAX/100;
const MOD: i64 = 1_000_000_007;
// const MOD: i64 = 998_244_353;

fn main() {
    input! {
        n: usize, m: usize,
    }
    let mut seen = vec![vec![false;n];n];
    let mut ans = false;
    dfs(0,0,4,&mut seen,&mut ans);
    if ans {
        println!("Yes");
    }
    else {
        println!("No");
    }
}

fn dfs(x: usize, y: usize, d: usize, mut seen: &mut Vec<Vec<bool>>, mut ans: &mut bool){
    let n = seen.len();
    if x==n-1 && y==n-1 {
        *ans = true;
        return;
    }
    let ret = query(x,y);
    if !ret {
        return;
    }
    seen[x][y] = true;
    let dir = [(0,1),(1,0),(0,!0),(!0,0)];
    for (nd,&(tx,ty)) in dir.iter().enumerate() {
        if d!=nd && nd%2==d%2 {
            continue;
        }
        let nx = x + tx;
        let ny = x + ty;
        if nx>=n || ny>=n {
            continue;
        }
        if seen[nx][ny] {
            continue;
        }
        seen[nx][ny] = true;
        dfs(nx,ny,nd,&mut seen,&mut ans);
    }
}

fn query(x: usize, y: usize) -> bool {
    println!("{} {}",x+1,y+1);
    input! {
        t: String,
    }
    if t=="Black" {
        true
    }
    else {
        false
    }
}