Выдает ошибку на вот этой строчке
DrawImage peinr,x,y
Graphics 800,600
SetBuffer BackBuffer()
Global x = 300
Global y = 300
Global pein = LoadImage("pein.bmp")
Global peinr = LoadImage("pein_run.gif")
While Not KeyDown(1)
Cls
DrawImage pein,x,y
If KeyDown(200) Then
y = y - 1
EndIf
If KeyDown(208) Then
y = y + 1
EndIf
If KeyDown(203) Then
x = x - 1
EndIf
If KeyDown(205) Then
x = x + 1
DrawImage peinr,x,y
EndIf
Flip
Wend
End