?? uartttt.asm
字號:
K1 EQU P1.4 ; 按鍵端口
KEY_S EQU 50H ; 當前的按鍵狀態
KEY_V EQU 51H ; 上次的按鍵狀態
T2CON EQU 0C8H ;定義T2控制寄存器地址
RCAP2H EQU 0CBH ;定義T2捕獲寄存器高位地址
RCAP2L EQU 0CAH ;定義T2捕獲寄存器低位地址
;TR2 EQU 0CAH ;定義T2啟動位地址
TR2 EQU 0C8H.2
ORG 0000H
LJMP MAIN
MAIN:
;ORL T2CON, #00110000B ;設定T2工作于波特率發生器方式,設定為定時方式,啟動位在后面設定
;MOV RCAP2H, 0FFH ;設定捕獲寄存器初值,在11。0592M時,9600bps方式下的
;MOV RCAP2L, 0DCH ;初值
;;SETB TR2 ;啟動定時器2
;ORL T2CON, #00000100B
MOV TMOD,#20H ; 定時器1工作于8位自動重載模式,用于產生波特率
MOV TH1,#0FDH
MOV TL1,#0FDH ; 波特率9600
MOV SCON,#50H ; 設定串行口工作方式
;ANL PCON,#0EFH ; 波特率不倍增
ANL PCON,#01111111B
;ORL PCON,#10000000B
SETB TR1 ; 啟動定時器1
MOV IE,#0 ; 禁止任何中斷
MOV KEY_V,#01H ;
;==================================================
;串口中斷服務程序-【接收部分,發送部分采用循環子程序】
ORG 0023H
LJMP sub_UART_Interrupt ;轉串口中斷服務程序段
;-------------------------------------------------
;UART變量定義
b_Receive_OK EQU 24H.0
b_Send_OK EQU 24H.1
B_Receive_Number EQU 5FH
B_Send_Number EQU 5EH
B_MultiMen EQU 57H
;--------------------------------------------------
sub_UART_Interrupt: ;串口中斷服務程序
JB RI, sub_UART_Receive ;判斷是接收中斷,轉接收中斷子程序
CLR TI ;清空發送中斷標志,發送不使用中斷方式,采用查詢方式
RETI ;中斷程序返回
sub_UART_Receive: ;串口接收子程序
CLR RI ;清空接收中斷標志
PUSH ACC ;ACC進棧保護
CLR RS1 ;設置工作寄存器為1組
SETB RS0 ;續上
CJNE R0, #00H, lbl_No_Init_R0
MOV R0, #5FH ;R0 等于0,初始化
MOV B_Receive_Number, #00H ;同上
lbl_No_Init_R0:
JNB b_Receive_OK, lbl_No_OK ;接收好標志為0,不清寄存器,繼續接收字串
MOV R0, #5FH ;接收好標志為1,清寄存器,從頭開始放字串
MOV B_Receive_Number, #00H ;清接收字符數寄存器
lbl_No_OK:
INC R0 ;R0指向下一個存放地址
INC B_Receive_Number ;接收字數加1
MOV A, SBUF ;取接收到的字節
MOV @R0, A ;保存接收到的字符
CJNE A, #0DH, lbl_NoCR_Char ;判斷是否接收到的是回車字符
SETB b_Receive_OK ;收到回車字符,字串接收結束
AJMP lbl_Receive_Exit ;跳轉到結束部分,退出
lbl_NoCR_Char:
MOV R7, B_Receive_Number ;已接收字符數送R7,進行判斷
CJNE R7, #10H, lbl_Receive_Exit ;判斷接收到的字符數是否達到16個,不達到直接結束,繼續等待
SETB b_Receive_OK ;收到16個字符,字串接收結束
AJMP lbl_Receive_Exit ;跳轉到結束部分,退出
lbl_Receive_Exit:
CLR RS0 ;恢復工作寄存器為0組
POP ACC ;ACC出棧
RETI ;中斷程序返回
;------------------------------------------------
;================================================
sub_UART_Send_String:
; 功 能:通過串口發送一個字符串。注意在字符串的結尾處留一個字節放#00H,作為結束的依據
; 傳入參數: DPTR(要發送的字串首地址)
; 返 回 值: 無
;MOV DPTR,#XXXXH ;字串表格地址,在調用此子程序前輸入
lbl_Send_String:
CLR ES ;禁止串口中斷, 目的是禁止串口中斷服務程序啟動,減少CPU工作
CLR TI ;清標志TI
CLR A ;清空ACC
MOVC A,@A+DPTR ;獲得字符值
JZ lbl_Send_Exit ;查到00H時,表示字串結束
ACALL sub_UART_Send_Char
INC DPTR ;指向下一字符
SJMP lbl_Send_String
lbl_Send_Exit:
SETB ES ;允許串口中斷
RET
;------------------------------------------------
;================================================
sub_UART_Send_Char:
; 功 能:通過串口發送一個字符
; 傳入參數: ACC(要發送的數)
; 返 回 值: 無
MOV SBUF, A ;發送數據
;JNB TI,$ ;等待數據傳送完畢
lbl_Wait_Send_Finish:
JNB TI,lbl_Wait_Send_Finish
CLR TI ;清除數據傳送完畢標志
RET ;子程序返回
;-------------------------------------------------
;====================================
MAIN_RX:
JNB RI,MAIN_KEY ; 是否有數據到來
CLR RI
MOV A,SBUF ; 暫存接收到的數據
MOV P0,A ; 數據傳送到P0口
LCALL SEND_CHAR ; 回傳接收到的數據
MAIN_KEY:
LCALL SCAN_KEY ; 掃描按鍵
JZ MAIN_RX
LCALL DELAY_15MS ; 延時去抖動
LCALL SCAN_KEY
JZ MAIN_RX
MOV KEY_V,KEY_S ; 保存鍵值
LCALL PROC_KEY ; 鍵處理
SJMP MAIN_RX
;===============================================================================
SCAN_KEY:
; 掃描按鍵, (在此實例中僅掃描按鍵K1)
; 傳入參數: 無
; 返回值: 無
CLR A
MOV C,K1
MOV ACC.0, C
MOV KEY_S,A
XRL A,KEY_V ; 檢查按鍵狀態是否改變
RET
;===============================================================================
PROC_KEY:
; 按鍵處理子程序 --- 發送字符串到PC
; 傳入參數: KEY_V --- 按鍵值
; 返回值: 無
JB K1,END_PROC_KEY ; K1未按下時,直接返回
MOV DPTR,#TAB_WWW ; 字串表格地址
SEND_STRING:
CLR A
MOVC A,@A+DPTR
JZ END_PROC_KEY ; 查到00H時,表示字串結束
ACALL SEND_CHAR
INC DPTR ; 下一字符
SJMP SEND_STRING
END_PROC_KEY:
RET
;===============================================================================
SEND_CHAR:
; 傳送一個字符
; 傳入參數: ACC(要發送的數據)
; 返回值: 無
MOV SBUF,A
JNB TI,$ ; 等特數據傳送
CLR TI ; 清除數據傳送標志
RET
;===============================================================================
; 掃描按鍵, (在此實例中僅掃描按鍵K1)
; 傳入參數: 無
; 返回值: 無
DELAY_15MS:
MOV R7,#15
DELAY15MS_1:
MOV R6,#0E8H
DELAY15MS_2:
NOP
NOP
DJNZ R6,DELAY15MS_2
DJNZ R7,DELAY15MS_1
RET
TAB_WWW:
DB "www.saxmcu.com"
DB 0AH,0DH ;換行/回車
DB 00H
END
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -