You could save your slides as images and then do this:
rem setup screen
sync on
sync rate 60
backdrop on
color backdrop 0
hide mouse
rem load images
for n = 1 to num_of_slides
load image "slide_" + str$(n) + ".png" , n
next n
rem main loop
do
rem switch between slides
if leftkey() and press = 0
press = 1
dec slides
endif
if rightkey() and press = 0
press = 1
inc slides
endif
if leftkey()=0 and rightkey()=0 then press = 0
rem slide boundaries
if slides < 0 then slides = 0
if slides > num_of_slides-1 then slides = num_of_slides-1
rem paste slides to screen
paste image slides+1 , 0 , 0
rem refresh screen
sync
rem end of main loop
loop
rem end
end
TheComet
"if you don't understand recursion than you probably don't understand recursion." ~Jerico2day
