サインカーブ

 

三角関数の勉強をした時、これ見ましたよね? サインサーブです。

MSX の場合、SIN はラジアン単位なので、3.1415926... で 180 度になります。

注意を要するのは、このような図では X 軸の + が上になっているのですが、
MSX などのパソコンでは通常 X 座標の下が大きくなるので、
上下を反転する必要がある事です。

 

10SCREEN 2SCREEN 3 にしても動作します。

10 COLOR 15,4,7:SCREEN 2
20 LINE(0,96)-(255,96),14
30 FOR X=0 TO 255
40 Y=96*(1-3.1415927*2*X/192)
50 PSET(X,Y),15
60 NEXT X
70 I$=INPUT$(1)

C 言語版

 

実は作ったのはこちら C 言語版が先で、

MSX JAPAN▉ 掲載のために BASIC 版も作った、という流れです。

 

z88dk のモノクログラフィックを用いています。

MSX に限らず Z80 対応のプラットフォームで表示可能です。

MSX でも SCREEN 2 と SCREEN 3 で動作します。

1 色固定なので、中央の横線は点線にしてあります。

 

GitHub Gist を参照 - 他のプラットフォームで実行した画像を入れています。