Ok, I’m having a big time issue here, and scratching my head on this.
v1=0
v2=0
v3=0
v4ch1=0
v5ch2=1
v6ch3=2
v7ch1=0
v8ch2=1
v9_vsty=1
v10_v1=8
v11_v2=8
v12_v3=128
v13_op=2
v14_ang=45
v15_x=0
v16_y=0
v17_n=1
v18_vsty=1
v19_v1=8
v20_v2=8
v21_v3=128
v22_op=2
v23_ang=45
v24_x=0
v25_y=0
v26_n=1
v31_vsty=1
v32_v1=8
v33_v2=8
v34_v3=128
v35_op=2
v36_ang=45
v37_x=0
v38_y=0
v39_n=1
v40_vsty=1
v41_v1=8
v42_v2=8
v43_v3=128
v44_op=2
v45_ang=45
v46_x=0
v47_y=0
v48_n=1
v49_vsty=1
v50_v1=8
v51_v2=8
v52_v3=128
v53_op=2
v54_ang=45
v55_x=0
v56_y=0
v57_n=1
cs_mode=$v1
cmyk_mode={$cs_mode==3?4:3}
contain_alpha={$v2?1:0}
bitmode=$v3
tch={$cmyk_mode+$contain_alpha}
channels 0
r 100%,100%,100%,$tch
if {$tch==3} ($v4ch1,$v5ch2,$v6ch3)
elif {$tch==4} ($v4ch1,$v5ch2,$v6ch3,$v7ch1)
elif {$tch==5} ($v4ch1,$v5ch2,$v6ch3,$v7ch1,$v8ch2)
fi
tc={w#1} s. x remove_duplicates tw={$!-1} if $tw<$tc v + error "Invalid Channel Order!" v - fi
a[^0] x rv
($v1,$v2,$v3,$v4ch1,$v5ch2,$v6ch3,$v7ch1,$v8ch2,$v9_vsty,$v10_v1,$v11_v2,$v12_v3,$v13_op,$v14_ang,$v15_x,$v16_y,$v17_n,$v18_vsty,$v19_v1,$v20_v2,$v21_v3,$v22_op,$v23_ang,$v24_x,$v25_y,$v26_n,$v31_vsty,$v32_v1,$v33_v2,$v34_v3,$v35_op,$v36_ang,$v37_x,$v38_y,$v39_n,$v40_vsty,$v41_v1,$v42_v2,$v43_v3,$v44_op,$v45_ang,$v46_x,$v47_y,$v48_n,$v49_vsty,$v50_v1,$v51_v2,$v52_v3,$v53_op,$v54_ang,$v55_x,$v56_y,$v57_n)
if ($cs_mode==3||(($cs_mode>8&&$cs_mode<11)||$cs_mode<3))||$bitmode (256,256,256,256,256)
else
if $cs_mode>3&&$cs_mode<7 (361,101,101,256)
elif $cs_mode==7 (101,201,201,256)
elif $cs_mode==8 (101,129,{ceil((pi)*200)},256)
elif $cs_mode==11 (301,301,301,256)
elif $cs_mode==12 (256,301,301,256)
elif $cs_mode==13 (301,301,301,256)
fi
fi
repeat $tch
sh[1] {i(#0,$>,0)}
rep_binaltquad. {crop(#2,8+11*$>,0,15+11*$>,1)},{i(#3,$<,0)},{i(#3,$<,0)},{crop(#2,15+11*$>,0,16+11*$>,1)}
rm.
done
k[1]
For some reason, crop doesn’t give me the value I’d like. Yet, 1,8,8,128,2,45,0,0,{i(#3,$>0)},{i(#3,$>0)},1
just works. So, I don’t understand what’s going on here.