I reasently got my copy of db and frankly i dont know where to start. I desided to make a intro/demo but i seem to be stuck. Iam printing text and using a bitmap or image or matrix as background. But how do i display a text and then make it dissapear after awhile without clearing the whole screen with cls? If i use cls the bckgrnd image is cleared too. I´ll just post the code aswell... but keep in mind that this is indeed my first program so... no laughing
REM An attempt to make a program with a purpose
REM The main functions
GOSUB HARDWARE_SETUP
GOSUB INTRO_BITMAP_BCKGR
GOSUB INTRO_MUSIC
GOSUB INTRO_TEXT
GOSUB TERMINATE
REM Setting up the hardware
HARDWARE_SETUP:
SET DISPLAY MODE 1024,768,32
SYNC RATE 30
HIDE MOUSE
SYNC ON
RETURN
REM Initialising the intro and music
INTRO_MUSIC:
WAIT 2000
LOAD MUSIC "someawsomemp3
.MP3",1 : LOOP MUSIC 1
WAIT 4890
RETURN
REM Setting up background
REM INTRO_BITMAP_BCKGR:
REM MAKE MATRIX 1, 10, 10, 10, 10 // either a matrix...
REM LOAD IMAGE "coolbckgrd
",1 // ... or some stupid pic
REM PASTE IMAGE 1,512,384 //... just trying stuff.
RETURN
REM Displays the owsome intro text
REM First we initialize the text...
INTRO_TEXT:
SET TEXT SIZE 70
SET TEXT FONT "impact"
REM ... then the text is printed"
CENTER TEXT 320,240, "[mAdE bY CaiF_R]"
WAIT 3000
CLS
WAIT 3000
CENTER TEXT 640,480, "dEMO = fUSiON"
WAIT 2000
CLS
WAIT 2000
CENTER TEXT 300,650, "lEAd dESiGNER = CariF_R"
WAIT 2000
CLS
WAIT 2000
CENTER TEXT 500,500, "lEAd ARtiSt = CaiF_R"
WAIT 2000
CLS
WAIT 2000
CENTER TEXT 500,300, "lEAd pROgGraMmeR = CaiF_R"
WAIT 2000
CLS
WAIT 2000
CENTER TEXT 512,384, "EnDiNg dEMO... -hOPEd U iNjOYed iT
"
WAIT 5000
CLS
RETURN
REM Terminate the prog
TERMINATE:
PRINT "... READY TO TERMINATE"
WAIT 10
WAIT KEY
