Frame#=Frame+0.1 ;флоатом его, флоатом! IF Frame>NFrames Then Frame=0 DrawImage image,x,y,Int(Frame) ;можно и без Инта