re re re

program ex;
var
 a,b,x,y:array [1..1000] of longint;
 d:array [-10001..99999,-10001..99999] of longint;
 c,p,i,j,g,h,n:int64;
begin
 read(n);
 for i:=1 to n do
  read(a[i],b[i],x[i],y[i]);
 read(c,p); 
 j:=0;
 repeat;
  j:=j+1;
 for g:=a[j] to a[j]+x[j] do
   for h:=b[j] to b[j]+y[j] do
    d[g,h]:=j;
 until j>=n;
 if d[c,p]=0 then write('-1') else write(d[c,p]);
end.
{RE啊！！！求大神改正}