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

  Name:     m_display() - display a centered message on the screen
  Usage:    m_display(<message>,[<color>])
  Params:   string <message> - the message to display, should not
            be longer than 70 characters
            integer <color> - the color to use for the message.
            If this parameter is left off, then the standard
            Clipper foreground color is used.

  Returns:  nothing

 ---------------------------------- Example ---------------------------------

                 if ! (isdrive("A:"))
                      tempscrn = savescreen()
                      m_display("Drive A: not ready")
                      restscreen(tempscreen)
                 else
                      use a:phones index a:names
                 endif

  Mouse Data:

            The following Mouse Messages are observed: m_data(22) -
            auto save screen, m_data(16) - shadow type, m_data(17) -
            shadow color, m_frame() - frame chars to use for the box
            border.

  Note:     M_display() displays the message in a window centered on
            the screen. It also displays the word OK in a highlighted box.
            It then waits for a keypress or a button click before it
            returns. The sample Clipper source code is available for your
            modification on the source disk in the file c_m_disp.prg.