You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
169 lines
4.4 KiB
169 lines
4.4 KiB
#!/usr/bin/perl
|
|
# Copyright 1999-20.0 ImageMagick Studio LLC, a non-profit organization
|
|
# dedicated to making software imaging solutions freely available.
|
|
#
|
|
# You may not use this file except in compliance with the License. You may
|
|
# obtain a copy of the License at
|
|
#
|
|
# https://imagemagick.org/script/license.php
|
|
#
|
|
# Unless required by applicable law or agreed to in writing, software
|
|
# distributed under the License is distributed on an "AS IS" BASIS,
|
|
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
# See the License for the specific language governing permissions and
|
|
# limitations under the License.
|
|
#
|
|
BEGIN { $| = 1; $test=1; print "1..18\n"; }
|
|
END {print "not ok $test\n" unless $loaded;}
|
|
use Image::Magick;
|
|
$loaded=1;
|
|
|
|
require 't/subroutines.pl';
|
|
|
|
chdir 't' || die 'Cd failed';
|
|
|
|
#
|
|
# Add
|
|
#
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'ModulusAdd'/,
|
|
'reference/composite/Add.miff', 0.002, 1.0);
|
|
#
|
|
# Atop
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Atop'/,
|
|
'reference/composite/Atop.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# Bumpmap
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"70x46"/,
|
|
'input.miff', q//,q/, gravity=>'Center', compose=>'Bumpmap'/,
|
|
'reference/composite/Bumpmap.miff', 0.03, 0.3);
|
|
|
|
#
|
|
# Clear
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//,
|
|
q/, gravity=>'Center', 'clip-to-self'=>True, compose=>'Clear'/,
|
|
'reference/composite/Clear.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# Copy
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Copy'/,
|
|
'reference/composite/Copy.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# CopyBlue
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'CopyBlue'/,
|
|
'reference/composite/CopyBlue.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# CopyGreen
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'CopyGreen'/,
|
|
'reference/composite/CopyGreen.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# CopyRed
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'CopyRed'/,
|
|
'reference/composite/CopyRed.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# CopyAlpha
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"70x46"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'CopyAlpha'/,
|
|
'reference/composite/CopyAlpha.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# Difference
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Difference'/,
|
|
'reference/composite/Difference.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# In
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'In'/,
|
|
'reference/composite/In.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# Minus
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Minus'/,
|
|
'reference/composite/Minus.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# Multiply
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Multiply'/,
|
|
'reference/composite/Multiply.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# Out
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"70x46"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Out'/,
|
|
'reference/composite/Out.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# Over
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Over'/,
|
|
'reference/composite/Over.miff', 0.00001, 0.009);
|
|
|
|
#
|
|
# Plus
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Plus'/,
|
|
'reference/composite/Plus.miff', 0.03, 0.7);
|
|
|
|
#
|
|
# Subtract
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"100x80"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'ModulusSubtract'/,
|
|
'reference/composite/Subtract.miff', 0.0009, 1.0);
|
|
|
|
#
|
|
# Xor
|
|
#
|
|
++$test;
|
|
testCompositeCompare('gradient:white-black',q/size=>"70x46"/,
|
|
'input.miff', q//, q/, gravity=>'Center', compose=>'Xor'/,
|
|
'reference/composite/Xor.miff', 0.00001, 0.009);
|
|
|
|
1;
|