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

標題: 51單片機雙機串行通信匯編語言程序+Proteus仿真 [打印本頁]
作者: 買醉的minguk    時間: 2019-6-7 15:23
標題: 51單片機雙機串行通信匯編語言程序+Proteus仿真
甲機按鍵控制乙機數碼管，乙機按鍵控制甲機LED燈
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機源程序如下:
  1.            ORG 00H
  2.                    SJMP INIT
  3.                    ORG 0023H
  4.                    LJMP LOOP
  5.                    ORG 0030H
  6. INIT:     MOV SP,#5FH
  7.            MOV SCON,#50H              ;串行口工作方式1，允許接收
  8.            MOV TMOD,#20H              ;定時器1工作方式2
  9.                MOV PCON,#0H               ;波特率不加倍
  10.                MOV TH1,#0FDH              ;波特率9.6kbit/s
  11.                MOV TL1,#0FDH
  12.                SETB TR1                   ;啟動定時器1
  13.                    SETB EA
  14.                    SETB ES
  15.                    CLR TI
  16.                    CLR RI
  17. KEYS:     MOV P0,#0FFH
  18.            MOV R1,#0EFH               ;初始化各寄存器
  19.            MOV R2,#4
  20.            MOV R3,#0FFH
  21.                    MOV 20H,#11101111B
  22.                    MOV 21H,#11111110B
  23. KEYREAD:  MOV A,R1
  24.            MOV P0,A                    ;送掃描碼至P0口
  25.                    MOV A,P0                    ;讀P0口按鍵狀態
  26.                    MOV R3,A                    ;將此狀態保存在寄存器R3中
  27.                    ORL A,#0F0H                 ;屏蔽P0口高四位
  28.                    CJNE A,#0FFH,KEYDOWN        ;若P0口低四位不全為1，有按鍵落下
  29.                    MOV A,R1
  30.            RL A                        ;若低四位全為1，掃描下一行
  31.                    MOV R1,A
  32.                    DJNZ R2,KEYREAD
  33.                    LJMP KEYS
  34. KEYDOWN:  MOV A,P0
  35.            ORL A,#0F0H
  36.            CJNE A,#0FFH,KEYTURN1        ;若按鍵確實落下，將按鍵轉換為按鍵碼
  37.            LJMP KEYS
  38. KEYTURN1: MOV R2,#4                   ;設循環次數
  39.            MOV B,#0                    ;按鍵碼初始值設為0
  40. LOOP1:    MOV A,P0
  41.            ORL A,#0F0H
  42.            CJNE A,21H,S1               ;判斷落下按鍵是否位于該列
  43.            SJMP KEYTURN2               ;是，跳轉判斷行
  44. S1:       INC B                       ;否，按鍵碼加1，(21H)左移，判斷是否位于下一列
  45.            MOV A,21H
  46.            RL A
  47.                    MOV 21H,A
  48.                    DJNZ R2,LOOP1
  49.                    SJMP KEYREAD
  50. KEYTURN2: MOV R2,#4
  51. LOOP2:    MOV A,P0
  52.            ORL A,#0FH
  53.            CJNE A,20H,S2                ;判斷落下按鍵是否位于該行
  54.            SJMP S3                     
  55. S2:       INC B                       ;否，按鍵碼加4，(20H)左移，判斷是否位于下一行
  56.            INC B
  57.            INC B
  58.                    INC B
  59.                    MOV A,20H
  60.                    RL A
  61.                    MOV 20H,A
  62.                    DJNZ R2,LOOP2
  63.                    SJMP KEYREAD
  64. S3:       MOV A,B                     ;將按鍵碼送給A
  65. SEND:     MOV SBUF,A                  ;發送數據
  66.            JNB TI,$
  67.                    CLR TI
  68.                    LJMP INIT
  69. LOOP:           MOV A,SBUF                  ;接收乙機數據
  70.            JNB RI,$
  71.                    CLR RI                      ;清接收中斷標志
  72.                    MOV P1,#0FFH
  73.            LCALL LED8                  ;將乙機按鍵數據送P1口，點亮LED燈
  74.            RETI
  75. LED8:     JNB ACC.0,LIGHT1
  76.                    JNB ACC.1,LIGHT2
  77.                    JNB ACC.2,LIGHT3
  78. RETURN:   RET
  79. LIGHT1:   MOV A,#0FEH
  80.            MOV R2,#8
  81.     L1:           MOV P1,A
  82.                RL A
  83.                    ACALL DELAY
  84.                    DJNZ R2,L1
  85.            SJMP RETURN
  86. LIGHT2:   MOV A,#07FH
  87.            MOV R2,#8
  88.     L2:    MOV P1,A
  89.                RR A
  90.                    ACALL DELAY
  91.                    DJNZ R2,L2
  92.            SJMP RETURN
  93. LIGHT3:   MOV A,#0E7H
  94.            MOV P1,A
  95.                    ACALL DELAY
  96.                    SETB C
  97.         L31:   MOV R0,A
  98.                    ORL A,#0FH
  99.                    RLC A
  100.                    MOV R1,A
  101.                    MOV A,R0
  102.                    ORL A,#0F0H
  103.                    RRC A
  104.                MOV R2,A
  105.                ANL A,#0FH
  106.                    MOV R0,A
  107.                    MOV A,R1
  108.                    ANL A,#0F0H
  109.                    ADD A,R0
  110.                    MOV P1,A
  111.                    ACALL DELAY
  112.                JB P1.7,L31
  113.     L32:   SETB C
  114.            MOV R0,A
  115.                    ORL A,#0FH
  116.                    RRC A
  117.                    MOV R1,A
  118.                    MOV A,R0
  119.                    ORL A,#0F0H
  120.                    RLC A
  121.                    MOV R2,A
  122.                ANL A,#0FH
  123.                    MOV R0,A
  124. ……………………

  126. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有資料51hei提供下載:
程序代碼.rar (2.64 KB, 下載次數: 156)

作者: zzx1026160138    時間: 2019-6-12 08:30
好好研究一哈
作者: kaixuan_27    時間: 2019-8-15 08:51
沒有仿真圖啊，只有代碼
作者: 單片機房煙花雨    時間: 2019-8-15 16:52
不應該是甲乙各有程序嗎
作者: littlejia    時間: 2019-10-21 19:16
單片機房煙花雨 發表于 2019-8-15 16:52
不應該是甲乙各有程序嗎

兩片單片機應該是2套程序，看來程序還得自己編啊

作者: liking    時間: 2019-12-1 16:29
littlejia 發表于 2019-10-21 19:16
兩片單片機應該是2套程序，看來程序還得自己編啊

分別寫在兩個單片機里就可以了
作者: 弒途者    時間: 2019-12-4 21:18
liking 發表于 2019-12-1 16:29
分別寫在兩個單片機里就可以了

你們運行成功了嗎？
作者: qianjun    時間: 2019-12-9 21:59
有人成功了嗎，可不可行
作者: 薯條怎么這么貴    時間: 2020-3-27 13:04
有C的程序嗎
作者: cc5218    時間: 2020-5-4 12:00
請問有仿真圖嗎？運行沒有成功
作者: 1015182671    時間: 2020-5-29 21:15
cc5218 發表于 2020-5-4 12:00
請問有仿真圖嗎？運行沒有成功

你有程序么發給我一份
作者: 9876    時間: 2020-6-3 19:05
我打不開那個asm
作者: generalissimo    時間: 2021-6-20 21:04
接收過程比較簡單，沒多少參考，多謝啦。



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