DrawBar()

         Draws a 3D bar

    Syntax:

         DrawBar( nX, nY, nHigh, nWide, nShadowLen, ;
                  nColor, nShadowColor, lDelimiter, nTypeBar ) -> Nil

         nX           : Coordinate X
         nY           : Coordinate Y
         nHigh        : The height of the bar
         nWide        : The width of the bar
         nShadowLen   : The size of the shadow
         nColor       : The color of bar
         nShadowColor : The color of shadow
         lDelimiter   : A logic value indicating if you want draw lines
                        delimiting the bar
         nTypeBar     : Bar Type
                          0 : Default, normal bar
                          1 : top pyramidal bar
                          2 : bottom pyramidal bar
                          3 : cylindric bar

    Description:

         Draws a 3D bar in graphic mode.

         This function is used by Graph*() functions in FAST.lib.
         In this way, with this function and BackGraph() you can build
         your graphics.

    Return:

         Nothing.

    Example:

         SetVGA()
         DrawBar( 100, 300, 150, 20, 10, 3, 11, .F. )
         Inkey( 0 )
         TxtMode()