Does anyone have...

[timster0]

Getting a wierd bug:

"sub or function not defined"

in the:

Code:

' :::::::::::::::::::::::::
    ' :: Create Guild packet ::
    ' :::::::::::::::::::::::::
    If LCase(Parse(0)) = "createguild" Then
    Dim Z As String
    
      ' Prevent hacking
        If GetPlayerAccess(Index) < ADMIN_CREATOR Then
              Call HackingAttempt(Index, "Trying to use powers not available")
              Exit Sub
        End If
        
        ' The Player
        n = FindPlayer(Parse(1))
        ' The Guild
        Z = Trim(Parse(2))
        
        Call CreateGuild(n, Z)
        Call SetPlayerGuildAccess(n, 4)
        Call SendPlayerData(n)
        Call GlobalMsg(GetPlayerName(n) & " has joined the ranks of " & Z & ".", Black)
        Call AddLog(GetPlayerName(n) & " has joined the ranks of " & Z & ".", ADMIN_LOG)
        Exit Sub
    End If

Highlighting:

Code:

Call CreateGuild

Isn't this the CreateGuild packet though?