home *** CD-ROM | disk | FTP | other *** search
- ;--------------------------------------------------------------------------------
- ;
- ;AdLib specific routines
- ;--------------------------------------------------------------------------------
-
- ;--------------------------------------------------------------------------------
- ;PlaySongAdLib
- ;
- ;plays a song from the list
- ;after setting up all voices
- ;
- ;Inputs:
- ;
- ;ax: Song No.
- ;
- ;--------------------------------------------------------------------------------
-
- PlaySongAdLib proc near
- sub al,15 ;seventeen roland files in front
- mov currentSong,ax
- mov bx,ax
- shl bx,1
-