You can detect sprite hit between mouse and a sprite (button) and if it happens then you can gosub to a place in your menu.
sync on : sync rate 50 : randomize timer()
` make image for game sprite
ink rgb(255,255,255),rgb(0,0,0)
for f=25 to 30 : circle 32,32,f : next f
get image 1,0,0,64,64,1
spriteres=64
` make image for mouse sprite
get image 999,0,0,1,1,1
` how many sprites?
c=20
scrw=screen width()
scrh=screen height()
type spr
x as float
y as float
xd as float
yd as float
endtype
dim s(c) as spr
cs as spr
` randomize sprite start positions
for f=1 to c
s(f).x=rnd(scrw-spriteres)
s(f).y=rnd(scrh-spriteres)
s(f).xd=((-100.0+rnd(200))/50.0)
s(f).yd=((-100.0+rnd(200))/50.0)
next f
sprite 999,0,0,999 : hide sprite 999
do
` bounce sprites around screen
for f=1 to c
cs.x=s(f).x
if cs.x < 0 or cs.x > (scrw-spriteres) then s(f).xd=-s(f).xd
cs.x=cs.x+s(f).xd
s(f).x=cs.x
cs.y=s(f).y
if cs.y < 0 or cs.y > (scrh-spriteres) then s(f).yd=-s(f).yd
cs.y=cs.y+s(f).yd
s(f).y=cs.y
sprite f,cs.x,cs.y,1
next f
` if you click mouse, did you click on a sprite?
if mouseclick()=1
sprite 999,mousex(),mousey(),999
s=sprite collision(999,0)
if s <> 0 then text 0,20,"You clicked on sprite: "+str$(s)
endif
text 0,0,"FPS: "+str$(screen fps())
sync
loopim not tall, youre just short
