Allows you to view DBPro images, increase/decrease size, and find out their title. Useful if you can't view a particular type normally.

Simply place the images in the directory you want, then run the program. To increase size, press the up arrow key; the down arrow key will decrease size. To view other images, press the right and left arrow keys. This will ONLY work if you have at least one image in the directory that you compiled this program in. This is a very simple viewer.

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    perform checklist for files
for o=3 to checklist quantity()
load image checklist string$(o),o
sprite o,0,0,o
set sprite o,1,0
`if sprite width(o)>screen width() or sprite height(o)>screen height() then scale sprite o,50
hide sprite o
next o

img=3
scale=100
center text 320,450,checklist string$(img)
do
if upkey()=1
inc scale
scale sprite img,scale
endif
if downkey()=1
dec scale
scale sprite img,scale
endif
if rightkey()=1
scale=100
scale sprite img,scale
wait 250
hide sprite img
dec img
cls
if img<3 then img=checklist quantity()
show sprite img
center text 320,450,checklist string$(img)
endif
if leftkey()=1
scale=100
wait 250
scale sprite img,scale
hide sprite img
inc img
cls
if img>checklist quantity() then img=3
show sprite img
center text 320,450,checklist string$(img)
endif
if escapekey()=1 then end
loop