SYNTAX        VHA_MSG(P1,P2,P3,P4,P5,P6)

PURPOSE       Shows message

ARGUMENTS     P1 - CHARACTER of ARRAY (characters)
                 - MANDATORY
                 - message text

              P2 - NUMERIC
                 - OPTIONAL
                 - DEFAULT: 4
                 - duration of display
                    0 = till key is pressed
                   <0 = permanent
                   >0 = number of seconds or key pressure

              P3 - NUMERIC
                 - OPTIONAL
                 - DEFAULT: public variable MSG_REG
                 - upper line of window

              P4 - NUMERIC
                 - OPTIONAL
                 - DEFAULT: public variable MSG_COL
                 - left column of window

              P5 - NUMERIC
                 - OPTIONAL
                 - DEFAULT: public variable MSG_BORDER
                 - kind of border of window
                   see VHA_BOX() for values

              P6 - CHARACTER
                 - OPTIONAL
                 - DEFAULT: standard color value CL_MESSAGE
                 - color

RETURNS       NIL