home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / QBAS / WNDTOOL5.ZIP / INT86.ASM < prev    next >
Assembly Source File  |  1988-10-24  |  1KB  |  54 lines
  1. ;TITLE: int86
  2.  
  3. BASIC_SETUP MACRO
  4.               PUSH    BP
  5.               MOV     BP,SP
  6.               PUSH    SI
  7.               PUSH    DI
  8.               PUSH    DS
  9.               PUSH    ES
  10.               ENDM
  11.  
  12. BASIC_CLEANUP MACRO
  13.               POP     ES
  14.               POP     DS
  15.               POP     DI
  16.               POP     SI
  17.               POP     BP
  18.               ENDM
  19.  
  20. ;
  21. ;CODE      SEGMENT BYTE PUBLIC ;CODE;
  22. ;          ASSUME CS:CODE
  23.  
  24.         DOSSEG                  ;requires MASM 5.0 or higher
  25.         .MODEL  medium
  26.  
  27. ;       Define all publicly accessible routines.
  28.           PUBLIC int86
  29.  
  30.           .CODE
  31.  
  32. int86         PROC    FAR
  33.  
  34.               BASIC_SETUP
  35.  
  36.               mov  si,[bp+8]
  37.               mov  si,[si]
  38.               mov  ax,[si]
  39.               mov  bx,[si+2]
  40.               mov  cx,[si+4]
  41.               mov  dx,[si+6]
  42.  
  43.               int 10h
  44.  
  45.               BASIC_CLEANUP
  46.  
  47.               RET     6d
  48.  
  49. int86         ENDP
  50.  
  51.  
  52. ;CODE         ENDS
  53.               END
  54.