ATNEL tech-forum

Re: Kalibracja AS3935

2016-08-21T21:02:31+01:00

Zadanie jest takie znaleźć wartość rejestru przy którym częstotliwość generowana na nóżce jest najbliżej 31250Hz.
Pętla for służy do zmiany wartości wpisywanej do rejestru a w niej sprawdzamy częstotliwość.
Na chwilę obecną zrobiłem to przy pomocy dodatkowej funkcji na wzór z Arduino millis(). Nie za bardzo mi się podoba to rozwiązanie.
Kod wygląda następująco:
[syntax=c]uint8_t tuneAntena (void)
{

uint16_t stop_count=0;
uint16_t target = 3125;
int bestdiff = 32767;
int currdiff = 0;
uint8_t bestTune = 0;
uint8_t currTune = 0;
cli();
Timer0_init();
Int2_init();
int32_t setupTime;

// set lco_fdiv divider to 0, which translates to 16
// so we are looking for 31250Hz on irq pin
// and since we are counting for 100ms that translates to number 3125
// each capacitor changes second least significant digit
// using this timing so this is probably the best way to go
sei();
start();
registerWrite(AS3935_LCO_FDIV,0);
registerWrite(AS3935_DISP_LCO,1);
// tuning is not linear, can't do any shortcuts here
// going over all built-in cap values and finding the best
for (currTune = 0; currTune <= 0x0F ; currTune++)
{

registerWrite(AS3935_TUN_CAP,currTune);
// wait to settle
_delay_ms(10);
currentcount=0;
stop_count=0;
setupTime=millis()+100;
// wait 100ms for measurments
while ((long int)millis() - setupTime<0)
{
//
}
ATOMIC_BLOCK(ATOMIC_RESTORESTATE) {
stop_count=currentcount;
}
currentcount=0;
currdiff = target - stop_count;
// don't look at me, abs() misbehaves
if(currdiff < 0)
currdiff = -currdiff;
if(bestdiff > currdiff)
{
bestdiff = currdiff;
bestTune = currTune;
}
}

if (bestdiff<109)
{
registerWrite(AS3935_TUN_CAP,bestTune);
_delay_ms(2);
registerWrite(AS3935_DISP_LCO,0);
// and now do RCO calibration
powerUp();
uart_putint(bestTune,10);
uart_puts(" ");
uart_putint(bestdiff,10);
uart_puts("\r\n");
return (1);
}
// if error is over 109, we are outside allowed tuning range of +/-3.5%
else
{
powerUp();
return (0);

}
}

ISR(INT2_vect)
{
currentcount++;
}[/syntax]

Statystyki: Napisane przez jaca_76 — 21 sie 2016, o 21:02

Re: Kalibracja AS3935

2016-07-10T09:21:20+01:00

Kolego delaye mają wpływ bo wstrzymują cały program. Trochę ten kod jakiś zagmatwany bo jeśli chcesz obliczyć czestotliwosc sygnału. To musisz zliczyć ilość impulsów następnie otrzymujesz częstotliwość f=1s/ilość impulsów. Czyli program powinien wyglądać tak Włączasz zliczanie impulsów włączasz timera odliczania czasu 1s i po odliczeniu czasu odczytujesz wartość zliczonych impulsów. Nie wiem dla czego wykorzystujesz tu pętle for a następnie w niej wykonujesz while ( czekasz na flagę)

Statystyki: Napisane przez matekogon — 10 lip 2016, o 09:21

Re: Kalibracja AS3935

2016-07-08T22:04:55+01:00

Tam jest wygodniej , przynajmniej dla mnie.

