'サイングラフ {---プログラム掲示板投稿フォーム--- 【ソフト名】サイングラフ (バージョン 0.01) 【作 成 者】SWinX (連絡先:swinx@plala.to) 【種　　別】フリーソフトウェア 【ひまわりのバージョン】ver.1.61 【転　　載】可 【改変運用】可 【ひまわり本体への梱包】可 【実行時に利用作成するファイル】無 【コメント】意見・感想板で三角関数が動かない、とあったので作ってみました。 ---投稿フォームここまで---} 母艦の、サイズは、(100,100,500,400) 母艦の、変更した時は、グラフ描画。 ＊グラフ描画 //サイズ設定 　　　画面クリア。 　　　BH=母艦の、高さ。BW=母艦の、幅。 　　　SX=BW/2。SY=BH/2。 //軸描画 　　　ペン太さは、1。ペン色=黒色。 　　　(SX,0)へ、移動。(SX,BH-1)へ、線。 　　　(BW-1,SY)へ、移動。(0,SY)へ、線。 //サイングラフ描画 　　　ペン太さは、1。ペン色=赤色。 　　　xを、0から、(BW-1)まで、繰り返す( 　　　　　　t=(x-SX)/BW //t=[-0.5,0.5) 　　　　　　y=-SY*SIN(t*6.28)+SY '　　　　　　y=-SY*SIN((t+0.1*SIN(t*12.56))*6.28)+SY 　　　　　　もし、x≠0ならば、((x,y)へ、線。) 　　　　　　(x,y)へ、移動。 '　　　　　　描画処理反映。 　　　) 待機。