07-31-2023, 08:00 PM
I had made it only for 3 layers and I forgot to restore the input layers.
Here is a fix:
Here is a fix:
Code:
split_opacity
rgb2hsv[0--1:2]
repeat $! l[$<]
split. c
done done
fill[0--1:4] if(i<60,i*2,if(i<120,i+60,if(i<240,i/2+120,i)))
100%,100%,1,1
fill. x=0;y=0;for(n=0,n<l,x=x+i#(n+3)/255*cos(pi*i#n/180);y=y+sin(pi*i#n/180);n=n+4);(90-180*atan2(x,y)/pi)%360
fill[0--1:4] if(i<120,i/2,if(i<180,i-60,if(i<240,i*2-240,i)))
100%,100%,1,1
fill. m=0;for(n=1,n<l,m=max(m,i#n);n=n+4);m
100%,100%,1,1
fill. m=0;for(n=2,n<l,m=max(m,i#n);n=n+4);m
100%,100%,1,1
fill. m=0;for(n=3,n<l,m=max(m,i#n);n=n+4);m
repeat $!
if $<%4==0
second={$<+1}
third={$<+2}
local[$<,$second,$third]
a c
done
fi
done
hsv2rgb[0--1:2]
repeat $!
if $<%2==0
second={$<+1}
local[$<,$second]
a c
done
fi
done
mv. 0