bltPlayer & bltPlayerTop

[William]

@Misunderstood: It didn't do any difference, here is what it looks like:


And here is the new code:

Code:

If Y < 0 Then
        With rec
            .top = .top + (Y * -1)
        End With
        Y = 0
    End If

@Pingu: So your saying that I should use this:

Code:

x = GetPlayerX(Index) * PIC_X + sx + Player(Index).XOffset
    y = GetPlayerY(Index) * PIC_Y - PIC_Y + sx + Player(Index).YOffset
    
    If y < 0 Then
        y = 0
        If GetPlayerDir(Index) = DIR_DOWN And Player(Index).Moving > 0 Then
            rec.Top = rec.Top - Player(Index).YOffset
        Else
            rec.Top = rec.Top - Player(Index).YOffset + PIC_Y
        End If
    End If