とやってもいいのですが処理に時間がかかりすぎて現実的ではありません。
circle tx-100,ty-100,tx+100,ty+100 ;半径100の円をtx,tyを中心としてかく repeat 360 rc=double(cnt)/180*3.141592 ;度→ラジアン変換 repeat 100 hc=cnt if chkx=cos(rc)*hc+tx&(chky=sin(rc)*hc+ty):mes "はいっている":break ;chkx,chkyはチェックしたい座標 loop loop
もっといい方法がないでしょうか?