home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / CPROG / CEXPRESS.ZIP / SCREEN.ASM / CURSOFF.ASM < prev    next >
Assembly Source File  |  1989-05-03  |  649b  |  27 lines
  1. ;void  cursor_off();
  2.  
  3.     EXTRN  _memory_model:byte
  4.     EXTRN  _start_line:byte
  5.     EXTRN  _stop_line:byte
  6.  
  7. _TEXT    SEGMENT BYTE PUBLIC 'CODE'
  8.     ASSUME CS:_TEXT
  9.     PUBLIC _cursor_off
  10. _cursor_off proc near
  11.     mov  ah,3        ;func to get cursor lines
  12.     mov  bh,0        ;page 0
  13.     int  10h        ;CH=start, CL=stop
  14.     mov  _start_line,ch    ;save start_line
  15.     mov  _stop_line,cl    ;save stop_line
  16.     mov  cl,0        ;make stop_line 0
  17.     mov  ch,20        ;use too-high number for start_line
  18.     mov  ah,1        ;func to set cursor lines
  19.     int  10h        ;make cursor invisible
  20.     cmp  _memory_model,0    ;quit
  21.     jle  quit        ;
  22.     db   0CBh        ;RET far
  23. quit:    ret            ;RET near
  24. _cursor_off endp
  25. _TEXT    ENDS
  26.     END
  27.