标题: 51单片机异步全双工通信汇编源码 [打印本页]

---

作者: 辰龙居士    时间: 2018-2-21 16:01
标题: 51单片机异步全双工通信汇编源码
单片机汇编语言源程序如下:

1. org  0000h
   
2.        ljmp reset
   
3.        org  0003h
   
4.        reti
   
5.        org  000bh
   
6.        reti
   
7.        org  001bh
   
8.        reti
   
9.        org  0023h
   
10.        ljmp tans_int     ;串口中断入口
    
11. 
    
12. reset:       mov r0,#0  ;先进行系统准备（可以不要）
    
13.        djnz r0,$
    
14. 
    
15. init:  mov r1,#4   ;各个寄存器初始化
    
16.        mov tmod,#0020h
    
17.        mov th1,#0fdh
    
18.        mov tl1,#0fdh
    
19.        setb tr1          ;打开定时器中断
    
20.        mov pcon,#00h
    
21. 
    
22.        clr   sm0               ;设置工作方式1
    
23.        setb sm1
    
24.        setb ren    ;允许串行口接收数据
    
25.        clr   ti
    
26.        clr   ri
    
27.        setb es           ;打开串行中断
    
28.        setb ea           ;打开全局中断
    
29. 
    
30. main:      
    
31.        mov r0,#9
    
32.        mov a,#0
    
33. loop:            
    
34.        mov dptr,#table        ;主函数主要实现串行发送
    
35.        mov a,r0
    
36.        movc      a,@a+dptr
    
37. 
    
38.        mov sbuf,a
    
39.        jb     ti,$          ;判断发送中断标志是否在中断中清零
    
40.        lcall  delay       ;若清零，则延时
    
41.        inc   dptr
    
42.        dec         r0
    
43.        cjne r0,#255,loop ;减到0之后会变成255
    
44.        ljmp main
    
45. 
    
46. tans_int:
    
47.        push       acc
    
48.        push       psw
    
49.        jnb   ti,recive_clr  ;判断是否为发送中断
    
50.        clr   ti
    
51.        sjmp       int_end
    
52. 
    
53. recive_clr:
    
54.        jnb   ri,int_end        ;判断是否为接收中断
    
55.        clr   ri   
    
56.        mov a,sbuf                   ;若是，则显示出来
    
57.        mov p2,a
    
58. 
    
59. int_end:  
    
60.        pop        psw
    
61.        pop  acc
    
62.        reti
    
63. 
    
64. table:             ;共阳极数码管扫描码
    
65.        db   0c0h,0f9h,0a4h,0b0h,99h
    
66.        db   92h,82h,0f8h,80h,90h
    
67. 
    
68. delay:   
    
69.         mov    r3,#4              ;延时函数（延时大概5**255*255*2=500ms）
    
70. l0:     mov r4,#0      
    
71. l1:    mov r5,#0ffh
    
72.          djnz r5,$
    
73.          djnz r4,l1
    
74.          djnz r3,l0
    
75.       ret  
    
76. 
    
77.        end
    
78. 
    

复制代码

---

欢迎光临 (http://www.51hei.com/bbs/)

Powered by Discuz! X3.1