Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
func f(x) {
2 
	return x-x%1
3 
}
4 
 
5 
func 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 
}