im sure i added it in the code slot :o
Rem * Title : Dark Mario
Rem * Author : Daniel Bell
Rem * Date : 3-11-05
REM DARK MARIO
REM LOAD GLOBAL VARIABLES!
REM LOAD VARIABLES FOR CENTER BACKGROUND IMAGE
bgx = (screen width()/2) - (648 / 2)
bgy = (screen height()/2) - (352 / 2)
REM HIDE THE MOUSE! MOUSE IS NOT REQUIRED IN THIS GAME
HIDE MOUSE
REM LOAD BACKGROUNDS SPRITE IMAGE!
LOAD BITMAP "Images\backgrounds.png", 1
REM LOAD BACKGROUNDS FROM THE SPRITE!
GET IMAGE 1, 0, 0, 647, 352
GET IMAGE 2, 647, 0, 1295, 352
GET IMAGE 3, 0, 352, 647, 704
REM DELETE THE BACKGROUND SPRITE IMAGE!
DELETE BITMAP 1
SPRITE 1, bgx, bgy, 1
REM SUSPEND FOR KEY
REM LOAD CHARACTER SPRITE IMAGE!
LOAD BITMAP "Images\character.png", 2
REM LOAD CHARACTERS FROM THE SPRITE!
REM LEFT TOP RIGHT BOTTOM
GET IMAGE 1, 9, 7, 32, 38
GET IMAGE 2, 36, 7, 66, 38
REM DELETE THE CHARACTER SPRITE IMAGE!
DELETE BITMAP 2
SYNC ON
DO
IF (KEYSTATE(2)=1) OR (KEYSTATE(79)=1)
selectmode()
ENDIF
IF (KEYSTATE(3)=1) OR (KEYSTATE(80)=1)
gameinstructions()
ENDIF
IF (KEYSTATE(4)=1) OR (KEYSTATE(81)=1)
gamecredits()
ENDIF
IF (KEYSTATE(5)=1) OR (KEYSTATE(82)=1)
testmovement()
ENDIF
SYNC
LOOP
REM DECLARE FUNCTION SELECTMODE()
function selectmode()
bgx = (screen width()/2) - (648 / 2)
bgy = (screen height()/2) - (352 / 2)
CLS
SPRITE 1, bgx, bgy, 2
endfunction
REM DECLARE FUNCTION GAMEINSTRUCTIONS()
function gameinstructions()
bgx = (screen width()/2) - (648 / 2)
bgy = (screen height()/2) - (352 / 2)
CLS
Print "nothing is here yet!"
endfunction
REM DECLARE FUNCTION GAMECREDITS()
function gamecredits()
bgx = (screen width()/2) - (648 / 2)
bgy = (screen height()/2) - (352 / 2)
CLS
Print "nothing is here yet!"
endfunction
REM DECLARE FUNCTION TESTMOVEMENT()
function testmovement()
bgx = (screen width()/2) - (648 / 2)
bgy = (screen height()/2) - (352 / 2)
CLS
SPRITE 1, bgx, bgy, 3
endfunction
