周波数から音階への変換については、オクターブ4のラの音を440Hzとした場合、変換したい周波数をFとすると、
DIM NOTE$[12]
COPY NOTE$,@NDAT,12
@NDAT:DATA "ラ","ラ#","シ","ド","ド#","レ","レ#","ミ","ファ#","ファ","ソ","ソ#"
としておき、
N=ROUND(12*LOG(F/440,2))
N12=((N MOD 12)+12) MOD 12 '0~11の範囲に変換
?NOTE$[N12]
で、表示できるそうです(≧∇≦)b また、オクターブは、
?FLOOR((N-3)/12)+5
で表示できるそうです!
1そうだね プレイ済み