|
ORG 0000H AJMP MAIN RG 0050H MAIN: MOV P1,#0FFH ACALL DD3 LOOP: JNB P3.0,LOOP;判斷VT是否有信號(hào) ACALL DL;延時(shí)防抖動(dòng) JB P3.0,START;有信號(hào)則啟動(dòng) AJMP LOOP;無則返回 START:JNB P3.1,XD1;判斷D1信號(hào) ACALL DL JB P3.1,FDSD;有則進(jìn)入防盜設(shè)定 XD1: JNB P3.2,XD2;判斷D2信號(hào) ACALL DL JB P3.2,CBA1;有則進(jìn)入解除防盜 XD2: JNB P3.3,XD3;判斷D3信號(hào) ACALL DL JB P3.3,CBA2;有則進(jìn)入啟動(dòng)暖車 XD3: JNB P3.4,XD4;判斷D4信號(hào) ACALL DL JB P3.4,CBA3;有則進(jìn)入尋車求救 XD4: AJMP LOOP;無D1-D4的信號(hào)則返回 CBA1: AJMP JCFD CBA2: AJMP QDNC CBA3: AJMP XCQJ FDSD: MOV R4,#0FH;二級(jí)設(shè)定鍵廷時(shí)用 ACALL BJ;一級(jí)防盜設(shè)定程序,先報(bào)警 CLR P1.1;熄火程序 SETB P1.2 ACALL DD2 SETB P1.1 ACALL DD1;延時(shí)3秒 FD1: JNB P3.5,FD2;判斷振動(dòng)信號(hào) ACALL DL JB P3.5,BZC;有則進(jìn)入5秒聲光報(bào)警程序 FD2: JNB P3.7,FD3;判斷鎖頭正電線是否帶電 ACALL DL JB P3.7,BZC;有則進(jìn)入5秒聲光報(bào)警程序 FD3: JNB P3.0,FD4;判斷VT是否有信號(hào) ACALL DL JB P3.2,CBA1 JB P3.3,CBA2 JB P3.4,CBA3 JNB P3.1,CE ACALL CDSD;調(diào)用二級(jí)防盜報(bào)警 CE: JB P3.0,MAIN;有則返回 FD4: DJNZ R4,DE AJMP FB1 ;超過時(shí)間就轉(zhuǎn)回到一級(jí)設(shè)定等待 DE: AJMP FD1 FB1: JNB P3.5,FB2;判斷振動(dòng)信號(hào) ACALL DL JB P3.5,BZC;有則進(jìn)入5秒聲光報(bào)警程序 FB2: JNB P3.7,FB3;判斷鎖頭正電線是否帶電 ACALL DL JB P3.7,BZC;有則進(jìn)入5秒聲光報(bào)警程序 FB3: JNB P3.0,FB4;判斷VT是否有信號(hào) ACALL DL JB P3.2,CBA1 JB P3.3,CBA2 JB P3.4,CBA3 JB P3.1,FDSD FB4: AJMP FB1 CDSD: ACALL BBJ;進(jìn)入二級(jí)無聲防盜設(shè)定程序 ACALL DD3;延時(shí)3秒 BD1: JNB P3.5,BD2;判斷振動(dòng)信號(hào) ACALL DL JB P3.5,CBZC;有則進(jìn)入無聲燈閃三下報(bào)警程序 BD2: JNB P3.7,BD3;判斷鎖頭正電線是否帶電 ACALL DL JB P3.7,CBZC;有則進(jìn)入無聲燈閃三下報(bào)警程序 BD3: JNB P3.0,BD4;判斷VT是否有信號(hào) ACALL DL JB P3.0,V;有則返回 BD4: AJMP BD1 V: AJMP LOOP CBZC: ACALL CBJS BZC: ACALL BJS;調(diào)用5秒聲光報(bào)警程序 BG: ACALL DD3;延時(shí)3秒 ACALL DD2;延時(shí)2秒 BR: JNB P3.5,BC1;判斷振動(dòng)信號(hào) ACALL DL JB P3.5,JJ;有則進(jìn)入二級(jí)15秒報(bào)警 BC1: JNB P3.7,BC2;判斷鎖頭正電線是否帶電 ACALL DL JB P3.7,JJ;有則進(jìn)入二級(jí)15秒報(bào)警 BC2: JNB P3.0,BC3;判斷VT是否有信號(hào) ACALL DL JB P3.0,FH;有則返回 BC3: AJMP BD1 F: ACALL DD3;延時(shí)3秒 ACALL DD2;延時(shí)2秒 JNB P3.5,BZC1;判斷振動(dòng)信號(hào) ACALL DL JB P3.5,BJJ;有則進(jìn)入一級(jí)15秒報(bào)警 BZC1: JNB P3.7,BZC2;判斷鎖頭正電線是否帶電 ACALL DL JB P3.7,BJJ;有則進(jìn)入一級(jí)15秒報(bào)警 BZC2: JNB P3.0,BZC3;判斷VT是否有信號(hào) ACALL DL JB P3.0,FH;有則返回 BZC3: AJMP FD1 BJJ: ACALL BZJ;調(diào)用連續(xù)一級(jí)15秒聲光報(bào)警程序 ACALL DD1 JNB P3.7,BJJ1;判斷鎖頭正電線是否帶電 ACALL DL JB P3.7,XH;有則進(jìn)入熄火程序 BJJ1: JNB P3.0,BJJ2;判斷VT是否有信號(hào) ACALL DL JB P3.0,FH;有則返回 BJJ2: AJMP BJJ XH: CLR P1.1;熄火程序 SETB P1.2 ACALL DD2 SETB P1.1 AJMP BJJ FH: AJMP MAIN JJ: ACALL BZ;調(diào)用二級(jí)無燈閃15秒報(bào)警程序 ACALL DD1 JNB P3.7,JJ1;判斷鎖頭正電線是否帶電 ACALL DL JB P3.7,XH;有則進(jìn)入熄火程序 JJ1: JNB P3.0,JJ2;判斷VT是否有信號(hào) ACALL DL JB P3.0,FH;有則返回 JJ2: AJMP JJ H: CLR P1.1;熄火程序 SETB P1.2 ACALL DD2 SETB P1.1 AJMP BJJ CH: AJMP MAIN JCFD: ACALL BJ;解除防盜程序,聲光2次 ACALL DD1 ACALL BJ CLR P1.1 SETB P1.2 ACALL DD2 AJMP MAIN QDNC: MOV R3,#32H ;起動(dòng)廷時(shí)用程序 EF: JB P3.0,EF E1: MOV R4,#0FFH E2: MOV R5,#0FH ACALL DL HG: JB P3.0,GQ ;檢測(cè)VT信號(hào) ACALL DL DJNZ R5,$ DJNZ R4,E2 DJNZ R3,E1 AJMP LOOP ;廷時(shí)時(shí)間內(nèi)無再有信號(hào)則返回 GQ: ACALL DL JB P3.3,EW;再檢測(cè)D3信號(hào) AJMP LOOP EW: CLR P1.2;有測(cè)啟動(dòng)暖車程序 CLR P1.0 ACALL DD2 JB P3.0,$ SETB P1.0 ACALL DD3 AJMP LOOP XCQJ: MOV R3,#0FH;尋車求救程序(13響) XCQJ1:ACALL XBJ ACALL DD1 JNB P3.0,XCQJ2;判斷VT是否有信號(hào) ACALL DL JB P3.0,XCQJ3;有則返回 XCQJ2:DJNZ R3,XCQJ1 XCQJ3:AJMP LOOP DL: MOV R6,#0AH;按鍵延時(shí)子程序 DJNZ R6,$ RET DD3: MOV R5,#09H;3秒延時(shí)子程序 D3: MOV R6,#0FFH D4: MOV R7,#0FFH DJNZ R7,$ DJNZ R6,D4 DJNZ R5,D3 RET DD2: MOV R5,#06H;2秒延時(shí)子程序 D5: MOV R6,#0FFH D6: MOV R7,#0FFH DJNZ R7,$ DJNZ R6,D6 DJNZ R5,D5 RET DD1: MOV R5,#03H;1秒延時(shí)子程序 D0: MOV R6,#0FFH D1: MOV R7,#0FFH DJNZ R7,$ DJNZ R6,D1 DJNZ R5,D0 RET BBJ: CLR P1.3;燈光報(bào)警子程序 MOV R6,#0FFH BB1: MOV R7,#0FFH DJNZ R7,$ DJNZ R6,BB1 SETB P1.3 RET XBJ: CLR P1.3;尋車報(bào)警子程序 CLR P1.4 MOV R6,#0FFH XB1: MOV R7,#0FFH DJNZ R7,$ DJNZ R6,XB1 SETB P1.4 SETB P1.3 RET BJ: CLR P1.3;報(bào)警聲子程序 CLR P1.4 MOV R6,#5FH B1: MOV R7,#0FFH DJNZ R7,$ DJNZ R6,B1 SETB P1.4 SETB P1.3 RET STA: AJMP START CBjs: AJMP CJCT Bjs: AJMP BJCT BZ: CLR P1.4 CLR P1.1 MOV R4,#0FH;二級(jí)報(bào)警程序(15響) CQ1: ;無燈閃報(bào)警 ACALL DD1 JNB P3.0,CB1;判斷VT是否有信號(hào) ACALL DL JB P3.0,CB2;有則返回 CB1: DJNZ R4,CQ1 CB2: SETB P1.1 SETB P1.4 AJMP BG BZJ: CLR P1.4 CLR P1.1 MOV R4,#0FH;一級(jí)防盜報(bào)警程序(15響) CC1: ACALL BBJ ;聲光報(bào)警 ACALL DD1 JNB P3.0,CJ1;判斷VT是否有信號(hào) ACALL DL JB P3.0,CJ2;有則返回 CJ1: DJNZ R4,CC1 CJ2: SETB P1.1 SETB P1.4 AJMP F BJCT: CLR P1.4 MOV R4,#05H;一級(jí)防盜報(bào)警程序(5聲響) CJ: ACALL BBJ ACALL DD1 JNB P3.0,CAJ1;判斷VT是否有信號(hào) ACALL DL JB P3.0,CAJ2;有則返回 CAJ1: DJNZ R4,CJ CAJ2: SETB P1.1 SETB P1.4 AJMP F CJCT: MOV R4,#03H;二級(jí)防盜報(bào)警程序(3閃燈) BJ1: ACALL BBJ ACALL DD1 JNB P3.0,AJ1;判斷VT是否有信號(hào) ACALL DL JB P3.0,AJ2;有則返回 AJ1: DJNZ R4,BJ1 AJ2: SETB P1.1 AJMP BG END |
66821730(技術(shù)支持)
