home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / TURBOPAS / TUR6_101.ZIP / V20.ASM < prev    next >
Encoding:
Assembly Source File  |  1986-06-07  |  1.7 KB  |  28 lines

  1. ;--------------------------------------------------------------------
  2. ; Author       : Kevin Dahl                                         :
  3. ; Last Revised : June 7, 1986                                       :
  4. ;                                                                   :
  5. ; FILENAME - V20.ENH                                                :
  6. ;                                                                   :
  7. ; SETCURSORSIZE                                                     :
  8. ;        Set the starting and ending scan lines for the cursor      :
  9. ;                                                                   :
  10. ; ENTRY                                                             :
  11. ;        [bp+4] = start scan line                                   :
  12. ;        [bp+6] = ending scan line                                  :
  13. ;                                                                   :
  14. ; EXIT                                                              :
  15. ;        Nothing is returned                                        :
  16. ;--------------------------------------------------------------------
  17. setcursorsize proc      near
  18.               push      bp                       ; save stack
  19.               mov       bp,sp
  20.               mov       ah,1                     ; set cursor information
  21.               mov       ch,[bp+4]                ; start scan line
  22.               mov       cl,[bp+6]                ; end scan line
  23.               int       10h                      ; use BIOS services
  24.               mov       sp,bp                    ; restore stack
  25.               pop       bp
  26.               ret       4                        ; remove params from stack
  27. setcursorsize endp
  28.