N88-BASICで波形

N88-BASICで波形

 

正弦波(Sine wave)を合成して

矩形波(Square wave)を表示しました

 

(4/π)Σsin{(2i-1)2πft}/(2i-1) (i=1,2,…,n)

で計算しています

 

正弦波の基音(k=1),3倍音(k=3),…を

それぞれk分の1(奇数分の1)にして合成します

k=2i-1(i=1,2,3,…,n)

 

4/π倍しているのは

基音の1/2波長までの山谷を書き

中心に注目すると

k=1(　　　山　　　)中心は山

k=3(　　山谷山　　)中心は谷

k=5(　山谷山谷山　)中心は山

k=7(山谷山谷山谷山)中心は谷

つまり振幅は

1/1-1/3+1/5-1/7… = Tan-1(1) = π/4 となる

ので4/π倍して正規化します

 

[ Tan-1(x) = Σ(-1)i-1/(2i-1)・x(2i-1) より

　Tan-1(1) = Σ(-1)i-1/(2i-1)

　= 1/1-1/3+1/5-1/7…

　= π/4 ]

 

n = 5と500での計算結果を表示しています

 

NL-BASICとnl～.zip(hakei001.bas)は

以下のリンクからダウンロードできます

NL-BASIC(N88-BASIC互換?)ホームページ

Readme.txtを読んで遊んで下さい