【正文】 UDGE ；按鍵掃描 ACALL KEYDLY ；延時消抖動 JB FKEY，JUDGE ；無鍵按下轉(zhuǎn)向判斷是否到點 CLR ET0 ；功能鍵被按下 CLR TR0 ；暫停計日寸 ACALL MENU ；調(diào)用菜單設(shè)置程序BEGIN： SETB WORKIN ；置工作標志位，開始工作 SETB ET0 ；開中斷 SETB TR0 ；開始計時 MOV A，R4 ；移人工作模式選擇 RL A ；指針放大 MOV DPTR，并M—TAB JMP A+DPTR ；根據(jù)工作模式跳轉(zhuǎn)到相應(yīng)程序段M—TAB: AJMP WORKl AJMP WORK2 AJMP WORK3 AJMP WORK4 NOP NOP LJMP ERR ；軟件陷阱 WORKl： ； WORK2: CLR SWITCH ；工作方式1和2：開繼電器 AJMP MAIN2 NOP NOP LJMP ERR ；軟件陷阱WORK3： ； WORK4： SETB SWI丁CH ；工作方式3和4：不開繼電器 MAIN2， CLR BELL ；蜂鳴器短鳴一聲，以示開始工作 ACALL DL05S SETB BELL JUDGl JNB WORKIN，MAINl ：判斷是否在定時之中 MOV A，SL ，判斷秒是否為零 JNZ MAINl MOV A，SH ；判斷秒是否為零 JNZ MAINl MOV A，ML ；判斷分是否為零 JNZ MAINl MOV A，MH ；判斷分是否為零 JNZ MAINl MOV A，HL ；判斷時是否為零 JNZ MAINl MOV A，HH ；判斷時是否為零 JNZ MAINl ；若時、分、秒全為零 CLR ET0 ；停止計時 CLR TR0 ACALL ACTION ；調(diào)用到點工作子程序 AJMP MAIN ‘返回 NOP NOP lJMP ERR ；軟件陷阱 ； PGTO： CLR EA ；關(guān)中斷 PUSH ACC 。ED取反 JNB LED4，OUTT0 ；LED每閃爍一次是1 s MOV R0，SH ；移人秒位的地址 SETB IFDEC ；BCD子程序參數(shù)，使其做減法 ACALL ADDBCD ；調(diào)用BCD子程序，秒減l CJNE R3，99H，OUTT0 ；判斷秒是否要借位 MOV SH，05H ；要借位則送數(shù)據(jù)59(否則顯示99) MOV 5L，09H MOV R0，MH ；移人分位的地址 ACALL ADDBCD ；分減l CJNE R3，99H，OUTT0；判斷分是否要借位 MOV MH，05H MOV ML，09H MOV R0，HH ACALL ADDBCD OUTT0： POP DPH ；恢復(fù)現(xiàn)場 POP DPL POP PSW POP ACC SETB EA R正TI ；中斷返回 NOP NOP LJMP ERR ；軟件陷阱 ； BCD子程序(加1或減1) ADDBCD：M()V A，R0 ；移入被操作數(shù)的高位 DEC R0 ；指針減1 SWAP A ORL A，R0 ；移人被操作數(shù)的低位 MOV B，01H ；B寄存器送立即數(shù)0＼H M()V C，IFDEC ；減法標志位為l MOV B．3，C ； MOV B．4，C ；B寄存器的值被改為99H MOV B．7，C ； ADD A，B ；對一個壓縮的BCD碼加捭99H等于對其減1 DA A ；BCD碼調(diào)整 MOV R3，A ；暫存結(jié)果 ANI， A，0FH ；取低位碼 MOV R0，A ；存數(shù) MOV A，R3 ；取回結(jié)果 INC R0 ；指針加1 SWAP A ；交換 ANL A，0FH ；取結(jié)果數(shù)的高位 MOV R0，A ；存數(shù) RET NOP NOP LJMP ERR ；軟件陷阱 ； ADDONE：M()V R0，ADDRES ；移入被加數(shù)單元的地址 CLR IFDEC ；設(shè)定BCD子程序做加法 ACAI上 ADDBCD ；調(diào)用BCD子程序 CLR C ；判斷被加數(shù)是否大于 MOV A，R3 ，最大值“MAX” CJNE A，MAK，JGOVER JGOVER： JC ENDAD() CI，R A ；若大于“MAX”，則清零 MOV R0，A DEC R0 MOV R0，A ENDADO：RET NOP N[)P ； LJMP ERR ；軟件陷阱 ； QUICK： CLR LPLMOD ；設(shè)定顯示方式不閃爍 CLR HPLMOD ACALL ADDONE ；調(diào)用加1子程序 MOV Le，R4 ；將工作模式選擇數(shù)移入顯存 INC L0 ；加1轉(zhuǎn)化成顯示值 ACALL KEYDLY ；延時 ACAI。Y ；等待F鍵釋放 JNB FKEY，WAITFK MENUl： ACAI。L KEYDLY ；延時消抖動 JB MKEY，JGFKEY ；未按下則轉(zhuǎn)F鍵掃描 CJNE R6，00H，NEXTl ； MOV SL，00H ；若中途改變定時方式，則清除原計時數(shù)據(jù) M()V SH，00H MOV ML，00H MOV MH，00H MOV HI。 ADDONE ；調(diào)用加1程序 MOV L0，R4 ；移人工作方式選擇數(shù) INC L0 ； WAITMK：ACAI。R C CJNE R2，0C8H，JGQUIC；若R2大于等于200則調(diào)用快進子程序 JGQUIC： JC WATMKl ACALL QUICK WATMKl:JNB MKEY，WAITMK；R2小于200則等待M鍵釋放； JGFKEY： Jn FKEY，MENUl ；功能(F)鍵掃描 ACAI。YP，SL；設(shè)定顯示區(qū)域為MM：SS MOV ADDRES，SH AJMP WAITFK SETM60： MOV DSPLYP，ML ；設(shè)定顯示區(qū)域為HH：MM MOV ADDRES，MH AJMP WAITFK ； SETHI： CLR LPLMOD ；設(shè)置高位(分位或時位) SETB HPLMOD ；高兩位數(shù)碼管閃爍 MOV MAX，3lH ；最大數(shù)為30 MOV A，R4 ；移人工作模式選擇數(shù) RL A ；指針放大 MOV DPTR，F(xiàn)TAB2 ；移人表首地址 JMP A十DPTR ；根據(jù)工作模式選擇數(shù)跳轉(zhuǎn)到相應(yīng)的程序段 F丁AB2： AJMP SETM30 AJMP SETHH 只 HPLMOD ；恢復(fù)不閃爍顯示方式 RET N()P NOP UMP ERR ；軟件陷阱 ACTION： MOV L0，R4 ；移人工作模式選擇數(shù) INC L0 ；送顯示數(shù)“F一0X” MOV L1，00H M()V I。丫P，L0 ；指針指向顯存 SETB I，PI，MOD ；設(shè)定顯示方式不閃爍 SETB HPLMOD MOV A，R4 ；移人工作模式選擇數(shù) RL A ； MOV DPTR，ATAB JMP A+DPTR ；根據(jù)工作模式選擇數(shù)跳轉(zhuǎn) A—TAB: AJMP ACTFl ；工作模式一 AJMP ACTFl ；工作模式二 AJMP ACTF3 ；工作模式三 八JMP ACTF3 ；工作模式四 NOP NOP LJMP ERR ；軟件陷阱 ACTFl： SE丁B SWITCH ；工作模式一(或二)：關(guān)繼電器 M()V R—MOD，82H ；響鈴模式參數(shù)82H MOV R2，96H 168。Y ；調(diào)用顯示 JNB FKEY，AWAITF ；等待鍵釋放 AWAITM：ACAI上 DISPLY ；調(diào)用顯示 JNB MKEY，AWAITM ；等待鍵釋放 RET NOP N()P LJMP ERR ；軟件陷阱 RING： MOV R5，18H ；R5為循環(huán)控制變量 RINGl： JNB MKEY，R—EXIT ；鍵掃描 JNB FKEY，R—EXIT ；有鍵按下則退出 MOV A，R—MOD ；移人響鈴模式參數(shù) M()V C，ACC。C RI。100 ；延日寸 DJNZ R5，RINGl ；循環(huán)次數(shù)控制 R—EXIT： SETB B正I。YP ；移入顯示指針 M()V R2，0FDH ；R2寄存的是數(shù)碼管選通數(shù) M()V A，PLYrS ；移人顯示循環(huán)控制量 JNZ PIAY ；不為0則轉(zhuǎn)PLAY M()V PlYTS，64H ；否則從新賦值 CPL BRIGHT ；亮滅指示位取反 PLAY： DEC PI?！? JB， BRIGHT，PLAYL ；亮滅指示為1也“PLAYL” ACALL NOPI。AYl： JNB HPLM()D，PI。AYH” JB BRIGHT，PLAYH ；亮滅指示為1也“P1。AY ；否則滅燈延時 AJMP OUT尸I。 P1，A ；送顯示數(shù)據(jù) ACALL