Source position: XGR32_EffectsFunc.pas line 110
procedure Effect_ToBinary(
src: tbitmap32;
amount: Integer
);