home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Programmer's Library 1.3 / Microsoft-Programers-Library-v1.3.iso / sampcode / alde_c / lattice / lcfuncs / savint.asm < prev    next >
Encoding:
Assembly Source File  |  1987-03-14  |  915 b   |  38 lines
  1.         TITLE    SAVINT  Save Interrupts 80-FF
  2.         page     60,132
  3.  
  4.         include  lattice.mac
  5.  
  6.         PSEG
  7.  
  8. _MAIN   proc     near
  9.         _fopen   fname,omode,fp1       ; Open output file
  10.         push     ds
  11.         xor      ax,ax
  12.         mov      ds,ax
  13.         mov      si,0200h
  14.         mov      cx,0200h
  15.         mov      di,offset bufloc
  16.         rep      movsb                 ; Copy Int table to local area
  17.         pop      ds
  18.         mov      ds:word ptr buffer,offset bufloc
  19.         mov      ds:word ptr blksiz,0200h
  20.         mov      ds:word ptr numblks,1
  21.         _fwrite  buffer,blksiz,numblks,fp1
  22.         _fclose  fp1
  23.         ret
  24. _MAIN   endp
  25.         ENDPS
  26.  
  27.         DSEG
  28. fname   db       'd:save.int',0
  29. omode   db       'wb',0
  30. fp1     dw       0
  31. buffer  dw       0
  32. blksiz  dw       0
  33. numblks dw       0
  34. bufloc  db       512 dup (0CCh)
  35.  
  36.         ENDDS
  37.         end
  38.