|
beep bit p3.7 ;蜂鳴器定義
org 00h
jmp main
org 23h ;串行中斷入口地址
jmp com_int ;串行中斷服務程序
;*********** 主程序開始 *******************
org 30h
main: MOV sp,#30h ;設置堆棧
lcall rest ;初始化
lcall comm ;串口初始化
jmp $ ;原地等待
; ************* 初始化 *********************
rest: MOV p0,#00h ;禁止數碼管顯示
MOV p2,#255
clr beep ;禁止蜂鳴器
MOV p1,#255 ;禁止LED顯示
RET ;返回
; ************** 串口初始化 *****************
;設置串行口工作方式1 ， 定時器1作為波特率發生器
;波特率設置為 2400 ;
comm: MOV tmod,#20h ;設置定時器T1工作方式2
MOV tl1,#0f3h ;定時器計數初值，波特率 2400
MOV th1,#0f3h ;定時器重裝值
setb ea ;允許總的中斷
setb es ;允許串行中斷
MOV pcon,#00h ;波特率不倍增
MOV scon,#50h ;設置串口工作方式1,REN = 1 允許接收
setb tr1 ;定時器開始工作
ret ;返回
;*************** 串口中斷服務程序 ***********
; 如果接收 0FF 表示上位機需要聯機信號，單片機發送 0FFH作為
; 應答信號,如果接收到 數字 1~ n，表示相應的功能；
; 這里，如果收到 1 ，則單片機向計算機發送字符 'H';
; 如果收到 2 ，則單片機向計算機發送字符 'e';
; 如果收到其他的數據，則發送 'J';
com_int: clr es ;禁止串行中斷
clr ri ;清除接收標志位
MOV a,sbuf ;從緩沖區取出數據
MOV p1,a
MOV dptr,#tab
cjne a,#0ffh,in_1 ;檢查數據
MOV sbuf,#255 ;收到聯機信號，發送聯機信號
jnb ti,$ ;等待發送完畢
clr ti ;清除發送標志
setb es ;允許串行中斷
reti ;中斷返回
in_1: cjne a,#1H, in_2 ;如果收到1
MOVc a,@a+dptr
MOV sbuf,a ;發送 'h'
jnb ti,$ ;等待發送完畢
clr ti ;清除發送中斷標志
setb es ;允許串行中斷
reti ;中斷返回
in_2: cjne a,#2,in_3 ;接收到 2
MOVc a,@a+dptr
MOV sbuf,a ;發送 'e'
jnb ti,$ ;等待發送完畢
clr ti ;清除發送中斷
setb es ;允許串行中斷
reti ;中斷返回
in_3: MOV a,#03h
MOVc a,@a+dptr
MOV sbuf,a ;發送 'j'
jnb ti,$ ;等待發送完畢
clr ti ;清除發送中斷標志
setb es ;允許串行中斷
reti ;返回
tab: db '2','h','e','j'
end
|
66821730(技術支持)
