… | |
… | |
507 | $size / $shadow_img->get_width, $size / $shadow_img->get_height, |
507 | $size / $shadow_img->get_width, $size / $shadow_img->get_height, |
508 | 'bilinear', 128 |
508 | 'bilinear', 128 |
509 | ); |
509 | ); |
510 | } |
510 | } |
511 | |
511 | |
512 | for ([MARK_B, $mark & MARK_GRAYED ? 96 : 255, 1], |
512 | for ([MARK_B, $mark & MARK_GRAYED ? 106 : 255, 1], |
513 | [MARK_W, $mark & MARK_GRAYED ? 160 : 255, TRAD_SIZE_W / TRAD_SIZE_B]) { |
513 | [MARK_W, $mark & MARK_GRAYED ? 190 : 255, TRAD_SIZE_W / TRAD_SIZE_B]) { |
514 | my ($mask, $alpha, $scale) = @$_; |
514 | my ($mask, $alpha, $scale) = @$_; |
515 | if ($mark & $mask) { |
515 | if ($mark & $mask) { |
516 | $stone->composite ( |
516 | $stone->composite ( |
517 | $base, 0, 0, $csize, $csize, ($size * (1 - $scale) * 0.5 ) x2, |
517 | $base, 0, 0, $csize, $csize, ($size * (1 - $scale) * 0.5 ) x2, |
518 | $size * $scale / $stone->get_width, $size * $scale / $stone->get_height, |
518 | $size * $scale / $stone->get_width, $size * $scale / $stone->get_height, |
… | |
… | |
545 | my ($mask, $img) = @$_; |
545 | my ($mask, $img) = @$_; |
546 | if ($mark & $mask) { |
546 | if ($mark & $mask) { |
547 | $img->composite ( |
547 | $img->composite ( |
548 | $base, 0, 0, $size, $size, 0, 0, |
548 | $base, 0, 0, $size, $size, 0, 0, |
549 | $size / $img->get_width, $size / $img->get_height, |
549 | $size / $img->get_width, $size / $img->get_height, |
550 | 'bilinear', 176 |
550 | 'bilinear', $dark_bg ? 176 : 190 |
551 | ); |
551 | ); |
552 | } |
552 | } |
553 | } |
553 | } |
554 | |
554 | |
555 | push @stack, $base; |
555 | push @stack, $base; |