int pascal VidFrame(int row1, int col1, int row2, int col2, WORD attr, 
                     int type)

  This function draws a frame around a specified area.

Parameters
  row1, col1, row2, and col2 are the 0-based coordinates of the area.
  attr is the color attributes of the frame.
  type is 0 for a single-line frame, 1 for a double-line frame, 2 for
   a frame consisting of dashes and vertical bars.

Returns
  Nothing.