BASS_ChannelGetData(h, @FFTData, BASS_DATA_FFT2048 or BASS_DATA_FFT_NOWINDOW); //Получаем от BASS коэффициенты Фурье
Falls:=trunc(FFTData[i+30]*Scale*720)*256; //Готовим цвет точки для "водопада"
Falls:=trunc(FFTData[i+30]*Scale*720)*256; //Готовим цвет точки для "водопада"
Там же есть изменённые под нужду копоненты.