G=32//создаем сетку 32х32
S=4//устанавливаем скорость

if !place_snapped(G,G) //если герой находится вне сетки
{  
move_snap(G,G)  //идет в сетку
}

image_speed=0 //чтобы герой не двигался

if place_snapped(G,G){  
speed=0//остановка игрока

if keyboard_check(vk_left) {  
motion_set(180,S)//шагаем налево со скоростью S  
image_index=spr_player*3  //меняем спрайт
}

if keyboard_check(vk_right) {  
motion_set(0,S)//шагаем направо со скоростью S  
image_index=spr_player*1 //меняем спрайт
}

if keyboard_check(vk_down)  {  
motion_set(270,S)//шагаем вниз со скоростью S  
image_index=spr_player*0 //меняем спрайт
}

if keyboard_check(vk_up) {  
motion_set(90,S)//шагаем наверх со скоростью S  
image_index=spr_player*2 //меняем спрайт
}  
}

в step:
image_angle = direction-90 //разворачиваем спрайт
if keyboard_check(vk_left){direction += 5}  //поворот влево
if keyboard_check(vk_right){direction -= 5} //поворот вправо
if keyboard_check(vk_up){
if (speed < 5) //максимальная скорость
{  
speed += 0.1 //ускоряемся
}
}
if keyboard_check(vk_down){
if (speed > 0) //минимальная скорость
{  
speed -= 0.1 //тормозим
}  
}

health =100

draw_healthbar(view_xview[0]+5, view_yview[0]+5, view_xview[0]+100, view_yview[0]+10, health, c_black, c_red, c_lime, o_player, 0, 1//разбираем  
draw_healthbar-рисуем хелсбар(view_xview[0]+5, view_yview[0]+5, view_xview[0]+100, view_yview[0]+10,-крайние точки нашей линейки
health-переменная,отвечающая за линейку;c_black, c_red, c_lime,-цвета хелсбара: цвет фона-черный,при минимальном значении переменной-красный,и при максимальном-лаймовый
o_player-объект,за которым следим;0-рисовать ли фон;на что влияет последняя цифра,я так и не понял)