Maximize[{x^2 - y^2, Abs[x - y] <= Abs[2 x - y] <= 2}, {x, y}]