problème de communication pic 16f877A via rs232

< Sujet précédent  Sujet suivant >
Index du Forum -> Forum de l'Electronique -> Electronique Numérique
AuteurMessage
Tunisia.png techno_techno
Newbie



Messages : 2
Inscrit(e) le: 19/11/2014
Posté le 19/11/2014 11:31  
problème de communication pic 16f877A via rs232
Salam
je suis débutant en électronique numérique ..
j'ai réalisé un montage sous isis afin de faire une communication entre pic16f877a avec le pc via rs232 en utilisant usart_terminal du mikropascal pro v8.0 et VSPD V7.1 permettant une communication virtuelle .Mon problème c'est que je veut afficher les données (alphanumérique) transmises par terminal sur l'afficheur lcd.
le code que j'ai écrit 'affiche n'affiche rien
voilà mon code :
program serial;
var
receive:byte;
receivech:string[20];
begin

TRISB:=0X00;
portb:=0;
trisc:=0x80;
portc:=0;
trisd:=0x00;
portd:=0;
Lcd_Config(PORTB,7,6,5,4,PORTB,2,0,3);
Lcd_Init(PORTB);
Lcd_Out(1, 3, 'Hello!');


WHILE true do
begin
Usart_Init(9600);
//receive:=usart_data_ready() ;
if Usart_Data_Ready() = 1 then
begin
receive := Usart_Read;

bytetostr(receive,receivech);
lcd_out(2,3,receivech) ;


end;
end;
end.
voilà mon montage isis
merci....

Edité par techno_techno le 19/11/2014 11:33
Revenir en haut | Permalien
Tunisia.png techno_techno
Newbie



Messages : 2
Inscrit(e) le: 19/11/2014
Posté le 19/11/2014 11:37  
1416393465.DSN (65 Ko)
RE : problème de communication pic 16f877A via rs232

techno_techno a écrit :
Salam
je suis débutant en électronique numérique ..
j'ai réalisé un montage sous isis afin de faire une communication entre pic16f877a avec le pc via rs232 en utilisant usart_terminal du mikropascal pro v8.0 et VSPD V7.1 permettant une communication virtuelle .Mon problème c'est que je veut afficher les données (alphanumérique) transmises par terminal sur l'afficheur lcd.
le code que j'ai écrit 'affiche n'affiche rien
voilà mon code :
program serial;
var
receive:byte;
receivech:string[20];
begin

TRISB:=0X00;
portb:=0;
trisc:=0x80;
portc:=0;
trisd:=0x00;
portd:=0;
Lcd_Config(PORTB,7,6,5,4,PORTB,2,0,3);
Lcd_Init(PORTB);
Lcd_Out(1, 3, 'Hello!');


WHILE true do
begin
Usart_Init(9600);
//receive:=usart_data_ready() ;
if Usart_Data_Ready() = 1 then
begin
receive := Usart_Read;

bytetostr(receive,receivech);
lcd_out(2,3,receivech) ;


end;
end;
end.
voilà mon montage isis
merci....



Revenir en haut | Permalien

Haut de page

© 2019 Technologue pro, cours électricité électronique informatique · © 2007 - 2019 Technologue pro - Ressources pédagogiques pour l'enseignement technologique en Tunisie
Usage dans un cadre strictement académique

Technologue: cours en ligne gratuit en électricité, électronique, informatique industrielle et mécanique pour l'enseignement technologique en Tunisie et offre des cours en ligne en génie électrique, informatique, mécanique, une base de données de TP, projets fin d'études et un annuaire de ressources pédagogiques
Licence - Sitemap - Qui somme nous ? - confidentialité- Tunisie Index