標題: 基于51單片機的交通燈匯編設計與proteus仿真 [打印本頁]
作者: 愛向心飛揚    時間: 2018-12-7 20:50
標題: 基于51單片機的交通燈匯編設計與proteus仿真
最近學校在教匯編，正巧單片機實驗，用51單片機做一個交通燈，用來過單片機實驗考試，效果還不錯，這個其實i功能比較簡單，用C語言的畫應該分分鐘搞定，但是匯編著實是難，proteus畫圖加敲代碼弄了整整一晚上，都要吐血了，效果圖如下：(由于proteus軟件比較卡，為了能快速看到效果程序里定時時間不是1秒，如果你用到記得更改會正常的1s間隔倒計時)

仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機源程序如下:
  1. ;位選引腳
  2. RED_H   BIT P1.0
  3. RED_L   BIT P1.1
  4. GRE_H   BIT P1.2
  5. GRE_L   BIT P1.3
  6. YEL_H   BIT P1.4
  7. YEL_L   BIT P1.5
  8. ;燈
  9. RED1    BIT P2.0
  10. GREED1  BIT P2.1
  11. YELLOW1 BIT P2.2
  12. RED2    BIT P2.3
  13. GREED2  BIT P2.4
  14. YELLOW2 BIT P2.5

  16. ORG  0000H
  17. AJMP  MAIN
  18. ORG  000BH
  19. AJMP  TIME
  20. ORG  0050H           
  21. ;****************** ******************
  22. MAIN:
  23.          MOV P0,#0FFH
  24.          MOV P1,#0FFH
  25.          MOV P2,#0FFH

  27.          MOV R0,#0            ; 0垂直紅，1垂直黃，2垂直綠

  29.      MOV R1,#10      ;定時器計數(shù)10次 1S

  31.          MOV R2,#60                 ; 紅60s
  32.          MOV R3,#5                 ; 黃燈5s
  33.          MOV R5,#60                 ; 綠燈

  35.          MOV R4,#0               



  39.                    MOV A, #0
  40.      MOV DPTR,#TABLE

  42.      ANL  TMOD,#00FH
  43.          ORL  TMOD,#010H
  44.          MOV TH0,#038H
  45.          MOV TL0,#000H
  46.          SETB EA
  47.          SETB ET0
  48.          SETB TR0
  49. LOOP:
  50.            CJNE R0,#1,OTHER
  51.                  MOV P2,#0X00;
  52.                 SETB YELLOW2
  53.                 SETB YELLOW1
  54.                 MOV P1,#0X00          ; 黃燈5s

  56.                 SETB YEL_H
  57.                 MOV B,#10
  58.                 MOV A,R3
  59.                 DIV AB
  60.                MOVC  A,@A+DPTR
  61.         MOV P0,A
  62.                 ACALL DELAY

  64.                 CPL  YEL_H
  65.                 SETB YEL_L
  66.                 MOV A,B
  67.                MOVC  A,@A+DPTR
  68.         MOV P0,A
  69.                 ACALL DELAY
  70.                  AJMP LOOP
  71. OTHER:JC OTHER2
  72.                 MOV P2,#0X00;
  73.                 SETB GREED1
  74.                 SETB RED2
  75.                    MOV P1,#0X00;          ; 綠燈60s
  76.                 SETB GRE_H
  77.                 MOV B,#10
  78.                 MOV A,R5
  79.                 DIV AB
  80.                MOVC  A,@A+DPTR
  81.         MOV P0,A
  82.                 ACALL DELAY

  84.                 CPL GRE_H
  85.                 SETB GRE_L
  86.                 MOV A,B
  87.                MOVC  A,@A+DPTR
  88.         MOV P0,A
  89.                 ACALL DELAY       
  90.                  AJMP LOOP
  91. OTHER2:

  93.                 MOV P1,#0X00;          ; 紅燈60s
  94.                 MOV P2,#0X00;
  95.                 SETB RED1
  96.                 SETB GREED2

  98.                 SETB RED_H
  99.                 MOV B,#10
  100.                 MOV A,R2
  101.                 DIV AB
  102.                MOVC  A,@A+DPTR
  103.         MOV P0,A
  104.                 ACALL DELAY
  105.                
  106.                 CPL RED_H
  107.                 SETB RED_L
  108.                 MOV A,B
  109.                MOVC  A,@A+DPTR
  110.         MOV P0,A
  111.                 ACALL DELAY          

  113.      AJMP LOOP

  115. TIME:
  116.            DJNZ R1,NEXT         
  117.        MOV R1,#5

  119.            CJNE R0,#1,THER1          
  120.            DJNZ        R3,NEXT           ; 黃燈
  121.            MOV R3,#5
  122.            INC R0
  123.        CJNE R0,#3,NEXT
  124.            MOV R0,#0
  125.            AJMP NEXT

  127. THER1: JC THER2
  128.            DJNZ        R5,NEXT
  129.            MOV R5,#60
  130.            INC R0
  131.        CJNE R0,#3,NEXT
  132.            MOV R0,#0
  133.           AJMP NEXT

  135. THER2: DJNZ        R2,NEXT
  136.            MOV R2,#60
  137.            INC R0
  138.        CJNE R0,#3,NEXT
  139.            MOV R0,#0


  142.          NEXT:
  143.                  MOV TH0,#038H
  144.                  MOV TL0,#000H

  146. ……………………

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

所有資料51hei提供下載:
交通燈.rar (65.74 KB, 下載次數(shù): 158)



作者: Juno-Z    時間: 2019-1-11 13:40
感謝大佬分享
作者: sgx66    時間: 2020-3-18 22:32
感謝大佬分享
作者: jzl66785    時間: 2020-4-6 16:15
感謝大佬分享
作者: 無情的單片機    時間: 2020-12-22 19:57
請問怎么改時間




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