專注電子技術(shù)學(xué)習(xí)與研究
當(dāng)前位置:單片機(jī)教程網(wǎng) >> MCU設(shè)計(jì)實(shí)例 >> 瀏覽文章

單片機(jī)4位數(shù)碼管電子時(shí)鐘(帶鬧鐘,冒號(hào)為秒閃爍)

作者:佚名   來源:本站原創(chuàng)   點(diǎn)擊數(shù):  更新時(shí)間:2012年12月01日   【字體:

     經(jīng)過幾天的努力,第一個(gè)51單片機(jī)電子時(shí)鐘終于出爐了,通過4位數(shù)碼管來顯示時(shí)間,系統(tǒng)晶振11.0592MHZ,仿真圖中用二極管代替時(shí)鐘冒號(hào)閃爍,非門代替三極管,讓仿真速度與真實(shí)速度達(dá)到一致,本設(shè)計(jì)用了6個(gè)按鈕來對(duì)時(shí)間及鬧鐘時(shí)間的調(diào)節(jié)、關(guān)閉,p3.2接時(shí)間分加1按鈕,p3.3接時(shí)間時(shí)加1按鈕,p3.4接鬧鐘時(shí)間與當(dāng)前時(shí)間切換按鈕,按住不放顯示鬧鐘的時(shí)間,鬧鐘初始化為00:00,放開按鈕則顯示當(dāng)前時(shí)間,p3.5接鬧鐘加1按鈕,p3.6接鬧鐘時(shí)加1按鈕,p3.7接關(guān)閉鬧鐘按鈕
   有沒有人會(huì)問 ,怎么沒有減的按鈕呢??? 
   為了不用那么多按鈕,所以只設(shè)置了加1的按鈕,那減的怎么辦??
   程序的設(shè)計(jì)是這樣的,當(dāng)分加到59的時(shí)候,再加一次就變00,當(dāng)時(shí)加到23的時(shí)候,再加一次就變00,從而實(shí)現(xiàn)了減的效果,O(∩_∩)O,附帶仿真圖和程序源代碼及實(shí)物圖.........  

仿真圖

 

實(shí)物圖目前還差3個(gè)按鈕,準(zhǔn)備補(bǔ)上\(^o^)/~,電源的指示燈太亮了╮(╯▽╰)╭,準(zhǔn)備把它拆了


作者:胡琴
聯(lián)系qq:1257394091
本程序版本規(guī)本人所有可以任意轉(zhuǎn)載:
技術(shù)支持網(wǎng)站:http://www.torrancerestoration.com
本程序已經(jīng)通過軟件仿真和硬件制作.

程序源代碼:
   org 0000h
  ajmp main   ;調(diào)至主程序
  org 000bh   ;T0中斷入口地址
  ljmp inti0
  org 001bh   ;T1中斷入口地址
  ljmp inti1
  org 0030h
main:mov tmod,#11h ;設(shè)T0、T1為模式1
     mov ie,#8ah  ;開T0、T1中斷允許
  mov th0,#4ch   ;賦T0 50ms初值
  mov tl0,#00h
  mov th1,#4ch    ;賦T1 50ms初值
  mov tl1,#00h
  mov sp,#60h  ;設(shè)置堆棧指針
  mov r0,#20    ; T0 50ms計(jì)數(shù)20次
  mov 31h,#00  ;時(shí)間秒初始化
  mov 32h,#00  ;時(shí)間分初始化
  mov 33h,#00  ;時(shí)間時(shí)初始化
  mov 38h,#00  ;鬧鐘分初始化
  mov 39h,#00  ;鬧鐘時(shí)初始化
  setb tr0   ;啟動(dòng)T0
  setb tr1   ;啟動(dòng)T1
loop:lcall display  ;調(diào)用時(shí)間顯示子程序
     lcall key   ;調(diào)用時(shí)間調(diào)節(jié)按鍵子程序
  lcall keynz  ;調(diào)用鬧鐘按鍵子程序
     ajmp loop
inti0:push psw  ;保護(hù)現(xiàn)場
      push acc
   clr ea  ;關(guān)中斷
   mov th0,#4ch ;重賦50ms初值
   mov tl0,#00h
   djnz r0,out  ;對(duì)50ms計(jì)數(shù)判斷
   mov r0,#20   ;重賦50ms計(jì)數(shù)值
   inc 31h  ;秒加1
   cpl p2.2  ;P2.2取反輸出
   mov a,31h
   cjne a,#60,out ;判秒是否加到60,沒有加到中斷返回
   mov 31h,#00  ;秒加到60,對(duì)秒清零
   inc 32h  ;分加1
   mov a,32h
   cjne a,#60,out  ;判分是否加到60,沒有加到就中斷返回
   mov 32h,#00  ;分加到60,對(duì)分清零
   inc 33h  ;時(shí)加1
   mov a,33h
   cjne a,#24,out  ;判時(shí)是否加到24,沒有就中斷返回
   mov 33h,#00   ;時(shí)加到24,對(duì)時(shí)清零
out: setb ea  ;開中斷
     pop acc ;恢復(fù)現(xiàn)場
  pop psw
  reti  ;中斷返回
inti1:push psw ;保護(hù)現(xiàn)場
      push acc
   clr ea ;關(guān)中斷
   mov th1,#4ch ;賦50ms初值
   mov tl1,#00h
   inc 3ah
   mov a,3ah
   cjne a,#20,out1  ;判斷50ms計(jì)數(shù)是否到20,沒到就中斷返回
   mov 3ah,#00    ;50ms計(jì)數(shù)到20,將計(jì)數(shù)單元清零
   mov a,32h
   cjne a,38h,out1  ;鬧鐘分與時(shí)間分判斷
   mov a,33h
   cjne a,39h,out1  ;鬧鐘時(shí)與時(shí)間時(shí)判斷
   clr p1.0   ;相等就清p1.0輸出
