Хм, Maestro, есть такая вешь как перебор всего класса:
Type Class
Field Entity
Field Texture
Field Frame
End Type
For c.Class=Each Class
c\Frame=c\Frame+1
EntityTexture c\Entity,c\Texture,c\Frame
If c\Frame>10
FreeEntity c\Entity
Delete c
Endif
Next
Тут мы перебираем Все эллементы, и добовляем к кажру 1, и накладываем текстуру с новым кадром, и если кадр больше 10 то удаляем кубик и эллемент.
Читай Хелп, и бери на практику простые работы с Классами, т.к. ты толком и сам блиц не знаешь, и работу с Классами и Функциями, сперва тебе лучше изучить эти две важнейших частей кодинга.