// (c) Theo Verelst
// Uncommercial use only permitted with this notice clearly 
// visible, commercial rights reserved, contact: theover@tiscali.nl
// Based on the herunder audio talkthrough from AD
// This project implements a 
//
//   CHORUS UNIT
// 
// in prototype form (way to much high frequency noise, at the moment)
// This is a musical instrument effect which adds richness to the sound 
// by mixing in various delayed components of the input signal 
// to the output, each with a varying delay lenght, modulated by 
// independent low frequency sine waves.
//
//--------------------------------------------------------------------------//
//																			//
//	 Name: 	Talkthrough for the ADSP-BF533 EZ-KIT Lite						//
//																			//
//--------------------------------------------------------------------------//
//																			//
//	(C) Copyright 2003 - Analog Devices, Inc.  All rights reserved.			//
//																			//
//	Project Name:	BF533 C Talkthrough TDM									//
//																			//
//	Date Modified:	04/03/03		HD		Rev 1.0							//
//																			//
//	Software:		VisualDSP++3.1											//
//																			//
//	Hardware:		ADSP-BF533 EZ-KIT Board									//
//																			//
//	Connections:	Connect an input source (such as a radio) to the Audio	//
//					input jack and an output source (such as headphones) to //
//					the Audio output jack									//
//																			//
//	Purpose:		This program sets up the SPI port on the ADSP-BF533 to  //
//					configure the AD1836 codec.  The SPI port is disabled 	//
//					after initialization.  The data to/from the codec are 	//
//					transfered over SPORT0 in TDM mode						//
//																			//
//--------------------------------------------------------------------------//

#include "Talkthrough.h"
#include "sysreg.h"
#include "ccblkfn.h"
#include <math.h>

//--------------------------------------------------------------------------//
// Variables																//
//																			//
// Description:	The variables iChannelxLeftIn and iChannelxRightIn contain 	//
//				the data coming from the codec AD1836.  The (processed)		//
//				playback data are written into the variables 				//
//				iChannelxLeftOut and iChannelxRightOut respectively, which 	//
//				are then sent back to the codec in the SPORT0 ISR.  		//
//				The values in the array iCodec1836TxRegs can be modified to //
//				set up the codec in different configurations according to   //
//				the AD1885 data sheet.										//
//--------------------------------------------------------------------------//
// left input data from ad1836
int iChannel0LeftIn, iChannel1LeftIn;
// right input data from ad1836
int iChannel0RightIn, iChannel1RightIn;
// left ouput data for ad1836	
int iChannel0LeftOut, iChannel1LeftOut;
// right ouput data for ad1836
int iChannel0RightOut, iChannel1RightOut;
// array for registers to configure the ad1836
// names are defined in "Talkthrough.h"
volatile short sCodec1836TxRegs[CODEC_1836_REGS_LENGTH] =
{									
					DAC_CONTROL_1	| 0x000,
					DAC_CONTROL_2	| 0x000,
					DAC_VOLUME_0	| 0x3ff,
					DAC_VOLUME_1	| 0x3ff,
					DAC_VOLUME_2	| 0x3ff,
					DAC_VOLUME_3	| 0x3ff,
					DAC_VOLUME_4	| 0x3ff,
					DAC_VOLUME_5	| 0x3ff,
					ADC_CONTROL_1	| 0x000,
					ADC_CONTROL_2	| 0x180,
					ADC_CONTROL_3	| 0x000
					
};
// SPORT0 DMA transmit buffer
volatile int iTxBuffer1[8];
// SPORT0 DMA receive buffer
volatile int iRxBuffer1[8];

extern Initaudiobuffer();
extern initmidi();

int *sinewave;
int sc, vul, vur;
int si1,si2,si3;
int sincr1, sincr2, sincr3;
int *dell, *delr, dml, dmr, dil, dir, dol, dor, dom;


int sine[MAXPOLY], sinincr[MAXPOLY];
unsigned char midinote[MAXPOLY], midivel[MAXPOLY], midibyte;
char midistate, midipstate;
int *wavetable, wtlen;

initdelay()
{
	int i;
	
	dell =   1024*1024; dml = 48000;    // Delay Line Left, 1MB, max set to 1 sec
	delr = 2*1024*1024; dmr = 48000;    // Delay Line Right, base address, # regarded samples (fits in about 200kB)
	dil=0; dir=0;                       // Delay Index Left and Right
	dol =   200; dor =   200;           // Delay current Offset Left, Right
	dom = 200;                          // Delay offset mid channel
	
	for (i=0; i<dml; i++) dell[i] = 0;  // Zero/clear the lines
	for (i=0; i<dmr; i++) delr[i] = 0;
}

initsinewave() {
	int i,a;
	
	sinewave = (int *) 0;
	a = (int) pow(2,23) -1;
	
	for (i=0; i<MAXSINEWAVE;i++) {
		sinewave[i] = (int) (a*sin( 2.0*3.1415926535*((double) i)/((double) MAXSINEWAVE) ));
	}
	
	sc = 0; vul = 8; vur = 8;
//	ledvu(vul,vur);
	si1=0; si2=0;
//	sincr1 = 100<<16;
//	sincr1 = (3<<14);
//	sincr2 = (5<<13);
//	sincr3 = (1<<14);
	sincr1 = (16000);
	sincr2 = (21023);
	sincr3 = (8111);
}

initwavetable()
{
	int i,a;

	wavetable = (int *) WAVETABLE;
	a = (int) (pow(2,23) -1)/2;
	
	wtlen = 100000;
	for (i=0; i<wtlen;i++) {
		wavetable[i] =  (int) (1.0 * a*sin( 2.0       *3.1415926535*((double) i)/((double) wtlen) ));
		wavetable[i] += (int) (0.5 * a*sin( 2.0 * 2.0 *3.1415926535*((double) i)/((double) wtlen) ));
	}

}

initsynth() {
	int i;
	
	midistate = MIDINIT;
	midibyte = 0;

	initwavetable();
	
	for (i=0; i< MAXPOLY; i++) {
	   sine[i] = 0;
	   sinincr[i] = 101;
	   midinote[i] = 0;
	   midivel[i] = 64;
	}
}

//--------------------------------------------------------------------------//
// Function:	main														//
//																			//
// Description:	After calling a few initalization routines, main() just 	//
//				waits in a loop forever.  The code to process the incoming  //
//				data can be placed in the function Process_Data() in the 	//
//				file "Process_Data.c".										//
//--------------------------------------------------------------------------//
void main(void)
{

	sysreg_write(reg_SYSCFG, 0x32);		//Initialize System Configuration Register
	Init_EBIU();
	Init_Flash();

	Enable_Sdram();
//    Initaudiobuffer();
    initdelay();
    initsinewave();
    initmidi();
    initsynth();

	Init1836();
	Init_Sport0();
	Init_DMA();
	Init_Sport_Interrupts();
	Enable_DMA_Sport0();
//	printf("%d\n",-102%10);
	
	while(1);
}