RyokuHasu Posted October 14, 2011 Author Share Posted October 14, 2011 no need to add me, I just rehashed the code a bit for EO =Palmost any other tut i did i DO want credit for ;D Link to comment Share on other sites More sharing options...
lollicat Posted October 23, 2011 Share Posted October 23, 2011 Had a little issue compiling the Client. For the record, I'm using Alatar's quest system.Image:>!  Link to comment Share on other sites More sharing options...
Robin Posted October 23, 2011 Share Posted October 23, 2011 Why do you have the form data in your project? Link to comment Share on other sites More sharing options...
lollicat Posted October 23, 2011 Share Posted October 23, 2011 I'm not really sure. I think I fixed that, and now there's another error with the hotbar "User-defined type not defined" and if I remove that line of code (which is probably a stupid idea in itself) it gives me the same error in trading. Link to comment Share on other sites More sharing options...
Taegan Posted November 26, 2011 Share Posted November 26, 2011 If a player uses a convo to acquire an item with his inventory full the server crashes. This really isn't something you want happening considering it will happen relatively often and you aren't there to restart the server all the time. Can it be fixed or is it just something I did wrong? Link to comment Share on other sites More sharing options...
RyokuHasu Posted November 26, 2011 Author Share Posted November 26, 2011 It can easily be fixed, just make a check for the free space int he inventory, I used one on my Taming system for when you where giving summoning scrolls.something like…``` For i = 1 To 36 'one more than your max inventory If i <= 35 Then 'max inventory If GetPlayerInvItemNum(Index, i) <= 1 Then Call GiveInvItem(Index,ItemNum, 1) Call PlayerMsg(Index, "It has been added to you inventory.", BrightGreen) Exit For End If Else Call PlayerMsg(index, "You do not have enough room in your bag.", BrightRed) End If Next``` Link to comment Share on other sites More sharing options...
kibbelz Posted December 8, 2011 Share Posted December 8, 2011 When i converted it myself i did this:``` If Npc(NpcNum).Behaviour = NPC_BEHAVIOUR_FRIENDLY Then If Npc(NpcNum).Conv > 0 Then InitChat Attacker, mapNum, mapNpcNum ElseIf LenB(Trim$(Npc(NpcNum).AttackSay)) > 0 Then Call PlayerMsg(Attacker, CheckGrammar(Trim$(Npc(NpcNum).Name), 1) & " says: " & Trim$(Npc(NpcNum).AttackSay), SayColor) End If Exit Function End If``` Link to comment Share on other sites More sharing options...
Whackeddie99 Posted January 2, 2012 Share Posted January 2, 2012 Works great, nice tutorial, well done.EDIT: Lots of RTE that close the client at random times, like when deleting a conversation. Also shut my server down once for an unknown reason. Regardless, I shall keep this in my game, until it becomes a major problem. Link to comment Share on other sites More sharing options...
erkro1 Posted January 8, 2012 Share Posted January 8, 2012 I get RTE 380 when saving a conv with give item and then re-open it. Link to comment Share on other sites More sharing options...
abhi2011 Posted January 10, 2012 Share Posted January 10, 2012 i need seroius help. I did all u told me to. In the server side but when i try to compile it tells.Compile ErrorSub or Function not defined.http://i40.tinypic.com/dbib6o.jpgHere is the link of the pic. Plzz help!!! Link to comment Share on other sites More sharing options...
Joyce Posted January 10, 2012 Share Posted January 10, 2012 Because you're an idiot and obviously forgot to copy one of the most important subs over. :I Link to comment Share on other sites More sharing options...
tickleu Posted January 13, 2012 Share Posted January 13, 2012 I did everything you said, and it dosent work, I talk to the npc and nothing happens. I repeat, I did everything. I dont get any errors in client or server but nothing happens after I assign the npc a conversation. Link to comment Share on other sites More sharing options...
Justn Posted January 13, 2012 Share Posted January 13, 2012 This works fine man I have had no issues besides an occasional error with saving conversations but it is not a problem… Can u post your "canplayerattacknpc" sub? Link to comment Share on other sites More sharing options...
tickleu Posted January 16, 2012 Share Posted January 16, 2012 It ok mate, I was being stupid and dident read the rest of the post. All I had to do was set the npc's hp to 1 to make it alive.Now I have the task of creating a script server side that allows me to call any conversation in the conv editorexample: Call initchat (index, 1) ' 1 is the first conversation in the conversation editor!anyone want to help? Link to comment Share on other sites More sharing options...
Eason Posted January 18, 2012 Share Posted January 18, 2012 So in order for me to do this tut http://www.touchofdeathforums.com/smf/index.php/topic,64806.0.html i need to first do this one ??? This will change the CS:DE to EO? Link to comment Share on other sites More sharing options...
Myron Posted January 19, 2012 Share Posted January 19, 2012 @Eason:> This will change the CS:DE to EO?No, this tutorial will 'cut' out a code from CS;DE and implement it into EO.If you want to do [this](http://www.touchofdeathforums.com/smf/index.php/topic,64806.0.html) tutorial, you only need VB6 and EO. Link to comment Share on other sites More sharing options...
Eason Posted January 20, 2012 Share Posted January 20, 2012 So there is not possible way to use CS:DE with that code at all unless I write my own code correct? Link to comment Share on other sites More sharing options...
Justn Posted January 20, 2012 Share Posted January 20, 2012 Why are you even posting about the crafting system in here? Anyways you could try to add it to cs:de I doubt u will even have to edit much or anything at all to make it work….This tutorial u are posting in is for the npc conversation system :) Link to comment Share on other sites More sharing options...
Justn Posted January 26, 2012 Share Posted January 26, 2012 Also make sure you add this in modHandleData (server)In HandlePlayerMove find this towards the bottom:```Call PlayerMove(index, Dir, movement)```Above it add:```' can't move if chattingIf TempPlayer(index).inChatWith > 0 Then ClosePlayerChat indexEnd If```This will close the chat window if you move to keep players from walking around with chat Windows open…. Make sure you added the optional sub ClosePlayerChat from the original post...Edit: sorry double post was on my phone since web was down and didn't see Link to comment Share on other sites More sharing options...
Whackeddie99 Posted January 26, 2012 Share Posted January 26, 2012 thanks ive been looking for that justnedit: this isn't working justn…edit 2: There seems to be some problems with your optional code on the OP, and this you just did.change this part to this:```' can't move if chattingIf TempPlayer(index).inChatWith > 0 Then ClosePlayerChat indexEnd If``` Link to comment Share on other sites More sharing options...
Justn Posted January 26, 2012 Share Posted January 26, 2012 Oops ok to fix the error in modServerLoop find this after you added the optional stuff from the first post:``` ' ///////////////////////////////////////////// ' // This is used for npcs to attack targets // ' /////////////////////////////////////////////```Above it add :```End If```Thanks Whack for pointing out my mistake above I was posting it from my phone last night I didn't mean to have the space in between.Everything works for me now just tested it =)**Here is the whole thing in case people didnt understand:**modServerLoopPrivate Sub UpdateMapLogicunder this:``` ' ///////////////////////////////////////////// ' // This is used for NPC walking/targetting // ' ///////////////////////////////////////////// ' Make sure theres a npc with the map If Map(mapnum).NPC(x) > 0 And MapNpc(mapnum).NPC(x).Num > 0 Then If MapNpc(mapnum).NPC(x).StunDuration > 0 Then ' check if we can unstun them If GetTickCount > MapNpc(mapnum).NPC(x).StunTimer + (MapNpc(mapnum).NPC(x).StunDuration * 1000) Then MapNpc(mapnum).NPC(x).StunDuration = 0 MapNpc(mapnum).NPC(x).StunTimer = 0 End If Else```Add this:```' check if in conversation If MapNpc(mapnum).NPC(x).c_inChatWith > 0 Then ' check if we can stop having conversation If Not TempPlayer(MapNpc(mapnum).NPC(x).c_inChatWith).inChatWith = npcNum Then MapNpc(mapnum).NPC(x).c_inChatWith = 0 MapNpc(mapnum).NPC(x).Dir = MapNpc(mapnum).NPC(x).c_lastDir NpcDir mapnum, x, MapNpc(mapnum).NPC(x).Dir End If Else```Still in modServerLoop Find:``` ' ///////////////////////////////////////////// ' // This is used for npcs to attack targets // ' /////////////////////////////////////////////```Above it add :```End If```At the bottom of modConv add this:```Public Sub ClosePlayerChat(ByVal index As Long) ' exit the chat TempPlayer(index).inChatWith = 0 TempPlayer(index).curChat = 0 ' send chat update sendChat index ' send npc dir With MapNpc(TempPlayer(index).c_mapNum).NPC(TempPlayer(index).c_mapNpcNum) If .c_inChatWith = index Then .c_inChatWith = 0 .Dir = .c_lastDir NpcDir TempPlayer(index).c_mapNum, TempPlayer(index).c_mapNpcNum, .Dir End If End With ' clear last of data TempPlayer(index).c_mapNpcNum = 0 TempPlayer(index).c_mapNum = 0 Exit SubEnd Sub```then under "SendBank index" in modconv add:```TempPlayer(index).InBank = True```then under "SendInventory index" in modconv add:```ClosePlayerChat index```Also make sure you add this in modHandleData (server)In HandlePlayerMove find this towards the bottom:```Call PlayerMove(index, Dir, movement)```Above it Add:```' can't move if chattingIf TempPlayer(index).inChatWith > 0 Then ClosePlayerChat indexEnd If``` Link to comment Share on other sites More sharing options...
pooperscoop1 Posted February 6, 2012 Share Posted February 6, 2012 It says 'Must have startup form or Sub Main'What does that mean? Link to comment Share on other sites More sharing options...
erkro1 Posted February 7, 2012 Share Posted February 7, 2012 Open it in VB6 and go to 'Project' -> '[name] Properties' -> Startup Objectchange it to Sub Main Link to comment Share on other sites More sharing options...
pooperscoop1 Posted February 8, 2012 Share Posted February 8, 2012 OK thanks Link to comment Share on other sites More sharing options...
GeminiXcasorm Posted March 4, 2012 Share Posted March 4, 2012 ummm… i have an issue. the frm.main isnt in english its in coding. how do i put in the buttons?example:``` .3 lt &3 ¨ F h î 00 ¨ V @@ ( þ ( @ B89 Bk9 cÂÂJ kï¥ þîƵ› Fgg '), ýþý ƒèý )R‰ 9ŒÞ ÿÿ‡ÿÿÿ‡ÿÿ†ÿÿ†ÿæ æ € € € € € € àààààààààà€ € € € € € € ÿ€ ÿàÿàÿ( B89 Bk9 cÂÂJ kï¥ þîƵ› Fgg '), ýþý ƒèý )R‰ 9ŒÞ ÿ? ò € € € € € €ÿ ( 0 ` B89 Bk9 cÂÂJ kï¥ þîƵ› Fgg '), ýþý ƒèý )R‰ 9ŒÞ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÃÿÿ ÿÿÿÃÿÿ ÿÿà ÿÿ ÿÿà ÿÿ ÿó ?ÿ ÿó ?ÿ ÿÀ ÿ ÿÀ ÿ ÿÀ ÿ ÿÀ ÿ ÿÀ ÿ ÿÀ ÿ ÿð ?ÿ ÿð ?ÿ ÿð ÿ ÿð ÿ ÿð ÿ ÿð ÿ ÿð ÿ ÿð ÿ ÿð ÿ ÿð ÿ ÿÀ ÿ ÿÀ ÿ ÿÀ ÿ ÿÀ ÿ ÿÀ ?ÿ ÿÀ ?ÿ ÿÀ ÿÿ ÿÀ ÿÿ ÿð ?ÿÿ ÿð ?ÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿ ( @ € B89 Bk9 cÂÂJ kï¥ þîƵ› Fgg '), ýþý ƒèý )R‰ 9ŒÞ ÿÿÿÿÀ?ÿÿÿÿÿÿÀ?ÿÿÿÿÿÿÀ?ÿÿÿÿÿÿÀ?ÿÿÿÿÀ< ÿÿÿÿÀ< ÿÿÿÿÀ< ÿÿÿÿÀ< ÿÿü< ?ÿü< ?ÿü< ?ÿü< ?ÿÀ ÿÀ ÿÀ ÿÀ ÿÀ ÿÀ ÿÀ ÿÀ ÿÀ ÿÀ ÿÀ ÿÀ ÿü ?ÿü ?ÿü ?ÿü ?ÿü ?ü ?ü ?ü ?ü ü ü ü ü ü ü ü ü ü ü ü À ?À ?À ?À ?À ÿÀ ÿÀ ÿÀ ÿÀ ?ÿÀ ?ÿÀ ?ÿÀ ?ÿÀ ÿÿÿÀ ÿÿÿÀ ÿÿÿÀ ÿÿÿü ?ÿÿÿü ?ÿÿÿü ?ÿÿÿü ?ÿÿÿx {\rtf1\ansi\ansicpg1252\deff0\deflang2057{\fonttbl{\f0\fnil\fcharset0 Georgia;}}\viewkind4\uc1\pard\f0\fs17 \par }``` 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