>>380　職人ではないが鳴らすだけなら
Examples > QuickTimeｪ Examples > SimplePlay より

'----------------------------------------ここから
'変数my_songにファイルの参照を渡す
my_song = open movie("ほにゃらら.mp3")

'ファイル破損
if movies error then ? "movies error." : end

'再生開始
start movie my_song
? "playing..."

'再生中／中断処理
repeat
movies task
until is movie done (my_song) or button

'終了処理
stop movie my_song
close movie my_song
'----------------------------------------ここまで