;********************************************
;Function:基于HT48R50A的RS232串口示例程序*
;MICroProcessor:HT48R50A-1/28SKDIP-A*
;Author:www.picavr.com*
;Crystal:4MHz*
;********************************************
#INCLUDEHT48R50A-1.INC
TXDEQUPB.1
RXDEQUPB.0
BAUDRATEEQU135;2400,N,8,1
;--------------------------------------------------------------------
PUBLICTRANSMIT
PUBLICRECEIVE
;--------------------------------------------------------------------
DATA_RS232.SECTION’DATA’
COUNTERDB?
DELAY_COUNTERDB?
DELAY_COUNTER_1DB?
DELAY_COUNTER_2DB?
TRANSMIT_DATADB?
RECEIVE_DATADB?
;--------------------------------------------------------------------
TRANSMIT_CODE.SECTION’CODE’
TRANSMIT:
MOV TRANSMIT_DATA,A
SETPB
MOV A,00000001B
MOV PBC,A
MOV A,BAUDRATE
MOV DELAY_COUNTER,A
CLRTXD;SENDSTART
T_START_BIT:;BIT
SDZDELAY_COUNTER
JMPT_START_BIT
;-------------------------------------------------------
MOV A,08H
MOV COUNTER,A
T_DATA_BIT:
RRCTRANSMIT_DATA
SNZC
JMPT_SEND_LOW
SETTXD
JMPT_BIT_DELAY
T_SEND_LOW:
CLRTXD
T_BIT_DELAY:
MOV A,BAUDRATE
MOV DELAY_COUNTER,A
T_DELAY_SEND:
SDZDELAY_COUNTER
JMPT_DELAY_SEND
SDZCOUNTER
JMPT_DATA_BIT
;-------------------------------------------------------
TRANSMIT_END:
SETTXD;SENDSTOP
;BIT
MOV A,025H
MOV DELAY_COUNTER_1,A
MOV DELAY_COUNTER_2,A
T_STOP_DELAY:
SDZDELAY_COUNTER_2
JMPT_STOP_DELAY
SDZDELAY_COUNTER_1
JMPT_STOP_DELAY
RET
;--------------------------------------------------------------------
RECEIVE_CODE.SECTION’CODE’
RECEIVE:
SETPB
MOV A,00000001B
MOV PBC,A
R_START_BIT:
SZRXD;RECEIVE
JMPR_START_BIT;STARTBIT
MOV A,BAUDRATE+2
MOV DELAY_COUNTER,A
R_START_BIT_DELAY:
SDZDELAY_COUNTER
JMPR_START_BIT_DELAY
;-------------------------------------------------------
MOV A,08H
MOV COUNTER,A
R_DATA_8_BITS:
CLRC
SZRXD
SETC
RRCRECEIVE_DATA
MOV A,BAUDRATE+2
MOV DELAY_COUNTER,A
R_DATA_BIT_DELAY:
SDZDELAY_COUNTER
JMPR_DATA_BIT_DELAY
SDZCOUNTER
JMPR_DATA_8_BITS
;-------------------------------------------------------
MOV A,RECEIVE_DATA
;-------------------------------------------------------
RET
;--------------------------------------------------------------------
[導讀]
;********************************************;Function:基于HT48R50A的RS232串口示例程序*;MICroProcessor:HT48R50A-1/28SKDIP-A*;Author:www.picavr.com*;Crystal:4MHz*;*************************
下載文檔本站聲明： 本文章由作者或相關機構授權發(fā)布，目的在于傳遞更多信息，并不代表本站贊同其觀點，本站亦不保證或承諾內(nèi)容真實性等。需要轉載請聯(lián)系該專欄作者，如若文章內(nèi)容侵犯您的權益，請及時聯(lián)系本站刪除。
換一批
延伸閱讀
要點： 有效應對環(huán)境變化，經(jīng)營業(yè)績穩(wěn)中有升 落實提質(zhì)增效舉措，毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著，戰(zhàn)新業(yè)務引領增長 以科技創(chuàng)新為引領，提升企業(yè)核心競爭力 堅持高質(zhì)量發(fā)展策略，塑強核心競爭優(yōu)勢...
關鍵字： 通信 BSP 電信運營商 數(shù)字經(jīng)濟
