|
Title: Demo for Ur Game Post by: manu62300 on July 17, 2007, 05:20:50 AM (http://i20.servimg.com/u/f20/11/16/46/09/dualis10.png) (http://i20.servimg.com/u/f20/11/16/46/09/dualis11.png)
the personnage sprite for change emotion,the text is progressve ,ideal for RPG or intro of Ur game :D Code: SCREEN_BOT = 0 PAL_ISAAC = 0 PAL_NINA = 1 function waitForStylus() x = 0 while x == 0 do if Stylus.Down() then x = 1 end end end function DSLua.ProgressiveString(progstr,coloredwut,screenwhich,delaybetweeneach,xvl,yvl) for current_position = 1, string.len( progstr ) do current_char = string.sub( progstr, current_position, current_position ) if screenwhich == 0 then BGBotText:SetColor(coloredwut) BGBotText:PrintXY( xvl, yvl, current_char ) end if screenwhich == 1 then BGTopText:SetColor(coloredwut) BGTopText:PrintXY( xvl, yvl, current_char ) end if screenwhich == 2 then BGBotText:SetColor(coloredwut) BGTopText:SetColor(coloredwut) BGBotText:PrintXY( xvl, yvl, current_char ) BGTopText:PrintXY( xvl, yvl, current_char ) end for delay = 1, delaybetweeneach do end xvl = xvl + 1 if xvl == 32 then xvl = 0 yvl = yvl + 1 end end end BGBotMap = Screen.LoadTileBG() BGBotMap:LoadPalette( "actionbg.pal" ) BGBotMap:LoadTiles( "actionbg.raw", 256 ) BGBotMap:LoadMap( "actionbg.map", ( 256/8 ), ( 192/8 )) BGBotText = Screen.LoadTextBG() Screen.Initialize( 0, BGBotText, BGBotMap ) Screen.WaitForVBL() Sprite.LoadPalette( 0, 0, "Isaac.pal" ) Sprite.LoadPalette( 0, 1, "Nina.pal" ) IsaacFrames = FrameStrip.Create( 0, 64, 64, "256" ) NinaFrames = FrameStrip.Create( 0, 64, 64, "256" ) IsaacFrames:LoadBin( "Isaac.raw", 1 ) NinaFrames:LoadBin( "Nina.raw", 1 ) while true do if Stylus.Down() then Isaac = Sprite.Create( IsaacFrames, 0, 0, 190, 126 ) Nina = Sprite.Create( NinaFrames, 0, 1, 2, 2 ) DSLua.ProgressiveString("Nina:",1,0,5000,9,1) DSLua.ProgressiveString("Bonjour Isaac^^",0,0,5000,15,1) DSLua.ProgressiveString("Comment vas tu ?",0,0,5000,9,2) DSLua.ProgressiveString("Isaac:",3,0,5000,0,16) DSLua.ProgressiveString("Nina, pourquoi es",0,0,5000,6,16) DSLua.ProgressiveString("tu venu me voir ?",0,0,5000,0,17) DSLua.ProgressiveString("Je t'avais dis non..",0,0,5000,0,18) DSLua.ProgressiveString("Jamais je ne pourrais...",0,0,5000,9,3) DSLua.ProgressiveString("Pourtant il le faudra.",0,0,5000,0,19) DSLua.ProgressiveString("Jamais tu entends..8-(",0,0,5000,9,4) end end Title: Re: Demo for Ur Game Post by: daltonlaffs on July 17, 2007, 09:49:58 AM It looks nice ;)
One thing, though, give credit for the functions you used. waitForStylus() was Jeremysr's, and ProgressiveString() was mine. Title: Re: Demo for Ur Game Post by: manu62300 on July 17, 2007, 09:56:57 AM It looks nice ;) Yeah Authors: Jeremysr & Daltonlaffs in "functions.inc.lua" One thing, though, give credit for the functions you used. waitForStylus() was Jeremysr's, and ProgressiveString() was mine. Title: Re: Demo for Ur Game Post by: Jeremysr on July 20, 2007, 01:33:46 PM You should just use while not Stylus.Down() do end instead of waitForStylus() :P
Title: Re: Demo for Ur Game Post by: molster on July 21, 2007, 03:00:15 PM You guys might want to fix that function on your "functions 2.6" version, you have the function named as
Code: function DSLua.ProgressiveString(progstr,coloredwut,screenwhich,delaybetweeneach,xvl,yvl) but up top were you tell what it means, you have it named Code: DSLua.ProgressiveText() You might want to fix that.. cuase i got an error.. took me a min to figure out what was wrong. (Text vs String at the end if you cant tell) Title: Re: Demo for Ur Game Post by: manu62300 on July 22, 2007, 03:58:33 AM DSLua.ProgressiveString == DSLua.ProgressiveText ;)
Title: Re: Demo for Ur Game Post by: molster on July 22, 2007, 04:00:41 PM huh? do you even know what im talking about? They have the following functions all set up in one script, and they have an erorr, where they say what it does, and the have it has "text" at the end, and in the functions itself, its called "string" so when someone calles it, it will give an error saying no such thing.
Title: Re: Demo for Ur Game Post by: manu62300 on August 03, 2007, 01:17:44 PM I havn't write DSLua.ProgressiveText ,i write DSLua.Progressivestring but i have input the text ;)
|