while 1 bgmplay 0:beep 2 for i=0 to 9 print str$(i) beep 2 next wend このようにも書けます