//HowToMakeAnMMORPG.com
//the ultimate resource

//function: process player input (movement)

//Stop player from going outside of the room
if (x < 32 || x > room_width - 32 || y < 32 || y > room_height - 32) {
    x = room_width / 2;
    y = room_height / 2;
    scr_move(200);
    exit;
}

//Keypresses
if (global.chatting == false) {
    if((keyboard_check_pressed(ord("W")) || keyboard_check_pressed(ord("A")) || keyboard_check_pressed(ord("S")) || keyboard_check_pressed(ord("D"))) || (keyboard_check_released(ord("W"))) || (keyboard_check_released(ord("A"))) || (keyboard_check_released(ord("S"))) || (keyboard_check_released(ord("D"))))
    {
        //DownRight
        if (keyboard_check(ord("S")) && (keyboard_check(ord("D"))))
        {
            scr_move(5);
        }
        //UpLeft
        else if (keyboard_check(ord("W")) && (keyboard_check(ord("A"))))
        {
            scr_move(8);
        }
        //UpRight
        else if (keyboard_check(ord("W")) && (keyboard_check(ord("D"))))
        {
            scr_move(7);
        }
        //DownLeft
        else if (keyboard_check(ord("S")) && (keyboard_check(ord("D"))))
        {
            scr_move(6)
        }
        //Left
        else if (keyboard_check(ord("D")))
        {
            scr_move(1);
        }
        //Up
        else if (keyboard_check(ord("W")))
        {
            scr_move(2);
        }
        //Right
        else if (keyboard_check(ord("A")))
        {
            scr_move(3);
        }
        //Down
        else if (keyboard_check(ord("S")))
        {
            scr_move(4)
        }
        else
        {
            scr_move(200);
        }
    }
}

if (speed != 0) then dir = direction;

//Stop cases
//if (keyboard_check(ord("D")) == false && hspeed = spd) then scr_move(200);
//if (keyboard_check(ord("W")) == false && vspeed = -spd) then scr_move(200);
//if (keyboard_check(ord("A")) == false && hspeed = -spd) then scr_move(200);
//if (keyboard_check(ord("S")) == false && vspeed = spd) then scr_move(200);

if (speed == 0) then exit;

/*
if ((keyboard_check_released(ord("D")) || keyboard_check_released(ord("W")) || keyboard_check_released(ord("A")) || keyboard_check_released(ord("S"))) == true)
{
    if ((keyboard_check(ord("D")) || keyboard_check(ord("W")) || keyboard_check(ord("A")) || keyboard_check(ord("S"))) == false)
    {
        scr_move(200);
    }
}
*/