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

<center id="8m8ys"></center>

標題: 紅綠燈匯編語言的單片機程序 [打印本頁]

作者: 阿奎那的神 時間: 2017-11-1 18:52
標題: 紅綠燈匯編語言的單片機程序
org 0000h
ajmp main
org 000bh
ajmp inti0
org 0030h
main:mov tmod,#01h
   mov ie,#82h
  mov th0,#4ch
  mov tl0,#00h
  mov sp,#60h
  mov 31h,#30  ;東西綠燈初值30秒
  mov 32h,#30  ;南北紅燈初值30秒
  clr 4fh  ;清標志位
  clr p1.1 ;開東西綠燈
  clr p1.5 ;開南北紅燈
  setb tr0 ;啟動T0
loop:lcall display  ;調用顯示子程序
   lcall key ;調用應急按鍵判斷
   ajmp loop
inti0:push psw
   clr ea
mov th0,#4ch
mov tl0,#00h
inc 35h
mov a,35h
cjne a,#20,out  ;判1秒是否到時
mov 35h,#00
jb 4fh,yi ;判別標志位
dec 31h ;東西時間每秒減1
dec 32h ;南北時間每秒減1
mov a,31h
cjne a,#05,out ;判是否到25秒
setb p2.0  ;到25秒關時間顯示
setb p2.1
setb p1.1 ;東西綠燈閃滅3秒
  lcall del500ms
  clr p1.1
  lcall del500ms
  setb p1.1
  lcall del500ms
  clr p1.1
  lcall del500ms
  setb p1.1
   lcall del500ms
  clr p1.1
  lcall del500ms
  setb p1.1 ;滅東西綠燈
  sjmp er
out:setb ea
pop psw
reti
  er:clr p1.2  ;東西黃燈亮2秒
  mov 33h,#4 ;延時2秒
loop1:lcall del500ms
   djnz 33h,loop1
setb p1.2 ;2秒后滅東西黃燈
clr p2.0  ;5秒后開時間顯示
clr p2.1
mov 31h,#20 ;東西時間賦20秒初值
   mov 32h,#20 ;南北時間賦20秒初值
setb 4fh
setb p1.5  ;關南北紅燈
clr p1.0  ;點亮東西紅燈
   clr p1.6  ;點亮南北綠燈
sjmp out
yi:dec 31h ;東西時間每秒減1
dec 32h ;南北時間每秒減1
mov a,31h
cjne a,#5,out  ;判是否到15秒
setb p2.6 ;到15秒關時間顯示
setb p2.7 ;
setb p1.6  ;南北綠燈閃滅3秒
  lcall del500ms
  clr p1.6
  lcall del500ms
  setb p1.6
  lcall del500ms
  clr p1.6
  lcall del500ms
  setb p1.6
   lcall del500ms
  clr p1.6
  lcall del500ms
setb p1.6 ;關南北綠燈
clr p1.7 ;南北黃燈亮2秒
  mov 34h,#4 ;延時2秒
loop2:lcall del500ms
   djnz 34h,loop2
setb p1.7 ;2秒后滅南北黃燈
clr p2.6 ;5秒后開時間顯示
clr p2.7 ;
mov 31h,#30 ;東西時間重賦30秒初值
mov 32h,#30 ;南北時間重賦30秒初值
clr p1.1 ;點亮東西綠燈
clr p1.5 ;點亮南北紅燈
setb p1.0 ;關東西紅燈
clr 4fh
sjmp out
display:mov a,31h  ;東西方向時間顯示
      mov b,#10
  div ab
  mov 20h,a
  mov 21h,b
  disp1:mov a,20h
      mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.0
  lcall del1ms
  setb p2.0
  disp2:mov a,21h
      mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.1
  lcall del1ms
  setb p2.1
  disp3:mov a,32h ;南北方向時間顯示
  mov b,#10
  div ab
  mov 22h,a
  mov 23h,b
  disp4:mov a,22h
      mov dptr,#table
  movc a,@a+dptr
  mov p3,a
  clr p2.6
  lcall del1ms
  setb p2.6
  disp5:mov a,23h
      mov dptr,#table
  movc a,@a+dptr
  mov p3,a
  clr p2.7
  lcall del1ms
  setb p2.7
  ret
table:db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,80h,90h ;0-9數字
del1ms:mov r7,#10 ;1ms延時子程序
d1:mov r6,#50
djnz r6,$
djnz r7,d1
ret
del500ms:mov r5,#5  ;500ms延時子程序
del3:mov r4,#200
del4:mov r3,#250
   djnz r3,$
  djnz r4,del4
  djnz r5,del3
  ret
key:jb p1.3,keyout
jnb p1.3,$
clr ea
inc 36h
mov a,36h
cjne a,#2,key4
mov 36h,#00
setb p1.6 ;東西綠燈閃滅3秒
  lcall del500ms
  clr p1.6
  lcall del500ms
  setb p1.6
  lcall del500ms
  clr p1.6
  lcall del500ms
  setb p1.6
   lcall del500ms
  clr p1.6
  lcall del500ms
  setb p1.6 ;滅東西綠燈
  clr p1.7  ;東西黃燈亮2秒
  mov 33h,#4 ;延時2秒
loop3:lcall del500ms
   djnz 33h,loop3
setb p1.7 ;2秒后滅東西黃燈
setb p1.0 ;關東西紅燈
setb p1.6  ;關南北綠燈
clr p1.1  ;開西綠燈
clr p1.5  ;開南北紅燈
setb ea
sjmp keyout
key4:clr p1.6 ;開南北綠燈
   clr p1.0 ;開東西紅燈
  setb p1.1
  setb p1.2
  setb p1.3
  setb p1.4
  setb p1.5
  setb p1.7
keyout:ret
end

作者: EFDGHHJ 時間: 2018-12-20 14:53
這個程序大概的電路圖有沒有

作者: EFDGHHJ 時間: 2018-12-20 14:53
電路的的數碼管是哪種

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

<strike id="sa8wa"></strike>