mci命令を使用してみれば?
mciコマンドについてはインターネットで調べてみればみつかります
サンプルを以下に入力しときます。(とりあえず、*.midと*.rmiね)
//sample start
dialog "mid;rmi",16,"MIDファイル"
if stat{
sdim fn,650
fn=refstr
mci "open \""+fn+"\" alias Media type Sequencer"
mci "play Media"
onexit *onex
stop
}
*onex
mci "stop Media"
mci "close Media"
end
//sample end