Hi and welcome to the TGC forum. I quickly wrote some code that should work to fade out and in the images using sprites. This assumes you are manually using SYNC (i.e. SYNC ON : SYNC RATE 60 at the beginning of your program).
Rem Project: Dark Basic Pro Project
Rem Created: Saturday, January 29, 2011
Rem ***** Main Source File *****
Rem Project: Dark Basic Pro Project
Rem Created: Friday, January 28, 2011
Rem ***** Main Source File *****
REM *** Title Screen ***
sync on : sync rate 60
Load image "Media\Title1.png",1
sprite 1,0,0,1
FadeOut(1,250,90,5000)
Load image "Media\Title2.png",2
set sprite image 1,2
delete image 1
FadeOut(1,250,90,5000)
delete sprite 1
delete image 2
rem more code
end
function FadeOut(SpriteNum,fade,MasterDelay,TimeAdd)
set sprite alpha SpriteNum,fade
delay = MasterDelay + timer()
time = TimeAdd + timer()
repeat
if timer() > delay
dec fade, 5
if fade >= 0 then set sprite alpha SpriteNum,fade
delay = timer() + MasterDelay
ENDIF
sync
UNTIL timer() > time
ENDFUNCTION
Hope this helps,
LB
