Simple EXP Carry-Over

[Tutorial Bot]

Author: Magnus
Difficulty: 1/5

:: SERVER SIDE ::
Find:

Code:

Sub CheckPlayerLevelUp(ByVal Index As Long)

Beneath it, add:

Code:

Dim ExtraEXP As Long

Now, add this before any of the other comment stuff:

Code:

If GetPlayerExp(Index) > GetPlayerNextLevel(Index) Then
        ExtraEXP = (GetPlayerExp(Index) - GetPlayerNextLevel(Index))
    Else
        ExtraEXP = 0
    End If

Change:

Code:

Call SetPlayerExp(Index, 0)

To:

Code:

Call SetPlayerExp(Index, ExtraEXP)

At the end, add:

Code:

Call CheckPlayerLevelUp(Index)

That's all!