var entityspeedx, entityspeedy, entitydirx, entitydiry, accel
entityspeedx = 0
entityspeedy = 0
entitydirx = 0
entitydiry = 0
accel = 0
switch (keyboard_key)
{
case ord("A"):
entityspeedx = -4;
break;
case ord("D"):
entityspeedx = 4;
break;
case ord("W"):
entityspeedy = -4;
break;
case ord("S"):
entityspeedy = 4;
break;
}
if keyboard_check_pressed(vk_shift)
{accel= 1};
else;
if keyboard_check_pressed(vk_space)
{accel=4};
else; if keyboard_check_released(vk_shift) && keyboard_check_released(vk_space)
{accel =2}
if global.PauseBool != 0 {
entitydirx = entityspeedx * global.PauseBool * accel;
entitydiry = entityspeedy * global.PauseBool * accel;
}
repeat (abs(entitydirx))
if (place_meeting(x + sign(entitydirx), y, obj_bloque))
{entitydirx = 0}
else x= x+sign(entitydirx);
repeat (abs(entitydiry))
if (place_meeting(x, y + sign(entitydiry), obj_bloque))
{entitydiry = 0}
else y = y+sign(entitydiry);
depth= -room_height - y