Vážený pane docente,

zde Vám posílám své 3 programy a jedno schéma zapojení z kurzu praktické elektroniky.

Jan Hřebec, účastník kurzu praktické elektroniky

----------------------- První program --------------------------------

// autor: Jan Hřebec

// hraje písničku Běží liška k Táboru

#include "mbed.h"

#define SPEED 500 // délka čtvrt doby v ms

DigitalOut repr(PA_4); // pin 10

int stav;
int pozice;

void ton(int per){
    int us = 0;
    while(us<SPEED*850){
        wait_us(per);
        us += per;
        repr = !repr;
    }
    while(us<SPEED*150){
        wait_us(per);
        us += per;
        repr = 0;
    }
    stav = 0;
}

void neukonceny_ton(int per){  //tón, který po sobě nemá pauzu (existují chytřejší způsoby, jak dělat různě dlouhé noty)
    int us = 0;
    while(us<SPEED*1000){
        wait_us(per);
        us += per;
        repr = !repr;
    }
    stav = 0;
}

int main()
{
    stav = 0;
    repr = 1;
    pozice = 0;
    int tony[] = {4,6,4,6,  18,8,8,8,  4,6,4,6, 15,5,5,5, 4,6,8,6, 5,5,6,1, 4,6,8,6, 5,5,4,1, 1,1,1,1};
    while(1) {
        switch(stav){
            case 0: //vyber další stav
                stav = tony[pozice];
                pozice = (pozice + 1) % 36;
                break;
            case 1: //ticho
                wait_ms(SPEED);
                stav = 0;
                break;
            case 2:
                ton(1702); //d
                break;
            case 3:
                ton(1516); //e
                break;
            case 4:
                ton(1431); //f
                break;
            case 5:
                ton(1275); //g
                break;
            case 15:
                neukonceny_ton(1275); //g
                break;
            case 6:
                ton(1136); //a
                break;
            case 7:
                ton(1012); //h
                break;
            case 8:
                ton(955); //c
                break;
            case 18:
                neukonceny_ton(955); //c
                break;
        }
    }
}

----------------------- Druhý program --------------------------------

// autor: Jan Hřebec

// tři LED mění světlost pomocí střídy PWM; rychlost je měněna pomocí vstupu z fototranzistoru

#include "mbed.h" // hlavička programu –říká, že použijeme mbed

DigitalOut myled1(PA_2); // pin 8
DigitalOut myled2(PA_3); // pin 9
DigitalOut myled3(PA_4); // pin 10
AnalogIn foto(PA_5);     // pin 11

int main(){
    float faze;
    while(1){
        myled1=0; // vypni všechny LED
        myled2=0;
        myled3=0;

        for (float i = 1; i < 135; i*=1.2){ // postupně je zapínej podle fáze
            if(i>70+70*sin((float)faze/500)){
                myled1 = 1;
            }
            if(i>70+70*sin((float)(faze+1000)/500)){
                myled2 = 1;
            }
            if(i>70+70*sin((float)(faze+2000)/500)){
                myled3 = 1;
            }
            wait_us(100);
        }
        faze += 2 + foto*foto*foto*50;
        if(faze>3141){
            faze = 0;
        }
    }
}

----------------------- Třetí program --------------------------------

// autor: Jan Hřebec

// snímač vzdálenosti (není to moc hezký kód)

#include "mbed.h"

#define SAMPLE 200 // počet pamatovaných hodnot

DigitalOut led(PA_3);  //pin9  LED
DigitalOut buzz(PA_4); //pin10 reproduktor
AnalogIn foto(PA_5);   //pin11 vstup fototranzistoru

int main()
{
    float prumerBez[SAMPLE];
    float prumerS[SAMPLE];
    int ukazatelBez = 0;
    int ukazatelS = 0;
    int cas = 0;
    int perioda = 0;
    while(1) {               //hlavní smyčka programu
        wait_us(10);
        if(cas % 200 == 0){ //blikani ledkou
            led = 0;
        }
        if(cas % 200 == 100){
            led = 1;
        }
        if(cas%10 == 5){ //zapis hodnoty do prumeru
            if(cas % 200 < 100){
                prumerBez[ukazatelBez] = foto;
                ukazatelBez = (ukazatelBez + 1) % SAMPLE;
            } else {
                prumerS[ukazatelS] = foto;
                ukazatelS = (ukazatelS + 1) % SAMPLE;
            }
        }
        if(perioda == 0){ //slabý signál, reproduktor nehraje
            buzz = 0;
        } else { // reproduktor hraje
            if(cas % perioda > perioda / 2){
                buzz = 0;
            } else {
                buzz = 1;
            }
        }
        if(cas % 200 == 0){ // aktualizace frekvence reproduktoru
            float prumer = 0;
            for (int i = 0; i < SAMPLE; i++){
                prumer += prumerS[i];
                prumer -= prumerBez[i];
            }
            if (prumer > 0.5){
                prumer = sqrt(prumer + 1) * 10;
                perioda = (float)1000 / prumer;
            } else {
                perioda = 0;
            }
        }
        cas++;
    }
}