Create factor.bas