-hi,i'm a newbie to PICbasic...
-the following is my code for my project. i wonder why i receive error warning every time i compiler it.
-this is the error warning 'ERROR:ELSE without a matching ENDIF'
-this is my code
'DECODE1
DEFINE HSER_RCSTA 90H
DEFINE HSER_TXSTA 24H
DEFINE HSER_BAUD 9600
DEFINE HSER_SPBRG 25
DEFINE HSER_CLROERR 1
MANCHESTERWORD VAR WORD
MYDATA VAR BIT
FLAG VAR BIT
TRISA=255
TRISC=0
'................................................. ..........................................
MAIN:
MYDATA=0
FLAG=0
TEST:
IF PORTA.0=1 Then
TESTING
Else
TEST
TESTING:
IF PORTA.0=0 Then
CHECKING
Else
TESTING
EndIF
CHECKING:
IF PORTA.4=0 Then
GoSub RX1
Else
GoSub RX0
EndIF
IF FLAG=1 Then
PORTC.0=1
EndIF
HSerout [MYDATA]
GoTo MAIN
RX1:
EDGE0:IF PORTA.0=0 Then EDGE0
DLY0:IF PORTA.0=0 Then DLY0
IF PORTA.4=1 Then
MYDATA=1
Else
FLAG=1
EndIF
Return
RX0:
EDGE1:IF PORTA.0=0 Then EDGE1
DLY1:IF PORTA.0=1 Then DLY1
IF PORTA.4=0 Then
MYDATA=0
Else
FLAG=1
EndIF
Return
-thank u
Bookmarks