采用at89c2051制作的智能時鐘培訓(xùn)資料-wenkub
2023-04-17 00:22:14 本頁面
【正文】 clr_ramMOV SP,sp_data 。ORG 0023H 。ajmp t0reti 。 。3c90+30d=3cb0hw_adj_dat equ 50dkey_da equ 00000110b。************************************** led_1 bit led_2 bit led_3 bit led_4 bit led_5 bit beep_f BIT key_f bit 。************************************************** key_data equ 08htimers equ key_data+1t_30ms equ timers+1t_20ms equ t_30ms+1t_1s equ t_20ms+1k1_data equ t_1s+1k2_data equ k1_data+1stat_work equ k2_data+1stat_led equ stat_work+1t_1ms equ stat_led+1t_20m equ t_1ms+1 beep equ t_20mal1 equ beep+1al2 equ beep+2al3 equ beep+3al4 equ beep+4al5 equ beep+5al6 equ beep+6al7 equ beep+7al8 equ beep+8ret_timer equ al8+1。 設(shè)置定時時間 按下K1鍵3S后，進入設(shè)置菜單。按下K1鍵依次進入校時狀態(tài)：分、時、天、月、年、微調(diào)系數(shù)。 8路定時時間查詢 按下K1鍵依此顯示8路定時時間。 誤差：15S+1uS采用AT89C2051制作的智能時鐘一、智能電子鐘的功能 全日歷計時。 12/24小時轉(zhuǎn)換。 8路定時輸出（可關(guān)/開控制）星期位顯示：“H”表示：打開當(dāng)前定時輸出；“L” 表示：關(guān)閉當(dāng)前定時輸出。此時按K2鍵，完成+1。按下K1鍵依次進入8路定時調(diào)整狀態(tài)：時、分。***************。************************************************** sec equ 23hmin equ sec+1hhour equ min+1hday equ hour+1hmon equ day+1hyear equ mon+1hw_adj equ year+1h week equ w_adj+1h。******************************************************** t_h_100ms equ 05dh 。********************************************************* blk_led equ 20d dot_led equ 21d f_led equ 22d n_led equ 23d u_led equ 24d t_led equ 25d b_led equ 26d d_led equ 27doRG 0000H。reti。ORG 0013H reti 。RETI。call int_t0call timer_intcall timer_20msSTAR_BI:call clock call week_autocall al_outCALL KEY_bordcall key_del call set_clk_alcall key_jmp call rebackcall led_jmpsjmp star_bi 。**********************************。*********************************** led_min:mov a,minacall bcd_8jb fl_500ms ,tim2add a,10dtim2: mov led4,amov led5,bret。*************BCD_8: MOV B,10DDIV ABRET。acall timer_1ms。*************************led4 led_led4:mov a,led4movc a,a+dptrmov p1,aclr led_4acall timer_1mssetb led_4。 bafhcdeg led_asc:db 11101110B。3db 10101001B。7db 11101111B。1.db 11010111B。5.db 01111111B。9.DB 00000000B。h=23dDB 10101110B。d=27d。********************************timer_1ms:mov t_1ms,030hr2_1: djnz t_1ms , r2_1 rettimer_20ms:mov t_20m,050dr2_2: call clockcall leddjnz t_20m , r2_2 call week_autocall al_outret。else。*******jb mon=2 ******MOV A,MONCJNE A,02D,WEEK_1SJMP WEEK_2WEEK_1:JC WEEK_2week_3: mov a,r3mov b,07div abmov a,bsjmp week_4WEEK_2:。；求平均值（R4R5／R7－→R3）DV51: MOV A,R5RLC AMOV R5,AMOV A,R4RLC AMOV R4,AMOV F0,CCLR CSUBB A,R7ANL C,/F0JC DV52MOV R4,ADV52: CPL CMOV A,R3RLC AMOV R3,ADJNZ R6,DV51MOV A,R4 。MOV R0,0bH 。djnz r7,cr 。**********************************************al_led:mov r0,al1_hmov a,stat_workdec arl aadd a,r0mov r0,amov a,r0acall bcd_8mov led2,ajnz al_1mov led2,blk_ledal_1:mov a,badd a,10dmov led3,ainc r0mov a,r0acall bcd_8add a,10dmov led4,amov led5,bal_led_end:ret。 timer_12 to ledacall time_12ajmp led_jmp_5_endled_k2_2: 。****************************************proc set_al4set_al4:mov k1_data,01dmov k2_data,01dclr set_over acall led_alacall key_bordcall sf_keymov key_data,0mov frist,0set_al41:call clockcall week_autoacall led_alacall key_bordcall key_delacall key_aljnb set_over,set_al41 clr amov k1_data,amov k2_data,amov key_data,amov frist,aretend。********************************* led_out1:mov led2,00hmov led3,u_ledmov led4,t_ledmov led5,blk_ledmov led1,blk_ledret。************************************ inc r0mov a,r0acall bcd_8add a,10dmov led4,amov
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1