欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 51單片機匯編計算器的問題（最高3位數運算） [打印本頁]
作者: Zhaoyan    時間: 2018-5-28 11:09
標題: 51單片機匯編計算器的問題（最高3位數運算）
匯編計算器（最高3位數運算），想將4*4的矩陣鍵盤改為4*5的，原用p1.0-p1.3接行，p1.4-p1.7接列可以實現功能，改用p3.3到p3.4接鍵盤列，鍵盤掃描程序將讀p1改為讀p3卻不能實現,還需要改其他嗎？

  1. ORG     0000H;
  2. JMP     MAIN;
  3. ORG     0003H;
  4. JMP     INP0;
  5. ORG     0030H;
  6. /*鍵盤所輸入數字依次存入70H-77H*/
  7. MAIN:   MOV   R6, #70H;
  8.         MOV   SP, #60H;
  9.                 CLR   80H;
  10.                 CLR   81H;
  11.                 SETB  EA;
  12.         SETB  EX0;
  13.                 SETB  IT0;
  14. DISP1:     MOV   R0,    #70H;//從第一位地址存數
  15.            MOV   R2,    #01H;//位選第一位
  16. DISP2:     MOV   A,     @R0;
  17.            LCALL SEG7;                 //跳轉段碼
  18.                    MOV   P0,    A;         //P0輸出字形
  19.                    MOV   P2,    R2;         //位選輸出
  20.                    LCALL D1MS;                 //跳轉延時
  21.                    MOV   P2,    #0;         //位選關閉，段碼不輸出
  22.                    INC   R0;                 //選擇下一位；
  23.                    MOV   A,     R2;         
  24.                    CLR   C;                         //進位標志清零
  25.                    RLC   A;                         //掃描字右移
  26.                    MOV   R2,    A;         //保存掃描字
  27.                    JNC  DISP2;                 //C=0時， 循環一次未結束，跳轉到DISP2
  28. PASS:      LJMP  DISP1;
  29. D1MS:      MOV   R7,    #50H;//延時程序
  30. DMS:       DJNZ  R7,    DMS;

  32.                    RET;
  33. SEG7:      MOV   DPTR,  #TABLE;//查表程序
  34.            MOVC  A,     @A+DPTR;
  35.                    RET;
  36. TABLE:  DB    0C0H, 0F9H, 0A4H, 0B0H;
  37.         DB    99H,  92H,  82H,  0F8H;
  38.                 DB    80H,  90H,  88H,  83H;
  39.                 DB    0C6H, 0A1H, 86H,  8EH;
  40. /*P1.0-1.3，行線；    P1.4-1.7，列線；*/
  41. /*P0，輸出字形；      P2，輸出位選*/         
  42. INP0:         
  43.         PUSH  ACC;
  44.                 PUSH  B;
  45.                 PUSH  PSW;
  46. START:  MOV   R4, #00H;
  47. L1:     MOV   R3, #0F7H;//設掃描初值，11110111，P3.3=0
  48.         MOV   R1, #00H;        //取碼指針；





  54. /*首先行掃描*/
  55. L2:     MOV   A,  R3;        //行掃描開始
  56.         MOV   P1, A;        //掃描值輸出至p1
  57.                 MOV   A,  P1;        //讀入P1的值
  58.                 MOV   R4, A;        //P3口中P3.4-3.7的狀態通過A，傳送到R4
  59.                 SETB  C;                //進位標志置1
  60.                 MOV   R5, #04H; //                  
  61. l3:     RLC   A;                //按鍵左移，通過C是否為0，判斷此列是否有0；無0則r1進行累加；有0跳轉到延時，
  62.         JNC   KEY;                //C=0，跳轉到延時
  63.                 INC   R1;               
  64.                 DJNZ  R5, L3;
  65.                 MOV   A,  R3;      
  66.                 SETB  C;
  67.                 RRC   A;           //換行掃描
  68.                 MOV   R3,A;         
  69.                 JC    L2;           //C=1，跳轉到L2
  70. KEY:    ACALL DELAY;
  71. D1:     MOV   A,P1;
  72.         XRL   A,R4;
  73.                 JNZ    D1;
  74.                 MOV   A,   R6; //指定存入地址
  75.                 MOV   R0,  A;  
  76.                 MOV   A,   R1; //存入數字
  77.                 MOV   @R0, A;




  82. /*判斷運算法*/
  83.         MOV   A,     R1;
  84.                 XRL   A,     #0AH;//判斷是否為加法符
  85.                 JZ    ADD1;
  86.                 MOV   A,     R1;
  87.                 XRL   A,   #0BH;//判斷是否為減法符
  88.             JZ    SUBB1;
  89.                 MOV   A,     R1;
  90.                 XRL   A,   #0CH;//判斷是否為乘法符
  91.             JZ    MUL1;
  92.                 MOV   A,     R1;
  93.                 XRL   A,   #0DH;//判斷是否為除法符
  94.             JZ    DIV1;
  95.                 MOV   A,     R1;
  96.                 XRL   A,   #0EH;//判斷是否為等于號
  97.             JZ    EQUAL1;
  98.                 MOV   A,     R1;
  99.                 XRL   A,   #0FH;//判斷是否為清零鍵
  100.             JZ    ON1;



  104.    
  105.                 INC   R0;           //選擇下一個地址
  106.                 MOV   A,   R0; //存入r0的新數值
  107.                 MOV   R6,  A;
  108.                 POP   PSW;
  109.                 POP          B;
  110.                 pop   ACC;
  111.                 RET;
  112. DELAY:  MOV   R7,   #60;//消除抖動延時程序
  113. DLY1:   DJNZ  R7,   DLY1;
  114.                 RET;



  118. ADD1:   MOV   A,    80H; //加法程序
  119.         MOV   81H,  A;
  120.         LJMP  D1;
  121.                 MOV   A,    81H;
  122.                 ADD   A,        80H;
  123.                 MOV   80H,  A;   
  124.         RET;



  128. SUBB1:  MOV   A,    80H;//減法程序
  129.         MOV   81H,  A;
  130.         LJMP  DD1;
  131.                 MOV   A,    80H;
  132.                 SUBB  A,    81H;
  133.                 MOV   80H,  A;
  134.         RET;



  138. MUL1:   MOV   A,    80H;//乘法程序
  139.                 MOV   81H,  A;
  140.         LJMP  DD1;
  141.                 MOV   A,    80H;
  142.                 MUL   AB;
  143.                 MOV          80H,  A;   
  144.         RET;




  149. DIV1:   MOV   A,    80H;//除法程序
  150.                 MOV   81H,  A;
  151.         LJMP  DD1;
  152.                 MOV   A,    80H;
  153.                 DIV   AB;
  154.                 MOV   80H,  A;  
  155.         RET;



  159. EQUAL1: MOV   A,    80H;//等于程序
  160.                 MOV   B,    #64H;//算百位數
  161.                 DIV   AB;
  162.                 MOV   72H,  A;         //將此數除100，商數放72h，余數放71h。
  163.                 MOV   71H,  B;
  164.                 MOV   A,    71H;
  165.                 MOV   B,    0AH;//算十位數
  166.                 DIV   AB;
  167.                 MOV   71H,  A;         //將此數除10，商數放71h，余數放70h。
  168.                 MOV   70H,  B;
  169.                 RET;


  172. ON1:    CLR    70H;                 //清零程序
  173.         CLR    71H;
  174.                 CLR    72H;
  175.                 CLR    73H;
  176.                 CLR    78H;
  177.                 CLR    79H;
  178.                 CLR    7AH;
  179.                 CLR    80H;
  180.                 CLR    81H;
  181.                 CLR    82H;
  182.                 CLR    88H;
  183.                 CLR    89H;
  184.                 CLR    8AH;
  185.                 MOV    R0, 00H;
  186.                 MOV    R1, 00H;
  187.                 MOV    R2, 00H;
  188.                 MOV    R3, 00H;
  189.                 MOV    R4, 00H;
  190.                 MOV    R5, 00H;
  191.                 MOV    R6, 70H;
  192.                 MOV    R7, 00H;
  193.                 RET;  


  196. DD1:    MOV   B,            #0AH;//將所輸入兩位數轉換為十進制，并存入80h中
  197.         MOV   A,     78H;
  198.         MUL   AB;
  199.                 ADD   A,     70H;
  200.                 MOV   80H,   A;
  201.                 RET;
  202. END;
復制代碼






歡迎光臨 (http://m.raoushi.com/bbs/) Powered by Discuz! X3.1