melduję pierwsze czytanie blue książki za zakończone
Teraz troszkę pomęczę zestaw, rozpoczynam ćwiczenia praktyczne.
Poniżej wersja migacza z timerem, bez Delajów (to takie plemię indiańskie, Delaje, bardzo przeszkadzają)
Powinienem dorobić bufor i ciągnąć z dużej tabeli znaków z pamięci flash, ale zostawiam na potem. Program miał być szkoleniowy.
[syntax=c]#include <avr/io.h>
#include <avr/interrupt.h>
// wersja 2 oparta o timer programow
// LEDs
#define LED_PIN (1<<PB0)
#define KEY_PIN (1<<PB2)
#define KEY_DOWN ~(PINB & KEY_PIN)
#define DIT (10)
#define DAH (3*DIT)
#define LED_OFF (PORTB |= (1<<PB0))
#define LED_ON (PORTB &= ~(1<<PB0))
#define LED_TOG (PORTB ^= (1<<PB0))
#define CW_TABLE_SIZE 12
void init_all(void);
// global variables
// stan diody - czy ma mrugac czy nie
volatile uint8_t led_status = 0;
// timer dla znakow cw - najpierw kreska
volatile uint8_t timer=DAH;
// tablica znaków Morse
// 3 najstarsze bity - ilosc kropek i kresek w znaku
// 5 mlodszych bitow - 0 - kropka, 1 - kreska
uint8_t code_table[CW_TABLE_SIZE];
void init_code_table(void);
//funkcja glowna migajaca
void scan_code_table(uint8_t* code_table, uint8_t table_size);
int main()
{
init_all();
init_code_table();
sei();
while(1) {
if(led_status)
scan_code_table(code_table, CW_TABLE_SIZE); // tu sie dzieje
else
LED_OFF;
}
}
// przyciskanie na przerwaniu - rozumiem juz superdebouncera :)
// ale ten program ma juz mnie dosc wiec tak zostawie
// z tym ze dziala :)
ISR( PCINT0_vect ){
static uint8_t upd = 0;
if (upd) led_status = ~(led_status);
upd = ~(upd);
}
ISR( TIMER0_COMPA_vect ){
uint8_t n;
n = timer;
if(n)timer=--n;
}
void init_code_table(void){
//sets 3 high bits to number of dits/dahs
// and 5 lower bits to 0 - dit and 1 - dah
code_table[0] = (5<<5) + (0b11111);
code_table[1] = (5<<5) + (0b01111);
code_table[2] = (5<<5) + (0b00111);
code_table[3] = (5<<5) + (0b00011);
code_table[4] = (5<<5) + (0b00001);
code_table[5] = (5<<5) + (0b00000);
code_table[6] = (5<<5) + (0b10000);
code_table[7] = (5<<5) + (0b11000);
code_table[8] = (5<<5) + (0b11100);
code_table[9] = (2<<5) + (0b10);
code_table[10] = (2<<5) + (0b01); //a
code_table[11] = (4<<5) + (0b1000); //b
}
// cw state machine
void scan_code_table(uint8_t* code_table, uint8_t table_size){
// stan w tabeli, w jakim jestesmy
enum cw_state {dit, dah, space};
//zmienne pozycja tabeli, wielkosc znaku, kolejna kropka lub kreska
static uint8_t pos, sign_size, i;
static enum cw_state state = space; // stan poczatkowy
// jesli jest timer spada do zera - zaczyna się akcja
// jesli nie - nic się nie dzieje
if(0 == timer){
// paskudna inicjalizacja poczatkowej wielkosci
// znaku
if(0==sign_size)sign_size = code_table[0] >> 5;
// maszynka stanow ma trzy mozliwosci - kropka dit, kreska dah
// i przerwa o różnej długości - space
// jesli jest kropka lub kreska (dit lub dah)
// to sprawdzamy czy jest to koniec litery - i jest
// na koncu bajtu danej litery (cyfry)
switch(state){
case dit:
case dah:
if(sign_size==i){ //doszlismy do konca litery
// przechodzimy do nastepnej litery
pos++;
if(table_size == pos)pos = 0; // w kolko cala tablica
sign_size = (code_table[pos] >> 5); //odzyskuje dlugosc litery z tablicy
// dluga przerwa po literze lub cyfrze
timer = DAH;
LED_OFF;
i=0;
}else{ // srodek litery wiec przerwa krotka
timer = DIT;
LED_OFF;
}
state = space; //zmiana stany na przerwe - o rozznej dlugosci
break;
case space:
state = ((code_table[pos]) & (1<<(sign_size-i-1)))?dah:dit;
timer = (dit==state)?DIT:DAH;
LED_ON;
i++;
break;
}
}
}
void init_all(void){
//key and led init
DDRB |= LED_PIN;
PORTB |= LED_PIN;
DDRB &= ~KEY_PIN;
PORTB |= KEY_PIN;
LED_OFF;
// interrupt registers for key presses
GIMSK |= (1<<PCIE);
PCMSK |= (1<<PCINT2);
// timer 0A init
// CTC mode init
// timer 0 init
// CTC mode init
TCCR0A |= (1<<WGM01);
TCCR0B |= (1<<CS02) | (1<<CS00); // preskaler 1024
OCR0A = 78; // przerwanie porównania co 10ms (10Hz)
TIMSK = (1<<OCIE0A); // Odblokowanie przerwania CompareMatch
}[/syntax]
Statystyki: Napisane przez sq5rix — 9 paź 2014, o 00:10
]]>
