// Evol scripts.
// Authors:
//    4144, Reid
// Description:
//    Doors warp and animations in map 001-1
//

001-1,55,71,0	script	#Door1	906,1,1,{
    close;

OnTouchFirst:
    setnpcdir 2;
    stopnpctimer;
    initnpctimer;
    close;

OnUnTouchAll:
    setnpcdir 4;
    initnpctimer;
    startnpctimer;
    close;

OnTouchCenter:
    warp "001-2-0", 37, 45;
    close;

OnTimer340:
    stopnpctimer;
    if (getnpcdir ("") == 2) setnpcdir 6;
    if (getnpcdir ("") == 4) setnpcdir 8;
    end;
}

001-1,51,65,0	script	#Door2	906,1,1,{
    close;

OnTouchFirst:
    setnpcdir 2;
    stopnpctimer;
    initnpctimer;
    close;

OnUnTouchAll:
    setnpcdir 4;
    initnpctimer;
    startnpctimer;
    close;

OnTouchCenter:
    warp "001-2-0", 30, 34;
    close;

OnTimer340:
    stopnpctimer;
    if (getnpcdir ("") == 2) setnpcdir 6;
    if (getnpcdir ("") == 4) setnpcdir 8;
    end;
}

001-1,69,77,0	script	#Door3	906,1,1,{
    close;

OnTouchFirst:
    setnpcdir 2;
    stopnpctimer;
    initnpctimer;
    close;

OnUnTouchAll:
    setnpcdir 4;
    initnpctimer;
    startnpctimer;
    close;

OnTouchCenter:
    warp "001-2-2", 38, 38;
    close;

OnTimer340:
    stopnpctimer;
    if (getnpcdir ("") == 2) setnpcdir 6;
    if (getnpcdir ("") == 4) setnpcdir 8;
    end;
}


001-1,51,80,0	script	#Door4	906,1,1,{
    close;

OnTouchFirst:
    setnpcdir 2;
    stopnpctimer;
    initnpctimer;
    close;

OnUnTouchAll:
    setnpcdir 4;
    initnpctimer;
    startnpctimer;
    close;

OnTouchCenter:
    warp "001-2-4", 48, 40;
    close;

OnTimer340:
    stopnpctimer;
    if (getnpcdir ("") == 2) setnpcdir 6;
    if (getnpcdir ("") == 4) setnpcdir 8;
    end;
}