Дык у тебя анимация все время с начала прокручивается. Понимаешь команда animate не "прокручивается" в цикле, она просто включает нужную анимацию.
A#=1
modelka = LoadAnimMesh("Model.b3d")
PositionEntity modelka,50,150,-40
ExtractAnimSeq(modelka,1,15)
While Not KeyDown(1)
If A#=1 Then Animate modelka, 1, 0, 1 : A#=2
|