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

[EO] Alatar's Quest System v1.2


Alatar
 Share

Recommended Posts

  • Replies 703
  • Created
  • Last Reply

Top Posters In This Topic

@Grimnnak:

> It means you probably have some other Quest system and your trying to overwrite it with this one.

> Just a re-iteration of something which Joe posted over in the 'Bugs & Errors' section.
>
> It's detrimental to the debugging process carried out by the skilled members of this forum, and no matter how much you think you're helping by telling them to restart their computer, you aren't. Stay quiet or you'll get a warning.
>
> Don't know the answer? Don't reply!
>
> Regards,
> Robin
Link to comment
Share on other sites

@Oliverdk:

> Followed the exact instructions for the server. But when i try to compile the server.exe i just get Variable not defined at this line:
>
> ```
> PlayerQuest(1 To MAX_QUESTS) As PlayerQuestRec
> ```

Are you sure you've added modSvQuests to your project, if yes, check if this :
```
Public Const MAX_QUESTS As Byte = 70
```Underneath
```
Public Const MAX_TASKS As Byte = 10
```in **modSvQuests**
Link to comment
Share on other sites

@Antisora:

> I set a quest from NPC 21 to talk to NPC 24, but it doesnt work. any suggestions?

Add some health and attributes to NPC 21

* * *

Also, for others, I have problems with this piece of code, it isn't taking items when completing a quest :
```
Case QUEST_TYPE_GOGIVE 'Give X amount of X item to X npc.
            If TargetIndex = Quest(QuestNum).Task(ActualTask).NPC Then
                For i = 1 To MAX_INV
                    If GetPlayerInvItemNum(index, i) = Quest(QuestNum).Task(ActualTask).Item Then
                        If GetPlayerInvItemValue(index, i) >= Quest(QuestNum).Task(ActualTask).Amount Then
                            TakeInvItem index, i, Quest(QuestNum).Task(ActualTask).Amount
                            QuestMessage index, QuestNum, Quest(QuestNum).Task(ActualTask).Speech, 0
                            If CanEndQuest(index, QuestNum) Then
                                EndQuest index, QuestNum
                            Else
                                Player(index).PlayerQuest(QuestNum).ActualTask = ActualTask + 1
                            End If
                            Exit For
                        End If
                    End If
                Next
            End If
```
Does someone know how to get this working?
Link to comment
Share on other sites

Hi folks, I just tried this… I may have missed something, I don't know. I can't seem to find anything, so, debug time.

I tried to compile and got... "Compile Error: Method or Data Member not found" with the following highlighted:

```
.scrlQuest 

```
It's part of the scrlQuest.Value = NPC(Editor line

**Steps taken**
I've checked my code in the client section and it all seems to check out. The server compiles fine.

When I run the debug I have the following line highlighted
Runtime Error '321' Invalid File Format
```
frmMain.optMOn.Value = True
```
**Steps taken**
Re copied and pasted the frmMain

The server side compiles fine.

Please please, can you detail the changes you have made in the other files so that I know what to tag as a mod.
Link to comment
Share on other sites

@JayDee:

> How do I pull up the questlog? Is there a way I can make a button pull it up?

Yes, draw a button somewere on the screen, double click on it and add this in it :
```
UpdateQuestLog
            If picQuestLog.Visible Then
                ShowQuestLogPage 1
            Else
                picQuestLog.Visible = True
                picInventory.Visible = False
                picCharacter.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
```
Link to comment
Share on other sites

Did you add the quest modules to the client and server?

@Alatar:

> -snip-
>
> **Way 2**
> Install the system on your own EO manually, following the steps below and **remember** to [download the extra files](http://www.mediafire.com/?pz31rx4b29is4l0) and add them to your project:
>
> -snip-

Lack of reading the tutorial thoroughly.
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...