add scrnfill.bas