Quest help (from m:rpge)

[Forte]

yeah the x's are fine like that, just defined as caps.
Here's SetCurrentQuest;

Code:

Function SetCurrentQuest(ByVal index As Long, ByVal QuestID As Long, ByRef Qplayer As PlayerRec) As Boolean
    If QuestID > 0 And QuestID < MAX_QUESTS Then
        If Qplayer.Level >= Quests(QuestID).requiredLevel Then
            If Qplayer.CurrentQuest = 0 Then
                Qplayer.CurrentQuest = QuestID
                Call SetCurrentQuestStatus(index, 1, Qplayer)
                SetCurrentQuest = True
                Exit Function
            Else
                Call PlayerMsg(index, "You currently have a quest.", Green)
            End If
        Else
            Call PlayerMsg(index, "You are of too low level to start this quest.", Red)
        End If
    End If
    SetCurrentQuest = False
End Function
Sub SetCurrentQ