home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / DRAWFLD.ZIP / DRWFIELD.INC < prev    next >
Encoding:
Text File  |  1986-05-07  |  729 b   |  12 lines
  1. {----------------------------------------------------------------------------}
  2. { DRAWFIELD:                                                                 }
  3. {     ROW, COLUMN = start position of field                                  }
  4. {     SIZE = # of screen positions to set                                    }
  5. {     ATTRIB = Attribute of field to draw                                    }
  6. { Note: This does NOT change the characters appearing in the "field" -- just }
  7. {       the COLOR of the BACKGROUND and FOREGROUND!                          }
  8. {----------------------------------------------------------------------------}
  9. procedure Draw_Field(Row,Column,Size,Attrib : integer);
  10.    external 'DRWFIELD.BIN';
  11.  
  12.