久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標題: 單片機匯編語言的十字路口紅綠燈Proteus仿真設計 [打印本頁]

---

作者: 小豆丁0605    時間: 2021-12-19 09:04
標題: 單片機匯編語言的十字路口紅綠燈Proteus仿真設計
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機源程序如下:
ORG 0000H
A_BIT EQU 20H ;用于存放南北十位數
B_BIT EQU 21H ;用于存放南北十位數
C_BIT EQU 22H ;用于存放東西十位數
D_BIT EQU 23H ; 用于存放東西位數


TEMP1 EQU 24H  ;用于存放第一二南北狀態要顯示的時間
TEMP2 EQU 25H  ;用于存放第一二東西狀態要顯示的時間

TEMP3 EQU 26H ;用于存放第三第四南北狀態要顯示的時間
TEMP4 EQU 27H;用于存放第三第四南北狀態要顯示的時間
LJMP MAIN

ORG 0003H     ;外部中斷0入口
LJMP INTA     ;跳轉到外部0中斷
ORG 0013H     ;外部中斷1入口
LJMP INTB     ;跳轉到外部1中斷

INTA: MOV A,P1   ;外部0中斷
      PUSH ACC
      MOV A,P2  ;中斷保護
      PUSH ACC
MOV P1,#0FFH    ;清除先前狀態
MOV P2,#0FFH
CLR P1.0
CLR P1.4      ;南北通行，東西禁止通行
CLR P1.6
CLR P2.3
JNB P3.2 ,$  ;判斷是否還在中斷狀態
POP ACC
MOV P2,A     ;返回中斷前狀態
POP ACC
MOV P1,ACC
RETI          ;中斷返回



INTB:MOV A,P1  ;外部1中斷
     PUSH ACC   ;中斷保護
     MOV A,P2
     PUSH ACC
MOV P1,#0FFH  ;清除先前狀態
MOV P2,#0FFH
CLR P1.2
CLR P2.1
CLR P1.3    ;東西通行，南北禁止通行
CLR P1.5
JNB P3.3 ,$  ;判斷是否還在中斷狀態
POP ACC
MOV P2,A    ;返回中斷前狀態
POP ACC
MOV P1,A
RETI         ;中斷返回



MAIN:
ORG 0100H        ;初始情況
MOV P1,#0FFH
MOV P2,#0FFH   ;滅所有燈
MOV TMOD,#55H  ;計數方式方式1
MOV IE,#85H    ;開中斷
MOV TEMP1,#20 ;
MOV TEMP2,#25
MOV TEMP3,#25
MOV TEMP4,#20

STAR:
MOV P1,#0FFH
MOV P2,#0FFH   ;滅所有燈
MOV A,24H    ;將顯示時間送A
CJNE A,#20,T40T  ;判斷時間，選初始值
T20T:       ;南北通行要顯示的時間為20的計數器初始值
CLR TF0   ;清TF0
CLR TF1 ;清TF1
MOV TH1 ,#0FFH ;送20秒時的初始值
MOV TL1 ,#0FCH ;在些設計20秒6輛為多車
MOV TH0 ,#0FFH
MOV TL0 ,#0FCH
LJMP TEMP20   ;跳到20秒
T40T:     ;南北通行要顯示的時間為40的計數器初始值
CLR TF0 ;清TF0
CLR TF1 ;清TF1
MOV TH1,#0FFH ;送40秒時的初始值
MOV TL1 ,#0F8H ;在些設計40秒8輛為多車
MOV TH0 ,#0FFH
MOV TL0 ,#0F8H
LJMP TEMP40  ;跳到40秒



TEMP20:     ;TEMP1=20情況
SETB TR0    ;開始計數
SETB TR1
CLR P1.2
CLR P2.1    ;南北通行，東西禁止通行
CLR P1.3
CLR P1.5
MOV TEMP1,#20  ;南北要顯示的時間，
MOV TEMP2,#25 ;東西要顯示的時間
STLOP:
ACALL DISPLAY1   ;調用顯示
DEC TEMP1      ;時間夠一秒顯示時間減1
DEC TEMP2
MOV A,TEMP1
CJNE A,#0,NEXT ;若顯示時間不為0保持現在狀態
LJMP STAR2     ;若顯示時間為 0跳到第二狀態
NEXT: LJMP STLOP