Dzięki za :
TIMSK1 &=~(1<
Ale czy licznik się wyzreuje? Czy też powinienem wpisać OCR1A = 1799 ?
Edit:

I jeszcze jedno spostrzeżenie, kiedy zamiast w każdym przejściu pętli for zwiększać currentune i wpisywać go do rejestru w celu znalezienia najlepszej konfiguracji ustawię go na sztywno - 0
z poniższym kodem mam tak że w pierwszym przebiegu mam mniej przerwań . Kolejne są stabilne.
Podobnie jest dla innych wartości .
Skąd ta różnica ??
I dlaczego delay ma wpływ na pomiar ?

[syntax=c]void tuneAntena (void)
{
int stop_count=0;
int target = 3125;
int bestdiff = 32767;
int currdiff = 0;
uint8_t bestTune = 0;
uint8_t currTune = 0;
// set lco_fdiv divider to 0, which translates to 16
// so we are looking for 31250Hz on irq pin
// and since we are counting for 100ms that translates to number 3125
// each capacitor changes second least significant digit
// using this timing so this is probably the best way to go
registerWrite(AS3935_LCO_FDIV,0);
registerWrite(AS3935_DISP_LCO,1);
// tuning is not linear, can't do any shortcuts here
// going over all built-in cap values and finding the best
for (currTune = 0; currTune <= 0x0F ; currTune++)
{
registerWrite(AS3935_TUN_CAP,0);
// wait to settle
// _delay_ms(10);
// cli();
TIMSK1 &=~(1< OCR1A=1799;
ms_flag=0;
// sei();
TIMSK1 |= (1< currentcount = 0;

while (!ms_flag)
{

}
stop_count=currentcount;
uart_putint(stop_count,10);
uart_puts("\r\n");
currdiff = target - stop_count;
// don't look at me, abs() misbehaves
if(currdiff < 0)
currdiff = -currdiff;
if(bestdiff > currdiff)
{
bestdiff = currdiff;
bestTune = currTune;
}
}
uart_puts("Best Tune: \r\n");
uart_putint(bestTune,10);
uart_puts("\r\n");
uart_puts("Best diff: \r\n");
uart_putint(bestdiff,10);
uart_puts("\r\n");
registerWrite(AS3935_TUN_CAP,bestTune);
_delay_ms(2);
registerWrite(AS3935_DISP_LCO,0);
// and now do RCO calibration
powerUp();
// if error is over 109, we are outside allowed tuning range of +/-3.5%
}[/syntax]

Statystyki: Napisane przez jaca_76 — 8 lip 2016, o 22:04

Re: Kalibracja AS3935

2016-07-08T22:04:54+01:00

Tam jest wygodniej , przynajmniej dla mnie.

Dzięki za :
TIMSK1 &=~(1<
Ale czy licznik się wyzreuje? Czy też powinienem wpisać OCR1A = 1799 ?

Statystyki: Napisane przez jaca_76 — 8 lip 2016, o 22:04

Re: Kalibracja AS3935

2016-07-08T21:51:34+01:00

Kolego odpaliłeś timera a nadal używasz delaya:) Jeśli dobrze pamiętam sei() włączenie globalnego zezwolenia na wszystkie przerwania więc jak wyłaczasz to wylączasz wszystkie . Timer możesz wyłączyć poprzez wyłączenie "zezwolenia na przerwania od porównania" czyli TIMSK1 &=~(1<Statystyki: Napisane przez matekogon — 8 lip 2016, o 21:51

Re: Kalibracja AS3935

2016-07-08T21:07:03+01:00

taki monolog.
Próba z timerem dała lepsze wyniki.
Nie podoba mi się tylko inicjowanie timera przy każdym przejściu pętli ale nie wiem jak zatrzymać/zrestartować timer.
Clock 18432000Hz
Atmega644P

[syntax=c]void Timer_init(void)
{
TIMSK1 |= (1<TCCR1B |= (1<TCCR1B |= (1<OCR1A = 1799;
}

void tuneAntena (void)
{
int stop_count=0;
int target = 3125;
int bestdiff = 32767;
int currdiff = 0;
uint8_t bestTune = 0;
uint8_t currTune = 0;
// set lco_fdiv divider to 0, which translates to 16
// so we are looking for 31250Hz on irq pin
// and since we are counting for 100ms that translates to number 3125
// each capacitor changes second least significant digit
// using this timing so this is probably the best way to go
registerWrite(AS3935_LCO_FDIV,0);
registerWrite(AS3935_DISP_LCO,1);
// tuning is not linear, can't do any shortcuts here
// going over all built-in cap values and finding the best
for (currTune = 0; currTune <= 0x0F ; currTune++)
{
registerWrite(AS3935_TUN_CAP,currTune);
// wait to settle
_delay_ms(10);

currentcount = 0;
ms_flag=0;
cli();
currentcount = 0;
ms_flag=0;
Timer_init();
sei();
while (!ms_flag)
{

}
stop_count=currentcount;
uart_putint(stop_count,10);
uart_puts("\r\n");
currdiff = target - stop_count;
// don't look at me, abs() misbehaves
if(currdiff < 0)
currdiff = -currdiff;
if(bestdiff > currdiff)
{
bestdiff = currdiff;
bestTune = currTune;
}
}
uart_puts("Best Tune: \r\n");
uart_putint(bestTune,10);
uart_puts("\r\n");
uart_puts("Best diff: \r\n");
uart_putint(bestdiff,10);
uart_puts("\r\n");
registerWrite(AS3935_TUN_CAP,bestTune);
_delay_ms(2);
registerWrite(AS3935_DISP_LCO,0);
// and now do RCO calibration
powerUp();
// if error is over 109, we are outside allowed tuning range of +/-3.5%
}

ISR (INT2_vect)
{
currentcount++;
}

ISR(TIMER1_COMPA_vect) //obsluga przerwania (Timer/Counter1 Compare Match A)
{
ms_flag=1;
}[/syntax]

Statystyki: Napisane przez jaca_76 — 8 lip 2016, o 21:07

Kalibracja AS3935

2016-07-07T23:15:31+01:00

Witam
Wróciłem do projektu stacji meteo i obecnie pracuje nad dokończeniem kodu do AS3935 .
Przerobiłem kod z C++ i wykorzystałem przerwanie INT2 i delay do mierzenia częstotliwości.
Wynik powinien być w okolicy 3125 +/- 109 (impulsów w ciągu 100ms).
Jak widać otrzymuje większe wartości i się zastanawiam czy może wynika to z niedoskonałości kodu.
Czy można to lepiej zrobić?

[syntax=c]uint8_t tuneAntena (void)
{
int target = 3125;
int bestdiff = 32767;
int currdiff = 0;
uint8_t bestTune = 0;
uint8_t currTune = 0;
// set lco_fdiv divider to 0, which translates to 16
// so we are looking for 31250Hz on irq pin
// and since we are counting for 100ms that translates to number 3125
// each capacitor changes second least significant digit
// using this timing so this is probably the best way to go
registerWrite(AS3935_LCO_FDIV,0);
registerWrite(AS3935_DISP_LCO,1);
// tuning is not linear, can't do any shortcuts here
// going over all built-in cap values and finding the best
for (currTune = 0; currTune <= 0x0F ; currTune++)
{
registerWrite(AS3935_TUN_CAP,currTune);
// wait to settle
_delay_ms(10);
currentcount = 0;
_delay_ms(100);
uart_putint(currentcount,10);
uart_puts("\r\n");
currdiff = target - currentcount;

// don't look at me, abs() misbehaves
if(currdiff < 0)
currdiff = -currdiff;
if(bestdiff > currdiff)
{
bestdiff = currdiff;
bestTune = currTune;
}
}
uart_puts("Best Tune: \r\n");
uart_putint(bestTune,10);
uart_puts("\r\n");
uart_puts("Best diff: \r\n");
uart_putint(bestdiff,10);
uart_puts("\r\n");
registerWrite(AS3935_TUN_CAP,bestTune);
_delay_ms(2);
registerWrite(AS3935_DISP_LCO,0);
// and now do RCO calibration
powerUp();
// if error is over 109, we are outside allowed tuning range of +/-3.5%
}

ISR (INT2_vect)
{
currentcount++;
}[/syntax]

Statystyki: Napisane przez jaca_76 — 7 lip 2016, o 23:15