Posted: 8th Jan 2004 22:01
Try my Slider menu, like some scum games, or for rol games

http://darkbasicpro.thegamecreators.com/?m=codebase_view&i=ad9b70cae1d40fef5d6fdf5b13064849

+ Code Snippet
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