xref: /plan9/sys/src/libmemdraw/alpha.hoc (revision 7dd7cddf99dd7472612f1413b4da293630e6b1bc)
1func f(x) {
2	return x-x%1
3}
4
5func pixel(dr, dg, db, da, sr, sg, sb, sa, m) {
6	M = 255-f((sa*m)/255)
7	print f((sr*m+dr*M)/255), " ", f((sg*m+dg*M)/255), " ", f((sb*m+db*M)/255),  " ", f((sa*m+da*M)/255), "\n"
8	return 0
9}
10