[Arton]

Всё верно, но надо добавить стоп анимации, иначе при инициализации всё будет отмотано на последний кадр.

Function iSetAnimKey( mesh, key)

    SetAnimKey( mesh, Float (key) )

    For i = 1 To CountChildren( mesh )
        iSetAnimKey( GetChild( mesh, i ), Float (key)  )
    Next

End Function

Function animateAllChilds( mesh )

    Local length% = AnimLength( mesh )

    For i = 1 To length - 1
        SetAnimTime( mesh, i, 0 )
        iSetAnimKey( mesh, i )
    Next

    For j = 1 To CountChildren( mesh )
        ent = GetChild( mesh, j )

        AddAnimSeq( ent, length )

		Animate ent,0,1,0,0

    Next

End Function