home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast.iso / screen / bl.asm < prev    next >
Assembly Source File  |  1994-03-05  |  564b  |  24 lines
  1. ; BL - Blank the screen to REAL top line
  2. ; Programmed by Richard Gillmann (Gillmann@ISIB)
  3. rbda    segment    at 40h        ; rom bios data area
  4.     org    50h
  5. curpos    dw    ?        ; cursor posn
  6. rbda    ends
  7. cseg    segment public 'code'
  8.     assume    cs:cseg,ds:cseg
  9.     org    100h
  10. start    proc    far
  11.     mov    ax,6*256+0    ; scroll up
  12.     mov    bh,7        ; normal attribute
  13.     mov    cx,0        ; upper left corner
  14.     mov    dx,24*256+79    ; last row
  15.     int    10h        ; bios video function
  16.     mov    ax,rbda        ; rom bios data area
  17.     mov    es,ax        ; to extra seg
  18.     assume    es:rbda
  19.     mov    curpos,-256    ; set fake posn
  20.     int    20h        ; done
  21. start    endp
  22. cseg    ends
  23.     end    start
  24.