STAR2:     ;狀態1
SETB P1.2
CLR P1.1    ;南北黃燈，東西禁止通行
SETB P1.3
CLR P1.4
MOV TEMP1,#05  ;南北要顯示的時間，
MOV TEMP2,#05 ;東西要顯示的時間，

STLOP2:
ACALL DISPLAY1   ;調用顯示
DEC TEMP1      ;時間夠一秒顯示時間減1
DEC TEMP2
MOV A,TEMP1
CJNE A,#0,NEXT2   ;若顯示時間不為0保持現在狀態
JB TF1 ,T40      ;判斷南北是否多車
JB TF0 ,T40       ;判斷北南是否多車
MOV TEMP1,#20    ;少車下次顯示時間為20秒
LJMP STAR3       ;跳到狀態3
T40:
MOV TEMP1,#40    ; 多車下次顯示時間為40秒
LJMP STAR3        ;若顯示時間為 0跳到第三狀態
NEXT2:LJMP STLOP2


TEMP40:;TEM=40 程序
SETB TR0  ; 開始計數
SETB TR1
CLR P1.2
CLR P2.1    ;南北通行，東西禁止通行
CLR P1.3
CLR P1.5
MOV TEMP1,#40  ;南北要顯示的時間，
MOV TEMP2,#45 ;東西要顯示的時間
STLOP11:
ACALL DISPLAY1   ;調用顯示
DEC TEMP1      ;時間夠一秒顯示時間減1
DEC TEMP2
MOV A,TEMP1
CJNE A,#0,NEXT11 ;若顯示時間不為0保持現在狀態
LJMP STAR22     ;若顯示時間為 0跳到第二狀態
NEXT11: LJMP STLOP11


STAR22:     ;狀態1
SETB P1.2
CLR P1.1    ;南北黃燈，東西禁止通行
SETB P1.3
CLR P1.4
MOV TEMP1,#05  ;南北要顯示的時間，
MOV TEMP2,#05 ;東西要顯示的時間，

STLOP22:
ACALL DISPLAY1   ;調用顯示
DEC TEMP1      ;時間夠一秒顯示時間減1
DEC TEMP2
MOV A,TEMP1
CJNE A,#0,NEXT22   ;若顯示時間不為0保持現在狀態
JB TF1 ,T401      ; 判斷是否多車
JB TF0 ,T401
MOV TEMP1,#20  ;少車下次顯示時間為20秒
LJMP STAR3
T401:MOV TEMP1,#40 ;多車下次顯示時間為40秒
LJMP STAR3        ;若顯示時間為 0跳到第三狀態
NEXT22:LJMP STLOP22


STAR3:
MOV A,26H
CJNE A,#25,T40T1  ;判斷時間，選初始值
T20T1:       ;南北通行要顯示的時間為20的計數器初始值
CLR TF0        ; 清溢出位
CLR TF1
MOV TH1 ,#0FFH  ; 給初值
MOV TL1 ,#0FCH
MOV TH0 ,#0FFH
MOV TL0 ,#0FCH
LJMP TEMP320
T40T1:     ;南北通行要顯示的時間為40的計數器初始值
CLR TF0  ;
CLR TF1
MOV TH1,#0FFH ;給初值
MOV TL1 ,#0F8H
MOV TH0 ,#0FFH
MOV TL0 ,#0F8H
LJMP TEMP340

TEMP320:;狀態三
SETB TR1      ;南北停止計數
SETB TR0     ;東西開始計數
SETB P1.1    ;東西通行，南北禁止通行
CLR P1.0
SETB P1.1
CLR P1.0
SETB P1.5
CLR P1.6
SETB P2.1
CLR P2.3
MOV TEMP3,#25  ;南北要顯示的時間，
MOV TEMP4,#20 ;東西要顯示的時間，

STLOP33:
ACALL DISPLAY  ;調用顯示
DEC TEMP3       ;時間夠一秒顯示時間減1
DEC TEMP4
MOV A,TEMP4
CJNE A,#0,NEXT33  ;若顯示時間不為0保持現在狀態
LJMP STAR34       ;若顯示時間為 0跳到第四狀態
NEXT33:LJMP STLOP33


