TEXTLOAD "@.bas.BinInit"
SAVE "@.BinInit"
QUIT
