FOR I=0 TO 9 BEEP WAIT 10 NEXT WAIT 10 BGMPLAY 1 とかかな