Курсовая работа: Розробка термореле

CALL wait_lcd

RET

;ініціалізація DS

INIDS1:

CALL HYL1

MOVLW 0Xcc

CALL POSIL1

MOVLW 0x44

GOTO PRIEM1

HYL1:

CALL WUX1

MOVLW .125

ADDLW -1

BTFSS STATUS,2

GOTO $-2

CALL WXO1

MOVLW .125

ADDLW -1

BTFSS STATUS,2

GOTO $-2

;зміна входу на прийом/передачу

WUX1:

BCF PORTA,DS1

BSF STATUS,5

BCF TRISA^80H,DS1

BCF STATUS,5

RETURN

WXO1:

BSF STATUS,5