标题: PROTEUS仿真：动态驱动显示1-99（汇编程序） [打印本页]

---

作者: 多喝点    时间: 2020-1-30 14:53
标题: PROTEUS仿真：动态驱动显示1-99（汇编程序）


仿真电路图




仿真汇编程序：

1. 
   
2. A_Bit EQU 20H
   
3. B_Bit EQU  21h  ;十位数存放处
   
4. TEMP  EQU 22h
   
5. 
   
6. STAR:  MOV  TEMP, #0 ;初始化计数器
   
7. 
   
8. STLOP:  
   
9. ACALL  DISPLAY
   
10. INC  TEMP
    
11. MOV  A,TEMP
    
12. CJNE  A,#100,NEXT ;=100重来
    
13. MOV  TEMP,#0
    
14. 
    
15. NEXT:
    
16. LJMP  STLOP
    
17. 
    
18. ;显示子程序
    
19. DISPLAY:
    
20.       MOV A, TEMP ;将temp中 的数转换成10进制
    
21.       MOV B,#10;
    
22.       DIV AB;
    
23.       MOV B_Bit,A ;十位在A
    
24.       MOV A_Bit,B;个位在B
    
25.       MOV DPTR,#TAB;指定查表启始地址
    
26.       MOV R0,#2;4
    
27. 
    
28. DPL1:  MOV  R1,#100;250 ;显示1000次
    
29. DPLOP: MOV A,A_Bit;取个位数
    
30.       MOVC A,@A+DPTR;查个位数的7段代码
    
31.       ;CPL A;
    
32.       MOV  P1 ,A;送出个位的7段代码
    
33.       CLR  P2.7;
    
34.       ACALL D1MS;延时显示1ms
    
35.       SETB P2.7;
    
36.       MOV  A,B_Bit  ;取十位数
    
37.       MOVC A, @A+DPTR ;查十位数的7 段代码
    
38.       ;CPL A;
    
39.       MOV  P1 ,A;送出十位的7段代码
    
40.       CLR  P2.6;
    
41.       ACALL D1MS;
    
42.       SETB P2.6;
    
43.       DJNZ  R1,DPLOP  ;100次没完循环
    
44.       DJNZ  R0,DPL1  ;2个100次没完循环RET
    
45.       ;延时4毫秒即2微秒* R7*R6(按12MHZ算)
    
46. 
    
47. 
    
48. D1MS: MOV  R7 ,#5;10
    
49.       D1:  MOV  R6,#50;
    
50.            DJNZ R6,$;
    
51.            DJNZ R7,D1;
    
52.            RET;
    
53. 
    
54. ;7段数码管各划的数字排列表,共阳的七段花数
    
55. TAB:
    
56. DB 3Fh,06h,5Bh,4Fh,66h,6Dh,7Dh,07h,7Fh,6Fh,77h,7Ch,39h,5Eh,79h,71h;
    
57. END;
    
58. 
    

复制代码

---

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

Powered by Discuz! X3.1