EM=10 DIM EX[EM],EY[EM] FOR I=1 TO EM SPSET I,[sprite character] SPOFS I,I*32,32 NEXT