| … | |
… | |
| 81 | glPushMatrix; |
81 | glPushMatrix; |
| 82 | glTranslate $self->{x}, $self->{y}, 0; |
82 | glTranslate $self->{x}, $self->{y}, 0; |
| 83 | $self->_draw; |
83 | $self->_draw; |
| 84 | if ($self == $::HOVER) { |
84 | if ($self == $::HOVER) { |
| 85 | glColor 1, 1, 1, 0.4; |
85 | glColor 1, 1, 1, 0.4; |
|
|
86 | glEnable GL_BLEND; |
| 86 | glBegin GL_QUADS; |
87 | glBegin GL_QUADS; |
| 87 | glVertex 0, 0; |
88 | glVertex 0, 0; |
| 88 | glVertex $self->{w} - 1, 0; |
89 | glVertex $self->{w} - 1, 0; |
| 89 | glVertex $self->{w} - 1, $self->{h} - 1; |
90 | glVertex $self->{w} - 1, $self->{h} - 1; |
| 90 | glVertex 0, $self->{h} - 1; |
91 | glVertex 0, $self->{h} - 1; |
| 91 | glEnd; |
92 | glEnd; |
|
|
93 | glDisable GL_BLEND; |
| 92 | } |
94 | } |
| 93 | glPopMatrix; |
95 | glPopMatrix; |
| 94 | } |
96 | } |
| 95 | |
97 | |
| 96 | sub _draw { |
98 | sub _draw { |
