單片機匯編語言的十字路口紅綠燈Proteus仿真設計

ID:992541 · 發表于 2021-12-19 09:04

仿真原理圖如下（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)

帳號		自動登錄	找回密碼
密碼			立即注冊

wwwxxx国产_337p日本欧洲亚洲大胆张筱雨_免费在线看成人av_日本黄色不卡视频_国产精品成熟老女人_99视频一区_亚洲精品97久久中文字幕_免费精品视频在线_亚洲色图欧美视频_欧美一区二三区

單片機匯編語言的十字路口紅綠燈Proteus仿真設計

評分

相關帖子