[H@NON]

функция должна быть рекурсивной, чтобы охватить все чилды :

Function EntityAnimTexture(ent, tex, frame=0, index=0)
    If EntityClass$(ent)="Mesh"
        EntityTexture(ent, tex, frame, index)
    EndIf
    For i=1 To CountChildren(ent)
        ww=GetChild(ent,i)
        EntityAnimTexture(ww, tex, frame, index)
    Next
End Function