Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

[CS:DE] to [EO] Conversation system V1.1


RyokuHasu
 Share

Recommended Posts

  • Replies 170
  • Created
  • Last Reply

Top Posters In This Topic

Thank you Justn for pointing out a huge error in PMs to me…

On the frmEditor_NPC the scrlConv was coded wrong, ir should be...

2x click ScrlConv and add
```
    LblConvNum.Caption = ScrlConv.Value
    NPC(EditorIndex).Conv = ScrlConv.Value

```

This has been fixed on the first post as well =D
Link to comment
Share on other sites

or better yet, START a quest with the convo system =D

PS this convo system acts just like the one from ROSE online ^_^ i just noticed this, not saying its based on it or anything, just saying they work the same way and even Look similar =D

Adding in end and start quests with it would make it almost a carbon copy of the ROSE online version XD
Link to comment
Share on other sites

thanks yo lolicat for finding another problem

client and server in mod types

add to the bottom of Private Type MapNpcRec
```
    c_lastDir As Byte
    c_inChatWith As Long

```

* * *

Server side

in modtypes

add to the botom of Public Type TempPlayerRec

```
  inChatWith As Long
    curChat As Long
    c_mapNum As Long
    c_mapNpcNum As Long

```
The main post has been edited >.< sorry I knew i forgot that part…
Link to comment
Share on other sites

sorry i really cant understand all the post, my question is based on the title. if i follow this tutorial, does the EO have already transparent? can use the .PNG XV tiles? has all the features CS:DE??? sorry newbie here and cant understand english.

OH its CONVERSATION System. lol XD
Link to comment
Share on other sites

You did a couple of things wrong, Ryoku.
Let me point them out. ;)

1.  Replace the ScrlConv Code with this:
```
  If scrlConv.Value > 0 Then
        lblConvNum.Caption = "Conv: " & Trim$(Conv(scrlConv.Value).Name)
    Else
        lblConvNum.Caption = "Conv: None"
    End If
    NPC(EditorIndex).Conv = scrlConv.Value
```
2\. Replace the Combat Code with this:
```
                        If NPC(npcNum).Behaviour = NPC_BEHAVIOUR_FRIENDLY Then
                            If NPC(npcNum).Convo = True Then
                                InitChat attacker, mapNum, mapNpcNum
                            End If
                            Exit Function
                        End If
```
(In Number 2, the "False" should be a "True")
Link to comment
Share on other sites

:/ im sorry robin i didnt really read this (and try to add) till today, just acknowledged that there was a tut for adding it… i feel really bad about not thankin u now too Dx

but here i am in a further reply to say hell i love ur work and i thank u for every bit even the stuff i havent seen cuz i know it has to be simply amazing :D
Link to comment
Share on other sites

@Jimmy:

> when I log out and in again, the picChat still visible >.<
>
> I found the fix:
> CLIENT SIDE
>
> in modGeneral add the this code to Public Sub logoutGame()
> ```
> frmMain.picChat.Visible = False
> ```

I already fixed that, but thanks for the attention xD
Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share


×
×
  • Create New...