【正文】 報(bào)警器 mov p1 ,0ffh ajmp cunchu next1:cjne a ,xs_1 ,next2 ；夠五位摩斯碼顯示 1 mov p1 ,0f9h clr lcall delay1s setb mov p0 ,0ffh ajmp cunchu next2:cjne a ,xs_2 ,next3 ；夠五位摩斯碼顯示 2 mov p1 ,0a4h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu next3: cjne a ,xs_3 ,next4 ；夠五位摩斯碼顯示 3 mov p1 ,0b0h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu next4: cjne a ,xs_4 ,next5 ；夠五位摩斯碼顯示 4 mov p1 ,99h clr 淮南師范學(xué)院電氣信息工程學(xué)院 2020 屆 自動(dòng)化 專業(yè)課程設(shè)計(jì)報(bào)告 25 lcall delay1s setb mov p1 ,0ffh ajmp cunchu next5: cjne a ,xs_5 ,next6 ；夠五位摩斯碼顯示 5 mov p1 ,92h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu next6: cjne a ,xs_6 ,next7 ；夠五位摩斯碼顯示 6 mov p1 ,7dh clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu next7: cjne a ,xs_7 ,next8 ；夠五位摩斯碼顯示 7 mov p1 ,0f8h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu next8: cjne a ,xs_8 ,next9 ；夠五位摩斯碼顯示 8 mov p1 ,080h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu next9: 淮南師范學(xué)院電氣信息工程學(xué)院 2020 屆 自動(dòng)化 專業(yè)課程設(shè)計(jì)報(bào)告 26 cjne a ,xs_9 ,cw ；夠五位摩斯碼顯示 9 mov p1 ,90h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu cw: clr clr lcall delay5s clr setb ajmp main1 shuru: ；開門復(fù)位 mov mmbz ,03 ；錯(cuò)誤密碼次數(shù) mov at1 ,00h mov at2 ,00h mov at3 ,00h mov at4 ,00h shuru2: clr mov a ,00h ；密碼緩存 mov r2 ,04h ；四位密碼 mov r1 ,00h mov r0 ,at1 mov r7 ,05h start1: jb ,start1 lcall delay500ms jb ,start1 ok1: ；滴音 setb ；開門后再按鍵 1t 以上關(guān)門 setb clr lcall delay500ms jnb ,daaa cun1: 淮南師范學(xué)院電氣信息工程學(xué)院 2020 屆 自動(dòng)化 專業(yè)課程設(shè)計(jì)報(bào)告 27 setb setb rl a add a ,r1 djnz r7 ,yanshi1 ajmp xianshi1 yanshi1: ；每個(gè)摩斯碼之間延時(shí) 1t lcall delay500ms jb ,stop1 ajmp ok1 daaa: ；嗒音 lcall delay500ms jb ,stop1 setb clr lcall delay500ms setb jnb ,stop1 mov r1 ,01h ajmp cun1 stop1: ；摩斯碼錯(cuò)誤處理 clr lcall delay2s setb ajmp shuru2 cunchu2: mov r0 ,a inc r0 mov a ,00h mov r1 ,00h mov r7 ,05h djnz r2 ,yanshi1 ajmp bijiao xianshi1: 。輸入一位摩斯碼停頓 1t lcall delay500ms jb ,main ajmp ok daa: ；嗒的音 lcall delay500ms jb ,stop setb clr lcall delay500ms setb jnb ,stop mov r1 ,01h ajmp cun stop: ；摩斯輸入錯(cuò)誤 clr lcall delay2s setb ajmp main cunchu:mov r0 ,a inc r0 mov a ,00h mov r1 ,00h mov r7 ,05h djnz r2 ,yanshi 淮南師范學(xué)院電氣信息工程學(xué)院 2020 屆 自動(dòng)化 專業(yè)課程設(shè)計(jì)報(bào)告 24 clr lcall delay2s setb ajmp shuru xianshi:cjne a ,xs_0 ,next1 ；夠五位摩斯碼顯示 0 mov p1 ,0c0h clr 。按鍵位 淮南師范學(xué)院電氣信息工程學(xué)院 2020 屆 自動(dòng)化 專業(yè)課程設(shè)計(jì)報(bào)告 23 jb ,start 。延時(shí)緩存區(qū) hc1 equ 4bh hc2 equ 4ch hc3 equ 4dh hc4 equ 4eh xs_0 equ 50h ；顯示緩存區(qū) xs_1 equ 51h xs_2 equ 52h xs_3 equ 53h xs_4 equ 54h xs_5 equ 55h xs_6 equ 56h xs_7 equ 57h 淮南師范學(xué)院電氣信息工程學(xué)院 2020 屆 自動(dòng)化 專業(yè)課程設(shè)計(jì)報(bào)告 22 xs_8 equ 58h xs_9 equ 59h ps1 equ 5ah ；設(shè)置密碼緩存區(qū) ps2 equ 5bh ps3 equ 5ch ps4 equ 5dh mmbz equ 5fh ；密碼輸入次數(shù) at1 equ 60h ；輸入密碼緩存區(qū) at2 equ 61h at3 equ 62h at4 equ 63h ；初始化 00h ajmp main1 30h main1: mov ps1 ,00h mov ps2 ,00h mov ps3 ,00h mov ps4 ,00h mov at1 ,00h mov at2 ,00h mov at3 ,00h mov at4 ,00h main:mov xs_0 ,1fh ；顯示 0 的摩斯值 mov xs_1 ,0fh ；顯示 1 的摩斯值 mov xs_2 ,07h ；顯示 2 的摩斯值 mov xs_3 ,03h ；顯示 3 的摩斯值 mov xs_4 ,01h ；顯示 4 的摩斯值 mov xs_5 ,00h ；顯示 5 的摩斯值 mov xs_6 ,10h ；顯示 6 的摩斯值 mov xs_7 ,18h ；顯示 7 的摩斯值 mov xs_8 ,1ch ；顯示 8 的摩斯值 mov xs_9 ,1eh ；顯示 9 的摩斯值 clr ； RXD 置 0