【文章內(nèi)容簡介】 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 mov a ,00h ；密碼緩存 mov r2 ,04h ；四位密碼 mov r1 ,00h mov r0 ,ps1 mov r7 ,05h 。摩斯次數(shù)，由于數(shù)字為 5 次 clr start:mov p0 ,0ffh mov p1 ,0ffh setb 。按鍵位 jb ,start 。 為 1 轉(zhuǎn) start lcall delay500ms jb ,start 18 ok: ；嘀的音 clr lcall delay500ms jnb ,daa ；是否去嗒音 cun: ； setb setb rl a add a ,r1 ；存入一位摩斯碼 djnz r7 ,yanshi ；是否夠五位摩斯碼 ajmp xianshi yanshi: 。輸入一位摩斯碼停頓 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 clr lcall delay2s setb 19 ajmp shuru xianshi:cjne a ,xs_0 ,next1 ；夠五位摩斯碼顯示 0 mov p1 ,0c0h clr 。報(bào)警器 lcall delay1s setb 。報(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 lcall delay1s setb mov p1 ,0ffh 20 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: cjne a ,xs_9 ,cw ；夠五位摩斯碼顯示 9 mov p1 ,90h clr 21 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: setb setb rl a 22 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: 。顯示處理 cjne a ,xs_0 ,next1_1 mov p1 ,0c0h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu2 23 next1_1: cjne a ,xs_1 ,next2_2 mov p1 ,0f9h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu2 next2_2: cjne a ,xs_2 ,next3_3 mov p1 ,0a4h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu2 next3_3: cjne a ,xs_3 ,next4_4 mov p1 ,0b0h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu2 next4_4: cjne a ,xs_4 ,next5_5 mov p1 ,99h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu2 next5_5: cjne a ,xs_5 ,next6_6 mov p1 ,92h clr lcall delay1s setb 24 mov p1 ,0ffh ajmp cunchu2 next6_6: cjne a ,xs_6 ,next7_7 mov p1 ,82h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu2 next7_7: cjne a ,xs_7 ,next8_8 mov p1 ,0f8h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu2 next8_8: cjne a ,xs_8 ,next9_9 mov p1 ,80h clr lcall delay1s setb mov p1 ,0ffh ajmp cunchu2 next9_9: cjne a ,xs_9 ,cw2