これのことですよね？
http://www.binzume.net/software/forhsp.html
私のほうではノイズがのってしまいましたが、とりあえず再生できました。
ファイルに保存する目的なら以下の方法でもOK。
dummy=""
notesel dummy
notesave "record.wav" //空のデータを先に作らないとMCIでの保存が失敗するかも
mci "open new alias rec type waveaudio"
mci "set rec channels 2"
mci "set rec bitspersample 16"
mci "set rec samplespersec 44100"
mci "record rec"
wait 1000 //10秒間録音
mci "stop rec"
mci "save rec \"record.wav\""
mci "close rec"
//MCIの方法だと作成されたWAVEヘッダに誤りがあるため直接修正
//28byte目から4byte(32bit)書き換えます。
//サンプルレート44100,ビットが16,チャンネルが2の場合は44100*2*2で計算
//サンプルレート22050,ビットが8,チャンネルが1の場合は22500*1*1で計算
sdim buf,64
lpoke buf,0,44100*2*2
bsave "record.wav",buf,4,28
end
音声
