Advanced quest system problem...

[William]

What does the error say?

Hint: use code tags for each sub, easier to read it then.

[Matt]

Okay, then either it's a certain part of that line and you didn't specify, or that value isn't even found, or something along those lines. Why are you using readini anyway? GetVar is much better.

[Matt]

It's not hard. Just compare a readini call to a getvar call and you'll understand it easily.

Trust me, I was the same way at first. I didn't even know get/putvar did the same thing as read/writeini. Lol.

[Tosuxo]

Code:

Function DoQuest(ByVal questnum As Long, ByVal index As Long, ByVal npcnum As Long)
if getvar(app.path & "\gflag.ini", trim(player(index).char(player(index).charnum).name), "QUEST" & trim(npc(npcnum).quest)) = 2 then
Call PlayerMsg(index, "A " & Trim(Npc(npcnum).Name) & " says, '" & Trim(Quest(Npc(npcnum).Quest).After) & "'", SayColor)
ElseIf getvar(app.path & "\gflag.ini", trim(player(index).char(player(index).charnum).name), "QUEST" & trim(npc(npcnum).quest)) = 1 then
Call SendDataTo(index, "questprompt" & SEP_CHAR & questnum & SEP_CHAR & npcnum & SEP_CHAR & END_CHAR)
Else
Debug.Print "NOT COMPLETED Quest"
Call StartQuest(questnum, index, npcnum)
End If

End Function

i THINK i've changed that to getvar for you... may have made a mistake sorry... i'm doing my accouting essay for uni right now so a lil confused haha, hope it helps

[Tony]

Getvar sucks ass :], You know that advo. Lord, learn binary files. Its like 10x faster. Less code also.