プチコンまとめWiki (初代/mkII)

パンくずリスト

• トップ
• Mame
• 三角関数の使い方

概要

• このページにお越しの皆様こんにちは。
  
• ここには図形やシューティングゲームなどで使うことのある三角関数について書きました。
  
• 加筆・訂正してくれる人大歓迎です。ぜひお願いします。
  

お膳立て

みなさんは三角関数を知っていますか？説明書を見ても「何のこと言ってんだかさっぱりわからん」「そんなことよりオナニーしようぜ」
という人もいるんじゃないかと思います。でも、そこで射精しないでください。更に高度なプログラムを作りたいと思っている初心者、中級者の皆さん、このページを読めば三角関数が使えるようになる（はずです！）
ということで、三角関数についてざっくばらんではありますが、解説しようという趣旨のページをつくりました。
是非活用してください。

三角関数とは

これは、高校の数学で習うやつです。よくcosθ（コサインシータ）とか聞きますよね。
聞いたことないですか？大丈夫です。このページを何度も読めばわかるはずです。
三角関数とは、角度やx,yの移動量の関係を求める関数です。*1「関数」というという名前の通りある値に対して違う数値を出してくれます。
使い方としては、スプライトで弾を四方八方に発射させたり、キャラを動かしたり 時計やメーターで針を書くのに使ったりもします。
記述の方法は式の中に挿入する形で書きます。参考プログラムを参考にしてください。
これを使えるようになるととても便利です。本格シューティングゲームなんかも作れるんじゃないでしょうか。

使い方

プチコンでの三角関数に関係する関数は以下の種類があります。
ＰＩ(パイ)関数
ＲＡＤ(ラジアン)関数
ＤＥＧ(デグリー)関数
ＣＯＳ(コサイン)関数
ＳＩＮ(サイン)関数
ＴＡＮ(タンジェント)関数
ＡＴＡＮ(アークタンジェント)関数
今載っていない項目の加筆者募集中！！

PI関数

そのまんまです。中学で習うπの値（円周率）（3.14159265358979323846264338....)を返してくれます。
でもプチコンは小数の精度が悪いので実際3.141ぐらいまでしか出してくれません。

しかし、実はその下の「3.1415」付近までプチコンの内部では記録されています。
ちなみに変態に3.14159265・・・を代入しても、「3.1415」を代入したときや、「PI()」を代入したときとまったく同じです。
ただし、「3.141」を代入した時とは違うので注意です

使用例です。

RAD,DEG関数

この関数は角度(degree)とラジアン(radian)の変換をする関数です。
ラジアン数とは円周上でその円の半径と同じ長さの弧を切り取る2本の半径が成す角の値(wikipediaより)らしいですが、うーむわかりづらいですね。
まあ角度の単位の一つだと思ってください。
ちなみに180°= π rad
1 rad=57.29577951°
です。 使い方は、
角度→ラジアン：RAD(角度0~360)
ラジアン→角度：DEG(0~2π)
です。*2

2013/12/06追記
RAD関数では小数点以下の数値は無視されてしまうようです。小数点以下の数値も使う場合はPI()を用いて計算で求めてください。

COS,SIN関数

この関数は角度から移動量を求めることができる関数です。

この関数に角度を渡すと
COS関数ならXの移動量
SIN関数ならYの移動量
を返します。
引数には角度をラジアン数で表します。

---

ラジアンの求め方
ラジアン＝RAD(角度0~360)
で求められます。
注意:0度は右方向でそこから時計回りになっています。90度で真下になります。

---

この関数を使って斜め線を引くと直線と距離を合わせることができます。

図解です


関数自体の返す値は小さい(0~1)ので実際にプログラムに使うときは掛けて大きくして使用します。

参考プログラムその1
・入力した角度にキャラが動く

+

プログラムリスト

