DSLua Community
Welcome, Guest. Please login or register.
May 18, 2012, 09:34:55 PM
1371 Posts in 262 Topics by 33109 Members
Latest Member: Limewire Download
DSLua Community  |  DSLua - Best scripting language for Nintendo DS  |  Need Help?  |  Brennan's adventure game help topic. « previous next »
Pages: 1 [2]
Author Topic: Brennan's adventure game help topic.  (Read 4915 times)
brennan
Waxing Crescent
**
Posts: 41


WWW
« Reply #15 on: September 17, 2006, 02:58:42 PM »

Sure, go ahead.
Logged
jester
Waxing Crescent
**
Posts: 86


Jester Corp DS Logo


WWW
« 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()

Logged

CURRENT PROJECT:

JesterCorp DS- 2D FIGHTING GAME!!! Due out August 19th 2007!!!Having Sprite Issues but Toast is helping me ALOT
brennan
Waxing Crescent
**
Posts: 41


WWW
« Reply #17 on: September 17, 2006, 08:39:44 PM »

Why won't this line work?

Code:
instructions = keyboard()
if instructions == "yes" then
BGTopText:Clear()

Using Jeremysr's functions v1.5
(both of the guys that are active and could help me aren't on MSN, and are banned from here :/)
Logged
jester
Waxing Crescent
**
Posts: 86


Jester Corp DS Logo


WWW
« Reply #18 on: September 18, 2006, 12:13:01 PM »

My code has been solved thanks
Logged

CURRENT PROJECT:

JesterCorp DS- 2D FIGHTING GAME!!! Due out August 19th 2007!!!Having Sprite Issues but Toast is helping me ALOT
Pages: 1 [2]
« previous next »
    Jump to: