You need the good old 2D distance formula
sync on : sync rate 50
circleX = 320
circleY = 240
radius = 100
do
cls
circle circleX,circleY,radius
d# = Distance2D(circleX,circleY,mousex(),mousey())
if d# < radius
text 50,50,"Inside Circle!"
else
text 50,50,"Outside Circle!"
endif
sync
loop
Function Distance2D(cx#,cy#,x#,y#)
dx# = cx# - x#
dy# = cy# - y#
dist# = sqrt((dx#*dx#)+(dy#*dy#))
endfunction dist#
Programming anything is an art, and you can't rush art.
Unless your name is Bob Ross, then you can do it in thirty minutes.