Try something like: ACLS GPAGE 0,4 GFILL 0,0,15,15,0 GBOX 0,0,7,7,&HFFFF8000 GPAGE 0,0 SPSET 0,0,0,8,8 REPEAT X=X+1 Y=Y+.2 VSYNC 1 UNTIL X>391