HSPTV!掲示板

下のようなプログラムでキーボードを一度押して流れますが、
もう一度押すと最初から流れてしまいます。
流れている時はキーボードを押しても、
もう一度流れないようにするにはどうしたらようでしょうか。

screen 0,250,250

title "チャイム"

mmload "A.mp3",0
mmload "B.mP3",1
mmload "C.mp3",2


objsize 100
combox B,50,"A\nB\nC"
　 pos 150, 50

objsize 650
pos 10,50
objsize 80,80
button gosub"ON",*A

repeat
wait 1
getkey aa,120
if aa_==0&&aa=1:gosub*A
aa_=aa
loop

*A
mmplay B
return
stop

標準のmm系命令では「再生中かどうかのチェック」はできないので、
mciを使うか、hspogg(hgimg3からサウンド関連の命令を抜き出したもの)を使うのはどうでしょうか？
hspoggであれば、dmmstat命令で再生中かどうかのチェックができるので。

ありがとうございます。
mci命令で出来ました！