Click above to get retro games delivered to your door ever month!

  WIBAR()                                                    Screen Function
 Purpose..: Draw a vertical crossbar in a window
-----------------------------------------------------------------------------
 Syntax...: wIBar( [<uWin>], [<nCol>], [<nBar> [,
                    <nChrT> [, <nChrB>[, <cClr> ]]]] ) --> NIL

 Arguments: [<uWin>] = the string identifier of the window
                       OR the reference to the window structure
                       returned as an array by wNew() or wArray().
                       If not passed, the function will operate on
                       the window in focus.

            [<nCol>] = Column to start "I-bar" (default is 0).
            [<nBar>] = Cross bar piece (default is 1).
            [<nChrT>]= Top row end piece (default is 1).
            [<nChrB>]= Bottom row end piece (default is 1).

                       Cross Bar & Row End
                       -------------------------
                       Value  Description
                       -------------------------
                       1      Single line.
                       2      Double line.
                       3      Thick single line.
                       -------------------------

            [<cClr>] = window frame color. If not
                        specified, the window will default to the
                        setcolor() color.

 Returns..: NIL

 Remark...: Draw an "I" type bar in the window between the two edges.

            The function works whether the window is open or not.

            As with all FreshWin window functions that alter the display,
            this function automatically hides and redisplays the mouse
            cursor if it is active.

 Source...: WBAR.PRG
-------------------------------------------------------------------------------
 Example..: Draws an I type bar in a window

               wOpen( "Text" )
               wIBar( , 1, 1, 2, 2 )

               +----------------+
               | |              |
               | |              |
               | |              |
               +----------------+