111 |
|
echo blending edges... |
112 |
|
endif |
113 |
|
@ mar= $resolu[1] - 3 |
114 |
< |
pcompos -x 3 $td/hf 0 0 > $td/left |
115 |
< |
pcompos $td/hf -$mar 0 > $td/right |
114 |
> |
@ les= $resolu[1] - 1 |
115 |
> |
pcompos -x 1 $td/hf 0 0 | pfilt -1 -x 3 > $td/left |
116 |
> |
pcompos $td/hf -$les 0 | pfilt -1 -x 3 > $td/right |
117 |
|
pcomb -e 'ro=f(ri);go=f(gi);bo=f(bi)' \ |
118 |
|
-e 'f(p)=(3-x)/7*p(1)+(4+x)/7*p(2)' \ |
119 |
|
$td/right $td/left > $td/left.patch |
123 |
|
pcompos $td/hf 0 0 $td/left.patch 0 0 $td/right.patch $mar 0 \ |
124 |
|
> $td/hflr |
125 |
|
@ mar= $resolu[2] - 3 |
126 |
< |
pcompos -y 3 $td/hflr 0 0 > $td/bottom |
127 |
< |
pcompos $td/hflr 0 -$mar > $td/top |
126 |
> |
@ les= $resolu[2] - 1 |
127 |
> |
pcompos -y 1 $td/hflr 0 0 | pfilt -1 -y 3 > $td/bottom |
128 |
> |
pcompos $td/hflr 0 -$les | pfilt -1 -y 3 > $td/top |
129 |
|
pcomb -e 'ro=f(ri);go=f(gi);bo=f(bi)' \ |
130 |
|
-e 'f(p)=(3-y)/7*p(1)+(4+y)/7*p(2)' \ |
131 |
|
$td/top $td/bottom > $td/bottom.patch |