Код
// ускорение можно реализовать так:
spd = 6;
if (keyboard_check(vk_shift)) spd *= 1.5;
// или вот так:
spd = 6 + keyboard_check(vk_shift) * 3;
// перемещение
if (keyboard_check(ord('W'))) y -= spd;
if (keyboard_check(ord('S'))) y += spd;
if (keyboard_check(ord('A'))) x -= spd;
if (keyboard_check(ord('D'))) x += spd;