音声ファイル読み込み

mmload、mmplay、mmstop等が音楽ファイルを扱えるので、

mmload "ファイル名",0

mmplay 0

で再生だけならできますが、読み込み機能をつけるとかすると、

screen 0,130,75

sdim file,260*2 ; Windows では、単一パスは最大 260 文字までに制限されているとか。なので　->http://windows.microsoft.com/ja-jp/windows/file-names-extensions-faq#1TC=windows-7
objsize 130,25
input file
sendmsg objinfo_hwnd(stat), $CF, 1
button "Select",*sel
button "Play",*play
stop
*play
mmplay 0
clrobj 2,2
pos 0,50 : button "Stop",*stp
stop
*stp
mmstop
clrobj 2,2
pos 0,50 : button "Play",*play
stop
*sel
	dialog "wma;*.wav;*.mid;*.midi\n*",16,"読み込めるファイル" ; P1は拡張子(Windowsで読み込める音楽ファイルならなんでも)
	if stat=0 : stop
	mmload refstr,0
	objprm 0,getpath(refstr,8)
	stop

みたいにする感じで。

HSPTV!掲示板