alpha_blend
pd[i].Red = alpha_blend(ps[i].Red, pd[i].Red, a);
pd[i].Green = alpha_blend(ps[i].Green, pd[i].Green, a);
pd[i].Blue = alpha_blend(ps[i].Blue, pd[i].Blue, a);