ＡＣＬＳ ＳＰＳＥＴ　０，６８，０，０，０，０ ＳＰＡＮＩＭ　０，４，１０ ＳＰＯＦＳ　０，１１９，９１ ＧＸ＝１１９：ＧＹ＝９１ ＠Ｌ ＩＮＰＵＴ”カクト゛ハ（０~３６０）マウエハ０ト゛”；Ｃ Ｃ＝Ｃ−９０ Ｃ＝Ｃ＋３６０＊（Ｃ＜０） ＰＸ＝ＧＸ：ＰＹ＝ＧＹ ＦＯＲ　Ｉ＝０　ＴＯ　７９ ＰＸ＝ＰＸ＋ＣＯＳ（ＲＡＤ（Ｃ）） ＰＹ＝ＰＹ＋ＳＩＮ（ＲＡＤ（Ｃ）） ＳＰＯＦＳ　０，ＰＸ，ＰＹ ＶＳＹＮＣ　１ ＮＥＸＴ ＷＡＩＴ　１２０ ＳＰＯＦＳ　０，ＧＸ，ＧＹ，３０ ＧＯＴＯ　＠Ｌ

入力した角度通りにキャラクタを移動させます。この移動に三角関数を使っています。
ここで三角関数を使うとどの角度に動かしても同じ長さだけ動かすことができます。 これを使いこなせばかなり多用できると思います。
例えば弾を四方八方に打ち出すときにこの関数を使うと放射状に綺麗に広がります。

参考プログラムその2

+

プログラムリスト

ＡＣＬＳ：ＣＬＥＡＲ ＳＰＳＥＴ　０，１７４，０，０，０，０ ＳＰＡＮＩＭ　０，２，５ ＳＰＯＦＳ　０，−１６，−１６ ＦＯＲ　Ｉ＝１　ＴＯ　９９ ＳＰＳＥＴ　Ｉ，２１４，０，０，０，０ ＮＥＸＴ ＤＩＭ　ＢＸ（９９），ＢＹ（９９），ＢＣ（９９） ＠Ｌ ＣＸ＝１２４：ＣＹ＝８８：ＣＣ＝ＲＮＤ（３６０） ＦＯＲ　Ｉ＝０　ＴＯ　９８ ＢＣ（Ｉ）＝（ＣＣ＋Ｉ＊１５）％３６０ ＢＸ（Ｉ）＝ＣＸ ＢＹ（Ｉ）＝ＣＹ ＳＰＯＦＳ　Ｉ＋１，−１６，０ ＮＥＸＴ ＳＰＯＦＳ　０，ＣＸ，ＣＹ ＣＬＳ ＦＯＲ　Ｋ＝０　ＴＯ　６２０ 　　ＩＦ　Ｋ＝＝５００　ＴＨＥＮ　ＧＯＳＵＢ　＠ＰＲＩＮＴ 　ＦＯＲ　Ｉ＝０　ＴＯ　９８ 　　ＩＦ　Ｋ＜Ｉ＊５　ＴＨＥＮ　ＧＯＴＯ　＠ＳＫＩＰ 　　Ｘ＝ＢＸ（Ｉ）：Ｙ＝ＢＹ（Ｉ）：Ｃ＝ＢＣ（Ｉ） 　　ＩＦ　Ｘ＜−１６　ＯＲ　Ｘ＞２５６　ＯＲ　Ｙ＜−１６　ＯＲ　Ｙ＞１９２　ＧＯＴＯ＠ＳＫＩＰ 　　Ｘ＝Ｘ＋ＣＯＳ（ＲＡＤ（Ｃ）） 　　Ｙ＝Ｙ＋ＳＩＮ（ＲＡＤ（Ｃ）） 　　ＳＰＯＦＳ　Ｉ＋１，Ｘ，Ｙ 　　ＢＸ（Ｉ）＝Ｘ 　　ＢＹ（Ｉ）＝Ｙ 　＠ＳＫＩＰ 　ＮＥＸＴ　Ｉ ’ＶＳＹＮＣ　１ ＮＥＸＴ　Ｋ Ｋ＝０ ＧＯＴＯ＠Ｌ ＠ＰＲＩＮＴ ＬＯＣＡＴＥ　１０，６ ？”　ййййййййййййййййй ＬＯＣＡＴＥ　１０，７ ？”　з　　　　　　　　　　　　　　　и ＬＯＣＡＴＥ　１０，８ ？”　зチョット　キュウケイ　シマス。и ＬＯＣＡＴＥ　１０，９ ？”　з　　　　　　　　　　　　　　　и ＬＯＣＡＴＥ　１０，１０ ？”　жжжжж▼жжжжжжжжжжж ＲＥＴＵＲＮ

