Sunku Posted July 25, 2011 Author Share Posted July 25, 2011 hey guys is there a way to make your character walk diagonally?if there is can you give me a sample of code or make a tut?Thanks in advanced. Link to comment Share on other sites More sharing options...
GKO Posted July 25, 2011 Share Posted July 25, 2011 Search = :cheesy:Search = Your friend. Link to comment Share on other sites More sharing options...
Sunku Posted July 25, 2011 Author Share Posted July 25, 2011 @GKO:> Search = :cheesy:> Search = Your friend.what does that mean? O.o Link to comment Share on other sites More sharing options...
DJMaxus Posted July 25, 2011 Share Posted July 25, 2011 @Axis:> what does that mean? O.oHe was telling you to search for a tutorial that probably doesn't exist at the moment. Link to comment Share on other sites More sharing options...
Sunku Posted July 25, 2011 Author Share Posted July 25, 2011 @DJMaxus:> He was telling you to search for a tutorial that probably doesn't exist at the moment.oh ok thanks DJ also i like your tutorials they are very useful. Link to comment Share on other sites More sharing options...
Darth Tyllo Posted July 26, 2011 Share Posted July 26, 2011 Well you could try this, but it's off the top of my head, and you'd have to make sprites/ change the source to make it display the sprites for walking diagonal. Search your Client for 'Move left, it should be in ModInput. In between End If and ' Error handler add this:``` ' Move Up/Left If GetKeyState(vbKeyUp) And GetKeyState(vbKeyLeft) < 0 Then DirUp = True DirDown = False DirLeft = True DirRight = False Exit Sub Else DirUp = False And DirLeft = False End If ' Move Up/Right If GetKeyState(vbKeyUp) And GetKeyState(vbKeyRight) < 0 Then DirUp = True DirDown = False DirLeft = False DirRight = True Exit Sub Else DirUp = False And DirRight = False End If ' Move Down/Left If GetKeyState(vbKeyDown) And GetKeyState(vbKeyLeft) < 0 Then DirUp = False DirDown = True DirLeft = True DirRight = False Exit Sub Else DirDown = False And DirLeft = False End If ' Move Down/Right If GetKeyState(vbKeyDown) And GetKeyState(vbKeyRight) < 0 Then DirUp = False DirDown = True DirLeft = False DirRight = True Exit Sub Else DirDown = False And DirLeft = False End If```I tested it. It doesn't work, but it's a start. Link to comment Share on other sites More sharing options...
Sunku Posted July 27, 2011 Author Share Posted July 27, 2011 can someone make a tutorial for this please? Link to comment Share on other sites More sharing options...
Darth Tyllo Posted July 27, 2011 Share Posted July 27, 2011 Sorry bro, this is all I have. :( It was more complicated than I first thought it would be. :( Link to comment Share on other sites More sharing options...
RyokuHasu Posted July 27, 2011 Share Posted July 27, 2011 if you really think hard about it there would be a LOT work and "Extra work" that goes with this. I was trying to go over what was needed, and beleive me, its alot. It me it dosnt seem like its worth it to all this to a game. you'd have to rewrite EVERY movement sub in the entire game, and people using doors, well… they would be screwed without a seperate set of instruction on how to add it.=P just my opinion that its not worth it. Link to comment Share on other sites More sharing options...
Sunku Posted July 28, 2011 Author Share Posted July 28, 2011 i want to make diagonal walking please some one just give me some where to start. Link to comment Share on other sites More sharing options...
tsuki Posted July 28, 2011 Share Posted July 28, 2011 @RyokuHasu:> if you really think hard about it there would be a LOT work and "Extra work" that goes with this. I was trying to go over what was needed, and beleive me, its alot. It me it dosnt seem like its worth it to all this to a game. you'd have to rewrite EVERY movement sub in the entire game, and people using doors, well… they would be screwed without a seperate set of instruction on how to add it.> > =P just my opinion that its not worth it. Link to comment Share on other sites More sharing options...
Sunku Posted July 28, 2011 Author Share Posted July 28, 2011 i don't care if it's not worth it i want to try >: O Link to comment Share on other sites More sharing options...
tsuki Posted July 28, 2011 Share Posted July 28, 2011 @Axis:> i don't care if it's not worth it i want to try >: OSo rewrite every movement sub and create all the additional functions. Link to comment Share on other sites More sharing options...
Beanie93 Posted July 28, 2011 Share Posted July 28, 2011 As stated above, you'd need to rewrite every sub for movement AND every Map Attribute, which if you don't have a good knowledge of Visual Basic and how the engine works, can't be done. Link to comment Share on other sites More sharing options...
aaaron Posted July 28, 2011 Share Posted July 28, 2011 It's not a lot of work. -_-I have done it on my game in the past.-Aaron Link to comment Share on other sites More sharing options...
The New World Posted July 28, 2011 Share Posted July 28, 2011 @Darth:> Well you could try this, but it's off the top of my head, and you'd have to make sprites/ change the source to make it display the sprites for walking diagonal. Search your Client for 'Move left, it should be in ModInput. In between End If and ' Error handler add this:> > ```> ' Move Up/Left> If GetKeyState(vbKeyUp) And GetKeyState(vbKeyLeft) < 0 Then> DirUp = True> DirDown = False> DirLeft = True> DirRight = False> Exit Sub> Else> DirUp = False And DirLeft = False> End If> > ' Move Up/Right> If GetKeyState(vbKeyUp) And GetKeyState(vbKeyRight) < 0 Then> DirUp = True> DirDown = False> DirLeft = False> DirRight = True> Exit Sub> Else> DirUp = False And DirRight = False> End If> > ' Move Down/Left> If GetKeyState(vbKeyDown) And GetKeyState(vbKeyLeft) < 0 Then> DirUp = False> DirDown = True> DirLeft = True> DirRight = False> Exit Sub> Else> DirDown = False And DirLeft = False> End If> > ' Move Down/Right> If GetKeyState(vbKeyDown) And GetKeyState(vbKeyRight) < 0 Then> DirUp = False> DirDown = True> DirLeft = False> DirRight = True> Exit Sub> Else> DirDown = False And DirLeft = False> End If> ```> I tested it. It doesn't work, but it's a start.Go to the code that actually checks the direction and alters the players coordinates. Add in extra checks,If Dir_UP and Dir_RIGHT thensetplayerx(index, Getplayerx(index) + 1setplayery(index, Getplayery(index) - 1end if Link to comment Share on other sites More sharing options...
Medleyy Posted August 4, 2011 Share Posted August 4, 2011 Bear in mind that you'll have to alter the paperdolls to accomodate four extra directions. Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now