Public PlaySound(sWave as string)
if sWave <> "" then
SoundName$ = (sWave)
wFlags% = SND_ASYNC Or SND_NODEFAULT
X% = sndPlaySound(SoundName$, wFlags%)
end if
End Sub