The task is to demonstrate how to switch video display modes within the language. A brief description of the supported video modes would be useful.

dim as integer i, w, h, d
 
for i = 0 to 21
    if i>2 and i<7 then continue for    'screens 3-6 are not defined
    screen i
    screeninfo w, h, d
    print "Screen ";i
    print using "#### x ####, color depth ##";w;h;d
    sleep
next i
 
'a more flexible alternative is ScreenRes
 
'this sets up a window of 1618x971 pixels, colour depth 8, and 2 pages
screenres 1618, 971, 8, 2
windowtitle "Foo bar baz"
sleep
 
 
'see https://documentation.help/FreeBASIC/KeyPgScreengraphics.html
'for more information
 