'если выбран кейс 0 (он по умолчанию выбран)
if ControlEngine=0 then
Сдвиг спрайта=СТОП.
если нажал ВНИЗ то ControlEngine=1
если нажал ВВЕРХ то ControlEngine=2
если нажал ВЛЕВО то ControlEngine=3
если нажал ВПРАВО то ControlEngine=4
end if

'если выбран кейс 1
if ControlEngine=1 then
Сдвиг спрайта=ВНИЗ.
если нажал ВНИЗ то ControlEngine=1
если нажал ВВЕРХ то ControlEngine=2
если нажал ВЛЕВО то ControlEngine=3
если нажал ВПРАВО то ControlEngine=4
end if

'если выбран кейс 2
if ControlEngine=2 then
Сдвиг спрайта=ВВЕРХ.
если нажал ВНИЗ то ControlEngine=1
если нажал ВВЕРХ то ControlEngine=2
если нажал ВЛЕВО то ControlEngine=3
если нажал ВПРАВО то ControlEngine=4
end if

'если выбран кейс 3
if ControlEngine=3 then
Сдвиг спрайта=ВЛЕВО.
если нажал ВНИЗ то ControlEngine=1
если нажал ВВЕРХ то ControlEngine=2
если нажал ВЛЕВО то ControlEngine=3
если нажал ВПРАВО то ControlEngine=4
end if

'если выбран кейс 4
if ControlEngine=4 then
Сдвиг спрайта=ВПРАВО.
если нажал ВНИЗ то ControlEngine=1
если нажал ВВЕРХ то ControlEngine=2
если нажал ВЛЕВО то ControlEngine=3
если нажал ВПРАВО то ControlEngine=4
end if

    Select Case 5
  Case 0:
   locate 1,15: print "0"
  Exit Select
  Case 1:
   locate 1,15: print "1"
  Exit Select
  Case 2:
   locate 1,12: print "2"
  Exit Select
  Case 3:
   locate 1,15: print "3"
  Exit Select
  Case 4:
   locate 1,15: print "4"
  Exit Select
  Case 5:
   locate 1,15: print "5"
  Exit Select
    End Select

{
switch (keyboard_key)
    {
    case vk_left: // Если игрок нажал стрелку влево
//    case ord("A"): // Если игрок нажал стрелку A
    x-=3
    direction=180
       break;
    case vk_right: // Если игрок нажал стрелку вправо
//    case ord("D"): // Если игрок нажал стрелку D
    x+=3
    direction=0
       break;
    case vk_up: // Если игрок нажал стрелку вверх
//    case ord("W"): // Если игрок нажал стрелку W
    y-=3
    direction=90
       break;
    case vk_down: // Если игрок нажал стрелку вниз
//    case ord("S"): // Если игрок нажал стрелку S
    y+=3
    direction=-90
       break;
    }
}