mciならこんな感じで
dialog "mp3",16
if stat==0:end
onexit *exit
mci "open \""+refstr+"\" alias mp3 type mpegvideo"
if stat<0:dialog "オープンできません":end
mci "set mp3 time format milliseconds"
mci "seek mp3 to 10000" ;10秒後から開始
mci "play mp3"
repeat
mci "status mp3 position"
title strf("再生中 %d:%02d:%03d",stat/60000,stat\60000/1000,stat\1000)
wait 20
loop
stop
*exit
mci "stop mp3"
mci "close mp3"
end