NAME: SetTextBuf

     USE: Assigns an input/output buffer to a text file instead of the
          standard 128-byte text buffer. This should not be accomplished
          on a open file.

     DEPENDENCY:  None

     SYNTAX: SetTextBuf(Var FileVar : Text; Var BufferS [;size] : word);