255 break PlayerStats limit

[Ananke]

Hi,

There's possibility to break the 255 playerstats limit?

Best Regards

[Stein]

Yes, however you'd need to delete all your items, NPCs and players. By default they're assigned Bytes, which are limited from 0-255, swapping them out for longs will let you go into the Billions though.

[Ananke]

Ah i forgot to change for longs. Thanks i wll check it later

[WiseRock]

Integer variables can hold values between -32,767 to 32,767

Long variables can hold values between -2,147,483,647 to 
2,147,483,647

Byte variables can hold values between 0 to 255

I agree with Frankenstein I would go with long since you can go up to 2,147,483,647.

[Ananke]

```
Public Sub SetPlayerStat(ByVal index As Long, ByVal Stat As Long, ByVal Value As Long)
Player(index).Stat(Stat) = Value
End Sub

```
when i try to add 256 point i have problem over here :(

[Stein]

Did you change the actual .Stat declaration to a long?

[Ananke]

now there's problem with clinet, it's doesn't show more than 255 points :(

[Stein]

Because again, you have to change every reference related to stats into a Long, not a byte. ;)

[Ananke]

i did it.

edit: ok i got it3

Sub SetPlayerStat(ByVal Index As Long, Stat As Stats, ByVal value As Long)
    ' If debug mode, handle error then exit out
    If Options.Debug = 1 Then On Error GoTo errorhandler

    If Index > MAX_PLAYERS Then Exit Sub
    If value <= 0 Then value = 1
    If value > MAX_byte Then value = MAX_byte    **<–-- change byte to long**

    Player(Index).Stat(Stat) = value

    ' Error handler
    Exit Sub
errorhandler:
    HandleError "SetPlayerStat", "modDatabase", Err.Number, Err.Description, Err.Source, Err.HelpContext
    Err.Clear
    Exit Sub
End Sub

Big thanks 2 You!!!