ぐるぐると弾を打ち出すプログラムです。綺麗に弾が移動しているのが分かると思います。
この関数は他にもメーターを描くときなどに使用できます。

まとめ

1. COS,SIN関数を使うと斜めの線を描画できる。
2. COS,SIN関数には引数にラジアン数(RAD(角度))を使う。
3. 使うときは使う長さの分掛けて使用する。
4. SPRITEと斜めに移動させる時の移動量に使える。

まあ、習うより慣れろって感じですね。自分でプチコンいじって頑張って見てください。
例えばサンプルプログラムのバイオリズムとか、ゲーム3のSIMPLE STGとか、色々あるよ。公式のプログラムは解説付きなのできっと味方になります。

もっとCOS,SIN関数

波形について利用法などを書きます。

波形

COS,SIN関数を使うとなだらかな波形を描くことができます。
波形は360°で1周期となります。よって
360/周期の長さ とすることで自由な周期の波形を描くことができます。

サンプルプログラム

+

プログラムリスト

ＡＣＬＳ ＰＮＬＴＹＰＥ　”ＯＦＦ” ＧＰＡＧＥ　１，１，１ Ｓ＝６０’シュウキ ＠ＤＲＡＷ ＴＸ＝ＴＣＨＸ Ｓ＝ＴＸ Ｓ２＝３６０／Ｓ ＯＹ＝９６ ＧＰＡＧＥ　１，２，１ ＧＣＬＳ　０ ＦＯＲ　Ｉ＝０　ＴＯ　２５６ ’カ゛メンヲケス Ｙ＝９６＋ＳＩＮ（ＲＡＤ（（Ｓ２＊Ｉ）％３６０））＊６０ ＧＬＩＮＥ　Ｉ−１，ＯＹ，Ｉ，Ｙ，１５ ＯＹ＝Ｙ ＮＥＸＴ ＧＰＡＧＥ　１，１，１ ＧＣＯＰＹ　２，０，０，２５５，１９１，０，０，１ ＶＳＹＮＣ　１ ＧＯＴＯ　＠ＤＲＡＷ

タッチで1周期の長さを変えることができます。ちなみにCOS関数を使うとちょうど90度分ずれることになります。
これの応用として、サンプルプログラムのバイオリズムがあります。周期がそれぞれ違っているのが見てわかると思います。

楕円を描く

こちらの内容は当熟女セクシーシーン集からいただいています。

三角関数を使うと原点から同じ距離の点を求められるのでその点同士を結ぶことで円ができます。更に、COS,SIN関数の掛ける値を変えることで楕円をかくことができます。

サンプルプログラム

+

プログラムリスト

