home *** CD-ROM | disk | FTP | other *** search
- global gMusicDirectory, gMusicPlayList, gCurrentSong, gMusicStop, gShuffling, gShuffledMusicPlayList, gMusicSelect, gCurrInGameTrack, gCurrProfile
-
- on playSound channel, sName
- global gSound
- if member(sName).type = #empty then
- put "sound not found", sName
- return
- end if
- if gSound > 0 then
- if channel < 9 then
- puppetSound(channel, 0)
- puppetSound(channel, sName)
- else
- repeat with b = 3 to 8
- if not sound(b).isBusy() then
- puppetSound(b, 0)
- puppetSound(b, sName)
- exit repeat
- end if
- end repeat
- end if
- end if
- end
-