となっております。これを途中で止めたりできるようにしたいです。どのようにすればよいか
screen 0,640,240 onexit goto*owari dialog ,16,"開く":if stat=0:end fname=refstr objsize 320,60 i=getpath (fname,8) pos 0,150 mes i pos 0,0:button gosub "再生",*m_play pos 320,0:button gosub "停止",*m_stop pos 0,60:button gosub "開く",*open pos 320,60:button gosub "終了",*owari mmload fname,1 repeat await 16 title "boxplayer "+i loop *owari mci "close all" end *m_stop mmstop return *m_play mmplay 1 return *open dialog ,16,"開く":if stat=0:end fname=refstr cls objsize 320,60 pos 0,0:button gosub "再生",*m_play pos 320,0:button gosub "停止",*m_stop pos 0,60:button gosub "開く",*open pos 320,60:button gosub "終了",*owari i=getpath (fname,8) y=getpath (fname,32) pos 0,150 mes i chdir y mmload i,1 title "boxplayer "+i
お教えください。