标题: 计算器单片机课设汇编语言程序+仿真 超过255清零 [打印本页]
作者: yangyanru    时间: 2017-9-24 17:12
标题: 计算器单片机课设汇编语言程序+仿真 超过255清零
计算器单片机课设仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）

单片机汇编语言源程序如下:
  1. YJ             EQU                50H                                ;结果存放
  2. YJ1            EQU                51H                                ;中间结果存放
  3. GONG          EQU                52H                           ;功能键存放

  5.                 ORG           00H
  6. START:        MOV           R3,#0                     ;初始化显示为空
  7.                 MOV           GONG,#0               
  8.                 MOV           38H,#00H
  9.                 MOV           37H,#00H
  10.                 MOV           36H,#00H
  11.                 MOV           35H,#00H
  12.                 MOV           34H,#00H
  13.                 MOV           33H,#00H
  14.                 MOV           32H,#00H                        
  15.                 MOV           31H,#00H

  17. MLOOP:        CALL           DISP                      ;调显示子程序
  18. WAIT:        CALL           TESTKEY                   ;判断有无按键
  19.                 JZ      WAIT                  
  20.                 CALL    GETKEY              ;读键
  21.                 INC     R3                        ;按键个数
  22.                 CJNE    A,#0,NEXT1              ;判断是否数字键
  23.                 LJMP    E1                         ;转数字键处理
  24. NEXT1:        CJNE    A,#1,NEXT2
  25.                 LJMP    E1
  26. NEXT2:        CJNE    A,#2,NEXT3
  27.                 LJMP    E1
  28. NEXT3:        CJNE    A,#3,NEXT4
  29.                 LJMP    E1
  30. NEXT4:        CJNE    A,#4,NEXT5
  31.                 LJMP    E1
  32. NEXT5:        CJNE    A,#5,NEXT6
  33.                 LJMP    E1
  34. NEXT6:        CJNE    A,#6,NEXT7
  35.                 LJMP    E1
  36. NEXT7:        CJNE    A,#7,NEXT8
  37.                 LJMP    E1
  38. NEXT8:        CJNE    A,#8,NEXT9
  39.                 LJMP    E1
  40. NEXT9:        CJNE    A,#9,NEXT10
  41.                 LJMP    E1
  42. NEXT10:        CJNE           A,#10,NEXT11        ;判断是否功能键
  43.                 LJMP    E2                        ;转功能键处理
  44. NEXT11:        CJNE           A,#11,NEXT12
  45.                 LJMP    E2
  46. NEXT12:        CJNE           A,#12, NEXT13
  47.                 LJMP           E2
  48. NEXT13:        CJNE           A,#13,NEXT14
  49.                 LJMP           E2
  50. NEXT14:        CJNE           A,#14,NEXT15
  51.                 LJMP           E2
  52. NEXT15:        LJMP           E3                         ;判断是否清除键
  53. E1:                CJNE           R3,#1,N1                   ;判断第几次按键
  54.                 LJMP    E11                        ;为第一个数字
  55. N1:                CJNE           R3,#2,N2
  56.                 LJMP    E12                       ;为第二个数字
  57. N2:                CJNE    R3,#3,N3
  58.                 LJMP    E13                       ;为第三个数字
  59. N3:                LJMP    E3                        ;第四个数字转溢出
  60. E11:        MOV            R4,A                       ;输入值暂存R4
  61.                 MOV           38H,A                     ;输入值送显示缓存
  62.                 MOV           37H,#00H
  63.                 MOV           36H,#00H
  64.                 MOV           35H,#00H
  65.                 MOV           34H,#00H
  66.                 MOV           33H,#00H
  67.                 MOV           32H,#00H
  68.                 MOV           31H,#00H

  70.                 LJMP          MLOOP                     ;等待再次输入
  71. E12:          MOV           R7,A                      ;个位数暂存R7
  72.                 MOV           B,#10
  73.                 MOV           A,R4
  74.                 MUL           AB                                         ;十位数
  75.                 ADD                A,R7
  76.                 MOV           R4,A                    ;输入值存R4
  77.                 MOV           31H,#00H
  78.                 MOV           32H,#00H
  79.                 MOV           33H,#00H
  80.                 MOV           34H,#00H
  81.                 MOV           35H,#00H
  82.                 MOV           36H,#00H                       ;输入值送显示缓存
  83.                 MOV           37H,38H
  84.                 MOV           38H,R7

  86.                 LJMP           MLOOP
  87. E13:        MOV          R7,A
  88.                 MOV           B,#10
  89.                 MOV           A,R4
  90.                 MUL           AB
  91.                 JB             OV,E3                          ;输入溢出
  92.                 ADD           A,R7
  93.                 JB             CY,E3                   ;输入溢出
  94.                 MOV           R4,A
  95.                 MOV           36H,37H                                ;输入值送显示缓存
  96.                 MOV           37H,38H
  97.                 MOV           38H,R7
  98.                 LJMP           MLOOP
  99. E3:                MOV           R3,#0                   ;按键次数清零
  100.                 MOV           R4,#0                    ;输入值清零
  101.                 MOV           YJ,#0                    ;计算结果清零
  102.                 MOV           GONG,#0                  ;功能键设为零            
  103.                 MOV           31H,#00H
  104.                 MOV           32H,#00H
  105.                 MOV           33H,#00H
  106.                 MOV           34H,#00H
  107.                 MOV           35H,#00H
  108.                 MOV           36H,#00H                       ;输入值送显示缓存
  109.                

  111. …………限于本文篇幅 余下代码请从51黑下载附件…………
  112.                
复制代码

所有资料51hei提供下载:
计算器--单片机课设.rar (16.79 KB, 下载次数: 44)






欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1