ASURO DDS

[Rasias]

Hier sind die vier Lautstärken!
 

Rasias & M.

// lautstärken

#include "asuro.h"

void Sound1(uint16_t freq, uint16_t duration_msec, uint8_t amplitude)
{
   uint16_t wait_tics;
   uint32_t n,k,period_usec,dauer_usec;

   period_usec=1000000L/freq;
   dauer_usec=1000*(uint32_t)duration_msec;
   k=dauer_usec/period_usec;

   //IR Interuptfreq=36KHz
   //Wavefreq=18KHz

   wait_tics=18000/freq;

   MotorSpeed(amplitude, 0);

   for(n=0;n<k;n++)
   {
      MotorDir(FWD,FWD);
      Sleep(wait_tics);
      MotorDir(RWD,RWD);
      Sleep(wait_tics);
   }
   MotorSpeed(0,0);

}


  
int main(void)

{
  Init();

  
	StatusLED(RED);	
	Sound1 (1000, 1000, 50);	//piano
	Sound1 (1000, 1000, 0);
	
	StatusLED(GREEN);
	Sound1 (1000, 1000, 120);	//mezo-piano
	Sound1 (1000, 1000, 0);

	StatusLED(YELLOW);
	Sound1 (1000, 1000, 170);	//mezoforte
	Sound1 (1000, 1000, 0);
	
	StatusLED(RED);
	Sound1 (1000, 1000, 255);	//forte
	Sound1 (1000, 1000, 0);
	
 

	StatusLED(YELLOW);	
	Sound1 (1000, 1000, 50);	//piano
	
	StatusLED(GREEN);
	Sound1 (1000, 1000, 120);	//mezo-piano

	StatusLED(YELLOW);
	Sound1 (1000, 1000, 170);	//mezoforte
	
	StatusLED(RED);
	Sound1 (1000, 1000, 255);	//forte
	StatusLED(OFF);



  	while (1);
  	return 0;
}