TEXTLOAD "@.bas.CharsSub"
SAVE "@.CharsSub"
QUIT
