/******************************************************************************/
/* SOUND.C: Sound Player                                                      */
/******************************************************************************/
/* This file is part of the uVision/ARM development tools.                    */
/* Copyright (c) 2005-2006 Keil Software. All rights reserved.                */
/* This software may only be used under the terms of a valid, current,        */
/* end user licence from KEIL for a compatible version of KEIL software       */
/* development tools. Nothing else gives you the right to use this software.  */
/******************************************************************************/
                  
#include <stdio.h>
#include <LPC213x.H>                        /* LPC21xx definitions */
#include "PCF8833.h"

#define CPU_CLOCK   60000000                /* CPU Clock                      */
#define DATA_FREQ       8000                /* Sound Data Frequency           */

#define VPB_CLOCK   (CPU_CLOCK/4)           /* VPB Clock                      */
#define TIM_TICK    (VPB_CLOCK/DATA_FREQ)   /* Timer Tick                     */


extern const char SoundData[];              /* Sound Data (Signed 16-bit)     */
extern const int  SoundCount;               /* Sound Data Count               */

unsigned int  Index  = 0;                   /* Sound Data Index               */
unsigned char Volume = 0;                   /* Sound Volume Level             */

/* Timer Counter 0 Interrupt executes @ DATA_FREQ Rate                        */
__irq void tc0 (void) {
  unsigned long val;
  
  if (Index < SoundCount) {                 /* Check if Data is available     */
    if ((Index & 0x3F) == 0) {              /* On every 64th Sample           */
      AD0CR |= 0x01000000;                  /* Start A/D Conversion           */
      do {
        val = AD0DR;                        /* Read A/D Data Register         */
      } while ((val & 0x80000000) == 0);    /* Wait for end of A/D Conversion */
      AD0CR &= ~0x01000000;                 /* Stop A/D Conversion            */
      Volume = val >> 8;                    /* Extract Volume Level (0-255)   */
      IOCLR1 = 0x00FF0000;                  /* Turn Off all LEDs              */
    }
    val    = 0x8000;                        /* Sound Data: Middle Point       */
    val   += SoundData[Index];              /* Sound Data:  Lower 8-bits      */
    val   += SoundData[Index + 1] << 8;     /* Sound Data: Higher 8-bits      */
    val   &= 0xFFFF;
    val   *= Volume;                        /* Sound Volume Level             */
    val  >>= 8;
    DACR   = val;                           /* Set Speaker Output             */   
    Index += 2;                             /* Next Sample                    */
  } 
  T0IR        = 1;                          /* Clear interrupt flag           */
  VICVectAddr = 0;                          /* Acknowledge Interrupt          */
}


int main (void) {

  PINSEL1 = 0x01080000;                     /* Select DAC (AOUT) & AIN1       */

  PCF8833Init();
  LCD_Clear_Screen();
  PutString(1,30,"Sound Test",0xF800,0xFFE0);
  PutString(1,60,"Push BP4",0xF800,0xFFE0);

  AD0CR   = 0x00200402;                     /* ADC1: 10-bit AIN1 @ 3MHz       */ 
  DACR    = 0x00008000;                     /* DAC Output set to Middle Point */

  /* Setup Timer 0: Periodic Interrupt @ DATA_FREQ Rate                       */
  T0MR0 = TIM_TICK - 1;                     /* Timer0 Match Value 0           */
  T0MCR = 3;                                /* Interrupt and Reset on MR0     */
  T0TCR = 1;                                /* Timer0 Enable                  */
  VICVectAddr0 = (unsigned long)tc0;        /* Set Interrupt Vector in 0      */
  VICVectCntl0 = 0x20 | 4;                  /* Use it for Timer0 Interrupt    */
  VICIntEnable = 0x00000010;                /* Enable Timer0 Interrupt        */

  while (1) {                               /* Loop forever                   */
  	char s[20];
	sprintf(s, "Volume : %4d ", Volume);
	PutString(1,90,s,0xF800,0xFFE0);

    if (Index == SoundCount) {              /* Check if Sound is over         */
      if ((IOPIN0 & 0x00004000) == 0) {     /* Check if INT1 is pressed       */
        Index = 0;                          /* Play the Sound again           */
      }
    }
  }
}