Try my Slider menu, like some scum games, or for rol games
http://darkbasicpro.thegamecreators.com/?m=codebase_view&i=ad9b70cae1d40fef5d6fdf5b13064849
rem make a background active
backdrop on
rem variable of slider, actual hide
slider#=-100
rem Main Loop
do
rem if mouse is close to the left side of the window then slider grow else decrease
if mousex() < 40
slider#=slider#+1
else
slider#=slider#-1
endif
rem max and minimum value of the slider
if slider# > 80 then slider#=80
if slider# < -100 then slider#=-100
rem make a box menu with X value from slider variable, you can use a bitmap, etc...
box 0,0,slider#,480,rgb(255,0,0),rgb(255,0,0),rgb(255,0,0),rgb(255,0,0)
loop