Hey guys!
I have noticed a few people asking about the screen resolution, because they have a wide screen or just wan`t their game to look better.
Anyway, I wrote some simple code that you can paste at the start of your program and the user can choose his/her resolution:
rem let the user select his/her resolution
rem by TheComet
rem --------------------------------------
rem setup screen
sync on
sync rate 30
backdrop on
color backdrop 0
show mouse
rem loop
exitloop=0
do
rem get a checklist of the different resolutions
perform checklist for display modes
rem print
y=20
for t=1 to checklist quantity()
text 0,0,"Please select your favourite resolution(the bigger, the slower)"
inc y,15
width=checklist value a(t)
height=checklist value b(t)
depth=checklist value c(t)
ink rgb(255,255,255),0
text 0,y,str$(width)+"*"+str$(height)+"*"+str$(depth)
rem select with mouse
if mousex()<text width(str$(width)+"*"+str$(height)+"*"+str$(depth))
if mousey()>y and mousey()<y+15
ink rgb(255,0,0),0
text 0,y,str$(width)+"*"+str$(height)+"*"+str$(depth)
if mouseclick()=1 then exitloop=1:exit
endif
endif
next t
rem exit
if exitloop=1 then exit
rem refresh screen
sync
rem end of loop
loop
rem set display mode
set display mode width,height,depth
set camera view 0,0,screen width(),screen height()
color backdrop 0
Please report if the code doesn`t work, because I haven`t tested it yet.
TheComet
Oooooops!!! I accidentally formated drive c.