STAR34:           ;狀態四
SETB P2.3
CLR P2.2
SETB P1.6      ;東西黃燈，南北禁止通行
CLR P1.5




MOV TEMP3,#05   ;南北要顯示的時間，
MOV TEMP4,#05   ;東西要顯示的時間，
STLOP34:
ACALL DISPLAY  ;調用顯示
DEC TEMP3       ;時間夠一秒顯示時間減1
DEC TEMP4
MOV A,TEMP4
CJNE A,#0,NEXT34  ;若顯示時間不為0保持現在狀態
JB TF1 ,T402
JB TF0 ,T402
MOV TEMP3,#25
LJMP STAR
T402:
MOV TEMP3,#45
LJMP STAR
NEXT34:   LJMP STLOP34


TEMP340 :
SETB TR1      ;南北停止計數
SETB TR0     ;東西開始計數
SETB P1.1    ;東西通行，南北禁止通行
CLR P1.0
SETB P1.1
CLR P1.0
SETB P1.5
CLR P1.6
SETB P2.1
CLR P2.3
MOV TEMP3,#45  ;南北要顯示的時間，
MOV TEMP4,#40 ;東西要顯示的時間，

STLOP43:
ACALL DISPLAY  ;調用顯示
DEC TEMP3       ;時間夠一秒顯示時間減1
DEC TEMP4
MOV A,TEMP4
CJNE A,#0,NEXT43  ;若顯示時間不為0保持現在狀態
LJMP STAR44       ;若顯示時間為 0跳到第四狀態
NEXT43:LJMP STLOP43


STAR44:           ;狀態四
SETB P2.3
CLR P2.2
SETB P1.6      ;東西黃燈，南北禁止通行
CLR P1.5




MOV TEMP3,#05   ;南北要顯示的時間，
MOV TEMP4,#05   ;東西要顯示的時間，
STLOP44:
ACALL DISPLAY  ;調用顯示
DEC TEMP3       ;時間夠一秒顯示時間減1
DEC TEMP4
MOV A,TEMP3
CJNE A,#0,NEXT44  ;若顯示時間不為0保持現在狀態
JB TF1 ,T403
JB TF0 ,T403
MOV TEMP3,#25
LJMP STAR
T403:
MOV TEMP3,#45
LJMP STAR
NEXT44:   LJMP STLOP44


;顯示
DISPLAY1:
MOV A,TEMP1  ;將南北要顯示的數存放到A
MOV B,#10  ;B=10
DIV AB     ;A除以B商存A，余數B
MOV B_BIT,A ; 將A放到20H
MOV A_BIT,B  ;將B放到21H

MOV A,TEMP2 ;將東西要顯示的數存放到A
MOV B,#10   ;B=10
DIV AB       ;A除以B商存A，余數B
MOV C_BIT,A   ;將A放到22H
MOV D_BIT,B   ;將B放到23H

MOV DPTR ,#NUMT ;
MOV R0,#2    ;R0=2
DPL11: MOV R1,#250 ;R1=250
DPLOP1:
MOV A,A_BIT ;將南北要顯示的10位數送A
MOVC A,@A+DPTR ;查表
MOV P0,A    ;顯示南北10位數
CLR P2.7
ACALL D1MS;延時1MS
SETB P2.7 ;滅南北10位數
MOV A,B_BIT  ;將南北要顯示的個位數送A
MOVC A,@A+DPTR   ;查表
MOV P0,A    ;顯示南北個位數
CLR P2.6
ACALL D1MS ;延時1MS
SETB P2.6  ;滅南北個位數

MOV A,C_BIT  ;將東西要顯示的10位數送A
MOVC A,@A+DPTR  ;查表
MOV P0,A    ;顯示東西10位數
CLR P2.5
ACALL D1MS ;延時1MS
SETB P2.5   ;滅東西10位數

MOV A,D_BIT  ;將東西要顯示的個位數送A
MOVC A,@A+DPTR ;查表
MOV P0,A    ;顯示東西東西位數
CLR P2.4
ACALL D1MS ;延時1MS
SETB P2.4  ;滅東西個位數

