If KeyDown(203) Then
nado = 3 ; 3 - бежать
If MilliSecs() > frameTime + 100 Then
frameTime = MilliSecs()
framel = ( framel + 1 ) Mod 3; 3 - количество кадров
End If
DrawImage pein_runl, x, y, framel
x = x - 4
Else
nado = 10
EndIf
If KeyDown(205) Then
nado = 1 ; 1 - бежать
If MilliSecs() > frameTimel + 100 Then
frameTimel = MilliSecs()
frame = ( frame + 1 ) Mod 3; 3 - количество кадров
End If
DrawImage pein_run, x, y, frame
x = x + 4
Else
nado = 0 ; 0 - стоять на месте
EndIf
изменить на
If KeyDown(203) Then
nado = 3 ; 3 - бежать
If MilliSecs() > frameTime + 100 Then
frameTime = MilliSecs()
framel = ( framel + 1 ) Mod 3; 3 - количество кадров
End If
DrawImage pein_runl, x, y, framel
x = x - 4
Else If KeyDown(205) Then
nado = 1 ; 1 - бежать
If MilliSecs() > frameTimel + 100 Then
frameTimel = MilliSecs()
frame = ( frame + 1 ) Mod 3; 3 - количество кадров
End If
DrawImage pein_run, x, y, frame
x = x + 4
Else
if nado = 1
nado = 0 ; 0 - стоять на месте
else if nado = 3
nado = 10
end if
EndIf
Что я сделал? Банально объединил два твоих условия на клавиши 203 и 205. Твоё условие на клавишу 203 попросту не срабатывало из за следующего отдельного от него условия клавиши 205. Банальность, а просидеть над этим можно долго при большом коде(по себе знаю
)
зыЖ привыкай сразу структурировать код (хотя бы как у меня, просто каждый подуровень на 4 пробела отодвигать), иначе потом запутаешься в коде из за его нечитаемости.