home *** CD-ROM | disk | FTP | other *** search
- Play this Wave File
- filename = CurrentFile()
- PlayWaveForm( filename, 1)
- Play all selected Wave File(s)
- waves=FileItemize("")
- count=ItemCount(waves,@tab)
- for i=1 to count
- wf=ItemExtract(i,waves,@tab)
- wfe=strupper(FileExtension(wf))
- if wfe!="WAV" then continue
- PlayWaveForm(wf,0)
- next
-
-