| … | |
… | |
| 625 | our @ISA = CFClient::UI::Bin::; |
625 | our @ISA = CFClient::UI::Bin::; |
| 626 | |
626 | |
| 627 | use CFClient::OpenGL; |
627 | use CFClient::OpenGL; |
| 628 | |
628 | |
| 629 | my @tex = |
629 | my @tex = |
| 630 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_ } |
630 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_, mipmap => 1 } |
| 631 | qw(d1_bg.png d1_border_top.png d1_border_right.png d1_border_left.png d1_border_bottom.png); |
631 | qw(d1_bg.png d1_border_top.png d1_border_right.png d1_border_left.png d1_border_bottom.png); |
| 632 | |
632 | |
| 633 | sub new { |
633 | sub new { |
| 634 | my $class = shift; |
634 | my $class = shift; |
| 635 | |
635 | |
| … | |
… | |
| 1344 | our @ISA = CFClient::UI::Label::; |
1344 | our @ISA = CFClient::UI::Label::; |
| 1345 | |
1345 | |
| 1346 | use CFClient::OpenGL; |
1346 | use CFClient::OpenGL; |
| 1347 | |
1347 | |
| 1348 | my @tex = |
1348 | my @tex = |
| 1349 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_ } |
1349 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_, mipmap => 1 } |
| 1350 | qw(b1_button_active.png); |
1350 | qw(b1_button_active.png); |
| 1351 | |
1351 | |
| 1352 | sub new { |
1352 | sub new { |
| 1353 | my $class = shift; |
1353 | my $class = shift; |
| 1354 | |
1354 | |
| … | |
… | |
| 1401 | package CFClient::UI::CheckBox; |
1401 | package CFClient::UI::CheckBox; |
| 1402 | |
1402 | |
| 1403 | our @ISA = CFClient::UI::DrawBG::; |
1403 | our @ISA = CFClient::UI::DrawBG::; |
| 1404 | |
1404 | |
| 1405 | my @tex = |
1405 | my @tex = |
| 1406 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_ } |
1406 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_, mipmap => 1 } |
| 1407 | qw(c1_checkbox_bg.png c1_checkbox_active.png); |
1407 | qw(c1_checkbox_bg.png c1_checkbox_active.png); |
| 1408 | |
1408 | |
| 1409 | use CFClient::OpenGL; |
1409 | use CFClient::OpenGL; |
| 1410 | |
1410 | |
| 1411 | sub new { |
1411 | sub new { |
| … | |
… | |
| 1468 | |
1468 | |
| 1469 | use CFClient::OpenGL; |
1469 | use CFClient::OpenGL; |
| 1470 | |
1470 | |
| 1471 | my %tex = ( |
1471 | my %tex = ( |
| 1472 | food => [ |
1472 | food => [ |
| 1473 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_ } |
1473 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_, mipmap => 1 } |
| 1474 | qw/g1_food_gauge_empty.png g1_food_gauge_full.png/ |
1474 | qw/g1_food_gauge_empty.png g1_food_gauge_full.png/ |
| 1475 | ], |
1475 | ], |
| 1476 | grace => [ |
1476 | grace => [ |
| 1477 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_ } |
1477 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_, mipmap => 1 } |
| 1478 | qw/g1_grace_gauge_empty.png g1_grace_gauge_full.png/ |
1478 | qw/g1_grace_gauge_empty.png g1_grace_gauge_full.png/ |
| 1479 | ], |
1479 | ], |
| 1480 | hp => [ |
1480 | hp => [ |
| 1481 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_ } |
1481 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_, mipmap => 1 } |
| 1482 | qw/g1_hp_gauge_empty.png g1_hp_gauge_full.png/ |
1482 | qw/g1_hp_gauge_empty.png g1_hp_gauge_full.png/ |
| 1483 | ], |
1483 | ], |
| 1484 | mana => [ |
1484 | mana => [ |
| 1485 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_ } |
1485 | map { new_from_file CFClient::Texture CFClient::find_rcfile $_, mipmap => 1 } |
| 1486 | qw/g1_mana_gauge_empty.png g1_mana_gauge_full.png/ |
1486 | qw/g1_mana_gauge_empty.png g1_mana_gauge_full.png/ |
| 1487 | ], |
1487 | ], |
| 1488 | ); |
1488 | ); |
| 1489 | |
1489 | |
| 1490 | # eg. VGauge->new (gauge => 'food'), default gauge: food |
1490 | # eg. VGauge->new (gauge => 'food'), default gauge: food |
