混音代码

 

for(register DWORD i=0;i<end;i++)
 {
  //将两组WAV文件数据相加，并检测数据大小是否合法，如果
  //数据大小越界，则分别取最大值和最小值
  x=(((*(lpd+i))+(*(wav.lpData+i))))-128;
  if(x<0)  
   x=0;
    if(x>255) 
   x=255;
  *(lpd+i)=(BYTE)(x);
 }


以上代码为单声道混音方式。双声道如下：
    for i := 0 to (ASize div 2) - 1 do
    begin
      Value := (AData1^ + AData2^) ;
      Value := Max(-32767, Min(32767, Value));
      AData1^ := Value;
      inc(AData1);
      inc(AData2);
    end;