home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l200 / 6.ddi / LIB / CLS.C < prev    next >
Encoding:
C/C++ Source or Header  |  1986-09-08  |  666 b   |  35 lines
  1. /*    CLS() -- clear screen
  2.  
  3.         Copyright (c) 1983  by  JMI Software Consultants, Inc.
  4.  */
  5.  
  6. #include "bio.h"
  7. #include "host.h"
  8.  
  9. /* This function requires DOS 2.0 and DEVICE=ANSI.SYS
  10.  */
  11. VOID CLS()
  12.     {
  13.     IMPORT BF **bfiles;
  14.     INTERN TEXT s[] = {'\033', '[', '2', 'J', '$'};
  15.  
  16.     bdos(9, s);
  17.     bfiles[1]->bf_col = 1;
  18.     }
  19.  
  20. /* This function requires BIOS interrupt 0x10 VIDEO IO
  21.  */
  22. /*
  23. VOID CLS()
  24.     {
  25.     IMPORT BF **bfiles;
  26.     INTERN REGVAL scroll = {0x0600, 0x0700, 0x0000, 0x184F, 0x0000};
  27.     INTERN REGVAL home   = {0x0200, 0x0000, 0x0000, 0x0000, 0x0000};
  28.     REGVAL r;
  29.  
  30.     int86(0x10, &scroll, &r);
  31.     int86(0x10, &home, &r);
  32.     bfiles[1]->bf_col = 1;
  33.     }
  34. */
  35.