post your codes, Include your config fuses, and a screenshot of your schematic here, we will have a look at this.
post your codes, Include your config fuses, and a screenshot of your schematic here, we will have a look at this.
Steve
It's not a bug, it's a random feature.
There's no problem, only learning opportunities.
this is my code i receive data but these are not the data i must receive
i receive wrong bytes
at the help of picbasic rcsta is90h
at he data sheet of 16f877a address of rcsta is 18h
i made it 18h i receive no data
please help me
[SIZE="5"]
INCLUDE "modedefs.bas"
PORTC=0
PORTB=0
PORTD=0
TRISC=%11111111
TRISB=%00000000
TRISD=%00000000
@ DEVICE pic16F877A
@ DEVICE pic16F877A , WDT_on
@ DEVICE pic16F877A , PWRT_ON
@ DEVICE pic16F877A , PROTECT_OFF
DEFINE OSC 4
DEFINE HSER_RCSTA 90h
DEFINE HSER_TXSTA 20h
DEFINE HSER_BAUD 9600
DEFINE HSER_SPBRG 25
DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 1
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 3
DEFINE LCD_RWREG PORTB
DEFINE LC_RWBIT 2
DEFINE LCD_BITS 4
DEFINE LCD_LINES 4
A1 VAR BYTE
RTAG
LCDOUT $FE,$80,"DIGITAL SIGN"
HSERIN 1000,JMP,[A1]
JMP
LCDOUT $FE,$C0,"TAGID=",hex2 A1
GOTO RTAG
/SIZE]
INCLUDE "MODEDEFS.BAS"
'***********************DEFINITIONS*************** ************************
DEFINE Osc 4
'--------------------------------------------------------------------------------------------
'***********************SERIAL COMM DEFINITION**********************
DEFINE HSER_TXSTA 24h
DEFINE HSER_RCSTA 90h
DEFINE HSER_BAUD 19200
DEFINE LCD_DREG PORTb
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTb
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTb
DEFINE LCD_EBIT 3
cmcon=7
trisb=%00000010
trisa=%00000001
a var word
b var word
c var word
d var word
e var word
ANAPROGRAM:
hserin [hex2 a,hex2 b,hex2 c,hex2 d,hex2 e]
pause 50
LCDOut $fe, 1,hex2 a,hex2 b,hex2 c,hex2 d,hex2 e
pause 10
goto anaprogram
end
Bookmarks