求一个51单片机汇编语言 串口输出一行中文的程序 51单片机定时器的汇编语言程序编程,
ORG 0000H
AJMP MAIN
ORG 0100H
MAIN: MOV SCON,#40H ;设置串行口工作方式1
MOV PCON,#0 ;设置波特率4800
MOV TMOD,#20H ;波特率可根据需要自己修改
MOV TL1,#0FAH
MOV TH1,#0FAH
SETB TR1
MOV DPTR,#MSG ;DPTR指向待输出字符串首地址
NEXT: MOV A,#0
MOVC A,@A+DPTR
CJNE A,'$',NEXT1 ;字符串结尾？
AJMP NEXT2
NEXT1: CLR TI
MOV SBUF,A ;发送
JNB TI,$ ;等待发送完成
INC DPTR ;指向下一字符
AJMP NEXT
NEXT2: SJMP $ ;动态暂停
MSG DB '中华人民共和国' ;定义中文字符串
MSGEND DB '$' ;定义字符串结尾字符，自定义
END
;下载程序以后,联接好串口线
;然后打开串口调试软件，按照您连接的串口，设置好串口特性(注意波特率)
;然后发送数据给下面的机器，并接受下面发送上来的数据！
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,#0f4h ;定时器计数初值，波特率 2400
mov th1,#0f4h ;定时器重装值
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
ff
51单片机汇编语言写串口程序~
ORG 0000H
SJMP 0050H
ORG 0023H
LJMP S_INT
TAB:DB 20H,49H,20H,47H,45H,54H,20H,'NULL'
ORG 0050H
MOV TMOD,#20H
MOV TH1,#0FDH
MOV TL1,#0FDH
SETB TR1
SETB SM1
CLR SM0
SETB EA
SETB ES
MOV R0,#30H
MOV A,#1H
MAIN:SETB REN
ACALL DELAY
JNZ MAIN
MOV R2,#0
MOV DPTR,#TAB
MOV R7,#7
SEND:MOV A,R2
MOVC A,@A+DPTR
CLR ES
MOV SBUF,A
JNB TI,$
CLR TI
INC R2
DJNZ R7,SEND
MOV R0,#30H
SHOW:MOV A,@R0
MOV SBUF,A
JNB TI,$
CLR TI
INC R0
CJNE A,#40H,SHOW
SETB ES
MOV A,#1
MOV R0,#30H
SJMP MAIN
S_INT:CLR RI
MOV A,SBUF
MOV @R0,A
CJNE A,#40H,NEXT
MOV A,#0
NEXT:INC R0
RETI
DELAY:MOV 7DH,#200
LOOP1:MOV 7EH,#40
DJNZ 7EH,$
DJNZ 7DH,LOOP1
RET
END
这个是方式一的
这么简单的要求，不用大动干戈。
看看下面的程序，是不是最简单：
ORG 0000H
SETB TR0 ;启动T0
MOV R2, #250 ;定时计数初值
LOOP:
MOV TH0, #(8192 - 8000) / 32 ;定时8ms
MOV TL0, #(8192 - 8000) MOD 32
JNB TF0, $ ;等待8ms
CLR TF0
DJNZ R2, LOOP ;每隔8ms，R2减一次一
CPL P1.0 ;R2为0则LED亮灭转换
LJMP 0000H
END
本程序，已经实验成功。
