Х-хы, проблемма мягко говоря классическая!
))
Открою ужасную тайну: анимация не останавливается, она просто бесконечно начинается сначала и в итоге ты видишь лишь ёё первый кадр. Введи переменную, которая будет "помнить", а не запускал ли ты уже эту анимацию?
Простейший пример:
If KeyHit(200) Or KeyHit(208) Then
* If Move=0 Then
* * *Animate pers,1,.5, xod
* * *Move=1
* EndIf
Else
* *If Move=1 Then
* * *Animate pers,1,.5, stops
* * *Move=0
* EndIf
EndIf
А еще инженерно-компьютерный гений товарисча Марка подарил нам функции Animating и AnimSeq, разумно используя которые можно сделать в этой области ой как много.
P.S. Кстати, ты случаем не родственник нашего Impersonalis-а? Просто однофамилец?
))