/*
  Beeps
  
  Fuses LHE C2 DD FF

 + -------o------------------------------.
          |                              | ATtiny85
          |                         _____|______
          |                        |   Vcc      |
          |    .-------------------| PB5/Reset  |
          |    |     .-------------| PB2     PB1|---. 
         ===   |     |     .-------| PB3        |   #<   Lautsprecher
          |    o     o     o     o-| PB4     PB0|---'        
          |   |     |     |     |  |____________|            
          |    o     o     o     o    GND|                   
          |    |     |     |     |       |                   
 GND -----o----o-----o-----o-----o-------'
              Mute         0     0  Beep3 
                           0     1  Beep2
                           1     0  Beep3
                           1     1  Beep1
                           
              Mute = lo --> Reset --> Stille


Tastenton
Beep4   PB2 100ms..150ms low

Stundenton
Beep5   PB2 150ms..230ms low

Alarm
Beep1   PB2 230ms..300ms low   PB3 high   PB4 high  
Beep2   PB2 230ms..300ms low   PB3 low    PB4 high  
Beep3   PB2 230ms..300ms low   PB3 high   PB4 low   
Beep3   PB2 230ms..300ms low   PB3 low    PB4 low   
  
 */ 

#include <avr/io.h>
#define F_CPU 8000000L 
#include <util/delay.h>

void A (void) {
	for(int i=0; i<100; i++) { // A: 2kHz, 50ms
		PORTB = 0b11101;
		_delay_us(250);
		PORTB = 0b11110;
		_delay_us(250);
	}
}

void B (void) {
	for(int i=0; i<160; i++) { // B: 3k2Hz, 50ms
		PORTB = 0b11101;
		_delay_us(155);
		PORTB = 0b11110;
		_delay_us(156);
	}
}

void Beep1(void) {
	// 50ms Ton an, 20ms Pause Tonfrequenz A: 2000Hz Tonfrequenz B: 3200Hz
	// Die Sequenz ist: A,A,B,still,B,A Das ganze dauert 6*70ms = 420ms
	A();
	_delay_ms(20);          // kurze Pause
	A();
	_delay_ms(20);          // kurze Pause
	B();
	_delay_ms(20);          // kurze Pause
	_delay_ms(50);          // still
	_delay_ms(20);          // kurze Pause
	B();
	_delay_ms(20);          // kurze Pause
	A();
}

void Beep2 (void) { // Sweep mit 83 Pulsen von 80Hz/12ms nach 166Hz/6ms --> 6ms/83 = 72µs
	for(int i=83; i>0; i--) {
		PORTB = 0b11101;
		_delay_us(5000);
		for (int j=0; j<i; j++) _delay_us(72);
		PORTB = 0b11110;
		_delay_us(1000);
	}
}

void C (void) {
	for(int i=0; i<227; i++) { // A: 2k2Hz, 100ms
		PORTB = 0b11101;
		_delay_us(220);
		PORTB = 0b11110;
		_delay_us(220);
	}
}

void Beep3(void) {
	// Ton: Frequenz 2k2Hz Dauer 100ms,
	// Sequenz:	C,25ms,C,25ms,C,40ms,C
	C();
	_delay_ms(25);          // kurze Pause
	C();
	_delay_ms(25);          // kurze Pause
	C();
	_delay_ms(40);          // längere Pause
	C();
}

void Beep4(void) {
    // Ton: Frequenz 1k9Hz Dauer 200ms
    for(int i=0; i<380; i++) {
        PORTB = 0b11101;
        _delay_us(263);
        PORTB = 0b11110;
        _delay_us(263);
    }
}


void Beep5(void) {
    // Ton: Frequenz 1k9Hz Dauer 400ms
    for(int i=0; i<760; i++) {
        PORTB = 0b11101;
        _delay_us(263);
        PORTB = 0b11110;
        _delay_us(263);
    }
}

int main(void)
{
    int cntms = 0;
    PORTB = 0b11100;  // PB2..4 Eingang mit Pullup, PB1,0 = Ausgang Lautsprecher Gegentakt
    DDRB  = 0b00011;  
    while(1)
    {
        _delay_ms(10);                             // zur "Entprellung" kurz warten
        while ((PINB&0b00100)==0b00100) {}         // warten, solange PB2 = hi
            
        cntms = 0;                                 // Zähler zurücksetzen
        while ((PINB&0b00100)==0b00000)	{          // solange PB2 = low
            if (cntms < 300) cntms++;              // mitzählen, wie lange PB2 = low, Zähler bei 30000*10us = 300ms begrenzen
            _delay_ms(1);
        }
        
        if       (cntms < 100)        ;            // weniger als 100ms low --> Störung, nichts tun
        else if  (cntms < 150) Beep4();            // mindestens 100ms, aber weniger als 150ms low
        else if  (cntms < 230) Beep5();            // mindestens 150ms, aber weniger als 230ms low
        else if  (cntms < 300) {                   // mindestens 230ms, aber weniger als 300ms low
	        if ((PINB&0b11000)==0b00000) Beep3();  // ==> Ton entsprechend PB3+4 ausgeben
	        if ((PINB&0b11000)==0b10000) Beep2();  
	        if ((PINB&0b11000)==0b01000) Beep3();  
	        if ((PINB&0b11000)==0b11000) Beep1();  
		}

        PORTB = 0b11100;                           // Gegentaktausgänge abschalten 
    }	                    
}