jester
Waxing Crescent
 
Posts: 86
Jester Corp DS Logo
|
 |
« Reply #16 on: September 17, 2006, 03:25:16 PM » |
|
code someone check my code and see where it could be improved i get a error when trying to get to load the sprite: jestercorp:
-- !!!!!Setting up the Screens !!! SCREEN_TOP = 1 SCREEN_BOTTOM = 0
-- !!!!!Starting .mod Music Playback !!! -- Load the mod music file and start playing ModTunnel2 = Music.LoadMod( "tunnel2.mod" ) bModPlaying = true ModTunnel2:Play()
BGTopMap = Screen.LoadTileBG() BGTopMap:LoadPalette( "DStop.pal" ) BGTopMap:LoadTiles( "DStop.raw", 256 ) BGTopMap:LoadMap( "DStop.map", ( 256 / 8 ), ( 192 / 8 ) ) Screen.Initialize( SCREEN_TOP, BGTopMap )
MyBottomMap = Screen.LoadTileBG() MyBottomMap:LoadPalette( "DSbottom.pal" ) MyBottomMap:LoadTiles( "DSbottom.raw", 256 ) MyBottomMap:LoadMap( "DSbottom.map", ( 256 / 8 ), ( 192 / 8 ) ) Screen.Initialize( SCREEN_BOTTOM, MyBottomMap )
-- !!!!!Starting Intro picture !!! BGTopText = Screen.LoadTextBG() DSLua.WaitForAnyKey() for delay = 1, 25000 do end -- !!!!!!Function loads the intro picture!!!!!! BGTopText:PrintXY( 10, 12, "JesterCorp DS!" ) MyBottomMap = Screen.LoadTileBG() MyBottomMap:LoadPalette( "title.pal" ) MyBottomMap:LoadTiles( "title.raw", 256 ) MyBottomMap:LoadMap( "title.map", ( 256 / 8 ), ( 192 / 8 ) ) Screen.Initialize( SCREEN_BOTTOM, MyBottomMap, BGTopText ) DSLua.WaitForAnyKey() for delay = 1, 50000 do end -- !!!!!Starting Level One !!! SCREEN_TOP = 1 SCREEN_BOTTOM = 0 BGTopText = nil BGTopText = Screen.LoadTextBG() BGTopText:PrintXY( 10, 12, "LEVEL ONE" ) Screen.Initialize( SCREEN_TOP, BGTopText ) BGTopBackground = Screen.LoadTileBG() BGTopBackground:LoadPalette( "backg.pal" ) BGTopBackground:LoadTiles( "backg.raw", 256 ) BGTopBackground:LoadMap( "backg.map", ( 256 / 8 ), ( 192 / 8 ) ) Screen.Initialize( SCREEN_TOP, BGTopBackground ) DSLua.WaitForAnyKey() -- !!!!!Jestercorp running across top screen !!! SCREEN_TOP = 1 PALETTE_jestercorp = 0 Sprite.LoadPalette( SCREEN_TOP, PALETTE_jestercorp, "jestercorp.pal" ) jestercorpFrames = FrameStrip.Create( SCREEN_TOP, 64, 64, "256" ) jestercorpFrames:LoadBin( "jestercorp.raw", 3 ) jestercorp = Sprite.Create( jestercorpFrames, 0, PALETTE_jestercorp, 112, 80 ) DSLua.WaitForAnyKey()
|