Hp/Mp Bars Fucked up

[Ramsey]

^ Pic

\/ code

Code:

' ::::::::::::::::::::::
    ' :: Player hp packet ::
    ' ::::::::::::::::::::::
    If LCase(Parse(0)) = "playerhp" Then
        Player(MyIndex).MaxHP = Val(Parse(1))
        Call SetPlayerHP(MyIndex, Val(Parse(2)))
        If GetPlayerMaxHP(MyIndex) > 0 Then
            'frmMainGame.lblHP.Caption = Int(GetPlayerHP(MyIndex) / GetPlayerMaxHP(MyIndex) * 100) & "%"
            [b]frmMainGame.picHP.Width = ((GetPlayerHP(MyIndex) / 256) / (GetPlayerMaxHP(MyIndex) / 256)) * 256[/b]
        End If
        Exit Sub
    End If

    ' ::::::::::::::::::::::
    ' :: Player mp packet ::
    ' ::::::::::::::::::::::
    If LCase(Parse(0)) = "playermp" Then
        Player(MyIndex).MaxMP = Val(Parse(1))
        Call SetPlayerMP(MyIndex, Val(Parse(2)))
        If GetPlayerMaxMP(MyIndex) > 0 Then
            'frmMainGame.lblMP.Caption = Int(GetPlayerMP(MyIndex) / GetPlayerMaxMP(MyIndex) * 100) & "%"
            [b]frmMainGame.PicMP.Width = ((GetPlayerMP(MyIndex) / 256) / (GetPlayerMaxMP(MyIndex) / 256)) * 256[/b]
        End If
        Exit Sub
    End If

Do you see anything in the code that might lead to this? I did the math myself and it works out nice but it's all messed up in the GUI...

Pay no attention to the horrid GUI that is just for test :lol:

[Robin]

Add a:

Code:

* screen.twipsperpixelx

at the end?

[Ramsey]

Do you have like the answer to everything?!?! Thank you.

[Robin]

Yes.

Yes I do.

[Robin]

Yeah, but I'd know the problem anyway as it's obvious that bar is 1/15 of what it should be.

Plus, I get a lot of people asking me about this.