Get the name of the floppy drive on a single floppy system.
------------------------------------------------------------------------------

 Syntax

        GT_FlopNam() --> cFloppyName

 Arguments:

      None.

 Returns:

      Name of the floppy drive on a single floppy system.

 Description:

      GT_FlopNam() can be used to get the name of the floppy drive on
      single floppy drive systems.

      Some systems have just one floppy drive that can ``act'' as either
      drive A: or B:. If your system attempts to access either of these
      drives while it is ``acting'' as the other, DOS will display a
      message in screen asking the user to place the disk in the drive
      and press any key.

      Use GT_FlopCnt() to see if this could be a problem. If the machine
      has only one floppy drive, use GT_FlopNam() to see if the floppy
      drive is acting as A: or B:.

 Examples:

      // This example function will copy a file to the floppy drive.
      // Before doing so it checks that the name of the drive is ok.

      function CopyToFloppy(cFileName)
      local cFloppy := "A:"
      if GT_FlopCnt() == 1
         cFloppy := GT_FlopNam()+":"
      endif
      copy (cFileName) to (cFloppy+cFileName)
      return(NIL)

 Source: FLOPNAME.C

 Author:  Dave Pearson