TEXTLOAD "@.bas.ShareFS"
SAVE "@.ShareFS"
QUIT
