home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol202 / vidb.mac < prev    next >
Encoding:
Text File  |  1984-12-19  |  633 b   |  41 lines
  1. ;
  2. ; VLIB Module Name:  VIDB
  3. ; Author:  Richard Conn
  4. ; VLIB  Version Number:  1.0
  5. ; Module Version Number:  1.0
  6. ; Module Entry Points:
  7. ;    Z3VINIT    VIDINIT    VIDPTR
  8. ; Module External References:
  9. ;    ENVPTR
  10. ;
  11.     ext    envptr
  12.  
  13. ;
  14. ;  Z3VINIT - Set ptr to ZCPR3 Environment and Z3TCAP
  15. ;    On input, HL pts to ZCPR3 Environment Descriptor
  16. ;
  17. z3vinit::
  18.     push    h    ;save HL
  19.     shld    envptr
  20.     lxi    d,80H    ;80H bytes later ...
  21.     dad    d
  22.     shld    vidptr    ;set Z3TCAP pointer
  23.     pop    h    ;restore HL
  24.     ret
  25.  
  26. ;
  27. ;  VIDINIT - Set ptr to Z3TCAP
  28. ;    On input, HL pts to Z3TCAP
  29. ;
  30. vidinit::
  31.     shld    vidptr    ;set ptr
  32.     ret
  33.  
  34. ;
  35. ;  Termcap Pointer
  36. ;
  37. vidptr::
  38.     ds    2    ;first byte of termcap entry
  39.  
  40.     end
  41.