Client~Side

Na frmMirage, crie um chekBox com as seguintes configurações:

Código:

Name:chkRun
Caption: (você que escolhe)


No modGameLogic procure pela sub Sub CheckMovement(), nela, procure por:

Código:

                    If ShiftDown Then
                        Player(MyIndex).Moving = MOVING_RUNNING
                    Else
                        Player(MyIndex).Moving = MOVING_WALKING
                    End If


Mude para:

Código:

                If ShiftDown Then
                    Player(MyIndex).Moving = MOVING_RUNNING
                Else
                    Player(MyIndex).Moving = MOVING_WALKING
                If frmMirage.chkRun.Value = Checked Then
                    Player(MyIndex).Moving = MOVING_RUNNING
                Else
                    Player(MyIndex).Moving = MOVING_WALKING
                End If
                End If


Creditos:

Desconhecidos