ＡＣＬＳ ＧＰＡＧＥ　１，１，１ Ｘ２＝０ Ｘ＝０ Ｙ２＝０ Ｙ＝０ ＣＯＬ＝１５ ’−−−−−−−−−−−−−−−−−−−− ＠ＴＯＵＣＨ ＯＴ＝ＴＳＴ ＴＳＴ＝ＴＣＨＳＴ ＴＸ＝ＴＣＨＸ ＴＹ＝ＴＣＨＹ ＩＦ　！ＯＴ　ＡＮＤ　ＴＳＴ　ＴＨＥＮ　Ｘ＝ＴＸ：Ｙ＝ＴＹ ＩＦ　ＯＴ　ＡＮＤ　！ＴＳＴ　ＴＨＥＮ　Ｘ２＝ＴＸ：Ｙ２＝ＴＹ：ＧＯＳＵＢ　＠ＲＩＮＧ ＩＦ　ＢＴＲＩＧ（）　ＡＮＤ　１６　ＴＨＥＮ　ＧＣＬＳ　 ＧＯＴＯ　＠ＴＯＵＣＨ ＠ＲＩＮＧ ＢＸ＝０：ＢＹ＝０ ＨＡＮＫＥＩＸ＝ＡＢＳ（Ｘ２−Ｘ） ＨＡＮＫＥＩＹ＝ＡＢＳ（Ｙ２−Ｙ） ＸＳ＝ＨＡＮＫＥＩＸ／２ ＹＳ＝ＨＡＮＫＥＩＹ／２ ＦＯＲ　Ｇ＝０　ＴＯ　３６０ 　Ｘ４＝ＣＯＳ（ＲＡＤ（Ｇ））＊（ＸＳ）＋Ｘ＋ＸＳ 　Ｙ４＝ＳＩＮ（ＲＡＤ（Ｇ））＊（ＹＳ）＋Ｙ＋ＹＳ 　ＩＦ　ＢＸ＝＝０　ＡＮＤ　ＢＹ＝＝０　ＴＨＥＮ　ＢＸ＝Ｘ４：ＢＹ＝Ｙ４ 　ＧＬＩＮＥ　ＢＸ，ＢＹ，Ｘ４，Ｙ４，ＣＯＬ 　ＢＸ＝Ｘ４：ＢＹ＝Ｙ４ ＮＥＸＴ Ｘ４＝ＣＯＳ（ＲＡＤ（０））＊（ＸＳ）＋Ｘ＋ＸＳ Ｙ４＝ＳＩＮ（ＲＡＤ（０））＊（ＹＳ）＋Ｙ＋ＹＳ ＧＬＩＮＥ　ＢＸ，ＢＹ，Ｘ４，Ｙ４，ＣＯＬ ＲＥＴＵＲＮ

FORループ内にWAITを入れるとどういうふうに書いているのかわかると思います。

TAN関数

この関数は傾きを返すための関数です。
「傾き」ってわかりますか？中学生の時に習いましたよね。(まだ中学生じゃない人もいるかも・・・)

そんな人のためにグラフを用意しました~。

はい、わかりましたか？まあいいんです。なんとなくわかれば。
なんか中学校の授業っぽいですね。まあグラフは学校でもプログラムでも重要ですし。

話がそれました。閑話休題。

さてTANはどのようになるのか。ここまで説明したように下の図のようになります。

わかりましたでしょうか？つまりsin(yの変化)のcos(xの変化)に対する比＝直線の傾きということです。なので90°、270°の時は0で割ることになるので値が出ませんね。

ATAN関数

この関数は他のと名前が少し違いますね。アーク+タンジェントです。
じつはこの種類、他にもアークコサイン、アークサインがあります。
つまり他の関数と対になっていて逆三角関数とも言われますが、どうなっているのでしょう。

この関数はいままでの関数と逆の働きをします。
これまでの関数はすべて角度がわかっていました。しか~し。やはりプログラムの中でXとYの変化はわかったけど角度がわからん。なんてシチュエーションもあるでしょう、その時はこの関数を使います。

使い方は

角度のラジアン数＝ATAN(yの移動量÷ｘの移動量)
または
角度のラジアン数＝ATAN(yの移動量,ｘの移動量)
で求められます。

この引数が１つの書き方と２つの書き方では結果が少々異なります。
上の図で考えてみましょう。Xが80増えてYが40増えているから引数が１つの書き方で書いてみるとこうなります。

では、Xが80減ってYが40減っているときはどうでしょう？

道程卒業になってしまいました。どちらも引数に0.5を渡しているだけなので当然ですね。
では引数が２つの書き方(巷ではATAN2とも呼ばれています)を見てみましょう。

