How do i change the following?

[MarcusX]

EXP Reguired to level:

Stat Gained from STR/INT/VIT Like HP

Change Starting HP/MP

[XerShade]

Give me a few minutes to look at the code, if your using eclipse worlds I coded most of that in my early coding days so I can figure it out.

[MarcusX]

I am, thanks alot

I wanna make it like this

EXP 100/ +100 each level

VIT = 5Hp pur points

HP Start as something every character would start with like 10

[XerShade]

In mod combat all the functions for vitals are there. This is the one your looking for for hp mods.

```
Function GetPlayerMaxVital(ByVal index As Long, ByVal Vital As Vitals) As Long
If index > Player_HighIndex Or index < 1 Then Exit Function

Select Case Vital
Case HP
Select Case Class(GetPlayerClass(index)).CombatTree
Case 1 ' Melee
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Endurance) / 3)) * 15 + 135
Case 2 ' Range
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Endurance) / 3)) * 10 + 100
Case 3 ' Magic
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Endurance) / 3)) * 5 + 75
End Select

Case MP
Select Case Class(GetPlayerClass(index)).CombatTree
Case 1 ' Melee
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Intelligence) / 3)) * 5 + 75
Case 2 ' Range
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Intelligence) / 3)) * 10 + 100
Case 3 ' Magic
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Intelligence) / 3)) * 15 + 135
End Select
End Select
End Function

```
Here is an example of how you can make a char start with 10 of a stat then level it up with str etc.

```
GetPlayerMaxVital = 10 + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Strength)) * 2 The last number is how much each point of str increases your hp by.

```

[XerShade]

Here is the exp code, some little idiot moved it on me so i had to look for it in all the files. It is in modCommands.bas

```
Function GetPlayerNextLevel(ByVal index As Long) As Long
GetPlayerNextLevel = (50 / 3) * ((GetPlayerLevel(index) + 1) ^ 3 - (6 * (GetPlayerLevel(index) + 1) ^ 2) + 17 * (GetPlayerLevel(index) + 1) - 12)
End Function

```
You want to change that function to this.

```
Function GetPlayerNextLevel(ByVal index As Long) As Long
GetPlayerNextLevel = (GetPlayerLevel(index) * 100)
End Function

```

[MarcusX]

Thanks ima test it out

[MarcusX]

GetPlayerMaxVital = 10 + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Strength)) * 2 The last number is how much each point of str increases

Everything else is done, but i wanna contract how much HP/MG/Energy

They get from stats, i dont see it in Search F….

:) Everything else helped

[Matt]

It was already mentioned above.

```

Function GetPlayerMaxVital(ByVal index As Long, ByVal Vital As Vitals) As Long
If index > Player_HighIndex Or index < 1 Then Exit Function

Select Case Vital
' Changing their maximum health
Case HP
' What class are they?
Select Case Class(GetPlayerClass(index)).CombatTree
Case 1 ' Melee class
' The maximum = ((ThePlayer'sLevel / 2) + (Player'sEnduranceLevel / 3)) * (15 + 135)
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Endurance) / 3)) * 15 + 135
Case 2 ' Range class
' The maximum = ((ThePlayer'sLevel / 2) + (Player'sEnduranceLevel / 3)) * (15 + 100)
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Endurance) / 3)) * 10 + 100
Case 3 ' Magic class
' The maximum = ((ThePlayer'sLevel / 2) + (Player'sEnduranceLevel / 3)) * (15 + 75)
GetPlayerMaxVital = ((GetPlayerLevel(index) / 2) + (Account(index).Chars(GetPlayerChar(index)).Stat(Stats.Endurance) / 3)) * 5 + 75
End Select
End Function

```