wav2snd.bat

@echo off
setlocal enabledelayedexpansion
del Data.wav
del Data.bin
md snd_files
for %%f in (*.wav) do (
  set filename_in=%%f
  for /F "tokens=1 delims=." %%F in ("!filename_in!") do set "pre=%%F"
  set filename_out=!pre!.snd
  copy !filename_in! Data.wav
  perl AudioSave.pl
  del Data.wav
  move Data.bin snd_files/!filename_out!
)