NeonPlat meets Idigidragon

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|544\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Off Topic -> NeonPlat meets Idigidragon
Sun, 09 Oct 2011, 17:07
Jayenkai	RAWR!!!! YouTube -=-=- ''Load, Next List!''
Sun, 09 Oct 2011, 17:07
Hotshot	That is cool Looking game and I guess it is writting in Blitz Max isnt it?
Sun, 09 Oct 2011, 17:12
Jayenkai	Indeed it is.
Sun, 09 Oct 2011, 17:41
Hotshot	I love the graphics as it so cool!
Wed, 12 Oct 2011, 09:16
MetalMan	Wow.. the graphics rocks!
Wed, 12 Oct 2011, 11:28
rockford	That's pretty cool. Surprisingly different to what I was expecting when the video first started.
Thu, 27 Oct 2011, 09:41
Jayenkai	-=-=- ''Load, Next List!''
Thu, 27 Oct 2011, 12:23
Hotshot	So cool looking Characters
Thu, 27 Oct 2011, 15:22
Afr0	I definately love the graphics. I'm a little disappointed by the lack of music though, I suppose it'll come later on. -=-=- Afr0 Games Project Dollhouse on Github - Please fork!
Thu, 27 Oct 2011, 15:33
Jayenkai	No music!?!? The game uses my pseudo random music melody player generator doohickey (see JNKPlat 2010 or NeonPlat 2 for half decent examples) It's still quirky, but.. it tries! -=-=- ''Load, Next List!''
Thu, 27 Oct 2011, 16:16
Afr0	lol, yes it does have music. I noticed now. Too bad it isn't as great as your Fruityloops-songs. Reason I didn't notice is because for most of this video it seems to settle upon some kind of deep bass-grind that isn't easy to pick up. -=-=- Afr0 Games Project Dollhouse on Github - Please fork!
Fri, 28 Oct 2011, 07:01
Jayenkai	Youtube! 2 weeks left to fix all the bugs, sort out difficulty levels, and try to make things a little more random for the boss placements.. Nearly there.. (and you have no idea how long it took to get the video in sync, for the "Level Up" sound effect to line up just right!) -=-=- ''Load, Next List!''
Fri, 28 Oct 2011, 11:05
9572AD	NyanPlat? lol
Fri, 28 Oct 2011, 23:27
JL235	How big is the NeonPlat code base? How many lines, files, etc? I'd be interested in that. But the game looks like one of your best made yet.
Sat, 29 Oct 2011, 02:42
Jayenkai	In total? Um.. eeek! The Game - 6069 lines - 164998 chrs Jay's Framework - 3400 lines - 88774 chrs Music Engine - 547 lines - 15754 chrs But those last two files have been slowly* building over the past couple of years, so they don't really count. As for flicking through it, take another look at my PMC games, then extrapolate how bad it is for this!! TIMES TWENTY!! Redundant code EVERYWHERE. Thousands of bits of copy+pasted goodness. Rem'd out Debuglog snippets all over the place. Select/Case chunks listing enemy names and details that should probably be inside a text file instead! and honest to goodness, proper old fashioned, the way your mum used to make 'em.. Arrays!!! \o/yeay\o/ (and =0's... LOADS of =0's!! MUA-HA-HAAAA!) To be honest, though, the biggest challenges have been the level builder (700+ lines!), and actually making/drawing/brainstorming all the characters. Then going "Hey, why don't I make it like Kirby, and have each one be a different powerup!!" .. then going "Oh, that's why there's not many skills in Kirby.." .. then adding the last one, and going "God damn, I did all that myself.. Lazy Nintendo fuckers... Why aren't there 100,000 enemies in Kirby games!?" Actually coding all the little guys has mostly been a case of copy+paste AI bit, tweak a few numbers, job done. I'll post some nice-stuffs later. Still not done yet! (* I say slowly, but if you look at Box's Adventure (Feb 2010), it's damn near the same framework, with the same calendar, and NeonPlat 2's (Jun 2010) got the same music engine!) A snippet Select obj[ID+7] ' AI Brain Case 0 ' Shuriken If bounce<>0 If obj[ID]=156 For ex=(obj[ID+1]/64)-1 To (obj[ID+1]/64)+1 For ey=(obj[ID+2]/64)-1 To (obj[ID+2]/64)+1 If ex>-1 And ex<1000 And ey>-1 And ey<19 grid[ey1000+ex]=0 EndIf Next Next EndIf obj[ID]=0;Smash(obj[id+1],obj[id+2],obj[ID+17]);playsfxS(4) EndIf Case 1 ' Ball If (obj[ID+4]<3 And ppower=9) Or ppower<>9 Then obj[ID+4]=obj[ID+4]+3.2 If obj[ID+4]>12 Then obj[ID+4]=12; If bounce<>0 Then obj[ID+3]=bounceAbs(obj[ID+3]);playsfx(8,Rnd(1.7,2.3)) If Abs(obj[ID+2]-(atflr+8))<16 And obj[ID+4]>-1 obj[ID+2]=atflr obj[ID+4]=-Rnd(14,18) EndIf If Abs(obj[ID+2]-(atflrb+8))<16 And obj[ID+4]>-1 obj[ID+2]=atflrb obj[ID+4]=-Rnd(14,18) EndIf Case 2 ' Wander If (obj[ID+4]<3 And ppower=9) Or ppower<>9 Then obj[ID+4]=obj[ID+4]+2 If obj[ID+4]>12 Then obj[ID+4]=12; If bounce<>0 Then obj[ID+3]=bounceAbs(obj[ID+3]);playsfx(8,Rnd(1.7,2.3)) If Abs(obj[ID+2]-(atflr+8))<16 And obj[ID+4]>-1 obj[ID+2]=atflr obj[ID+4]=0 EndIf If Abs(obj[ID+2]-(atflrb+8))<16 And obj[ID+4]>-1 obj[ID+2]=atflrb obj[ID+4]=0 EndIf If obj[ID+4]=0 If flrnext=0 And face=-1 And ((obj[ID+1]+32) Mod 64)<16 Then obj[ID+3]=Abs(obj[ID+3]) If flrnext=0 And face=1 And ((obj[ID+1]+32) Mod 64)>48 Then obj[ID+3]=-Abs(obj[ID+3]) EndIf Case 3 ' Bat If (obj[ID+4]<3 And ppower=9) Or ppower<>9 Then obj[ID+4]=obj[ID+4]+0.5 If obj[ID+4]>8 Then obj[ID+4]=8; If bounce<>0 Then obj[ID+3]=bounceAbs(obj[ID+3]) If Abs(obj[ID+2]-(atflr+8))<16 And obj[ID+4]>-1 obj[ID+2]=atflr obj[ID+4]=-8; If obj[ID]=15 Then obj[ID+4]=-4; EndIf If Abs(obj[ID+2]-(atflrb+8))<16 And obj[ID+4]>-1 obj[ID+2]=atflrb obj[ID+4]=-8; If obj[ID]=15 Then obj[ID+4]=-4; EndIf Case 4 ' Jack If (obj[ID+4]<3 And ppower=9) Or ppower<>9 Then obj[ID+4]=obj[ID+4]+0.75 If obj[ID+4]>12 Then obj[ID+4]=12; If bounce<>0 Then obj[ID+3]=bounce*Abs(obj[ID+3]) If Abs(obj[ID+2]-(atflr+8))<16 And obj[ID+4]>-1 obj[ID+2]=atflr obj[ID+4]=-16 EndIf If Abs(obj[ID+2]-(atflrb+8))<16 And obj[ID+4]>-1 obj[ID+2]=atflrb obj[ID+4]=-16 EndIf Case 5 ' Stationary Spike obj[ID+3]=0 obj[ID+4]=0 If obj[ID+9]=0 Then obj[ID+8]=obj[ID+8]+1 --v Mmmmm.... Copy+Paste!!! -=-=- ''Load, Next List!''
Sat, 29 Oct 2011, 07:07
Afr0	Damnit Jay, you need to learn how to do proper OOP! Either that, or use a scripting-language. If you like copypasta, then something like Lua is great for copypasta. In TSO-R, I've outsourced the creation of the GUI to Lua. Saves me hundreds of lines of C# code. All the functionality is done by C#, but the layout is done by Lua. As well as handling interactions (buttonhandlers etc.) A snippet luanet.load_assembly("TSOClient") luanet.load_assembly("System") luanet.load_assembly("System.Collections.Generic") UIScreen = luanet.import_type("TSOClient.LUI.UIScreen") PersonSelectionScreen = UIScreen(ScreenManager) ScreenManager:AddScreen(PersonSelectionScreen,"") PersonSelectionScreen:LoadBackground(0x3FA, 0x001, "", "personselection.lua") PersonSelectionScreen:CreateButton(0x895, 0x001, 10, 8, 1, "CreditsButton") PersonSelectionScreen:CreateButton(0x3FF, 0x001, 762, 8, 1, "ExitButton") PersonSelectionScreen:CreateButton(0x7C0, 0x001, 192, 317, 1, "DescriptionTabBtn1") PersonSelectionScreen:CreateButton(0x7C0, 0x001, 453, 317, 1, "DescriptionTabBtn2") PersonSelectionScreen:CreateButton(0x7C0, 0x001, 713, 317, 1, "DescriptionTabBtn3") PersonSelectionScreen:CreateButton(0x7C1, 0x001, 64, 317, 1, "EnterTabBtn1") PersonSelectionScreen:CreateButton(0x7C1, 0x001, 325, 317, 1, "EnterTabBtn2") PersonSelectionScreen:CreateButton(0x7C1, 0x001, 585, 317, 1, "EnterTabBtn3") PlayerAccount = luanet.import_type("TSOClient.PlayerAccount") --Decide which buttons to create based on how many sims --the current account has. if PlayerAccount.Sims.Count == 0 then --TextID 11: "Create A Sim" PersonSelectionScreen:CreateTextButton(0x1E7, 0x001, 110, 500, 11, 1, "CreateASimBtn1") PersonSelectionScreen:CreateTextButton(0x1E7, 0x001, 375, 500, 11, 1, "CreateASimBtn2") PersonSelectionScreen:CreateTextButton(0x1E7, 0x001, 645, 500, 11, 1, "CreateASimBtn3") PersonSelectionScreen:CreateButton(0x7C8, 0x001, 70, 80, 2, "PersonSelectButton1") PersonSelectionScreen:CreateButton(0x7C8, 0x001, 330, 80, 2, "PersonSelectButton2") PersonSelectionScreen:CreateButton(0x7C8, 0x001, 590, 80, 2, "PersonSelectButton3") elseif PlayerAccount.Sims.Count == 1 then PersonSelectionScreen:CreateTextButton(0x1E7, 0x001, 110, 500, 11, 1, "CreateASimBtn1") PersonSelectionScreen:CreateTextButton(0x1E7, 0x001, 375, 500, 11, 1, "CreateASimBtn2") PersonSelectionScreen:CreateButton(0x7C8, 0x001, 70, 80, 2, "PersonSelectButton1") PersonSelectionScreen:CreateButton(0x7C8, 0x001, 330, 80, 2, "PersonSelectButton2") PersonSelectionScreen:CreateButton(0x7C9, 0x001, 590, 80, 2, "PersonSelectButton3") elseif PlayerAccount.Sims.Count == 2 then PersonSelectionScreen:CreateTextButton(0x1E7, 0x001, 110, 500, 11, 1, "CreateASimBtn1") PersonSelectionScreen:CreateButton(0x7C8, 0x001, 70, 80, 2, "PersonSelectButton1") PersonSelectionScreen:CreateButton(0x7C9, 0x001, 330, 80, 2, "PersonSelectButton2") PersonSelectionScreen:CreateButton(0x7C9, 0x001, 590, 80, 2, "PersonSelectButton3") end -- TextID 11: "You Three Sims: Which One Do You Want To Play?" PersonSelectionScreen:CreateLabel(8, "LblPlaySims", 175, 10) PersonSelectionScreen:CreateLabel(9, "LblTime", 648, 8) GlobalSettings = luanet.import_type("TSOClient.GlobalSettings") if GlobalSettings.Default.ShowHints == true then PersonSelectionScreen:CreateInfoPopup(210, 250, 1, "hint1.bmp", 7) end UIButton = luanet.import_type("TSOClient.LUI.UIButton") LuaFunctions = luanet.import_type("TSOClient.LUI.LuaFunctions") function ButtonHandler(Button) --Button.CurrentFrame = Button.CurrentFrame + 1 if Button.StrID == "ExitButton" then LuaFunctions.ApplicationExit(0) elseif Button.StrID == "CreditsButton" then CreditsScreen = UIScreen(ScreenManager) ScreenManager:RemoveScreen(PersonSelectionScreen) ScreenManager:AddScreen(CreditsScreen, "gamedata\\luascripts\\credits.lua") elseif Button.StrID == "CreateASimBtn1" then CASScreen = UIScreen(ScreenManager) ScreenManager:RemoveScreen(PersonSelectionScreen) ScreenManager:AddScreen(CASScreen, "gamedata\\luascripts\\personselectionedit.lua") elseif Button.StrID == "CreateASimBtn2" then CASScreen = UIScreen(ScreenManager) ScreenManager:RemoveScreen(PersonSelectionScreen) ScreenManager:AddScreen(CASScreen, "gamedata\\luascripts\\personselectionedit.lua") elseif Button.StrID == "CreateASimBtn3" then CASScreen = UIScreen(ScreenManager) ScreenManager:RemoveScreen(PersonSelectionScreen) ScreenManager:AddScreen(CASScreen, "gamedata\\luascripts\\personselectionedit.lua") elseif Button.StrID == "OKCheckBtn" then PersonSelectionScreen:RemoveInfoPopup(1); end end DateTime = luanet.import_type("System.DateTime") function Update() PersonSelectionScreen:UpdateLabel("LblTime", DateTime.Now:ToString("hh:mm:ss")) end --v -=-=- Afr0 Games Project Dollhouse on Github - Please fork!