#include <bits/stdc++.h>
using namespace std;
#define int long long
void solve(){
int n,k,a,b;
cin>>n>>k>>a>>b;
--k;
--a,--b;
vector<pair<int,int>> v(n);
for(int i=0;i<n;i++){
int x,y;
cin>>x>>y;
v[i]={x,y};
}
int x1=v[a].first,y1=v[a].second;
int x2=v[b].first,y2=v[b].second;
int m1=min(x1,x2);
int m2=max(x1,x2);
int n1=min(y1,y2);
int n2=max(y1,y2);
vector<int> t;
for(int i=0;i<n;i++){
if(i==a || i==b)continue;
int z1=v[i].first,z2=v[i].second;
cout<<z1<<" "<<z2<<endl;
cout<<m1<<" "<<m2<<" "<<n1<<" "<<n2<<endl;
if(z1>=m1 && z1<=m2 && z2>=n1 && z2<=n2 && i<=k){
t.push_back(i);
}
}
int d=0;
int m=t.size();
if(t.size()==0){
if(a<=k && b<=k){
cout<<0<<endl;
}
else{
cout<<abs(x1-x2)+abs(y1-y2)<<endl;
}
}
else{
int h1=v[t[0]].first,g1=v[t[0]].second;
int h2=v[t[m-1]].first,g2=v[t[m-1]].second;
cout<<h1<<" "<<g1<<h2<<g2<<endl;
int d1=0,d2=0;
if(a<=k && b>k){
d1=(abs(x2-h2)+abs(y2-g2));
d2=(abs(x2-h1)+abs(y2-g1));
}
else if(a>k && b<=k){
d1=(abs(x1-h2)+abs(y1-g2));
d2=(abs(x1-h1)+abs(y1-g1));
}
else if(a>k && b>k){
d1=(abs(x1-h1)+abs(y1-g1))+(abs(x2-h2)+abs(y2-g2));
d2=(abs(x1-h2)+abs(y1-g2))+(abs(x2-h1)+abs(y2-g1));
}
d+=min(d1,d2);
cout<<d<<endl;
}
}
signed main() {
// your code goes here
int t;
cin>>t;
while(t--){
solve();
}
return 0;
}
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CgojZGVmaW5lIGludCBsb25nIGxvbmcKdm9pZCBzb2x2ZSgpewoJaW50IG4sayxhLGI7CgljaW4+Pm4+Pms+PmE+PmI7CgktLWs7CgktLWEsLS1iOwoJdmVjdG9yPHBhaXI8aW50LGludD4+IHYobik7Cglmb3IoaW50IGk9MDtpPG47aSsrKXsKCQlpbnQgeCx5OwoJCWNpbj4+eD4+eTsKCQl2W2ldPXt4LHl9OwoJfQoJaW50IHgxPXZbYV0uZmlyc3QseTE9dlthXS5zZWNvbmQ7CglpbnQgeDI9dltiXS5maXJzdCx5Mj12W2JdLnNlY29uZDsKCWludCBtMT1taW4oeDEseDIpOwoJaW50IG0yPW1heCh4MSx4Mik7CglpbnQgbjE9bWluKHkxLHkyKTsKCWludCBuMj1tYXgoeTEseTIpOwoJdmVjdG9yPGludD4gdDsKCWZvcihpbnQgaT0wO2k8bjtpKyspewoJCWlmKGk9PWEgfHwgaT09Yiljb250aW51ZTsKCQlpbnQgejE9dltpXS5maXJzdCx6Mj12W2ldLnNlY29uZDsKCQljb3V0PDx6MTw8IiAiPDx6Mjw8ZW5kbDsKCQljb3V0PDxtMTw8IiAiPDxtMjw8IiAiPDxuMTw8IiAiPDxuMjw8ZW5kbDsKCQlpZih6MT49bTEgJiYgejE8PW0yICYmIHoyPj1uMSAmJiB6Mjw9bjIgJiYgaTw9ayl7CgkJCXQucHVzaF9iYWNrKGkpOwoJCX0KCX0KCWludCBkPTA7CglpbnQgbT10LnNpemUoKTsKCWlmKHQuc2l6ZSgpPT0wKXsKCQlpZihhPD1rICYmIGI8PWspewoJCQljb3V0PDwwPDxlbmRsOwoJCX0KCQllbHNlewoJCQljb3V0PDxhYnMoeDEteDIpK2Ficyh5MS15Mik8PGVuZGw7CgkJfQoJCQoJfQoJZWxzZXsKCQlpbnQgaDE9dlt0WzBdXS5maXJzdCxnMT12W3RbMF1dLnNlY29uZDsKCQlpbnQgaDI9dlt0W20tMV1dLmZpcnN0LGcyPXZbdFttLTFdXS5zZWNvbmQ7CgkJY291dDw8aDE8PCIgIjw8ZzE8PGgyPDxnMjw8ZW5kbDsKCQlpbnQgZDE9MCxkMj0wOwoJCWlmKGE8PWsgJiYgYj5rKXsKCQkJZDE9KGFicyh4Mi1oMikrYWJzKHkyLWcyKSk7CgkJCWQyPShhYnMoeDItaDEpK2Ficyh5Mi1nMSkpOwoJCX0KCQllbHNlIGlmKGE+ayAmJiBiPD1rKXsKCQkJZDE9KGFicyh4MS1oMikrYWJzKHkxLWcyKSk7CgkJCWQyPShhYnMoeDEtaDEpK2Ficyh5MS1nMSkpOwoJCX0KCQllbHNlIGlmKGE+ayAmJiBiPmspewoJCQlkMT0oYWJzKHgxLWgxKSthYnMoeTEtZzEpKSsoYWJzKHgyLWgyKSthYnMoeTItZzIpKTsKCQkJZDI9KGFicyh4MS1oMikrYWJzKHkxLWcyKSkrKGFicyh4Mi1oMSkrYWJzKHkyLWcxKSk7CgkJfQoJCWQrPW1pbihkMSxkMik7CgkJY291dDw8ZDw8ZW5kbDsKCX0KCgkKfQpzaWduZWQgbWFpbigpIHsKCS8vIHlvdXIgY29kZSBnb2VzIGhlcmUKCWludCB0OwoJY2luPj50OwoJd2hpbGUodC0tKXsKCQlzb2x2ZSgpOwoJfQoJcmV0dXJuIDA7Cn0=