この２つの差は3.142となり、丁度π(180°)逆を向いていることがわかります。
つまり、線の向きを気にしない時は引数が１つ、気にする時は引数が２つの書き方がおすすめです。
また、Xの変化量が0になるかもしれない時も引数が２つの書き方の方がおすすめです。(0除算のエラーが発生しません)

ATANの返す値の範囲は以下の範囲になります。

サンプルプログラム

+

プログラムリスト

’ＡＴＡＮ　ＴＥＳＴ ＴＸ＝ＲＮＤ（２５６） ＴＹ＝ＲＮＤ（１９２） ＰＸ＝ＲＮＤ（２５６） ＰＹ＝ＲＮＤ（１９２） ＰＣ＝ＲＮＤ（３６０） ＡＣＬＳ ＧＰＡＧＥ　０，０，０：ＧＣＬＳ　０ ＧＰＡＧＥ　０，２，０：ＧＣＬＳ　０ ＠ＬＯＯＰ ’タ−ケ゛ット　ト　フ゜レイヤ−　ノ　キョリ ＬＸ＝ＴＸ−ＰＸ ＬＹ＝ＴＹ−ＰＹ ’カクト゛ヲ　モトメル。 ＴＣ＝ＤＥＧ（ＡＴＡＮ（ＬＹ，ＬＸ）） ＩＦ　ＴＣ＜０　ＴＨＥＮ　ＴＣ＝ＴＣ＋３６０ ＬＯＣＡＴＥ　０，０ ？”Ｘ：Ｙ” ？”ｔａｒｇｅｔ” ？ＴＸ”：”ＴＹ”　　　” ？”ｐｌａｙｅｒ” ？ＦＬＯＯＲ（ＰＸ）”：”ＦＬＯＯＲ（ＰＹ）”：”ＦＬＯＯＲ（ＰＣ）”゜　　” ？”フ゜レ−ヤ−　ト　タ−ケ゛ット　ノ　カクト゛” ？ＦＬＯＯＲ（ＴＣ）”゜　　” ’イマノ　ホウコウ　トノ　サ ＣＯＬＯＲ　０ ＩＦ　ＴＣ−ＰＣ＞１８０　ＴＨＥＮ　ＴＣ＝ＴＣ−３６０ ＩＦ　ＴＣ−ＰＣ＜−１８０　ＴＨＥＮ　ＰＣ＝ＰＣ−３６０ ＩＦ　ＴＣ−ＰＣ＞３０　ＴＨＥＮ　ＰＣ＝ＰＣ＋２＋Ｕ：？”ミキ゛センカイ　チュウ　” ＩＦ　ＴＣ−ＰＣ＜−３０　ＴＨＥＮ　ＰＣ＝ＰＣ−２−Ｕ：？”ヒタ゛リセンカイ　チュウ” ＩＦ　ＰＣ＞３６０　ＴＨＥＮ　ＰＣ＝ＰＣ−３６０ ＩＦ　ＰＣ＜０　ＴＨＥＮ　ＰＣ＝ＰＣ＋３６０ ？ＣＨＲ＄（０）＊３２； ＰＸ＝ＰＸ＋ＣＯＳ（ＲＡＤ（ＰＣ）） ＰＹ＝ＰＹ＋ＳＩＮ（ＲＡＤ（ＰＣ）） ＧＰＡＧＥ　０，２，０：ＧＣＬＳ　０ ＧＣＩＲＣＬＥ　ＴＸ，ＴＹ，５，５ ＧＣＩＲＣＬＥ　ＰＸ，ＰＹ，５，８ ＧＬＩＮＥ　ＰＸ，ＰＹ，ＰＸ＋ＣＯＳ（ＲＡＤ（ＰＣ））＊１５，ＰＹ＋ＳＩＮ（ＲＡＤ（ＰＣ））＊１５，８ ＧＰＡＧＥ　０，０，０： ＧＣＯＰＹ　２，０，０，２５５，１９１，０，０，１ ＩＦ　ＡＢＳ（ＰＸ−ＴＸ）＜４　ＡＮＤ　ＡＢＳ（ＰＹ−ＴＹ）＜４　ＴＨＥＮ　ＴＸ＝ＲＮＤ（２５６）：ＴＹ＝ＲＮＤ（１９２）：Ｕ＝０ ＩＦ　ＡＢＳ（ＰＸ−ＴＸ）＜２０　ＡＮＤ　ＡＢＳ（ＰＹ−ＴＹ）＜２０　ＴＨＥＮ　Ｕ＝Ｕ＋０．１ ＶＳＹＮＣ　１ ＧＯＴＯ＠ＬＯＯＰ

