V=21 F=100 FOR I=0 TO 11 P=F*I BEEP V,P VSYNC 30 NEXT これでC C# D D# E F F# G G# A A# B と鳴るはずです。 1オクターブずらすときは P=F*I±F*12(+は高く、-は低く)とすればオッケーです。