Function GetPlayerClassSprite(ByVal Index As Long) As Long
Dim Sex As Byte

    Player(Index).Char(Player(Index).CharNum).Sex = Sex
   
    If Sex = 0 Then
        GetPlayerClassSprite = Int(Class(GetPlayerClass(Index)).MSprite)
    Else
        GetPlayerClassSprite = Int(Class(GetPlayerClass(Index)).FSprite)
    End If
End Function

Function GetPlayerClassSprite(ByVal Index As Long) As Long
    If Player(Index).Char(Player(Index).CharNum).Sex = 0 Then
        GetPlayerClassSprite = Int(Class(GetPlayerClass(Index)).MSprite)
    Else
        GetPlayerClassSprite = Int(Class(GetPlayerClass(Index)).FSprite)
    End If
End Function