51单片机电子时钟

org 0000hajmp mainorg 000bhajmp inti0org 0030hmain:mov tmod,#01hmov ie,#82hmov th0,#4chmov tl0,#00hmov sp,#60hmov r0,#20setb tr0loop:lcall displaylcall keysanajmp loopinti0:push pswpush accclr eamov th0,#4chmov tl0,#00hdjnz r0,out ;1秒计数是否到mov r0,#20 inc 31h ;秒加1mov a,31hcjne a,#60,out ;60秒计数是否到mov 31h,#00inc 32h ;分加1mov a,32hcjne a,#60,out ;60分计数是否到mov 32h,#00inc 33h ;时加1mov a,33hcjne a,#24,out ;24时是否到mov 33h,#00out: setb eapop accpop pswretidisplay:mov a,31h ;秒显示mov b,#10div abmov 20h,amov 21h,bdisp1: mov a,20h ;秒十位显示mov dptr,#tablemovc a,@a+dptrmov p0,aclr p2.6lcall del1mssetb p2.6disp2: mov a,21h ;秒个位显示mov dptr,#tablemovc a,@a+dptrmov p0,aclr p2.7lcall del1mssetb p2.7disp4: mov a,32h ;分显示mov b,#10div abmov 22h,amov 23h,bdisp5: mov a,22h ;分十位显示mov dptr,#tablemovc a,@a+dptrmov p0,aclr p2.3lcall del1mssetb p2.3disp6: mov a,23h ;分个位显示mov dptr,#tablemovc a,@a+dptrmov p0,aclr p2.4lcall del1mssetb p2.4disp7: mov a,33h ;时显示mov b,#10div abmov 24h,amov 25h,bdisp8: mov a,24h ;时十位显示mov dptr,#tablemovc a,@a+dptrmov p0,aclr p2.0lcall del1mssetb p2.0disp9: mov a,25h ;时个位显示mov dptr,#tablemovc a,@a+dptrmov p0,aclr p2.1lcall del1mssetb p2.1disp10: mov 34h,#0bfh ;"-"显示mov a,34hmov p0,aclr p2.5lcall del1mssetb p2.5disp11: mov 35h,#0bfh ;"-"显示mov a,35hmov p0,aclr p2.2lcall del1mssetb p2.2ret
        
        

         
          
          
         
        
        

        
        

         上一页
         1
         2
         下一页