TEXTLOAD "@.bas.ModulesSub"
SAVE "@.ModulesSub"
QUIT