out1: setb ea  ;開中斷
   pop acc  ;恢復(fù)現(xiàn)場
   pop psw
   reti  ;中斷返回
display:mov a,31h    ;秒顯示
  mov b,#10
  div ab
     mov 20h,a  ;將秒十位存20h
  mov 21h,b  ;將秒個(gè)位存21h
disp1:  mov a,20h  ;秒十位顯示
        mov dptr,#table ;查表
  movc a,@a+dptr ;將A與查表的值相加,回存給A
  mov p0,a   ;將A的值賦給P0口
  clr p2.0 ;點(diǎn)亮秒十位
  lcall del1ms ;調(diào)用延時(shí)1MS子程序
  setb p2.0 ;滅秒十位
disp2:  mov a,21h  ;秒個(gè)位顯示
        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 p0,a
  clr p2.6
  lcall del1ms
  setb p2.6
disp5:  mov a,23h   ;分個(gè)位顯示
        mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.7
  lcall del1ms
  setb p2.7
disp6:  mov a,33h  ;時(shí)顯示
        mov b,#10
  div ab
  mov 24h,a
  mov 25h,b
disp7:  mov a,24h    ;時(shí)十位顯示
  mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.4
  lcall del1ms
  setb p2.4
disp8:  mov a,25h  ;時(shí)個(gè)位顯示
        mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.5
  lcall del1ms
  setb p2.5
  ret
display1:mov a,38h ;鬧鐘分顯示
        mov b,#10
  div ab
  mov 26h,a
  mov 27h,b
dispnz1:mov a,26h  ;鬧鐘分十位顯示
        mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.6
  lcall del1ms
  setb p2.6
dispnz2:mov a,27h ;鬧鐘分個(gè)位顯示
        mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.7
  lcall del1ms
  setb p2.7
dispnz3:mov a,39h  ;鬧鐘時(shí)顯示
        mov b,#10
  div ab
  mov 28h,a
  mov 29h,b
dispnz4:mov a,28h ;鬧鐘時(shí)十位顯示
        mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.4
  lcall del1ms
  setb p2.4
dispnz5:mov a,29h  ;鬧鐘時(shí)個(gè)位顯示
        mov dptr,#table
  movc a,@a+dptr
  mov p0,a
  clr p2.5
  lcall del1ms
  setb p2.5
  ret
table:db 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H   ;數(shù)字0-9的十六進(jìn)制數(shù)
del1ms:mov r7,#10  ;1ms延時(shí)子程序
del1: mov r6,#50
del2:djnz r6,del2
     djnz r7,del1
  ret
del20ms:mov r5,#40 ;20ms延時(shí)子程序
del3:mov r4,#250
del4:djnz r4,del4
     djnz r5,del3
  ret
key:jnb p3.2,key1 ;時(shí)間分加1按鈕
    jnb p3.3,key2 ;時(shí)間時(shí)加1按鈕
    sjmp keyout
key1:lcall del20ms ;20ms延時(shí)消抖
  jb p3.2,keyout
  jnb p3.2,$  ;等待按鍵放開
  inc 32h  ;分加1
  mov a,32h
  cjne a,#60,keyout ;判分是否加到60,沒有就返回
  mov 32h,#00
  sjmp keyout
key2:lcall del20ms  ;20ms延時(shí)消抖
     jb p3.3,keyout
  jnb p3.3,$    ;等待按鍵放開
  inc 33h    ;時(shí)加1
  mov a,33h
  cjne a,#24,keyout  ;判時(shí)是否加到24,沒有就返回
  mov 33h,#00 ;時(shí)加到24,時(shí)清零
  sjmp keyout
keyout:ret
keynz:jnb p3.4,keynz1 ;鬧鐘時(shí)間和當(dāng)前時(shí)間切換按鈕
   jnb p3.5,keynz2 ;鬧鐘加分1按鈕
   jnb p3.6,keynz3 ;鬧鐘時(shí)加1按鈕
   jnb p3.7,keynz4 ;關(guān)閉鬧鐘按鈕
   sjmp nzout
nz1:lcall display1  ;調(diào)用顯示鬧鐘時(shí)間子程序
    jnb p3.5,keynz2
 jnb p3.6,keynz3
keynz1:jnb p3.4,nz1   ;按住按鍵不放開顯示鬧鐘時(shí)間并可以調(diào),放開則顯示當(dāng)前時(shí)間
    sjmp nzout
keynz2:lcall del20ms
       jb p3.5,nzout
    jnb p3.5,$  ;等待按鍵放開
    inc 38h   ;鬧鐘分加1
    mov a,38h
    cjne a,#60,nzout ;判鬧鐘分是否加到60,沒有就返回
    mov 38h,#00  ;鬧鐘分加到60,將鬧鐘分清零
    sjmp nzout
keynz3:lcall del20ms
       jb p3.6,nzout
    jnb p3.6,$  ;等待按鍵放開
    inc 39h   ;鬧鐘時(shí)加1
    mov a,39h
    cjne a,#24,nzout ;判鬧鐘時(shí)是否加到24,沒有就中斷返回
    mov 39h,#00    ;鬧鐘時(shí)加到24,鬧鐘時(shí)清零
    sjmp nzout
keynz4:jb p3.7,nzout
    jnb p3.7,$  ;等待按鍵放開
    setb p1.0   ;關(guān)閉鬧鐘
    sjmp nzout
nzout:ret
end

 

關(guān)閉窗口

相關(guān)文章