#include <iostream>
#include<string>
#include<cmath>
#include<algorithm>
#include<cctype>
#include<queue>
#include<deque>
#include<regex>
#include<stack>
#include<stdio.h>
#include<vector>
#include<set>
#include<map>
#include<iomanip>

#define rep(i, n) for(int i=0;i<n;i++)

typedef int long long ll;
using namespace std;
typedef pair<int, int> P;
int dx[4] = {1, 0, -1, 0};
int dy[4] = {0, 1, 0, -1};
const ll MOD = 1e9 + 7;
static const int MAX = 100;
static const int INF = (1 << 23);

int main() {
int n,m,t,p;
while(true) {
    cin >> n >> m >> t >> p;
    if(n+m+t+p==0)break;
    int ori[100][100];
    rep(i,100){rep(j,100)ori[i][j]=0;}
    rep(i,n){rep(j,m)ori[j][i]=1;}

    int sx=0;
    int sy=0;

    rep(i,t){
        int d,c;
        cin>>d>>c;
        if(d==1){
            for(int y=sy;y<m;y++){
                int xi=sx+c;
                for(int x=(sx+c-1);x>=sx;x--){
                    ori[y][xi]+=ori[y][x];
                    ori[y][x]=0;
                    xi++;
                }
            }
            int presx=sx;
            sx+=c;
            if(n-presx-c<c){
                int hami=presx+(2*c)-n;
                for(int x=sx;x<n+hami;x++){
                    for(int y=sy;y<m;y++){
                        ori[y][x-hami]=ori[y][x];
                    }
                }
                for(int x=n;x<n+hami;x++){
                    for(int y=sy;y<m;y++){
                        ori[y][x]=0;
                    }
                }
                sx-=hami;
            }


        }else{
            for(int x=sx;x<n;x++){
                int yi=sy+c;
                for(int y=(sy+c-1);y>=sy;y--){
                    ori[yi][x]+=ori[y][x];
                    ori[y][x]=0;
                    yi++;
                }
            }
            int presy=sy;
            sy+=c;
            if(m-presy-c<c){
                int hami=presy+2*c-m;
                for(int y=sy;y<m+hami;y++){
                    for(int x=sx;x<n;x++){
                        ori[y-hami][x]=ori[y][x];
                    }
                }
                for(int y=m;y<m+hami;y++){
                    for(int x=sx;x<n;x++){
                        ori[y][x]=0;
                    }
                }
                sy-=hami;
            }
        }
//        for(int j=m-1;j>=0;j--) {
//            for (int i = 0; i < n; i++) {
//                cout << ori[j][i];
//            }
//            cout << endl;
//        }
//        cout<<sx<<" "<<sy<<endl;
    }


    rep(i,p){
        int x,y;
        cin>>x>>y;
        cout<<ori[sy+y][sx+x]<<endl;
    }

}





    return 0;
}

