home *** CD-ROM | disk | FTP | other *** search
/ Chip: Special Sound & MIDI / Chip-Special_Sound-und-Midi-auf-dem-PC.bin / midiprog / mpureset.asm < prev    next >
Encoding:
Assembly Source File  |  1991-12-12  |  682 b   |  42 lines
  1. title MPUREST
  2. page 64,132
  3.  
  4.          code segment 'code'
  5.          assume cs:code,ds:code,es:code
  6.  
  7.          org 100h
  8.  
  9. ; -------
  10. ; resetmpu - Reset MPU
  11.  
  12. resetmpu:call  waitrcv
  13.          cli
  14.          mov   dx,0331h
  15.          mov   al,0ffh
  16.          out   dx,al
  17.  
  18.          call  waitrcv
  19.          dec   dx
  20.          in    al,dx
  21.          sti
  22.          mov   ax,4c00h
  23.          int   21h
  24.  
  25. ; -------
  26. ; waitrcv - Wait For MPU Receive Ready
  27.  
  28. waitrcv: push  ax
  29.          push  dx
  30.          mov   dx,0331h
  31.  
  32. waitr10: in    al,dx
  33.          test  al,40h
  34.          jnz   waitr10
  35.  
  36.          pop   dx
  37.          pop   ax
  38.          ret
  39.  
  40. code     ends
  41.          end   resetmpu
  42.