andy200129 Posted March 16, 2010 Author Share Posted March 16, 2010 **Please Comment if you have used this or liked it i want to see how many people use/like it lol and i will bring out more tutorials like this**Tutorial Difficulty 1/5 Newb FriendlyRequirementsVisual Basics 6EE 2.7 Source**Video: [UPDATE]**http://www.youtube.com/watch?v=bnDBeH4cH_0Tutorial in Text:Step By Step1)Copy And Paste your Server make sure the Server - Copy is renamed to Server22) Copy and paste Client rename Client -copy to Test Client3) Open Visual Basics 6 open the Client.vbp4) open frmMainMenu add 2 buttons name them the 2 servers5) put the code below on the buttons6) Change the 1st button code port (0000) to the 1st servers port7) change the 2nd button code port (0000) to the 2nd server port8)make sure u save and compile the new client.exe into test client folder9)run both servers Open client and test to check it works**Code**Yellow = change to your server portsRed = Change to your Ip>! Dim IP As String, Port As String Dim fErr As Integer>! Port = Val(0000)>! fErr = 0 If fErr = 0 And Port <= 0 Then fErr = 1 Call MsgBox("Please Fix The Port!", vbCritical, GAME_NAME) Exit Sub End If If fErr = 0 Then Call WriteINI("IPCONFIG", "PORT", 0000, (App.Path & "\config.ini")) End If Call TcpDestroy>! frmStable.Socket.RemotePort = 0000 **Different Computer Host**>! Dim IP As String, Port As String Dim fErr As Integer>! IP = 000.000.000 Port = Val(0000)>! fErr = 0 If fErr = 0 And Len(Trim$(IP)) = 0 Then fErr = 1 Call MsgBox("Please Fix The IP!", vbCritical, GAME_NAME) Exit Sub End If If fErr = 0 And Port <= 0 Then fErr = 1 Call MsgBox("Please Fix The Port!", vbCritical, GAME_NAME) Exit Sub End If If fErr = 0 Then Call WriteINI("IPCONFIG", "IP", 000.000.000, (App.Path & "\config.ini")) Call WriteINI("IPCONFIG", "PORT", 0000, (App.Path & "\config.ini")) ' Call MenuState(MENU_STATE_IPCONFIG) End If Call TcpDestroy frmStable.Socket.RemoteHost = 000.000.000 frmStable.Socket.RemotePort = 0000After I Made mine i changed the graphics and now it looks like this>! ![](http://www.freemmorpgmaker.com/files/imagehost/pics/85193fd0c473a1da0df7fbac920e7bcc.jpg) Please Comment Tell me if u have problems its something i thought of doing i got bored lol :) Link to comment Share on other sites More sharing options...
teh jimpie Posted March 16, 2010 Share Posted March 16, 2010 VERY NICE!But what If your both server's/client's have a diffrent source? Link to comment Share on other sites More sharing options...
andy200129 Posted March 16, 2010 Author Share Posted March 16, 2010 just copy the source folder the Client.vbp/server.vbp into the client/server folder whats not updated like the 1st or 2nd one :) Link to comment Share on other sites More sharing options...
andy200129 Posted March 16, 2010 Author Share Posted March 16, 2010 Awww no one likes my tutorial :cry: Link to comment Share on other sites More sharing options...
shadowchris Posted March 16, 2010 Share Posted March 16, 2010 Dude this pwnz 2 times harder. Question:Can you host different servers from different computerS? Link to comment Share on other sites More sharing options...
SagonSoulsOnline Posted March 16, 2010 Share Posted March 16, 2010 OMG i love this!! Link to comment Share on other sites More sharing options...
andy200129 Posted March 16, 2010 Author Share Posted March 16, 2010 yes you can make it from 2 different computers its just the code alterd a bitwant me to make the code for hosting from different computer? Link to comment Share on other sites More sharing options...
mrmiguu Posted March 16, 2010 Share Posted March 16, 2010 You would have to have separate characters for each server if you hosted it on a different computer. This setup is more like channels. Link to comment Share on other sites More sharing options...
shadowchris Posted March 17, 2010 Share Posted March 17, 2010 @MonkeyGunZ:> yes you can make it from 2 different computers its just the code alterd a bit> want me to make the code for hosting from different computer?Sure! That would be epic Link to comment Share on other sites More sharing options...
andy200129 Posted March 17, 2010 Author Share Posted March 17, 2010 ok do you want me to put on here or me send you the code by pm since you want it? lol and ill instruct you how to use Link to comment Share on other sites More sharing options...
shadowchris Posted March 17, 2010 Share Posted March 17, 2010 I added you on MSN. Link to comment Share on other sites More sharing options...
andy200129 Posted March 18, 2010 Author Share Posted March 18, 2010 ok i will check i just hope your not the one i rejected Link to comment Share on other sites More sharing options...
andy200129 Posted April 9, 2010 Author Share Posted April 9, 2010 hope you all are liking this i will bring a new tutorial on making it more professional later :( please comment Link to comment Share on other sites More sharing options...
cheatking Posted April 10, 2010 Share Posted April 10, 2010 Haven't watched the video because you tube seems to take forever to load no a days but how does two server make the game any better? Link to comment Share on other sites More sharing options...
andy200129 Posted April 15, 2010 Author Share Posted April 15, 2010 i haven't said nothing about making the game better its to improve game play if your PC is strong enough or you have alot of server host stuff and you don't want like 1000's of people on 1 server so its hard to move about so jam packed its to expand the world of online games so it dose not get over crowded on 1 server you can have a maximum to stop alot of arguments and complaints that its hard to move around on the game because so many people are on the 1 server if you get what I'm saying Link to comment Share on other sites More sharing options...
shadowwulf Posted April 15, 2010 Share Posted April 15, 2010 Hmm. Might integrate this into my project. Even if you dont expect a super high playerbase, sometimes people like to play ORPG single player style or know they will only see their group of friends. Link to comment Share on other sites More sharing options...
andy200129 Posted April 21, 2010 Author Share Posted April 21, 2010 cool cool at-least i know 1 person is using it lol o actually found the code in seconds lmao Link to comment Share on other sites More sharing options...
donkeydiddles Posted May 31, 2010 Share Posted May 31, 2010 mine works now. ur totally awsome! Link to comment Share on other sites More sharing options...
gamesucker Posted May 31, 2010 Share Posted May 31, 2010 @MonkeyGunZ:> ok do you want me to put on here or me send you the code by pm since you want it? lol and ill instruct you how to uselol, I would like to know if I can get that. Link to comment Share on other sites More sharing options...
andy200129 Posted June 3, 2010 Author Share Posted June 3, 2010 Glad to help all more tutorials will be released soon just keep an eye out for the signiture for more xD Link to comment Share on other sites More sharing options...
escfoe2 Posted June 12, 2010 Share Posted June 12, 2010 I love AlienWare / AlienGUIse It's awesome I can tell you're using it or something like it… Kewl Link to comment Share on other sites More sharing options...
bluelego Posted July 8, 2010 Share Posted July 8, 2010 Great video Link to comment Share on other sites More sharing options...
aster Posted July 8, 2010 Share Posted July 8, 2010 When I try to host with a different IP I getCompile Error:Expected: End Of Statementhere is what it looks like```Private Sub Server1_Click()Dim IP As String, Port As String Dim fErr As Integer IP = 000.00.00.0 Port = Val(4000) fErr = 0 If fErr = 0 And Len(Trim$(IP)) = 0 Then fErr = 1 Call MsgBox("Please Fix The IP!", vbCritical, GAME_NAME) Exit Sub End If If fErr = 0 And Port <= 0 Then fErr = 1 Call MsgBox("Please Fix The Port!", vbCritical, GAME_NAME) Exit Sub End If If fErr = 0 Then Call WriteINI("IPCONFIG", "IP", 000.00.00.0, (App.Path & "\config.ini")) Call WriteINI("IPCONFIG", "PORT", 4000, (App.Path & "\config.ini")) ' Call MenuState(MENU_STATE_IPCONFIG) End If Call TcpDestroy frmStable.Socket.RemoteHost = 000.00.00.0 frmStable.Socket.RemotePort = 4000End Sub```Note I changed my IP to 0's lol Link to comment Share on other sites More sharing options...
andy200129 Posted July 16, 2010 Author Share Posted July 16, 2010 @EclipseStalker:> When I try to host with a different IP I get> Compile Error:> Expected: End Of Statement> here is what it looks like> ```> Private Sub Server1_Click()> Dim IP As String, Port As String> Dim fErr As Integer> > IP = 000.00.00.0> Port = Val(4000)> > fErr = 0> If fErr = 0 And Len(Trim$(IP)) = 0 Then> fErr = 1> Call MsgBox("Please Fix The IP!", vbCritical, GAME_NAME)> Exit Sub> End If> If fErr = 0 And Port <= 0 Then> fErr = 1> Call MsgBox("Please Fix The Port!", vbCritical, GAME_NAME)> Exit Sub> End If> If fErr = 0 Then> Call WriteINI("IPCONFIG", "IP", 000.00.00.0, (App.Path & "\config.ini"))> Call WriteINI("IPCONFIG", "PORT", 4000, (App.Path & "\config.ini"))> ' Call MenuState(MENU_STATE_IPCONFIG)> End If> Call TcpDestroy> frmStable.Socket.RemoteHost = 000.00.00.0> frmStable.Socket.RemotePort = 4000> End Sub> ```Note I changed my IP to 0's lolif u stick to the tutorials it shouldn't have problems you must of put the wrong port or so watch and read the tutorial carefully 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