We can edit shoter Below: FOR I=3 TO 8 IF SPHITSP(10,I) THEN INC SIZE SPCLR I SPSCALE 10,SIZE+.5,SIZE +.5 ENDIF NEXT