 |
|
|
Elektronika.lt portalo forumas
Jūs esate neprisijungęs lankytojas. Norint dalyvauti diskusijose, būtina užsiregistruoti ir prisijungti prie forumo.
Prisijungę galėsite kurti naujas temas, atsakyti į kitų užduotus klausimus, balsuoti forumo apklausose.
Administracija pasilieka teisę pašalinti pasisakymus bei dalyvius,
kurie nesilaiko forumo taisyklių.
Pastebėjus nusižengimus, prašome pranešti.
Dabar yra 2025 02 28, 23:49. Visos datos yra GMT + 2 valandos.
|
|
|
 |
Forumas » Mikrovaldikliai » ATmega <> UART <> PC
|
Jūs negalite rašyti naujų pranešimų į šį forumą
Jūs negalite atsakinėti į pranešimus šiame forume
Jūs negalite redaguoti savo pranešimų šiame forume
Jūs negalite ištrinti savo pranešimų šiame forume
Jūs negalite dalyvauti apklausose šiame forume
|
|
|
|
|
 |
ATmega <> UART <> PC |
 Parašytas: 2010 03 15, 18:14 |
  |
|
|
|
Rašau programą, kuri valdys mikrovaldikli per kompiuteri. Naudoju Atmega16 ir 16 MHz kvarcą. Kaip būtu galima perdavinėti ne tik pavienius simbolius, o ištisus žodžius, pvz: USARTWriteChar('Labas');
gal vertėtu perrašyti kodą, kad veiktu pagal pertrauktis, priėmimo ir siuntimo? (ISR RXEN, ISR TXEN) Kaip reiketu atlikti pakeitimus kode?
Programa kai jai nusiunti simbolį iš kompiuterio, pakeičia užrašą ant LCD ir nusiunčia žodį atgal kompiuteriui.
| Kodas: |
#include <mega16.h>
#include <mega16_bits.h>
#include <delay.h>
#include <lcd.h>
#asm
.equ __lcd_port=0x15 ;PORTC
#endasm
//Inicializuoju USART
void USARTInit(int ubrr_value)
{//Set Baud rate
UBRRL = ubrr_value;
UBRRH = (ubrr_value>>8);
//Set Frame Format
// Asynchronous mode
// No Parity
// 1 StopBit
// char size 8
UCSRC=(1<<URSEL)|(3<<UCSZ0);//(3<<UCSZ0);
// UCSRC=(1<<UPM1);
//Ijungiam priemimo ir siuntimo funkcijas
UCSRB=(1<<RXEN)|(1<<TXEN);
}
//Funkcija nuskaito duomenys is USART
char USARTReadChar()
{//Wait untill a data is available
while(!(UCSRA & (1<<RXC)))
// while(!(UCSRA & (0x80)))
{
//Do nothing
}
//Now USART has got data from host and is available is buffer
return UDR;
}
//Funkcija skirta sssiusti duomenys i kompa
void USARTWriteChar(char data)
{
//Wait untill the transmitter is ready
while(!(UCSRA & (1<<UDRE)))
{
//Do nothing
}
//Now write the data to USART buffer
UDR=data;
}
volatile char data;
void main()
{//LCD inicializacija
lcd_init(16);
lcd_gotoxy(1,1);
lcd_putsf("Startup");
//Inicializuoju UART 9600 bod/s greiciui 8 data bit no parity 1 stop
USARTInit(103); //103 greiciui 9600 //UBRR = 51
//Isvedu pranesima i kompa
USARTWriteChar('L');delay_ms(200);
USARTWriteChar('a');delay_ms(200);
USARTWriteChar('b');delay_ms(200);
USARTWriteChar('a');delay_ms(200);
USARTWriteChar('s');delay_ms(200);
while(1)
{
//Read data
char data=USARTReadChar();
if(data=='1'){ lcd_gotoxy(1,1); lcd_putsf("Gautas 1"); USARTWriteChar('1');USARTWriteChar(' ');
USARTWriteChar('g'); USARTWriteChar('a'); USARTWriteChar('u'); USARTWriteChar('t'); USARTWriteChar('a'); USARTWriteChar('s');}
if(data=='2'){ lcd_gotoxy(1,1); lcd_putsf("Gautas 2"); USARTWriteChar('2');USARTWriteChar(' ');
USARTWriteChar('g'); USARTWriteChar('a'); USARTWriteChar('u'); USARTWriteChar('t'); USARTWriteChar('a'); USARTWriteChar('s');}
}
}
|
|
|
|
|
|
|
|
|
ATmega <> UART <> PC |
| Parašytas: 2010 03 15, 21:08 |
|
|
|
|
| Kodas: |
//==================
//Isveda SIMBOLI per uarta
//==================
void uart_putc (unsigned char c)
{
UCSRB = 0x08; // Ijungiama galimybe perduoti duomenis
while(!(UCSRA & (1 << UDRE)));
UDR = c;
// Laukiama kol bus perduoti duomenis(TXC flag'as)
while (!(UCSRA & 0x40))
// Isjungiame galimybe perduoti duomenis
// energijos taupimo sumetimais
UCSRB = 0x00;
//=============================
//Funkcija isveda STRING'a per UART
//=============================
void uart_puts (char *s)
{
// vykdyti kol *s != NULL
while (*s)
{
uart_putc(*s);
s++;
}
}
//Pertrauktis
SIGNAL (SIG_UART_RECV)
{
unsigned char c;
c = UDR;
uart_putc(c);
}
|
|
|
|
|
|
|
|
|
ATmega <> UART <> PC |
| Parašytas: 2010 03 16, 10:20 |
|
|
|
|
Išsibandžiau šauniai veikia dėkoju. 
| Kodas: |
//Pertrauktis
SIGNAL (SIG_UART_RECV)
{
unsigned char c;
c = UDR;
uart_putc(c);
}
|
O ši dalis yra 12 pertrauktis, kaip suprantu kai priėmimas duomenu iš kompo baigtas, tada galime išsiųsti viena simbolį panaudoje funkciją uart_putc(); O kodėl panaudoti pointeriai (*s) visur funkcijoje uart_puts() ?
Dabar rašau eilučių siuntimą į kompiuterį, tačiau yra klaidų priskiriant kintamuosius eilutės masyvui, kaip man reikėtų pataisyti ta kodą funkcijoje uart_gets() ir main'e? Jei perdavinėsiu iš kompiuterio tik iki 6 simbolių manau masyvo string_rec[6] pakaks.
| Kodas: |
//============================
//Nuskaito SIMBOLI per uarta gauta is kompo
//============================
char uart_getc(unsigned char c)
{UCSRB = 0x10; // Ijungiama galimybe gauti duomenis
while(!(UCSRA & (1 << RXC)));//skaitom i kintamaji c kol ijungtas receiveris
c=UDR;
UCSRB=(1<<RXEN)|(1<<TXEN);
return c;
}
//=============================
//Nuskaito STRING'a gauta per UART is kompo
//=============================
char uart_gets()
{ // vykdyti kol neliks gaunamu duomenu
char s[6];
while (*s)//kol yra duomenu, nuskaitau po simboli
{ s=uart_getc();//kraunu i eilute s
s++;
}
return *s;
}
// USART Transmitter interrupt service routine
interrupt [USART_TXC] void usart_tx_isr(void)
{ unsigned char c;
UDR=c;
uart_getc(c);
}
char string_rec[6];
char stringas[7];
void main()
{ lcd_init(16); //LCD inicializacija
USARTInit(103); //103 greiciui 9600
while(1)
{
//Read data
string_rec=uart_gets();
if(string_rec=='vienas'){ lcd_gotoxy(1,1); lcd_putsf("Gavau 1"); sprintf(stringas,"Gavau 1"); uart_puts(stringas); }
if(string_rec=='du') { lcd_gotoxy(1,1); lcd_putsf("Gavau 2"); sprintf(stringas,"Gavau 2"); uart_puts(stringas); }
}
}
|
|
|
|
|
|
|
|
|
ATmega <> UART <> PC |
| Parašytas: 2010 03 16, 16:00 |
|
|
|
|
Pointeriai cia yra, nes sitos funkcijos yra gabalas is didelio projekto 
Del simboliu nuskaitymo is uart, gali pasizurinet www.avrfreaks.net tutorialus, arba sitam paciam www.elektronika.lt puslapi, kur yra tutorialas apie uarta, ir kazka ismastysi, neteko kol kas susidurt su nuskaitymu is terminalo, tai nlb turiu ka parasyt ir prie diplominio pats sedziu.. meginu programuot  |
|
|
|
|
|
|
 |
Google paieška forume |
|
|
|
Naujos temos forume |
|
|
FS25 Tractors
Farming Simulator 25 Mods,
FS25 Maps,
FS25 Trucks |
|
ETS2 Mods
ETS2 Trucks,
ETS2 Bus,
Euro Truck Simulator 2 Mods
|
|
FS22 Tractors
Farming Simulator 22 Mods,
FS22 Maps,
FS25 Mods |
|
VAT calculator
VAT number check,
What is VAT,
How much is VAT |
|
LEGO
Mänguköök,
mudelautod,
nukuvanker |
|
KCD2 Mods
Installing KCD 2 Mods,
KCD 2 Guides,
KCD 2 Cheats |
|
FS25 Mods
FS25 Harvesters,
FS25 Tractors Mods,
FS25 Maps Mods |
|
Dantų protezavimas
All on 4 implantai,
Endodontija mikroskopu,
Dantų implantacija |
|
FS25 Mods
FS25 Maps,
FS25 Cheats,
FS25 Install Mods |
|
GTA 6 Wiki
GTA 6 Map,
GTA 6 Characters,
GTA 6 News |
|
FS25 Mods
Farming Simulator 25 Mods,
FS25 Maps |
|
ATS Trailers
American Truck Simulator Mods,
ATS Trucks,
ATS Maps |
|
|
 |
