Библиотека Компэла


R7
^P Texas      
iNSiraJMENTS      
  RLC   R7
  DEC   R6
  JNZ   RXTX 02
  CMP. В #RECEIVE,R7
  JEQ   init RX
  CMP. В #TRANSMIT,R7
  JEQ   init TX
  BIC. В #0FFH,&P1IFG

CLR

call tinit_RXTX
RET I

init_TX CALL tinit_TATX

MOV t66,R9

MOV t7 9,R10

call tTEXT_OUT

BIC.В tOFFH,&PHFG

BIC.В t001H,&PHE

RET I

init_RX MOV t53,R9

MOV t63,RlC

call tTEXT_OUT

BIC.В tOFFH,&PHFG

BIC.В t001H,&PHE

call tinit_TARX
RET I


///. Интерфейс с внешними устройствами

передача в переменную

DATA_in

уменьшение счетчика

битов

последний бит?

> Прием?

> Передача?

очистка флагов прерывания очистка старого значения переменной DATA in

начало передачи RS232 H> IrDA начало текста... конец текста... запись в ПК... очистка флага прерывания Interrupt disable PI. О

начало текста... конец текста... запись в ПК... очистка флага прерывания запрет прерывания от Р1.0

начало передачи IrDA -> RS232


 


Инициализация Timer_A - TRANSMITTER

- режим TX (RS232 -» IrDA)

- Р2.5 - вход RS232

- Р2.4 CCR2 - выход IrDA (TSLM1100)