プレイヤーとターゲットの角度を測り、30°以上であれば旋回してターゲットに向かいます。公式サンプルプログラムのGAME4のミサイルなどはこの関数を使っています。つまり追尾ができるということです。

質問コーナー

関係ないことを書き込んだ場合削除します。あしからず。

• いったん : まめちしき投稿してみました。いろいろと違うところがあるかもしれませんが直していただけると嬉しいです。 (2012/11/24 (土) 00:16:18)
• melville : ちょっといじってみました (2012/11/24 (土) 07:22:39)
• 名無しさん : cosとsinで円かけるぞ (2013/04/05 (金) 13:37:54)
• いったん : ↑活用法とかあったら是非付けたしていってください。編集は自由なので。 (2013/04/05 (金) 14:56:01)
• ゆうあし : 3DSからだから編集できないのでここに書きます。 ・ラジアンについて。 半径1の扇形を想像して下さい。その時の弧の長さは「直径(2)*π*(角度/360)」ですよね。この時、角度は弧の長さで表せられます。ちなみに360°のような角度の表し方を「度数法」、2πのような「弧度法」と言います。 (2013/11/30 (土) 14:54:45)
• ゆうあし : 説明力ほしい…。ちなみに90°=1/2π、180°=π、270°=3/2π、360°=2πの筈です。説明書にも書いてありますが一応。 (2013/11/30 (土) 14:58:03)
• 名無しさん : ATANの違いについて追記してみました。文章力には自信はないので校正なり全ボツなりご自由にどうぞ (2013/12/07 (土) 04:12:08)
• 暁 : DEG(ATAN(敵x,敵y))で求めた角度と同じ角度で進んでも敵にぶつからない...なぜ...(スプライト) (2014/01/21 (火) 20:16:02)
• いったん : ATAN関数の引数は(敵y-自y,敵x-自x)です。確認してください。 (2014/01/21 (火) 20:30:39)
• 暁 : お、ほんとだ、ありがとうございます>いったんさん (2014/01/21 (火) 21:09:28)
• 暁 : ん、でも自機が敵よりもyの数字が大きかったら敵の方向に行きませんねえ、ずっと回ってばっかりで (2014/01/21 (火) 21:18:28)
• 今は名無し : 三角関数で渦巻き描けた (2014/04/20 (日) 18:41:07)
• 名無しさん : 勉強になりました^ - ^ (2014/05/20 (火) 00:51:07)
• 名無し : arcsinの解説と使い方お願いします (2014/09/05 (金) 15:44:15)
• 名無しさん : ↑逆正弦関数(arcsin)はプチコンにはなかったと思うけど (2014/09/05 (金) 17:22:30)
• 名無しさん : arcsinはATANを元に計算できる (2014/09/05 (金) 18:21:35)
• 12さいくん : TANのとこに「中学で習った」って書いてあるけど、小６で習った (2014/11/16 (日) 20:24:25)
• 名無しさん : 追尾できるとか胸熱 (2017/03/10 (金) 04:03:56)
• 名無しさん : 追尾できるとか胸熱 (2017/03/10 (金) 04:03:57)
• 3.14159265358979323846 : TANって小6で習った。 (2018/04/20 (金) 16:34:58)

お名前: