HSP - Hot Soup Processor [15]at GAMEDEVHSP - Hot Soup Processor [15] - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト931:名前は開発中のものです。 07/12/16 20:37:42 b9Adh+YR 今の実装ではこの問題はずっと出てくる 高校か中学でならった気がする 一番いいのは両方の弧を求めて短い方へ加算するとか 1r=6.28...だから・・・面倒だからおやすみ 932:名前は開発中のものです。 07/12/16 20:52:11 Ds2i6dLx sx = 320 : sy = 240 : vv = 100 : r = 0. : sa = 0.3 pi = 3.14159 repeat redraw 0 : color : boxf : color $FF : circle sx-vv,sy-vv,sx+vv,sy+vv,0 k = atan(mousey-sy, mousex-sx) if k < r { if absf(k-r) > absf(k+pi*2-r) : r+=0.1 : else : r-=0.1 } if k > r { if absf(k-r) < absf(k+(pi*-2)-r) : r+=0.1 : else : r-=0.1 } if r>pi : r-=pi*2 if r<-pi : r+=pi*2 si = sin(r)*vv : co = cos(r)*vv ex = sx+co-8 : ey = sy+si-8 pos ex,ey : mes "●" : title ""+k+"/"+r redraw 1 : await 30 : loop 整理してないけどこんな感じで出来た。 ・k<rの時は、rは[k]と[k+6.28]のどちらに近いかを見てから動く方向を決める ・rは-3.14～+3.14の範囲でなければならないので、その範囲を越える時に値を修正 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch