Subversion Repositories svnkaklik

Rev

Rev 297 | Rev 299 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log

Rev Author Line No. Line
297 kaklik 1
//----------------------------------------------------------------------------------
2
//	Prevodnik RS232 <--> RS485 s prodlevou pri prevodu smerem do RS485
298 kaklik 3
//	pri startbitu na RS232 zapne okamzite vysilac. ceka nez prestanou prichazet data a vysilac vypne.
4
//  je implementovany jednoduchy algoritmus na rozpoznani rychlosti, ktery vsak nefunkuje na veskery mozny obsah bajtu.
297 kaklik 5
//----------------------------------------------------------------------------------
6
 
7
#include <avr/io.h>
8
#include <avr/interrupt.h>
9
#include <stdlib.h>
10
#include <ctype.h>
11
#include <avr/eeprom.h>
12
#include <avr/pgmspace.h>
13
 
14
 
15
#define F_CPU 3686400UL
16
#include <util/delay.h>
17
 
18
void delay_ms(unsigned int ms)
19
{
20
  while(ms)
21
  {
22
    _delay_ms(0.96);
23
	ms--;
24
  }
25
}
26
 
27
 
28
// ------------------------------------------------------------------
29
//	Main
30
// ------------------------------------------------------------------
31
int main(void)
32
{
298 kaklik 33
int delay;
34
int bit;
35
int spozdeni;
297 kaklik 36
 
37
  DDRD |= (1<<DDD5);
298 kaklik 38
//  DDRB |= (1<<DDB3);
297 kaklik 39
 
298 kaklik 40
  TCCR1B |= (1 << CS10);  // Set up timer 
297 kaklik 41
 
298 kaklik 42
//  PORTB |= (1<<PB3);
297 kaklik 43
 
44
  while(1)
45
  {
298 kaklik 46
	if(!(PIND & (1<<PD1)))   // kdyz je 0 na datech 
297 kaklik 47
	{ 
298 kaklik 48
	  PORTD &= ~(1<<PD5);    // zapni vysilani
49
	  TCNT1 = 0;				// zacni merit cas 
297 kaklik 50
 
298 kaklik 51
      while (!(PIND & (1<<PD1)));  // cekej na 1			
52
 
53
	  delay = TCNT1;				// hned jak narazis na 1, poznamenej si jak dlouho to trvalo
54
	  TCNT1 = 0;					// zacni znova merit cas
55
	  bit = (delay >> 3);			// cas ktery jsme pred tim zmerili videl 8mi aby jsme se dostali maximalne na delku bitu
56
 
57
 
58
	  while (TCNT1 <= delay);  // pockej zmerenou dobu 
59
	  if((PIND & (1<<PD1)))   // kdyz je 1 na datech, pockej jeste
60
	  { 
61
	    for (spozdeni=0;spozdeni<=16;spozdeni ++)
62
	    {
63
	      TCNT1 = 0;					// zacni znova merit cas
64
		  if((PIND & (1<<PD1))) while (TCNT1 <= bit);			// kdyz je porad 1 tak pockej jeste delku bitu  
65
		  else break;
66
        }
67
	  }
297 kaklik 68
    }
298 kaklik 69
    else  PORTD |= (1<<PD5);  	// kdyz je 1 prepni na prijem 
297 kaklik 70
  }
298 kaklik 71
  return(0);
297 kaklik 72
}