Problem with Alatar System Quest

[troglodite]

Hello! I am getting problems with [Alatar System Quest](http://www.touchofdeathforums.com/community/index.php?/topic/117080-eo-alatars-quest-system-v12/), I have added the code to my project, didnt replace frmEditor_NPC & frmMain because

I dont want to lose other coddes that I added; But everything seems to be Ok, I copy+paste the windows of "QuestLog" & "QuestDialogue"

and I make a NPC to give quest number 1; But when I atack the NPC, didnt send me the "QuestLog" window 

Mention that I added the images "questlog.jpg" & "questdialogue.jpg" of window to my graphics/gui/main…

Can you help me please??

[Wortel Angels]

Do you added the codes too ?

[troglodite]

> Do you added the codes too ?

Yeah, for server/src I added _modSvQuest.bas_ and for client src I added _modQuests.bas_, _frmEditor_Quest.frx_ and _frmEditor_Quest.frm_

But I didnt added:

_frmMain.frx_, _frmMain.frm_, _frmEditor_NPC.frx_ and _frmEditor_NPC.frm_ because I dont want to lose other changes that I have in that forms :S

[DeathKnight]

You won't necessarily need to add those forms, but all of the changes that were made that apply to the system you will still need to add to your current forms. I think that is what he is asking, if you have added the code and required objects to your current form.

[troglodite]

> You won't necessarily need to add those forms, but all of the changes that were made that apply to the system you will still need to add to your current forms. I think that is what he is asking, if you have added the code and required objects to your current form.

Yes, I searched all the 'alatar code lines in the [EO with Quest System](http://www.mediafire.com/?0ef5z3a9wa5tiif) that Alatar provides and copy+paste all the code, but still dont work 

Excuse my english :$

[Matt]

> Yes, I searched all the 'alatar code lines in the [EO with Quest System](http://www.mediafire.com/?0ef5z3a9wa5tiif) that Alatar provides and copy+paste all the code, but still dont work 
>
> Excuse my english :$

You need to add the code from the forms as well, or else it won't work.

[troglodite]

> You need to add the code from the forms as well, or else it won't work.

I added them all… but still doesnt work

Nothing appears when I atack the NPC-Quest  so I cant acept the Quest#1 that I made for the NPC-Quest

EDIT: OH HELL! Now when I click on a NPC that have a spell to through (in NPC_Editor) it send me:

Run-time error '380':

invalid property value

and this is the debug line:

```
.chkQuest.Value = NPC(EditorIndex).Quest
```
maybe something is wrong?

[Matt]

Post your NPC rec.

[troglodite]

> Post your NPC rec.

>! ```
' ////////////////
>! ' // Npc Editor //
>! ' ////////////////
>! Public Sub NpcEditorInit()
>! Dim i As Long
>! Dim SoundSet As Boolean
>! ' If debug mode, handle error then exit out
>! If Options.Debug = 1 Then On Error GoTo errorhandler
>! If frmEditor_NPC.Visible = False Then Exit Sub
>! EditorIndex = frmEditor_NPC.lstIndex.ListIndex + 1
>! ' populate the cache if we need to
>! If Not hasPopulated Then
>! PopulateLists
>! End If
>! ' add the array to the combo
>! frmEditor_NPC.cmbSound.Clear
>! frmEditor_NPC.cmbSound.AddItem "None."
>! For i = 1 To UBound(soundCache)
>! frmEditor_NPC.cmbSound.AddItem soundCache(i)
>! Next
>! ' finished populating
>! With frmEditor_NPC
>! .txtName.text = Trim$(NPC(EditorIndex).Name)
>! .txtAttackSay.text = Trim$(NPC(EditorIndex).AttackSay)
>! If NPC(EditorIndex).Sprite < 0 Or NPC(EditorIndex).Sprite > .scrlSprite.Max Then NPC(EditorIndex).Sprite = 0
>! .scrlSprite.Value = NPC(EditorIndex).Sprite
>! .txtSpawnSecs.text = CStr(NPC(EditorIndex).SpawnSecs)
>! .cmbBehaviour.ListIndex = NPC(EditorIndex).Behaviour
>! .scrlRange.Value = NPC(EditorIndex).Range
>! .txtChance.text = CStr(NPC(EditorIndex).DropChance)
>! .scrlNum.Value = NPC(EditorIndex).DropItem
>! .scrlValue.Value = NPC(EditorIndex).DropItemValue
>! .txtHP.text = NPC(EditorIndex).HP
>! .txtEXP.text = NPC(EditorIndex).EXP
>! .txtLevel.text = NPC(EditorIndex).Level
>! .txtDamage.text = NPC(EditorIndex).Damage
>!
>! 'ALATAR
>! .chkQuest.Value = NPC(EditorIndex).Quest
>! .scrlQuest.Value = NPC(EditorIndex).QuestNum
>! '/ALATAR
>!
>! .scrlSpellNum.Max = MAX_NPC_SPELLS
>! .scrlSpellNum.Value = 1
>!
>! ' find the sound we have set
>! If .cmbSound.ListCount >= 0 Then
>! For i = 0 To .cmbSound.ListCount
>! If .cmbSound.List(i) = Trim$(NPC(EditorIndex).Sound) Then
>! .cmbSound.ListIndex = i
>! SoundSet = True
>! End If
>! Next
>! If Not SoundSet Or .cmbSound.ListIndex = -1 Then .cmbSound.ListIndex = 0
>! End If
>!
>! For i = 1 To Stats.Stat_Count - 1
>! .scrlStat(i).Value = NPC(EditorIndex).Stat(i)
>! Next
>! End With
>! Call EditorNpc_BltSprite
>! NPC_Changed(EditorIndex) = True
>! ' Error handler
>! Exit Sub
>! errorhandler:
>! HandleError "NpcEditorInit", "modGameEditors", Err.Number, Err.Description, Err.Source, Err.HelpContext
>! Err.Clear
>! Exit Sub
>! End Sub
```

This?

[abhi2011]

> >! ```
> ' ////////////////
> >! ' // Npc Editor //
> >! ' ////////////////
> >! Public Sub NpcEditorInit()
> >! Dim i As Long
> >! Dim SoundSet As Boolean
> >! ' If debug mode, handle error then exit out
> >! If Options.Debug = 1 Then On Error GoTo errorhandler
> >! If frmEditor_NPC.Visible = False Then Exit Sub
> >! EditorIndex = frmEditor_NPC.lstIndex.ListIndex + 1
> >! ' populate the cache if we need to
> >! If Not hasPopulated Then
> >! PopulateLists
> >! End If
> >! ' add the array to the combo
> >! frmEditor_NPC.cmbSound.Clear
> >! frmEditor_NPC.cmbSound.AddItem "None."
> >! For i = 1 To UBound(soundCache)
> >! frmEditor_NPC.cmbSound.AddItem soundCache(i)
> >! Next
> >! ' finished populating
> >! With frmEditor_NPC
> >! .txtName.text = Trim$(NPC(EditorIndex).Name)
> >! .txtAttackSay.text = Trim$(NPC(EditorIndex).AttackSay)
> >! If NPC(EditorIndex).Sprite < 0 Or NPC(EditorIndex).Sprite > .scrlSprite.Max Then NPC(EditorIndex).Sprite = 0
> >! .scrlSprite.Value = NPC(EditorIndex).Sprite
> >! .txtSpawnSecs.text = CStr(NPC(EditorIndex).SpawnSecs)
> >! .cmbBehaviour.ListIndex = NPC(EditorIndex).Behaviour
> >! .scrlRange.Value = NPC(EditorIndex).Range
> >! .txtChance.text = CStr(NPC(EditorIndex).DropChance)
> >! .scrlNum.Value = NPC(EditorIndex).DropItem
> >! .scrlValue.Value = NPC(EditorIndex).DropItemValue
> >! .txtHP.text = NPC(EditorIndex).HP
> >! .txtEXP.text = NPC(EditorIndex).EXP
> >! .txtLevel.text = NPC(EditorIndex).Level
> >! .txtDamage.text = NPC(EditorIndex).Damage
> >!
> >! 'ALATAR
> >! .chkQuest.Value = NPC(EditorIndex).Quest
> >! .scrlQuest.Value = NPC(EditorIndex).QuestNum
> >! '/ALATAR
> >!
> >! .scrlSpellNum.Max = MAX_NPC_SPELLS
> >! .scrlSpellNum.Value = 1
> >!
> >! ' find the sound we have set
> >! If .cmbSound.ListCount >= 0 Then
> >! For i = 0 To .cmbSound.ListCount
> >! If .cmbSound.List(i) = Trim$(NPC(EditorIndex).Sound) Then
> >! .cmbSound.ListIndex = i
> >! SoundSet = True
> >! End If
> >! Next
> >! If Not SoundSet Or .cmbSound.ListIndex = -1 Then .cmbSound.ListIndex = 0
> >! End If
> >!
> >! For i = 1 To Stats.Stat_Count - 1
> >! .scrlStat(i).Value = NPC(EditorIndex).Stat(i)
> >! Next
> >! End With
> >! Call EditorNpc_BltSprite
> >! NPC_Changed(EditorIndex) = True
> >! ' Error handler
> >! Exit Sub
> >! errorhandler:
> >! HandleError "NpcEditorInit", "modGameEditors", Err.Number, Err.Description, Err.Source, Err.HelpContext
> >! Err.Clear
> >! Exit Sub
> >! End Sub
> ```
>
> This?

modTypes

NpcRec

[troglodite]

Excuse me 

>! ```
Private Type NpcRec
>! Name As String * NAME_LENGTH
>! AttackSay As String * 100
>! Sound As String * NAME_LENGTH
>! Sprite As Long
>! SpawnSecs As Long
>! Behaviour As Byte
>! Range As Byte
>! DropChance As Long
>! DropItem As Long
>! DropItemValue As Long
>! Stat(1 To Stats.Stat_Count - 1) As Byte
>! HP As Long
>! EXP As Long
>! Animation As Long
>! Damage As Long
>! Level As Long
>! 'ALATAR
>! Quest As Byte
>! QuestNum As Long
>! '/ALATAR
>! ' Npc Spells
>! Spell(1 To MAX_NPC_SPELLS) As Long
>! End Type
```

[Matt]

A checkbox has three values: 0, 1 and 2\. You may be trying to set the value to something beyond it's max. I don't know how Alatar's quest system works, so I'll let you figure that out on your own.

[abhi2011]

Try deleting your NPCs or convert them.

[troglodite]

This is very frustrating….... I replace src carpets of client and server, compile them, and still dont working... HELL!!

EDIT: I FIX IT!!! I have Alatar Quest System, the problem was that the picturequestlog didnt appear, and looking around the forum i saw a solution: adding stats to the NPC Give Quester.

Nice, bye ^^