FT_DEFAULT()
 Retrieve and optionally change the current default drive
──────────────────────────────────────────────────────────────────────────────

 Syntax

     FT_DEFAULT( [ <cDrive> ] ) -> cDrive

 Arguments

    <cDrive> is optional, and if specified is the new default drive.

 Returns

    The current default drive.  If a change of default drive is requested,
    the return value is the drive AFTER the change is made.  This allows
    you to make sure you specified a valid drive (i.e. if you attempt to
    change the default drive, and the function returns a different drive
    letter than the one you specified, then the drive does not exist).

 Description

    Useful any time you need to know or change the default drive.

    The source code is written to adhere to Turbo Assembler's IDEAL mode.
    To use another assembler, you will need to rearrange the PROC and
    SEGMENT directives, and also the ENDP and ENDS directives (a very
    minor task).

 Examples

    cDrive := FT_DEFAULT()  && Get the current drive
    FT_DEFAULT("C")         && Switch to drive C

    IF FT_DEFAULT("E") != "E"
       Qout( "Drive E does not exist!" )
    ENDIF

 Source: DEFAULT.ASM

 Author: Ted Means