SBSOUND.BAS 2/2

 BBS: Inland Empire Archive
Date: 11-12-92 (21:53)             Number: 371
From: BRETT LEVIN                  Refer#: NONE
  To: TOM HAMMOND                   Recvd: NO  
Subj: SBSOUND.BAS           2/2      Conf: (2) Quik_Bas

>>> Continued from previous message
OUT &H388, Reg     '388h = address/status port, 389h = data port
  FOR x = 0 TO 5   ' This tells the SB what register we want to write to
    A = INP(&H388) ' After we write to the address port we must wait 3.3ms
  NEXT x

OUT &H389, Value   ' Send the value for the register to 389h
  FOR x = 0 TO 34  ' Here we must also wait, this time 23ms
    A = INP(&H388)
  NEXT x

END SUB


-eOF-------------------------------------------------------

     Enjoy!  Any questions/comments are welcome!

Brett :-)

 * SLMR 2.1a * In /dev/null, no one can hear you scream.


--- WM v2.04/91-0049
 * Origin: Reservation Only! Las Vegas,Nv~702-898-8630~ (1:209/721)