DJNZ R1,DPLOP ;循環掃描
DJNZ R0,DPL1
RET     ;等待1秒返回

;顯示
DISPLAY:
MOV A,TEMP3  ;將南北要顯示的數存放到A
MOV B,#10  ;B=10
DIV AB     ;A除以B商存A，余數B
MOV B_BIT,A ; 將A放到20H
MOV A_BIT,B  ;將B放到21H

MOV A,TEMP4 ;將東西要顯示的數存放到A
MOV B,#10   ;B=10
DIV AB       ;A除以B商存A，余數B
MOV C_BIT,A   ;將A放到22H
MOV D_BIT,B   ;將B放到23H

MOV DPTR ,#NUMT ;
MOV R0,#2    ;R0=2
DPL1: MOV R1,#250 ;R1=250
DPLOP:
MOV A,A_BIT ;將南北要顯示的10位數送A
MOVC A,@A+DPTR ;查表
MOV P0,A    ;顯示南北10位數
CLR P2.7
ACALL D1MS;延時1MS
SETB P2.7 ;滅南北10位數
MOV A,B_BIT  ;將南北要顯示的個位數送A
MOVC A,@A+DPTR   ;查表
MOV P0,A    ;顯示南北個位數
CLR P2.6
ACALL D1MS ;延時1MS
SETB P2.6  ;滅南北個位數

MOV A,C_BIT  ;將東西要顯示的10位數送A
MOVC A,@A+DPTR  ;查表
MOV P0,A    ;顯示東西10位數
CLR P2.5
ACALL D1MS ;延時1MS
SETB P2.5   ;滅東西10位數

MOV A,D_BIT  ;將東西要顯示的個位數送A
MOVC A,@A+DPTR ;查表
MOV P0,A    ;顯示東西東西位數
CLR P2.4
ACALL D1MS ;延時1MS
SETB P2.4  ;滅東西個位數

DJNZ R1,DPLOP ;循環掃描
DJNZ R0,DPL1
RET     ;等待1秒返回



D1MS: MOV R7,#250  ;1MS延時程序
DJNZ R7,$
RET
;1到10對應電路圖數碼管表
NUMT: DB    7EH,48H,67H,6BH,59H
      DB    3BH,3FH,68H,7FH,7BH
END



Keil代碼與Proteus仿真7.5下載: 交通燈.rar (51.15 KB, 下載次數: 33)

2021-12-19 08:58 上傳

點擊文件名下載附件
下載積分: 黑幣 -5

---

歡迎光臨 (http://m.zg4o1577.cn/bbs/)

Powered by Discuz! X3.1

感谢您访问我们的网站，您可能还对以下资源感兴趣：

久久久久久久999|99精品久久精品一区二区爱城|成人欧美一区二区三区在线播放|国产精品日本一区二区不卡视频|国产午夜视频|欧美精品在线观看免费

主站蜘蛛池模板： 九九色影院 | 成人免费在线 | 国产一区精品视频 | 91成人精品 | 手机福利视频 | 精品国产区一区二 | 在线色综合 | 18精品爽国产白嫩精品 | 亚洲一区二区免费看 | 黄色一区二区三区 | 丁香五香天堂网 | 亚洲天堂第一页 | 黄网免费看| 五月婷婷开心 | 18成人免费观看网站 | 亚洲欧美日韩色图 | 日韩专区在线 | 亚洲精品免费视频 | 四虎影院在线 | 日韩中文视频 | 日韩国产精品一区二区 | 男女裸体无遮挡做爰 | 黄色片视频在线观看 | 亚洲欧美网站 | 国产天堂网 | 手机福利视频 | 久久国产欧美 | 欧美伊人网 | 免费黄色小视频 | 欧美一区二区三区免费 | 国产一区二区不卡 | 欧美日韩一区二区在线 | 国产精品毛片久久久久久久 | 另类专区亚洲 | 久久99免费视频 | 国产伦精品一区二区免费 | 欧美一区二区精品 | 国产三级在线观看 | 国产精品福利在线观看 | 日日干夜夜草 | 精品国产一二三区 |

<abbr id="oasee"></abbr>

<s id="oasee"></s>

<dl id="oasee"></dl>