home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / GRLF-C-2.ZIP / GFUNC / FONT8X8.ASM < prev    next >
Encoding:
Assembly Source File  |  1990-05-30  |  740 b   |  45 lines
  1.         page    58,132
  2.  
  3. ;/*
  4. ;** font8x8.asm
  5. ;** contains: font8x8()
  6. ;*/
  7.         ifndef    _LCODE
  8.          include model.h
  9.         endif
  10.         include prologue.h
  11.         name    vidtype
  12.  
  13. VIDEOINT    equ    010h            ;Video software interrupt #
  14.  
  15.         pseg    cfont8x8
  16.  
  17. ;/*
  18. ;**  void
  19. ;** font8x8(void)
  20. ;**
  21. ;** ARGUMENT(s)
  22. ;**  none
  23. ;**
  24. ;** DESCRIPTION
  25. ;**  Sets small (8x8) font.  This allows 43 lines to be displayed on an EGA and
  26. ;**  50 lines to be displayed on a VGA.
  27. ;**
  28. ;** RETURNS
  29. ;**  void
  30. ;**
  31. ;** AUTHOR
  32. ;**  ""   Wed 07-Dec-1988    11:15:14
  33. ;**   Copyright (C)1988-1990 Greenleaf Software Inc. All Rights Reserved.
  34. ;**
  35. ;** MODIFICATIONS
  36. ;**
  37. ;*/
  38.         cproc    font8x8
  39.         mov    ax,1112h        ;set 8x8 font function
  40.         xor    bl,bl
  41.         int    VIDEOINT
  42.         cproce
  43.         endps
  44.         end
  45.