【正文】 h 26h mov 27h,a mov a,21h mov b,10 div ab 。 月個(gè)位 月十位 movc a,@a+dptr mov 28h,a 。 29h 28h mov a,b movc a,@a+dptr mov 29h,a mov a,22h movc a,@a+dptr 。 年個(gè)位 年十位 年百位 年千位 mov 30h,a 。 22h 23h 24h 25h 。BCD碼 30h 31h 32h 33h mov a,23h movc a,@a+dptr mov 31h,a mov a,24h movc a,@a+dptr mov 32h,a mov a,25h movc a,@a+dptr mov 33h,a jnb ,return jnb ,adddate jnb ,decdate mov p3,0ffhdsp2: mov p2,27h mov p0,70h 。年月日的BCD碼 lcall delay 。日個(gè)位 日十位 月個(gè)位 月十位 年個(gè)位 年十位 年百位 年千位 。27h 26h 29h 28h 30h 31h 32h 33h mov p2,26h mov p0,60h lcall delay mov p2,28h mov p0,40h lcall delay mov p2,30h mov p0,30h lcall delay mov p2,32h mov p0,10h lcall delay mov p2,33h mov p0,00h lcall delay mov p0,50h mov p2,29h lcall delay mov p0,20h mov p2,31h lcall delay jmp dateadddate:lcall delay1 lcall delay1 。日加一 inc 20h mov a,20h cjne a,32,over mov 20h,0over: ljmp datedecdate:lcall delay1 。日減一 lcall delay1 dec 20h mov a,20h cjne a,1,over mov 20h,31 jmp overreturn6:mov p3,210 jmp r 。跳轉(zhuǎn)到日return: lcall delay1 mov p3,230 jnb ,return6 ljmp dater: mov a,20h mov b,10 。日 月 年個(gè)位 年十位 年百位 年千位 div ab 。20h 21h 22h 23h 24h 25h mov dptr,tab1 movc a,@a+dptr mov 26h,a mov a,b movc a,@a+dptr mov 27h,a mov a,21h mov b,10 div ab movc a,@a+dptr mov 28h,a mov a,b movc a,@a+dptr mov 29h,a mov a,22h movc a,@a+dptr mov 30h,a mov a,23h movc a,@a+dptr mov 31h,a mov a,24h movc a,@a+dptr mov 32h,a mov a,25h movc a,@a+dptr mov 33h,a jnb ,back1 jnb ,addri jnb ,decri mov p3,0ffhdsp3: mov p2,27h mov p0,70h lcall delay mov p2,26h mov p0,60h lcall delay mov p2,28h mov p0,40h lcall delay mov p2,30h mov p0,30h lcall delay mov p2,32h mov p0,10h lcall delay mov p2,33h mov p0,00h lcall delay mov p0,50h mov p2,29h lcall delay mov p0,20h mov p2,31h lcall delay jmp raddri: lcall delay1 lcall delay1 inc 21h mov a,21h cjne a,13,over1 mov 21h,1over1: ljmp rdecri: lcall delay1 lcall delay1 dec 21h mov a,21h cjne a,0,over1 mov 21h,12 jmp over1back: mov P3,220 。跳轉(zhuǎn)年調(diào)整，此倆個(gè)back 為按鍵防抖 jmp nianback1: lcall delay1 jnb ,back ljmp dsp3nian: mov a,20h 。 日 月 年個(gè)位 年十位 年百位 年千位 mov b,10 。 20h 21h 22h 23h 24h 25h div ab mov dptr,tab1 movc a,@a+dptr mov 26h,a 。轉(zhuǎn)化出來(lái)的BCD碼 mov a,b 。 日個(gè)位 日十位 movc a,@a+dptr 。 27h 26h mov 27h,a mov a,21h mov b,10 div ab 。 月個(gè)位 月十位 movc a,@a+dptr mov 28h,a 。 29h 28h mov a,b movc a,@a+dptr mov 29h,a mov a,22h movc a,@a+dptr 。 年個(gè)位 年十位 年百位 年千位 mov 30h,a 。 22h 23h 24h 25h 。BCD碼 30h 31h 32h 33h mov a,23h movc a,@a+dptr mov 31h,a mov a,24h movc a,@a+dptr mov 32h,a mov a,25h movc a,@a+dptr mov 33h,adsp4: mov p2,27h mov p0,70h 。年月日的BCD碼 lcall delay 。日個(gè)位 日十位 月個(gè)位 月十位 年個(gè)位 年十位 年百位 年千位 。27h 26h 29h 28h 30h 31h 32h 33h mov p2,26h mov p0,60h lcall delay mov p2,28h mov p0,40h lcall delay mov p2,30h mov p0,30h lcall delay mov p2,32h mov p0,10h lcall delay mov p2,33h mov p0,00h lcall delay mov p0,50h mov p2,29h lcall delay mov p0,20h mov p2,31h lcall delay jnb ,goto jnb ,addnian jnb ,deian mov p3,0ffh jmp nianaddnian:lcall delay1 lcall delay1 。年個(gè)位 年十位 年百位 年千位 inc 22h 。22h 23h 24h 25h mov a,22h cjne a,10,over4 mov 22h,0 inc 23h mov a,23h cjne a,10,over4 mov 23h,0 inc 24h mov a,24h cjne a,10,over4 mov 24h,0 inc 25h mov a,25h cjne a,10,over4 mov 25h,0over4: jmp niandeian:lcall delay1 lcall delay1 。年個(gè)位 年十位 年百位 年千位 dec 22h 。22h 23h 24h 25h mov a,22h cjne a,1,over4 mov 22h,0 dec 23h mov a,23h cjne a,1,over4 mov 23h,0 dec 24h mov a,24h cjne a,1,over4 mov 24h,0 dec 25h mov a,25h cjne a,1,over4 mov 25h,0 jmp over4goto1: mov p3,240 jmp loop 。跳轉(zhuǎn)到日goto: lcall delay1 jnb ,goto1 ljmp niantime: mov r5,15h mov r2,14h 。秒脈沖得到后，軟件計(jì)算時(shí)間 mov r1,13h mov r0,12h inc r7 mov a,r7 cjne a,20,T_ret inc r6 cjne r6,60,t mov r6,0 inc r0 cjne r0,10,t mov r0,0 inc r5 cjne r5,6,t mov r5,0 inc r1 cjne r1,10,next1 mov r1,0 inc r2next1: cjne r2,2,t cjne r1,4,t mov r2,0 mov r1,0 inc 20h mov p3,222 call delay1 mov a ,20h cjne a,32,t mov 20h,1 inc 21h mov a,21h cjne a,13,t mov 21h,1 inc 22h。/* cjne r1,24,ask。 mov r1,0。ask: mov dptr,tab1。 mov a,r1。 mov b,10。 div ab。 movc a,@a+dptr。 add a,r2。 mov r2,a。 mov a,b。 movc a,@a+dptr。 add a,r1。 mov r1,a */t: mov r7,0T_ret: mov TH0,03ch mov TL0,0b0h mov 12h,r0 mov 13h,r1 。將算出來(lái)的時(shí)間賦回地址中 mov 14h,r2 。 小時(shí) 分鐘 秒 。 r2 r1 r5 r0 r3 r4 mov 15h,r5 retidelay: mov 10h,4d3: mov 11h,5d4: djnz 11h,d4 djnz 10h,d3 retdelay1: mov 10h,0bfhd1: mov 11h,0ffhd2: djnz 11h,d2 djnz 10h,d1 rettab1: db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,00h,90h end（3）控制附機(jī)的的程序includesbit warmer=P2^4。sbit led_run=P2^0。sbit k_power