--- deliantra/Deliantra-Client/DC/UI.pm 2006/04/08 13:36:26 1.18 +++ deliantra/Deliantra-Client/DC/UI.pm 2006/04/08 14:04:14 1.19 @@ -380,11 +380,17 @@ glBindTexture GL_TEXTURE_2D, $tex->{name}; + my $w = $tex->{width}; + my $h = $tex->{height}; + + my $px = ($x + 1) * 32 - $w; + my $py = ($y + 1) * 32 - $h; + glBegin GL_QUADS; - glTexCoord 0, 0; glVertex $x * 32 , $y * 32; - glTexCoord 0, 1; glVertex $x * 32 , $y * 32 + 32; - glTexCoord 1, 1; glVertex $x * 32 + 32, $y * 32 + 32; - glTexCoord 1, 0; glVertex $x * 32 + 32, $y * 32; + glTexCoord 0, 0; glVertex $px , $py; + glTexCoord 0, 1; glVertex $px , $py + $h; + glTexCoord 1, 1; glVertex $px + $w, $py + $h; + glTexCoord 1, 0; glVertex $px + $w, $py; glEnd; } }