{Name : Ceanga Andrei

School Name : "Dr. I. Mesota" National College

School Code : 7156

Division : Senior 3

Contest : #4

}

program pathways;

uses crt;

const xx:array[1..8] of -1..1 = (-1,-1,-1, 0,0, 1,1,1);

yy:array[1..8] of -1..1 = (-1, 0, 1,-1,1,-1,0,1);

var a,b:array[1..100,1..100] of integer;

i,j,k,l,n,nr,x,y,x1,y1:integer;

f:text;

begin

clrscr;

assign(f,'input.txt');

reset(f);

n:=0;

nr:=0;

repeat

read(f,x,y);

if (x<>0) and (y<>0) then

begin

a[x,y]:=-1;

if x>n then n:=x;

if y>n then n:=y;

inc(nr);

end;

until (x=0) and (y=0);

readln(f);

for l:=1 to 5 do

begin

readln(f,x,y,x1,y1);

b:=a;

b[x,y]:=1;

k:=0;

while (b[x1,y1]=-1) and (k<=nr) do

begin

inc(k);

for x:=1 to n do

for y:=1 to n do

if b[x,y]=k then

for i:=1 to 8 do

if b[x+xx[i],y+yy[i]]=-1 then b[x+xx[i],y+yy[i]]:=b[x,y]+1;

end;

if b[x1,y1]=-1 then writeln('NONE')

else writeln(b[x1,y1]-1);

end;

close(f);

readln;

end.