C Code for the ATMega8 to play the Imperial March

atMegaImpMarch.c

/*
 * ImpMarchTiny.c
 *
 * Created: 03.04.2011 21:06:57
 *  Author: surt91
 */ 
#include <avr/io.h>

// "_delay_ms()" is only precise to 261/tact ms (4 ms)
void long_delay(int cs) 
{
    cs *= 1000000;
    for(; cs>0; cs--) ; // busy waiting
}


//This function generates the square wave that makes the piezo speaker sound at a determinated frequency.
void beep(unsigned int duration, unsigned int note, unsigned int pause)
{
    //pause /= 2;
    //note -= 20;
    const int delay = (int)(10000/note);  //This is the semiperiod of each note.
    long time = (long)(duration)*20;  //This is how much time we need to spend on the note.

    while(time>0)
    {
        PORTB|=(1<<PB4);   //Set P1.2...
        long_delay(delay);
        PORTB&=~(1<<PB4);  //...then reset it...
        long_delay(delay);
        time -= delay;
    }
    long_delay(pause*50); //Add a little delay to separate the single notes
}

void imperialerMarsch()
{
    beep( 350 , 392 , 100 );
    beep( 350 , 392 , 100 );
    beep( 350 , 392 , 100);
    beep( 250 , 311.1 , 100 );
    beep( 25 , 466.2 , 100 );
    beep( 350 , 392 , 100 );
    beep( 250 , 311.1 , 100);
    beep( 25 , 466.2 , 100 );
    beep( 700 , 392 , 100 );
    beep( 350 , 587.32 , 100 );
    beep( 350 , 587.32 , 100 );
    beep( 350 , 587.32 , 100 );
    beep( 250 , 622.26 , 100 );
    beep( 25 , 466.2 , 100 );
    beep( 350 , 369.99 , 100);
    beep( 250 , 311.1 , 100 );
    beep( 25 , 466.2 , 100 );
    beep( 700 , 392 , 100 );
    beep( 350 , 784 , 100 );
    beep( 250 , 392 , 100 );
    beep( 25 , 392 , 100 );
    beep( 350 , 784 , 100 );
    beep( 250 , 739.98 , 100 );
    beep( 25 , 698.46 , 100 );
    beep( 25 , 659.26 , 100 );
    beep( 25 , 622.26 , 100 );
    beep( 50 , 659.26 , 400 );
    beep( 25 , 415.3 , 200 );
    beep( 350 , 554.36 , 100);
    beep( 250 , 523.25 , 100 );
    beep( 25 , 493.88 , 100 );
    beep( 25 , 466.16 , 100 );
    beep( 25 , 440 , 100 );
    beep( 50 , 466.16 , 400);
    beep( 25 , 311.13 , 200 );
    beep( 350 , 369.99 , 100 );
    beep( 250 , 311.13 , 100 );
    beep( 25 , 392 , 100 );
    beep( 350 , 466.16 , 100 );
    beep( 250 , 392 , 100 );
    beep( 25 , 466.16 , 100);
    beep( 700 , 587.32 , 100);
    beep( 350 , 784 , 100 );
    beep( 250 , 392 , 100 );
    beep( 25 , 392 , 100 );
    beep( 350 , 784 , 100 );
    beep( 250 , 739.98 , 100);
    beep( 25 , 698.46 , 100 );
    beep( 25 , 659.26 , 100 );
    beep( 25 , 622.26 , 100 );
    beep( 50 , 659.26 , 400 );
    beep( 25 , 415.3 , 200 );
    beep( 350 , 554.36 , 100);
    beep( 250 , 523.25 , 100 );
    //beep( 25 , 493.88 , 100 );
    //beep( 25 , 466.16 , 100 );
    //beep( 25 , 440 , 100 );
    //beep( 50 , 466.16 , 400 );
    //beep( 25 , 311.13 , 200 );
    //beep( 350 , 392 , 100 );
    //beep( 250 , 311.13 , 100 );
    //beep( 25 , 466.16 , 100 );
    //beep( 300 , 392.00 , 150 );
    //beep( 250 , 311.13 , 100 );
    //beep( 25 , 466.16 , 100 );
    beep( 700 , 392, 2000);
}


int main(){
    DDRB=0xff;
    while(1){
        imperialerMarsch();
    }
    return 0;
}